> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3B 08 01 00 99 22 93 22 3A 99 22 48 45 52 |..;....".":."HER|
00000010: 42 49 45 53 4F 46 54 2D 44 41 54 41 4C 4F 41 44 |BIESOFT-DATALOAD|
00000020: 45 52 22 3A 99 3A 99 3A 99 3A 99 3A 4C B2 39 3A |ER":.:.:.:.:L.9:|
00000030: 41 B2 36 33 30 3A 4B B2 31 39 38 00 6F 08 02 00 |A.630:K.198.o...|
00000040: 99 22 44 49 54 20 50 52 4F 47 2E 56 45 52 4E 49 |."DIT PROG.VERNI|
00000050: 45 54 49 47 54 20 5A 49 43 48 5A 45 4C 46 20 4E |ETIGT ZICHZELF N|
00000060: 41 20 52 55 4E 4E 45 4E 22 3A 99 3A 99 3A 99 00 |A RUNNEN":.:.:..|
00000070: B1 08 03 00 99 3A 85 22 42 45 47 49 4E 41 44 52 |.....:."BEGINADR|
00000080: 45 53 20 44 45 43 49 4D 41 41 4C 22 3B 53 3A 48 |ES DECIMAAL";S:H|
00000090: B2 53 3A 85 22 20 45 49 4E 44 41 44 52 45 53 20 |.S:." EINDADRES |
000000A0: 44 45 43 49 4D 41 41 4C 22 3B 46 3A 56 B2 46 AB |DECIMAAL";F:V.F.|
000000B0: 53 00 DD 08 04 00 85 22 20 20 20 42 45 47 49 4E |S......" BEGIN|
000000C0: 52 45 47 45 4C 4E 55 4D 4D 45 52 22 3B 42 3A 57 |REGELNUMMER";B:W|
000000D0: B2 42 AA 31 30 3A 8B 42 B3 31 33 A7 31 00 17 09 |.B.10:.B.13.1...|
000000E0: 05 00 99 22 93 22 3A 99 3A 99 22 45 56 45 4E 20 |...".":.:."EVEN |
000000F0: 47 45 44 55 4C 44 20 41 2E 55 2E 42 22 3A 81 54 |GEDULD A.U.B":.T|
00000100: B2 30 A4 31 30 30 30 3A 82 3A 97 35 33 32 38 31 |.0.1000:.:.53281|
00000110: 2C 30 3A 99 22 90 22 00 5C 09 06 00 99 22 93 11 |,0:.".".\...."..|
00000120: 11 22 3A 99 42 3B 22 46 4F 52 58 3D 30 54 4F 22 |.":.B;"FORX=0TO"|
00000130: 3B 56 3B 22 9D 3A 52 45 41 44 59 3A 50 4F 4B 45 |;V;".:READY:POKE|
00000140: 22 3B 48 3B 22 2B 58 2C 59 3A 4E 45 58 54 22 3A |";H;"+X,Y:NEXT":|
00000150: 81 49 B2 53 A4 53 AA 34 37 A9 31 37 00 81 09 07 |.I.S.S.47.17....|
00000160: 00 8B 49 B1 46 A7 82 3A 99 22 4B 3D 22 4B 22 3A |..I.F..:."K="K":|
00000170: 41 3D 22 41 22 3A 47 4F 54 4F 31 33 22 3A 89 31 |A="A":GOTO13":.1|
00000180: 32 00 B8 09 08 00 99 57 3B 22 44 41 54 41 22 3B |2......W;"DATA";|
00000190: 3A 81 4A B2 30 A4 31 36 3A 41 24 B2 CA 28 C4 28 |:.J.0.16:A$..(.(|
000001A0: C2 28 49 AA 4A 29 29 2C 32 2C 33 29 3A 99 41 24 |.(I.J)),2,3):.A$|
000001B0: 3B 22 2C 22 3B 3A 82 4A 00 CD 09 09 00 99 C7 28 |;",";:.J.......(|
000001C0: 32 30 29 3A 57 B2 57 AA 31 30 3A 82 49 00 10 0A |20):W.W.10:.I...|
000001D0: 0A 00 99 22 4B 3D 22 4B 22 9D 3A 41 3D 22 41 22 |..."K="K".:A="A"|
000001E0: 9D 3A 53 3D 22 53 AA 34 38 22 9D 3A 46 3D 22 46 |.:S="S.48".:F="F|
000001F0: 22 9D 3A 48 3D 22 48 22 9D 3A 57 3D 22 57 22 9D |".:H="H".:W="W".|
00000200: 3A 42 3D 22 42 22 9D 3A 56 3D 22 56 22 9D 22 3B |:B="B".:V="V".";|
00000210: 00 24 0A 0B 00 99 22 3A 4C 3D 22 4C 22 3A 47 4F |.$....":L="L":GO|
00000220: 54 4F 36 22 00 45 0A 0C 00 97 4B 2C 4C 3A 81 44 |TO6".E....K,L:.D|
00000230: B2 31 A4 39 3A 97 41 AA 44 2C 31 33 3A 82 3A 99 |.1.9:.A.D,13:.:.|
00000240: 22 13 22 3A 80 00 5D 0A 0D 00 99 22 93 11 11 22 |".":..]...."..."|
00000250: 3A 81 59 B2 31 A4 31 35 3A 99 59 3A 82 00 8B 0A |:.Y.1.15:.Y:....|
00000260: 0E 00 99 22 50 4F 4B 45 35 33 32 38 31 2C 32 34 |..."POKE53281,24|
00000270: 36 3A 50 52 49 4E 54 43 48 52 24 28 31 34 37 29 |6:PRINTCHR$(147)|
00000280: 3A 4C 49 53 54 22 3A 99 22 13 22 00 AD 0A 0F 00 |:LIST":.".".....|
00000290: 81 53 B2 30 A4 31 36 3A 97 36 33 30 AA 53 2C 31 |.S.0.16:.630.S,1|
000002A0: 33 3A 97 31 39 38 2C 31 36 3A 82 3A 80 00 00 00 |3:.198,16:.:....|
..;....".":."HERBIESOFT-DATALOADER":.:.:
.:.:L.9:A.630:K.198.O...."DIT PROG.VERNI
ETIGT ZICHZELF NA RUNNEN":.:.:.......:."
BEGINADRES DECIMAAL";S:H.S:." EINDADRES
DECIMAAL";F:V.F.S......" BEGINREGELNUM
MER";B:W.B.10:.B.13.1......".":.:."EVEN
GEDULD A.U.B":.T.0.1000:.:.53281,0:.".".
\...."...":.B;"FORX=0TO";V;".:READY:POKE
";H;"+X,Y:NEXT":.I.S.S.47.17......I.F..:
."K="K":A="A":GOTO13":.12......W;"DATA";
:.J.0.16:A$.J(D(B(I.J)),2,3):.A$;",";:.J
.M....G(20):W.W.10:.I......"K="K".:A="A"
.:S="S.48".:F="F".:H="H".:W="W".:B="B".:
V="V".";.$....":L="L":GOTO6".E....K,L:.D
.1.9:.A.D,13:.:.".":..]...."...":.Y.1.15
:.Y:......."POKE53281,246:PRINTCHR$(147)
:LIST":."."......S.0.16:.630.S,13:.198,1
6:.:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL