> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 02 00 8F 20 50 45 4E 43 4F 3A 4D 4F |....... PENCO:MO|
00000010: 4E 49 54 4F 52 00 44 08 04 00 8F 20 56 43 2D 32 |NITOR.D.... VC-2|
00000020: 30 20 4D 49 54 20 4D 49 4E 44 45 53 54 45 4E 53 |0 MIT MINDESTENS|
00000030: 20 38 20 4B 42 59 54 45 20 45 52 57 45 49 54 45 | 8 KBYTE ERWEITE|
00000040: 52 55 4E 47 00 74 08 06 00 8F 20 46 52 41 4E 4B |RUNG.t.... FRANK|
00000050: 20 47 4F 52 4F 4E 43 59 2F 57 49 45 53 45 4E 57 | GORONCY/WIESENW|
00000060: 45 47 20 32 31 2F 33 32 35 30 20 48 41 4D 45 4C |EG 21/3250 HAMEL|
00000070: 4E 20 31 33 00 87 08 0A 00 8F 20 2E 50 52 55 45 |N 13...... .PRUE|
00000080: 46 53 55 4D 4D 45 4E 00 BD 08 0C 00 86 43 53 28 |FSUMMEN......CS(|
00000090: 32 37 29 3A 81 54 B2 30 A4 32 37 3A 87 43 53 28 |27):.T.0.27:.CS(|
000000A0: 54 29 3A 82 3A 83 31 33 30 31 37 2C 31 37 36 31 |T):.:.13017,1761|
000000B0: 38 2C 31 30 38 37 34 2C 32 30 38 35 36 00 0A 09 |8,10874,20856...|
000000C0: 0E 00 83 33 36 35 37 36 2C 32 37 34 35 38 2C 31 |...36576,27458,1|
000000D0: 31 34 30 38 2C 32 35 36 33 31 2C 32 30 32 32 34 |1408,25631,20224|
000000E0: 2C 33 30 32 31 34 2C 32 38 35 38 32 2C 32 38 30 |,30214,28582,280|
000000F0: 38 31 2C 33 31 31 33 35 2C 32 36 39 38 37 2C 32 |81,31135,26987,2|
00000100: 36 38 33 32 2C 32 38 33 35 36 00 57 09 10 00 83 |6832,28356.W....|
00000110: 32 38 32 39 39 2C 31 39 36 39 31 2C 32 34 32 35 |28299,19691,2425|
00000120: 34 2C 32 33 36 39 39 2C 32 30 37 33 32 2C 32 34 |4,23699,20732,24|
00000130: 30 35 37 2C 31 37 31 35 31 2C 32 39 32 39 35 2C |057,17151,29295,|
00000140: 32 38 37 31 30 2C 32 34 31 30 35 2C 31 35 34 34 |28710,24105,1544|
00000150: 34 2C 32 34 37 39 34 00 64 09 12 00 8F 20 2E 4D |4,24794.d.... .M|
00000160: 45 4E 55 45 00 99 09 14 00 48 58 24 B2 22 30 31 |ENUE.....HX$."01|
00000170: 32 33 34 35 36 37 38 39 41 42 43 44 45 46 22 3A |23456789ABCDEF":|
00000180: 99 22 93 11 11 20 20 45 49 4E 47 41 42 45 20 20 |."... EINGABE |
00000190: 20 20 20 20 20 20 20 31 22 00 B5 09 16 00 99 22 | 1"......"|
000001A0: 11 20 20 55 45 42 45 52 50 52 55 45 46 55 4E 47 |. UEBERPRUEFUNG|
000001B0: 20 20 20 32 22 00 D1 09 18 00 99 22 11 20 20 4C | 2"......". L|
000001C0: 41 44 45 4E 20 20 20 20 20 20 20 20 20 20 20 33 |ADEN 3|
000001D0: 22 00 ED 09 1A 00 99 22 11 20 20 41 42 53 50 45 |"......". ABSPE|
000001E0: 49 43 48 45 52 4E 20 20 20 20 20 34 22 00 0A 0A |ICHERN 4"...|
000001F0: 1C 00 99 22 11 20 20 27 50 45 4E 43 4F 27 20 53 |...". 'PENCO' S|
00000200: 54 41 52 54 45 4E 20 35 11 22 00 32 0A 1E 00 97 |TARTEN 5.".2....|
00000210: 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 41 24 |198,0:.198,1:.A$|
00000220: 3A 8B 41 24 B3 22 31 22 B0 41 24 B1 22 35 22 A7 |:.A$."1".A$."5".|
00000230: 33 30 00 55 0A 28 00 91 C5 28 41 24 29 8D 31 30 |30.U.(...(A$).10|
00000240: 30 2C 34 30 30 2C 32 30 30 2C 32 30 32 2C 33 30 |0,400,200,202,30|
00000250: 30 3A 89 32 30 00 64 0A 62 00 8F 20 2E 45 49 4E |0:.20.d.b.. .EIN|
00000260: 47 41 42 45 00 91 0A 64 00 41 44 24 B2 22 22 3A |GABE...d.AD$."":|
00000270: 85 22 11 20 20 53 54 41 52 54 41 44 52 45 53 53 |.". STARTADRESS|
00000280: 45 22 3B 41 44 24 3A 8D 35 30 32 3A 4C 4F B2 41 |E";AD$:.502:LO.A|
00000290: 44 00 C8 0A 66 00 99 3A 43 B2 C2 28 4C 4F 29 3A |D...f..:C..(LO):|
000002A0: 41 44 B2 4C 4F 3A 8D 35 30 34 3A 99 22 20 20 22 |AD.LO:.504:." "|
000002B0: 41 44 24 22 20 22 3B 3A 42 B2 43 3A 8D 35 30 36 |AD$" ";:B.C:.506|
000002C0: 3A 99 42 24 22 20 22 3B 00 DD 0A 68 00 8D 35 30 |:.B$" ";...h..50|
000002D0: 38 3A 8B 41 24 B2 C7 28 31 33 29 A7 8E 00 F6 0A |8:.A$..(13).....|
000002E0: 6A 00 8B 41 24 B2 22 20 22 A7 4C 4F B2 4C 4F AA |j..A$." ".LO.LO.|
000002F0: 31 3A 89 31 30 32 00 0F 0B 6C 00 8B 41 24 B2 22 |1:.102...l..A$."|
00000300: 5E 22 A7 4C 4F B2 4C 4F AB 31 3A 89 31 30 32 00 |^".LO.LO.1:.102.|
00000310: 44 0B 6E 00 42 24 B2 41 24 3A 8D 35 30 38 3A 42 |D.n.B$.A$:.508:B|
00000320: 24 B2 42 24 AA 41 24 3A 8B 41 24 B2 C7 28 31 33 |$.B$.A$:.A$..(13|
00000330: 29 B0 41 24 B2 22 20 22 B0 41 24 B2 22 5E 22 A7 |).A$." ".A$."^".|
00000340: 89 31 30 32 00 60 0B 70 00 8D 35 30 30 3A 97 4C |.102.`.p..500:.L|
00000350: 4F 2C 42 3A 4C 4F B2 4C 4F AA 31 3A 89 31 30 32 |O,B:LO.LO.1:.102|
00000360: 00 7B 0B C6 00 8F 20 2E 4C 41 44 45 4E 20 26 20 |.{.... .LADEN & |
00000370: 41 42 53 50 45 49 43 48 45 52 4E 00 94 0B C8 00 |ABSPEICHERN.....|
00000380: 8D 32 30 34 3A 97 37 38 30 2C 30 3A 9E 36 35 34 |.204:.780,0:.654|
00000390: 39 33 3A 8E 00 C4 0B CA 00 8D 32 30 34 3A 97 31 |93:.......204:.1|
000003A0: 39 33 2C 30 3A 97 31 39 34 2C 32 30 3A 97 31 37 |93,0:.194,20:.17|
000003B0: 34 2C 30 3A 97 31 37 35 2C 34 38 3A 9E 36 33 31 |4,0:.175,48:.631|
000003C0: 30 36 3A 8E 00 ED 0B CC 00 97 31 38 35 2C 31 3A |06:.......185,1:|
000003D0: 97 31 38 36 2C 31 3A 97 31 38 33 2C 30 3A 97 31 |.186,1:.183,0:.1|
000003E0: 34 34 2C 30 3A 97 31 38 37 2C 30 3A 8E 00 04 0C |44,0:.187,0:....|
000003F0: 2A 01 8F 20 2E 27 50 45 4E 43 4F 27 20 53 54 41 |*.. .'PENCO' STA|
00000400: 52 54 45 4E 00 0E 0C 2C 01 9E 39 35 30 38 00 23 |RTEN...,..9508.#|
00000410: 0C 8E 01 8F 20 2E 55 45 42 45 52 50 52 55 45 46 |.... .UEBERPRUEF|
00000420: 55 4E 47 00 4F 0C 90 01 41 44 24 B2 22 22 3A 85 |UNG.O...AD$."":.|
00000430: 22 11 20 20 42 4C 4F 43 4B 41 44 52 45 53 53 45 |". BLOCKADRESSE|
00000440: 22 3B 41 44 24 3A 8B 41 44 24 B2 22 22 A7 8E 00 |";AD$:.AD$.""...|
00000450: 7A 0C 92 01 8D 35 30 32 3A 42 B2 41 44 AD 32 35 |z....502:B.AD.25|
00000460: 36 AB 32 30 3A 8B 42 B3 B1 B5 28 42 29 B0 42 B3 |6.20:.B...(B).B.|
00000470: 30 B0 42 B1 32 37 A7 34 30 30 00 BC 0C 94 01 99 |0.B.27.400......|
00000480: 22 20 20 53 55 4D 4D 45 22 3B 3A 43 B2 30 3A 81 |" SUMME";:C.0:.|
00000490: 54 B2 41 44 A4 41 44 AA 32 35 35 3A 43 B2 43 AA |T.AD.AD.255:C.C.|
000004A0: C2 28 54 29 3A 82 3A 8B 43 53 28 42 29 B3 B1 43 |.(T):.:.CS(B)..C|
000004B0: A7 99 22 20 12 4E 49 43 48 54 22 3B 00 CE 0C 96 |.." .NICHT";....|
000004C0: 01 99 22 20 49 2E 4F 2E 22 3A 89 34 30 30 00 E6 |.." I.O.":.400..|
000004D0: 0C F2 01 8F 20 2E 48 45 58 2F 44 45 5A 2D 52 4F |.... .HEX/DEZ-RO|
000004E0: 55 54 49 4E 45 4E 00 29 0D F4 01 4C B2 C6 28 C8 |UTINEN.)...L..(.|
000004F0: 28 42 24 2C 31 29 29 3A 52 B2 C6 28 C9 28 42 24 |(B$,1)):R..(.(B$|
00000500: 2C 31 29 29 3A 42 B2 28 4C AB 34 38 AA 28 4C B1 |,1)):B.(L.48.(L.|
00000510: 35 37 29 AC 37 29 AC 31 36 AA 52 AB 34 38 AA 28 |57).7).16.R.48.(|
00000520: 52 B1 35 37 29 AC 37 3A 8E 00 62 0D F6 01 42 24 |R.57).7:..b...B$|
00000530: B2 C8 28 41 44 24 2C 32 29 3A 8D 35 30 30 3A 41 |..(AD$,2):.500:A|
00000540: 44 B2 42 AC 32 35 36 3A 42 24 B2 C9 28 41 44 24 |D.B.256:B$..(AD$|
00000550: 2C 32 29 3A 8D 35 30 30 3A 41 44 B2 41 44 AA 42 |,2):.500:AD.AD.B|
00000560: 3A 8E 00 9B 0D F8 01 42 B2 B5 28 41 44 AD 32 35 |:......B..(AD.25|
00000570: 36 29 3A 8D 35 30 36 3A 41 44 24 B2 42 24 3A 42 |6):.506:AD$.B$:B|
00000580: B2 41 44 AB 42 AC 32 35 36 3A 8D 35 30 36 3A 41 |.AD.B.256:.506:A|
00000590: 44 24 B2 41 44 24 AA 42 24 3A 8E 00 CC 0D FA 01 |D$.AD$.B$:......|
000005A0: 42 24 B2 CA 28 48 58 24 2C 42 AD 31 36 AA 31 2C |B$..(HX$,B.16.1,|
000005B0: 31 29 AA CA 28 48 58 24 2C 42 AB B5 28 42 AD 31 |1)..(HX$,B..(B.1|
000005C0: 36 29 AC 31 36 AA 31 2C 31 29 3A 8E 00 FC 0D FC |6).16.1,1):.....|
000005D0: 01 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 |..198,0:.198,1:.|
000005E0: 41 24 3A 8B 41 24 B2 C7 28 31 33 29 B0 41 24 B2 |A$:.A$..(13).A$.|
000005F0: 22 20 22 B0 41 24 B2 22 5E 22 A7 8E 00 21 0E FE |" ".A$."^"...!..|
00000600: 01 8B 41 24 B3 22 30 22 B0 41 24 B1 22 46 22 B0 |..A$."0".A$."F".|
00000610: 41 24 B3 22 41 22 AF 41 24 B1 22 39 22 A7 35 30 |A$."A".A$."9".50|
00000620: 38 00 2C 0E 00 02 99 41 24 3B 3A 8E 00 00 00 |8.,....A$;:.... |
....... PENCO:MONITOR.D.... VC-20 MIT MI
NDESTENS 8 KBYTE ERWEITERUNG.T.... FRANK
GORONCY/WIESENWEG 21/3250 HAMELN 13....
.. .PRUEFSUMMEN......CS(27):.T.0.27:.CS(
T):.:.13017,17618,10874,20856......36576
,27458,11408,25631,20224,30214,28582,280
81,31135,26987,26832,28356.W....28299,19
691,24254,23699,20732,24057,17151,29295,
28710,24105,15444,24794.D.... .MENUE....
.HX$."0123456789ABCDEF":."... EINGABE
1"......". UEBERPRUEFUNG 2".Q.
...". LADEN 3"......". ABSPE
ICHERN 4"......". 'PENCO' STARTEN 5
.".2....198,0:.198,1:.A$:.A$."1".A$."5".
30.U.(..E(A$).100,400,200,202,300:.20.D.
B.. .EINGABE...D.AD$."":.". STARTADRESS
E";AD$:.502:LO.AD.H.F..:C.B(LO):AD.LO:.5
04:." "AD$" ";:B.C:.506:.B$" ";...H..50
8:.A$.G(13).....J..A$." ".LO.LO.1:.102..
.L..A$."^".LO.LO.1:.102.D.N.B$.A$:.508:B
$.B$.A$:.A$.G(13).A$." ".A$."^"..102.`.P
..500:.LO,B:LO.LO.1:.102.{.F.. .LADEN &
ABSPEICHERN...H..204:.780,0:.65493:..D.J
..204:.193,0:.194,20:.174,0:.175,48:.631
06:....L..185,1:.186,1:.183,0:.144,0:.18
7,0:....*.. .'PENCO' STARTEN...,..9508.#
.... .UEBERPRUEFUNG.O...AD$."":.". BLOC
KADRESSE";AD$:.AD$.""...Z....502:B.AD.25
6.20:.B...(B).B.0.B.27.400......" SUMME
";:C.0:.T.AD.AD.255:C.C.B(T):.:.CS(B)..C
.." .NICHT";.N...." I.O.":.400...... .HE
X/DEZ-ROUTINEN.)...L.F(H(B$,1)):R.F(I(B$
,1)):B.(L.48.(L.57).7).16.R.48.(R.57).7:
..B...B$.H(AD$,2):.500:AD.B.256:B$.I(AD$
,2):.500:AD.AD.B:......B..(AD.256):.506:
AD$.B$:B.AD.B.256:.506:AD$.AD$.B$:..L...
B$.J(HX$,B.16.1,1).J(HX$,B..(B.16).16.1,
1):.......198,0:.198,1:.A$:.A$.G(13).A$.
" ".A$."^"...!....A$."0".A$."F".A$."A".A
$."9".508.,....A$;:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL