> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 01 00 8F 20 44 41 54 41 52 45 47 45 |....... DATAREGE|
00000010: 4C 41 41 52 20 31 00 2F 08 02 00 8F 20 44 4F 4F |LAAR 1./.... DOO|
00000020: 52 20 4D 41 52 43 20 44 45 20 48 49 4E 47 48 00 |R MARC DE HINGH.|
00000030: 4C 08 03 00 8F 20 55 49 54 20 42 52 45 44 41 20 |L.... UIT BREDA |
00000040: 2F 20 30 37 36 2D 31 34 35 36 35 32 00 55 08 04 |/ 076-145652.U..|
00000050: 00 8F 20 35 2F 00 92 08 5C EA 8F 20 2D 20 52 55 |.. 5/...\.. - RU|
00000060: 4E 20 36 30 30 30 30 20 4F 4D 20 45 45 4E 20 47 |N 60000 OM EEN G|
00000070: 45 48 45 55 47 45 4E 42 4C 4F 4B 20 4E 41 41 52 |EHEUGENBLOK NAAR|
00000080: 20 44 41 54 41 20 54 45 20 53 43 48 52 49 4A 56 | DATA TE SCHRIJV|
00000090: 45 4E 00 D5 08 5D EA 8F 20 2D 20 52 55 4E 20 36 |EN...].. - RUN 6|
000000A0: 30 30 32 30 20 4F 4D 20 45 45 4E 20 47 45 44 45 |0020 OM EEN GEDE|
000000B0: 45 4C 54 45 20 56 41 4E 20 48 45 54 20 50 52 4F |ELTE VAN HET PRO|
000000C0: 47 52 41 4D 4D 41 20 54 45 20 56 45 52 57 49 4A |GRAMMA TE VERWIJ|
000000D0: 44 45 52 45 4E 00 DB 08 5E EA 8F 00 E1 08 5F EA |DEREN...^....._.|
000000E0: 90 00 20 09 60 EA 85 22 93 53 54 41 52 54 41 44 |.. .`..".STARTAD|
000000F0: 52 45 53 22 3B 53 3A 41 B2 53 3A 85 22 20 45 49 |RES";S:A.S:." EI|
00000100: 4E 44 41 44 52 45 53 22 3B 45 3A 85 22 44 41 54 |NDADRES";E:."DAT|
00000110: 41 20 56 41 4E 41 46 20 52 45 47 45 4C 22 3B 52 |A VANAF REGEL";R|
00000120: 00 47 09 61 EA 99 22 4D 41 58 2E 20 4C 45 4E 47 |.G.a.."MAX. LENG|
00000130: 54 45 20 44 41 54 41 52 45 47 45 4C 53 20 28 3C |TE DATAREGELS (<|
00000140: 37 39 29 22 3A 85 4B 00 6F 09 62 EA 85 22 42 41 |79)":.K.o.b.."BA|
00000150: 53 49 43 4C 4F 41 44 45 52 20 4F 50 20 52 45 47 |SICLOADER OP REG|
00000160: 45 4C 22 3B 4C 3A 97 35 33 32 36 35 2C 31 31 00 |EL";L:.53265,11.|
00000170: 7D 09 63 EA 99 22 93 11 22 3A 4E B2 30 00 8C 09 |}.c.."..":N.0...|
00000180: 64 EA 99 52 22 9D 44 41 54 41 22 3B 00 B0 09 65 |d..R".DATA";...e|
00000190: EA 99 CA 28 C4 28 C2 28 41 29 29 2C 32 29 3B 3A |...(.(.(A)),2);:|
000001A0: 41 B2 41 AA 31 3A 8B 41 B1 45 A7 36 30 30 30 39 |A.A.1:.A.E.60009|
000001B0: 00 D5 09 66 EA 8B B9 28 30 29 B3 B2 4B AB C3 28 |...f...(0)..K..(|
000001C0: C4 28 C2 28 41 29 29 29 A7 99 22 2C 22 3B 3A 89 |.(.(A)))..",";:.|
000001D0: 36 30 30 30 35 00 F2 09 67 EA 99 3A 52 B2 52 AA |60005...g..:R.R.|
000001E0: 31 3A 4E B2 4E AA 31 3A 8B 4E B3 39 A7 36 30 30 |1:N.N.1:.N.9.600|
000001F0: 30 34 00 2E 0A 68 EA 99 22 52 3D 22 52 22 3A 41 |04...h.."R="R":A|
00000200: 3D 22 41 22 3A 53 3D 22 53 22 3A 45 3D 22 45 22 |="A":S="S":E="E"|
00000210: 3A 4B 3D 22 4B 22 3A 4C 3D 22 4C 22 3A 47 4F 54 |:K="K":L="L":GOT|
00000220: 4F 36 30 30 30 33 22 3A 89 36 30 30 31 32 00 5A |O60003":.60012.Z|
00000230: 0A 69 EA 99 3A 99 22 53 3D 22 53 22 3A 45 3D 22 |.i..:."S="S":E="|
00000240: 45 22 3A 4C 3D 22 4C 22 3A 47 4F 54 4F 36 30 30 |E":L="L":GOTO600|
00000250: 31 30 22 3A 89 36 30 30 31 32 00 92 0A 6A EA 99 |10":.60012...j..|
00000260: 22 93 11 11 22 4C 22 9D 46 CF 41 3D 22 CA 28 C4 |"..."L".F.A=".(.|
00000270: 28 53 29 2C 32 29 22 54 4F 22 CA 28 C4 28 45 29 |(S),2)"TO".(.(E)|
00000280: 2C 32 29 22 3A 52 C5 58 3A 50 CF 41 2C 58 3A 4E |,2)":R.X:P.A,X:N|
00000290: C5 22 00 AC 0A 6B EA 99 22 50 4F 4B 45 31 39 38 |."...k.."POKE198|
000002A0: 2C 30 3A 53 59 53 36 35 31 32 36 22 00 D3 0A 6C |,0:SYS65126"...l|
000002B0: EA 97 31 39 38 2C 31 30 3A 81 49 B2 30 A4 39 3A |..198,10:.I.0.9:|
000002C0: 97 36 33 31 AA 49 2C 31 33 3A 82 3A 99 22 13 22 |.631.I,13:.:."."|
000002D0: 3B 3A 80 00 14 0B 74 EA 99 22 93 52 45 47 45 4C |;:....t..".REGEL|
000002E0: 53 20 56 45 52 57 49 4A 44 45 52 45 4E 22 3A 85 |S VERWIJDEREN":.|
000002F0: 22 45 45 52 53 54 45 A0 52 45 47 45 4C 22 3B 52 |"EERSTE.REGEL";R|
00000300: 3A 85 22 4C 41 41 54 53 54 45 20 52 45 47 45 4C |:."LAATSTE REGEL|
00000310: 22 3B 52 52 00 22 0B 75 EA 97 35 33 32 36 35 2C |";RR.".u..53265,|
00000320: 31 31 00 30 0B 76 EA 99 22 93 11 22 3A 4E B2 30 |11.0.v.."..":N.0|
00000330: 00 4F 0B 77 EA 99 52 3A 52 B2 52 AA 31 3A 4E B2 |.O.w..R:R.R.1:N.|
00000340: 4E AA 31 3A 8B 52 B1 52 52 A7 36 30 30 31 31 00 |N.1:.R.RR.60011.|
00000350: 5E 0B 78 EA 8B 4E B3 39 A7 36 30 30 32 33 00 84 |^.x..N.9.60023..|
00000360: 0B 79 EA 99 22 52 3D 22 52 22 3A 52 52 3D 22 52 |.y.."R="R":RR="R|
00000370: 52 22 3A 47 4F 54 4F 36 30 30 32 32 22 3A 89 36 |R":GOTO60022":.6|
00000380: 30 30 31 32 00 00 00 A0 |0012.... |
....... DATAREGELAAR 1./.... DOOR MARC D
E HINGH.L.... UIT BREDA / 076-145652.U..
.. 5/...\.. - RUN 60000 OM EEN GEHEUGENB
LOK NAAR DATA TE SCHRIJVEN.U.].. - RUN 6
0020 OM EEN GEDEELTE VAN HET PROGRAMMA T
E VERWIJDEREN...^....._... .`..".STARTAD
RES";S:A.S:." EINDADRES";E:."DATA VANAF
REGEL";R.G.A.."MAX. LENGTE DATAREGELS (<
79)":.K.O.B.."BASICLOADER OP REGEL";L:.5
3265,11.}.C.."..":N.0...D..R".DATA";...E
..J(D(B(A)),2);:A.A.1:.A.E.60009.U.F...(
0)..K.C(D(B(A)))..",";:.60005...G..:R.R.
1:N.N.1:.N.9.60004...H.."R="R":A="A":S="
S":E="E":K="K":L="L":GOTO60003":.60012.Z
.I..:."S="S":E="E":L="L":GOTO60010":.600
12...J.."..."L".FOA="J(D(S),2)"TO"J(D(E)
,2)":REX:POA,X:NE"...K.."POKE198,0:SYS65
126".S.L..198,10:.I.0.9:.631.I,13:.:."."
;:....T..".REGELS VERWIJDEREN":."EERSTE
REGEL";R:."LAATSTE REGEL";RR.".U..53265,
11.0.V.."..":N.0.O.W..R:R.R.1:N.N.1:.R.R
R.60011.^.X..N.9.60023...Y.."R="R":RR="R
R":GOTO60022":.60012...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL