> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 48 08 01 00 86 46 58 24 28 32 35 36 29 2C |..H....FX$(256),|
00000010: 46 54 24 28 32 35 36 29 2C 46 4C 28 32 35 36 29 |FT$(256),FL(256)|
00000020: 2C 54 54 28 32 35 36 29 3A 4E B2 AB 31 3A 81 49 |,TT(256):N..1:.I|
00000030: B2 31 A4 32 35 36 3A 46 58 24 28 49 29 B2 22 22 |.1.256:FX$(I).""|
00000040: 3A 82 3A 58 B2 32 32 31 00 6A 08 02 00 42 4C 24 |:.:X.221.j...BL$|
00000050: B2 22 20 22 3A 81 49 B2 31 A4 34 30 3A 42 4C 24 |." ":.I.1.40:BL$|
00000060: B2 42 4C 24 AA 22 A0 22 3A 82 00 95 08 03 00 A0 |.BL$.".":.......|
00000070: 31 35 3A 9F 31 35 2C 38 2C 31 35 3A 9F 31 2C 38 |15:.15,8,15:.1,8|
00000080: 2C 30 2C 22 24 30 22 3A 8D 34 31 3A A1 23 31 2C |,0,"$0":.41:.#1,|
00000090: 41 24 2C 42 24 00 B5 08 04 00 57 B2 35 31 3A 4C |A$,B$.....W.51:L|
000000A0: 24 B2 22 22 3A 85 22 4C 41 42 45 4C 20 4E 41 41 |$."":."LABEL NAA|
000000B0: 4D 22 3B 4C 24 00 F3 08 05 00 8B C3 28 4C 24 29 |M";L$.......(L$)|
000000C0: B1 32 32 A7 20 99 22 4C 41 42 45 4C 20 4E 41 41 |.22. ."LABEL NAA|
000000D0: 4D 20 54 45 20 4C 41 4E 47 2D 4D 41 58 20 49 53 |M TE LANG-MAX IS|
000000E0: 20 32 32 20 43 48 41 52 41 43 54 45 52 53 2E 22 | 22 CHARACTERS."|
000000F0: 3A 89 34 00 1F 09 06 00 A1 23 31 2C 41 24 2C 42 |:.4......#1,A$,B|
00000100: 24 3A A1 23 31 2C 41 24 2C 42 24 3A 43 B2 30 3A |$:.#1,A$,B$:C.0:|
00000110: 8B 41 24 B3 B1 22 22 A7 43 B2 C6 28 41 24 29 00 |.A$.."".C..(A$).|
00000120: 39 09 07 00 8B 42 24 B3 B1 22 22 A7 43 B2 43 AA |9....B$.."".C.C.|
00000130: C6 28 42 24 29 AC 32 35 36 00 4B 09 08 00 4E B2 |.(B$).256.K...N.|
00000140: 4E AA 31 3A 46 4C 28 4E 29 B2 43 00 62 09 09 00 |N.1:FL(N).C.b...|
00000150: A1 23 31 2C 42 24 3A 8B 20 53 54 B3 B1 30 20 A7 |.#1,B$:. ST..0 .|
00000160: 31 38 00 75 09 0A 00 8B 20 42 24 B3 B1 C7 28 33 |18.u.... B$...(3|
00000170: 34 29 20 A7 39 00 7F 09 0B 00 4E 24 B2 22 22 00 |4) .9.....N$."".|
00000180: A2 09 0C 00 A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 |.....#1,B$:.B$..|
00000190: C7 28 33 34 29 A7 4E 24 B2 4E 24 AA 42 24 3A 89 |.(34).N$.N$.B$:.|
000001A0: 31 32 00 B0 09 0D 00 46 58 24 28 4E 29 B2 4E 24 |12.....FX$(N).N$|
000001B0: 00 CA 09 0E 00 A1 23 31 2C 42 24 3A 8B 20 42 24 |......#1,B$:. B$|
000001C0: B2 C7 28 33 32 29 20 A7 31 34 00 D4 09 0F 00 43 |..(32) .14.....C|
000001D0: 24 B2 22 22 00 F6 09 10 00 43 24 B2 43 24 AA 42 |$."".....C$.C$.B|
000001E0: 24 3A A1 23 31 2C 42 24 3A 8B 20 42 24 B3 B1 22 |$:.#1,B$:. B$.."|
000001F0: 22 20 20 A7 31 36 00 11 0A 11 00 46 54 24 28 4E |" .16.....FT$(N|
00000200: 29 B2 C8 28 43 24 2C 33 29 3A 8B 53 54 B2 30 A7 |)..(C$,3):.ST.0.|
00000210: 36 00 2B 0A 12 00 A0 31 3A 42 46 B2 46 4C 28 4E |6.+....1:BF.FL(N|
00000220: 29 3A 4E B2 4E AB 31 3A 8D 35 31 00 37 0A 13 00 |):N.N.1:.51.7...|
00000230: A0 33 3A 9F 33 2C 34 00 65 0A 14 00 98 33 2C C7 |.3:.3,4.e....3,.|
00000240: 28 31 37 36 29 3B 3A 81 49 B2 31 A4 35 31 3A 98 |(176);:.I.1.51:.|
00000250: 33 2C C7 28 31 39 32 29 3B 3A 82 3A 98 33 2C C7 |3,.(192);:.:.3,.|
00000260: 28 31 37 34 29 00 7B 0A 15 00 98 33 2C C7 28 58 |(174).{....3,.(X|
00000270: 29 3B A6 35 31 29 3B C7 28 58 29 00 A7 0A 16 00 |);.51);.(X).....|
00000280: 54 32 24 B2 46 58 24 28 30 29 3A 8B 4C 24 B3 B1 |T2$.FX$(0):.L$..|
00000290: 22 22 A7 54 32 24 B2 54 32 24 AA 22 A0 A0 28 22 |"".T2$.T2$."..("|
000002A0: AA 4C 24 AA 22 29 22 00 C6 0A 17 00 54 24 B2 C7 |.L$.")".....T$..|
000002B0: 28 58 29 AA 22 20 20 20 20 20 3E 3E 3E 20 22 AA |(X)." >>> ".|
000002C0: 46 58 24 28 30 29 00 EE 0A 18 00 8B 4C 24 B2 22 |FX$(0)......L$."|
000002D0: 22 A7 54 24 B2 54 24 AA CA 28 42 4C 24 2C 31 2C |".T$.T$..(BL$,1,|
000002E0: 57 AB C3 28 54 24 29 AB 31 29 3A 89 32 36 00 22 |W..(T$).1):.26."|
000002F0: 0B 19 00 4B B2 57 AB 32 AB C3 28 54 24 29 AB C3 |...K.W.2..(T$)..|
00000300: 28 4C 24 29 3A 54 24 B2 54 24 AA CA 28 42 4C 24 |(L$):T$.T$..(BL$|
00000310: 2C 31 2C 4B AB 31 29 AA 22 28 22 AA 4C 24 AA 22 |,1,K.1)."(".L$."|
00000320: 29 22 00 3C 0B 1A 00 54 24 B2 54 24 AA 22 20 20 |)".<...T$.T$." |
00000330: 22 AA C7 28 58 29 3A 98 33 2C 54 24 00 52 0B 1B |"..(X):.3,T$.R..|
00000340: 00 98 33 2C C7 28 58 29 3B A6 35 31 29 3B C7 28 |..3,.(X);.51);.(|
00000350: 58 29 00 80 0B 1C 00 98 33 2C C7 28 31 37 31 29 |X)......3,.(171)|
00000360: 3B 3A 81 49 B2 31 A4 35 31 3A 98 33 2C C7 28 31 |;:.I.1.51:.3,.(1|
00000370: 39 32 29 3B 3A 82 3A 98 33 2C C7 28 31 37 39 29 |92);:.:.3,.(179)|
00000380: 00 96 0B 1D 00 98 33 2C C7 28 58 29 3B A6 35 31 |......3,.(X);.51|
00000390: 29 3B C7 28 58 29 00 B2 0B 1E 00 4C B2 39 3A 4B |);.(X).....L.9:K|
000003A0: B2 B5 28 28 4E AA 31 29 AD 32 29 3A 81 49 B2 31 |..((N.1).2):.I.1|
000003B0: A4 4B 00 EA 0B 1F 00 54 24 B2 C7 28 58 29 3A 4A |.K.....T$..(X):J|
000003C0: B2 49 3A 8D 34 35 3A 54 24 B2 54 24 AA 22 20 22 |.I:.45:T$.T$." "|
000003D0: 3A 4A B2 4B AA 49 3A 8D 34 35 3A 54 24 B2 54 24 |:J.K.I:.45:T$.T$|
000003E0: AA 22 20 20 22 AA C7 28 58 29 00 00 0C 20 00 98 |." "..(X)... ..|
000003F0: 33 2C 54 24 20 3A 20 4C B2 4C AA 31 20 3A 20 82 |3,T$ : L.L.1 : .|
00000400: 00 16 0C 21 00 98 33 2C C7 28 58 29 3B A6 35 31 |...!..3,.(X);.51|
00000410: 29 3B C7 28 58 29 00 3C 0C 22 00 50 B2 B5 28 28 |);.(X).<.".P..((|
00000420: 42 46 AC 31 30 30 AD 36 36 34 29 AA 2E 35 29 3A |BF.100.664)..5):|
00000430: 50 24 B2 CA 28 C4 28 50 29 2C 32 29 00 73 0C 23 |P$..(.(P),2).s.#|
00000440: 00 54 24 B2 C7 28 58 29 AA CA 28 42 4C 24 2C 31 |.T$..(X)..(BL$,1|
00000450: 2C 31 34 29 AA C4 28 42 46 29 AA 22 20 42 4C 4F |,14)..(BF)." BLO|
00000460: 43 4B 53 20 28 22 AA 50 24 AA 22 25 29 20 46 52 |CKS (".P$."%) FR|
00000470: 45 45 22 00 9B 0C 24 00 54 24 B2 54 24 AA CA 28 |EE"...$.T$.T$..(|
00000480: 42 4C 24 2C 31 2C 57 AB C3 28 54 24 29 AA 31 29 |BL$,1,W..(T$).1)|
00000490: AA C7 28 58 29 3A 98 33 2C 54 24 00 B8 0C 25 00 |..(X):.3,T$...%.|
000004A0: 81 49 B2 4C A4 32 31 3A 98 33 2C C7 28 58 29 3B |.I.L.21:.3,.(X);|
000004B0: A6 35 31 29 C7 28 58 29 00 BE 0C 26 00 82 00 EC |.51).(X)...&....|
000004C0: 0C 27 00 98 33 2C C7 28 31 37 33 29 3B 3A 81 49 |.'..3,.(173);:.I|
000004D0: B2 31 A4 35 31 3A 98 33 2C C7 28 31 39 32 29 3B |.1.51:.3,.(192);|
000004E0: 3A 82 3A 98 33 2C C7 28 31 38 39 29 00 FC 0C 28 |:.:.3,.(189)...(|
000004F0: 00 98 33 3A A0 33 3A A0 31 35 3A 80 00 14 0D 29 |..3:.3:.15:....)|
00000500: 00 84 31 35 2C 45 52 2C 45 52 24 3A 8B 45 52 B3 |..15,ER,ER$:.ER.|
00000510: 32 30 A7 8E 00 47 0D 2A 00 8B 45 52 B2 37 34 B0 |20...G.*..ER.74.|
00000520: 45 52 B2 32 31 A7 45 52 24 B2 45 52 24 AA 22 2D |ER.21.ER$.ER$."-|
00000530: 2D 49 53 20 44 49 53 4B 20 49 4E 53 45 52 54 45 |-IS DISK INSERTE|
00000540: 44 3F 22 3A 89 34 34 00 6B 0D 2B 00 45 52 24 B2 |D?":.44.k.+.ER$.|
00000550: 22 44 49 53 4B 20 45 52 52 4F 52 22 AA C4 28 45 |"DISK ERROR"..(E|
00000560: 52 29 AA 22 3A 20 22 AA 45 52 24 00 76 0D 2C 00 |R).": ".ER$.v.,.|
00000570: 99 45 52 24 3A 80 00 9B 0D 2D 00 54 B2 54 54 28 |.ER$:....-.T.TT(|
00000580: 4A 29 3A 8B 54 B2 30 A7 54 24 B2 54 24 AA CA 28 |J):.T.0.T$.T$..(|
00000590: 42 4C 24 2C 31 2C 32 34 29 3A 8E 00 B4 0D 2E 00 |BL$,1,24):......|
000005A0: 8B 46 4C 28 54 29 B3 31 30 30 A7 54 24 B2 54 24 |.FL(T).100.T$.T$|
000005B0: AA 22 A0 22 00 CC 0D 2F 00 8B 46 4C 28 54 29 B3 |.".".../..FL(T).|
000005C0: 31 30 A7 54 24 B2 54 24 AA 22 A0 22 00 EF 0D 30 |10.T$.T$."."...0|
000005D0: 00 54 24 B2 54 24 AA CA 28 C4 28 46 4C 28 54 29 |.T$.T$..(.(FL(T)|
000005E0: 29 2C 32 29 AA 22 A0 22 AA 46 58 24 28 54 29 00 |),2).".".FX$(T).|
000005F0: 1E 0E 31 00 8B 20 C3 28 46 58 24 28 54 29 29 B3 |..1.. .(FX$(T)).|
00000600: 31 36 A7 54 24 B2 54 24 AA CA 28 42 4C 24 2C 31 |16.T$.T$..(BL$,1|
00000610: 2C 31 36 AB C3 28 46 58 24 28 54 29 29 29 00 3A |,16..(FX$(T))).:|
00000620: 0E 32 00 54 24 B2 54 24 AA 22 A0 22 AA C8 28 46 |.2.T$.T$."."..(F|
00000630: 54 24 28 54 29 2C 33 29 3A 8E 00 4F 0E 33 00 81 |T$(T),3):..O.3..|
00000640: 49 B2 31 A4 4E 3A 54 54 28 49 29 B2 49 3A 82 00 |I.1.N:TT(I).I:..|
00000650: 84 0E 34 00 81 49 B2 31 A4 4E AB 31 3A 53 B2 49 |..4..I.1.N.1:S.I|
00000660: 3A 81 4A B2 49 AA 31 A4 4E 3A 8B 46 58 24 28 54 |:.J.I.1.N:.FX$(T|
00000670: 54 28 4A 29 29 B3 46 58 24 28 54 54 28 53 29 29 |T(J)).FX$(TT(S))|
00000680: A7 53 B2 4A 00 AD 0E 35 00 82 4A 3A 8B 53 B3 B1 |.S.J...5..J:.S..|
00000690: 49 A7 54 B2 54 54 28 49 29 3A 54 54 28 49 29 B2 |I.T.TT(I):TT(I).|
000006A0: 54 54 28 53 29 3A 54 54 28 53 29 B2 54 00 B6 0E |TT(S):TT(S).T...|
000006B0: 36 00 82 49 3A 8E 00 00 00 DA 38 29 FE CD 34 41 |6..I:.....8)..4A|
000006C0: D0 06 A9 FF 8D 00 DC 60 A2 FF 10 FF FF FF FF FF |.......`........|
000006D0: FB FF |.. |
..H....FX$(256),FT$(256),FL(256),TT(256)
:N..1:.I.1.256:FX$(I)."":.:X.221.J...BL$
." ":.I.1.40:BL$.BL$." ":...... 15:.15,8
,15:.1,8,0,"$0":.41:.#1,A$,B$.....W.51:L
$."":."LABEL NAAM";L$......C(L$).22. ."L
ABEL NAAM TE LANG-MAX IS 22 CHARACTERS."
:.4......#1,A$,B$:.#1,A$,B$:C.0:.A$.."".
C.F(A$).9....B$.."".C.C.F(B$).256.K...N.
N.1:FL(N).C.B....#1,B$:. ST..0 .18.U....
B$..G(34) .9....N$.""......#1,B$:.B$..
G(34).N$.N$.B$:.12.....FX$(N).N$.J....#1
,B$:. B$.G(32) .14.T...C$."".....C$.C$.B
$:.#1,B$:. B$.."" .16.....FT$(N).H(C$,3
):.ST.0.6.+... 1:BF.FL(N):N.N.1:.51.7...
3:.3,4.E....3,G(176);:.I.1.51:.3,G(192)
;:.:.3,G(174).{....3,G(X);.51);G(X).....
T2$.FX$(0):.L$.."".T2$.T2$." (".L$.")".
F...T$.G(X)." >>> ".FX$(0)......L$."
".T$.T$.J(BL$,1,W.C(T$).1):.26."...K.W.2
.C(T$).C(L$):T$.T$.J(BL$,1,K.1)."(".L$."
)".<...T$.T$." ".G(X):.3,T$.R....3,G(X)
;.51);G(X)......3,G(171);:.I.1.51:.3,G(1
92);:.:.3,G(179)......3,G(X);.51);G(X)..
...L.9:K..((N.1).2):.I.1.K.....T$.G(X):J
.I:.45:T$.T$." ":J.K.I:.45:T$.T$." ".G(
X)... ..3,T$ : L.L.1 : ....!..3,G(X);.51
);G(X).<.".P..((BF.100.664)..5):P$.J(D(P
),2).S.#.T$.G(X).J(BL$,1,14).D(BF)." BLO
CKS (".P$."%) FREE"...$.T$.T$.J(BL$,1,W.
C(T$).1).G(X):.3,T$...%..I.L.21:.3,G(X);
.51)G(X)...&.....'..3,G(173);:.I.1.51:.3
,G(192);:.:.3,G(189)...(..3: 3: 15:....)
..15,ER,ER$:.ER.20...G.*..ER.74.ER.21.ER
$.ER$."--IS DISK INSERTED?":.44.K.+.ER$.
"DISK ERROR".D(ER).": ".ER$.V.,..ER$:...
.-.T.TT(J):.T.0.T$.T$.J(BL$,1,24):......
.FL(T).100.T$.T$." ".L./..FL(T).10.T$.T$
." "...0.T$.T$.J(D(FL(T)),2)." ".FX$(T).
..1.. C(FX$(T)).16.T$.T$.J(BL$,1,16.C(FX
$(T))).:.2.T$.T$." ".H(FT$(T),3):..O.3..
I.1.N:TT(I).I:....4..I.1.N.1:S.I:.J.I.1.
N:.FX$(TT(J)).FX$(TT(S)).S.J...5..J:.S..
I.T.TT(I):TT(I).TT(S):TT(S).T...6..I:...
.Z8).M4AP......`..........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL