> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 0A 00 97 35 33 32 38 31 2C 30 3A 97 |.......53281,0:.|
00000010: 36 34 36 2C 31 00 3A 08 17 F6 8F 20 36 34 20 44 |646,1.:.... 64 D|
00000020: 41 54 41 4D 41 4B 45 52 20 41 53 43 49 49 20 2D |ATAMAKER ASCII -|
00000030: 20 50 41 4E 4B 48 55 52 53 54 00 7B 08 18 F6 85 | PANKHURST.{....|
00000040: 22 93 11 4D 45 4D 4F 52 59 20 53 54 41 52 54 2C |"..MEMORY START,|
00000050: 20 45 4E 44 2C 20 41 4E 44 20 31 53 54 20 4C 49 | END, AND 1ST LI|
00000060: 4E 45 20 4E 55 4D 42 45 52 22 3B 41 53 2C 41 45 |NE NUMBER";AS,AE|
00000070: 2C 4C 53 3A 58 B2 36 33 30 32 30 00 C3 08 22 F6 |,LS:X.63020...".|
00000080: 58 24 B2 22 52 45 D3 3A 46 CF 49 3D 30 54 4F 2D |X$."RE.:F.I=0TO-|
00000090: 31 53 54 C5 2D 31 3A 52 C5 58 24 3A 49 3D 56 C1 |1ST.-1:R.X$:I=V.|
000000A0: 28 58 24 29 3D 2D 31 3A 4E C5 3A 58 3D 22 AA C4 |(X$)=-1:N.:X="..|
000000B0: 28 41 53 29 AA 22 3A 44 C1 2D 31 22 3A 89 36 33 |(AS).":D.-1":.63|
000000C0: 30 39 30 00 02 09 2C F6 59 24 B2 C7 28 33 34 29 |090...,.Y$..(34)|
000000D0: 3A 58 24 B2 22 52 C5 58 24 3A 49 46 58 24 3D 22 |:X$."R.X$:IFX$="|
000000E0: AA 59 24 AA 22 2F 45 22 AA 59 24 AA 22 54 C8 52 |.Y$."/E".Y$."T.R|
000000F0: 45 D4 22 3A 58 B2 36 33 30 33 30 3A 89 36 33 30 |E.":X.63030:.630|
00000100: 39 30 00 4A 09 36 F6 58 24 B2 22 46 CF 49 3D 31 |90.J.6.X$."F.I=1|
00000110: 54 4F 4C 45 4E 28 58 24 29 53 54 C5 32 3A 50 CF |TOLEN(X$)ST.2:P.|
00000120: 58 2C 41 D3 28 4D C9 28 58 24 2C 49 2C 31 29 29 |X,A.(M.(X$,I,1))|
00000130: 2A 31 36 2B 41 D3 28 4D C9 28 58 24 2C 49 2B 31 |*16+A.(M.(X$,I+1|
00000140: 2C 31 29 29 2D 31 31 30 35 22 00 5D 09 40 F6 58 |,1))-1105".].@.X|
00000150: B2 36 33 30 35 30 3A 89 36 33 30 39 30 00 8C 09 |.63050:.63090...|
00000160: 4A F6 58 24 B2 22 58 3D 58 2B 31 3A 4E 45 58 54 |J.X$."X=X+1:NEXT|
00000170: 3A 47 CF 22 AA C4 28 4C 53 AB 32 30 29 3A 58 B2 |:G."..(LS.20):X.|
00000180: 36 33 30 36 30 3A 89 36 33 30 39 30 00 AA 09 54 |63060:.63090...T|
00000190: F6 81 49 B2 30 A4 31 33 3A 58 B2 C2 28 41 53 29 |..I.0.13:X..(AS)|
000001A0: 3A 59 B2 B5 28 58 AD 31 36 29 00 EE 09 5E F6 58 |:Y..(X.16)...^.X|
000001B0: 24 B2 58 24 AA C7 28 59 AA 36 35 29 AA C7 28 58 |$.X$..(Y.65)..(X|
000001C0: AB 59 AC 31 36 AA 36 35 29 3A 41 53 B2 41 53 AA |.Y.16.65):AS.AS.|
000001D0: 31 3A 49 B2 49 AB 28 41 53 B1 41 45 29 AC 39 39 |1:I.I.(AS.AE).99|
000001E0: 3A 82 3A 58 24 B2 22 44 C1 20 22 AA 58 24 00 FA |:.:X$."D. ".X$..|
000001F0: 09 68 F6 58 B2 36 33 31 31 30 00 38 0A 72 F6 99 |.h.X.63110.8.r..|
00000200: 22 93 11 11 22 4C 53 3B 58 24 3A 99 22 41 53 3D |"..."LS;X$:."AS=|
00000210: 22 41 53 22 3A 41 45 3D 22 41 45 22 3A 4C 53 3D |"AS":AE="AE":LS=|
00000220: 22 4C 53 AA 31 30 22 3A 47 CF 22 58 22 13 22 3B |"LS.10":G."X".";|
00000230: 3A 97 36 33 31 2C 31 33 00 4D 0A 7C F6 97 36 33 |:.631,13.M.|..63|
00000240: 32 2C 31 33 3A 97 31 39 38 2C 32 3A 80 00 5F 0A |2,13:.198,2:.._.|
00000250: 86 F6 8B 41 53 B3 B2 41 45 A7 36 33 30 36 30 00 |...AS..AE.63060.|
00000260: 7D 0A 90 F6 58 24 B2 22 44 C1 20 2F 45 22 3A 58 |}...X$."D. /E":X|
00000270: B2 36 33 31 33 30 3A 89 36 33 30 39 30 00 9F 0A |.63130:.63090...|
00000280: 9A F6 58 B2 36 33 30 30 30 3A 85 22 52 45 41 44 |..X.63000:."READ|
00000290: 59 20 54 4F 20 44 45 4C 45 54 45 22 3B 58 24 00 |Y TO DELETE";X$.|
000002A0: D8 0A A4 F6 99 22 93 11 11 22 58 3A 99 22 58 3D |....."..."X:."X=|
000002B0: 22 58 AA 31 30 22 3A 47 CF 36 33 31 34 30 13 22 |"X.10":G.63140."|
000002C0: 3B 3A 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 |;:.631,13:.632,1|
000002D0: 33 3A 97 31 39 38 2C 32 00 00 00 |3:.198,2... |
.......53281,0:.646,1.:.... 64 DATAMAKER
ASCII - PANKHURST.{...."..MEMORY START,
END, AND 1ST LINE NUMBER";AS,AE,LS:X.63
020.C.".X$."RES:FOI=0TO-1STE-1:REX$:I=VA
(X$)=-1:NE:X=".D(AS).":DA-1":.63090...,.
Y$.G(34):X$."REX$:IFX$=".Y$."/E".Y$."THR
ET":X.63030:.63090.J.6.X$."FOI=1TOLEN(X$
)STE2:POX,AS(MI(X$,I,1))*16+AS(MI(X$,I+1
,1))-1105".].@.X.63050:.63090...J.X$."X=
X+1:NEXT:GO".D(LS.20):X.63060:.63090...T
..I.0.13:X.B(AS):Y..(X.16)...^.X$.X$.G(Y
.65).G(X.Y.16.65):AS.AS.1:I.I.(AS.AE).99
:.:X$."DA ".X$...H.X.63110.8.R.."..."LS;
X$:."AS="AS":AE="AE":LS="LS.10":GO"X".";
:.631,13.M.|..632,13:.198,2:.._....AS..A
E.63060.}...X$."DA /E":X.63130:.63090...
..X.63000:."READY TO DELETE";X$.X...."..
."X:."X="X.10":GO63140.";:.631,13:.632,1
3:.198,2...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL