> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 89 31 30 30 30 00 1C 08 01 00 |.......1000.....|
00000010: A1 5A 24 3A 8B 5A 24 B2 22 22 A7 31 00 22 08 02 |.Z$:.Z$."".1."..|
00000020: 00 8E 00 39 08 0A 00 84 31 35 2C 45 52 2C 45 52 |...9....15,ER,ER|
00000030: 24 3A 8B 45 52 B2 30 A7 8E 00 58 08 14 00 99 22 |$:.ER.0...X...."|
00000040: 44 49 53 4B 20 45 52 52 4F 52 20 23 22 45 52 3A |DISK ERROR #"ER:|
00000050: 99 45 52 24 3A 80 3A 8E 00 88 08 64 00 99 22 13 |.ER$:.:....d..".|
00000060: 11 11 11 22 3A 81 49 B2 30 A4 31 35 3A 81 4A B2 |...":.I.0.15:.J.|
00000070: 30 A4 4E 43 3A 99 A3 4A AC 32 30 29 3B 56 24 28 |0.NC:..J.20);V$(|
00000080: 49 AA 4A AC 31 36 29 3B 00 94 08 6E 00 82 4A 3A |I.J.16);...n..J:|
00000090: 99 3A 82 49 00 AD 08 78 00 97 58 42 2C 30 3A 52 |.:.I...x..XB,0:R|
000000A0: 4C B2 30 3A 43 4C B2 30 3A 8D 36 30 30 00 DA 08 |L.0:CL.0:.600...|
000000B0: 82 00 81 49 B2 30 A4 31 A9 30 3A 8D 31 3A 5A B2 |...I.0.1.0:.1:Z.|
000000C0: C6 28 5A 24 29 3A 54 43 B2 43 4C 3A 54 52 B2 52 |.(Z$):TC.CL:TR.R|
000000D0: 4C 3A 81 4A B2 30 A4 31 A9 30 00 01 09 8C 00 8B |L:.J.0.1.0......|
000000E0: 28 5A AF 31 32 37 29 B2 32 39 A7 43 4C B2 28 43 |(Z.127).29.CL.(C|
000000F0: 4C AA 31 AA 32 AC 28 5A B2 31 35 37 29 29 AF 4E |L.1.2.(Z.157)).N|
00000100: 43 00 28 09 96 00 8B 28 5A AF 31 32 37 29 B2 31 |C.(....(Z.127).1|
00000110: 37 A7 52 4C B2 28 52 4C AA 31 AA 32 AC 28 5A B2 |7.RL.(RL.1.2.(Z.|
00000120: 31 34 35 29 29 AF 31 35 00 36 09 A0 00 8B 5A B2 |145)).15.6....Z.|
00000130: 31 33 A7 49 B2 31 00 50 09 AA 00 8B 56 24 28 52 |13.I.1.P....V$(R|
00000140: 4C AA 43 4C AC 31 36 29 B3 B1 42 24 A7 4A B2 31 |L.CL.16)..B$.J.1|
00000150: 00 6F 09 B4 00 82 3A 8B 28 54 43 B3 B1 43 4C 29 |.o....:.(TC..CL)|
00000160: B0 28 54 52 B3 B1 52 4C 29 A7 8D 20 35 30 30 00 |.(TR..RL).. 500.|
00000170: 77 09 BE 00 82 3A 8E 00 9C 09 F4 01 97 58 41 2C |w....:.......XA,|
00000180: 54 52 AA 33 3A 99 3A 99 A3 54 43 AC 32 30 29 3B |TR.3:.:..TC.20);|
00000190: 56 24 28 54 52 AA 31 36 AC 54 43 29 00 C7 09 58 |V$(TR.16.TC)...X|
000001A0: 02 97 58 41 2C 52 4C AA 33 3A 99 3A 99 A3 43 4C |..XA,RL.3:.:..CL|
000001B0: AC 32 30 29 3B 22 12 22 3B 56 24 28 52 4C AA 31 |.20);".";V$(RL.1|
000001C0: 36 AC 43 4C 29 3A 8E 00 E0 09 84 03 81 49 B2 31 |6.CL):.......I.1|
000001D0: A4 4E 56 3A 56 24 28 49 29 B2 42 24 3A 82 3A 8E |.NV:V$(I).B$:.:.|
000001E0: 00 F1 09 E8 03 99 22 13 13 93 22 3A 8D 36 30 30 |......"...":.600|
000001F0: 30 00 0A 0A F2 03 4E 43 B2 31 3A 8B C2 28 32 31 |0.....NC.1:..(21|
00000200: 33 29 B2 37 39 A7 4E 43 B2 33 00 44 0A FC 03 4E |3).79.NC.3.D...N|
00000210: 56 B2 28 4E 43 AA 31 29 AC 31 36 AB 31 3A 8D 32 |V.(NC.1).16.1:.2|
00000220: 30 30 30 3A 42 24 B2 22 20 20 20 20 20 20 20 20 |000:B$." |
00000230: 20 20 20 20 20 20 20 20 20 20 20 22 3A 86 56 24 | ":.V$|
00000240: 28 4E 56 29 00 6E 0A 4C 04 4E 50 B2 30 3A 53 4C |(NV).n.L.NP.0:SL|
00000250: B2 31 3A 56 24 28 30 29 B2 22 4E 45 58 54 20 50 |.1:V$(0)."NEXT P|
00000260: 41 47 45 22 3A 99 22 93 11 12 22 48 45 24 00 93 |AGE":."..."HE$..|
00000270: 0A 56 04 53 4C B2 53 4C AA 4E 50 3A 4E 50 B2 4D |.V.SL.SL.NP:NP.M|
00000280: 41 AB 53 4C AA 31 3A 8B 4E 50 B1 4E 56 A7 4E 50 |A.SL.1:.NP.NV.NP|
00000290: B2 4E 56 00 A2 0A 60 04 8B 4E 50 B2 30 A7 33 30 |.NV...`..NP.0.30|
000002A0: 30 30 00 C7 0A 6A 04 8D 39 30 30 3A 81 49 B2 31 |00...j..900:.I.1|
000002B0: A4 4E 50 3A 56 24 28 49 29 B2 50 52 24 28 53 4C |.NP:V$(I).PR$(SL|
000002C0: AA 49 AB 31 29 3A 82 00 DE 0A 74 04 8D 31 30 30 |.I.1):....t..100|
000002D0: 3A 8B 43 4C AA 52 4C B2 30 A7 31 31 31 30 00 E8 |:.CL.RL.0.1110..|
000002E0: 0A 7E 04 89 35 30 30 30 00 F7 0A D0 07 8D 32 39 |.~..5000......29|
000002F0: 30 30 3A 4D 41 B2 30 00 11 0B DA 07 9F 31 35 2C |00:MA.0......15,|
00000300: 55 4E 2C 31 35 2C 22 49 22 AA 44 52 24 3A 8D 31 |UN,15,"I".DR$:.1|
00000310: 30 00 25 0B E4 07 9F 31 2C 55 4E 2C 33 2C 22 24 |0.%....1,UN,3,"$|
00000320: 22 AA 44 52 24 00 2E 0B EE 07 9E 38 39 36 00 4D |".DR$......896.M|
00000330: 0B F8 07 46 4F B2 C6 28 49 4E 24 29 3A 8B 28 46 |...FO..(IN$):.(F|
00000340: 4F 20 AF 20 33 29 B2 31 A7 32 31 30 30 00 6D 0B |O . 3).1.2100.m.|
00000350: 02 08 A0 31 3A A0 31 35 3A 99 22 42 41 44 20 44 |...1:.15:."BAD D|
00000360: 49 53 4B 20 46 4F 52 4D 41 54 22 3A 80 00 83 0B |ISK FORMAT":....|
00000370: 34 08 48 45 24 B2 CA 28 49 4E 24 2C 31 34 33 2C |4.HE$..(IN$,143,|
00000380: 31 36 29 00 B6 0B 3E 08 8B 46 4F B1 31 A7 53 45 |16)...>..FO.1.SE|
00000390: B2 31 38 3A 48 45 24 B2 48 45 24 AA 22 2C 20 31 |.18:HE$.HE$.", 1|
000003A0: 35 34 31 2F 34 30 34 30 20 46 4F 52 4D 41 54 22 |541/4040 FORMAT"|
000003B0: 3A 89 32 32 30 30 00 DE 0B 48 08 8B 46 4F B2 31 |:.2200...H..FO.1|
000003C0: A7 53 45 B2 31 39 3A 48 45 24 B2 48 45 24 AA 22 |.SE.19:HE$.HE$."|
000003D0: 2C 20 32 30 34 30 20 46 4F 52 4D 41 54 22 00 FA |, 2040 FORMAT"..|
000003E0: 0B 98 08 86 50 52 24 28 53 45 AC 38 29 3A 81 49 |....PR$(SE.8):.I|
000003F0: B2 31 A4 53 45 3A 9E 38 39 36 00 1C 0C A2 08 81 |.1.SE:.896......|
00000400: 4A B2 31 A4 32 35 34 A9 33 32 3A 41 B2 C6 28 CA |J.1.254.32:A..(.|
00000410: 28 49 4E 24 2C 4A 29 29 AF 31 32 37 00 43 0C AC |(IN$,J)).127.C..|
00000420: 08 8B 41 B2 32 A7 4D 41 B2 4D 41 AA 31 3A 50 52 |..A.2.MA.MA.1:PR|
00000430: 24 28 4D 41 29 B2 CA 28 49 4E 24 2C 4A AA 33 2C |$(MA)..(IN$,J.3,|
00000440: 31 36 29 00 4A 0C B6 08 82 4A 00 57 0C C0 08 8B |16).J....J.W....|
00000450: 53 54 A7 49 B2 53 45 00 5E 0C CA 08 82 49 00 6B |ST.I.SE.^....I.k|
00000460: 0C D4 08 A0 31 3A A0 31 35 3A 8E 00 81 0C 54 0B |....1:.15:....T.|
00000470: 55 4E B2 38 3A 44 52 B2 30 3A 44 52 24 B2 22 30 |UN.8:DR.0:DR$."0|
00000480: 22 00 87 0C 5E 0B 8E 00 A6 0C 68 0B 99 22 55 4E |"...^.....h.."UN|
00000490: 49 54 20 23 20 20 22 3B 55 4E 3B 3A 85 22 9D 9D |IT # ";UN;:."..|
000004A0: 9D 9D 22 3B 55 4E 00 D6 0C 72 0B 99 22 44 52 49 |..";UN...r.."DRI|
000004B0: 56 45 20 23 20 20 22 3B 44 52 3B 3A 85 22 9D 9D |VE # ";DR;:."..|
000004C0: 9D 9D 22 3B 44 52 3A 8B 44 52 AC 28 44 52 AB 31 |..";DR:.DR.(DR.1|
000004D0: 29 A7 32 39 33 30 00 E6 0C 7C 0B 44 52 24 B2 C4 |).2930...|.DR$..|
000004E0: 28 44 52 29 3A 8E 00 1B 0D B8 0B 8D 39 30 30 3A |(DR):.......900:|
000004F0: 99 22 93 11 4E 4F 20 4D 4F 52 45 20 50 52 4F 47 |."..NO MORE PROG|
00000500: 52 41 4D 53 20 4F 4E 20 44 49 53 4B 2E 20 20 4F |RAMS ON DISK. O|
00000510: 50 54 49 4F 4E 53 20 41 52 45 3A 00 5B 0D CC 0B |PTIONS ARE:.[...|
00000520: 56 24 28 30 29 B2 22 53 45 45 20 4E 45 57 20 44 |V$(0)."SEE NEW D|
00000530: 49 53 4B 22 3A 56 24 28 32 29 B2 22 52 45 53 54 |ISK":V$(2)."REST|
00000540: 41 52 54 20 54 48 49 53 20 44 49 53 4B 22 3A 56 |ART THIS DISK":V|
00000550: 24 28 34 29 B2 22 51 55 49 54 22 00 6C 0D D6 0B |$(4)."QUIT".l...|
00000560: 8D 31 30 30 3A 8B 52 4C B2 30 A7 8A 00 7B 0D E0 |.100:.RL.0...{..|
00000570: 0B 8B 52 4C B2 32 A7 31 31 30 30 00 86 0D EA 0B |..RL.2.1100.....|
00000580: 99 22 93 22 3A 80 00 C4 0D 88 13 99 22 93 11 11 |.".":......."...|
00000590: 4C 4F 41 44 22 3B C7 28 33 34 29 3B 56 24 28 52 |LOAD";.(34);V$(R|
000005A0: 4C AA 31 36 AC 43 4C 29 3B C7 28 33 34 29 3B 22 |L.16.CL);.(34);"|
000005B0: 2C 38 2C 31 22 3A 99 22 20 20 11 11 11 11 52 55 |,8,1":." ....RU|
000005C0: 4E 13 22 3B 00 E8 0D 92 13 8B 58 41 B2 32 31 34 |N.";......XA.214|
000005D0: A7 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 |..631,13:.632,13|
000005E0: 3A 97 58 42 2C 32 3A 80 00 05 0E 9C 13 97 36 32 |:.XB,2:.......62|
000005F0: 33 2C 31 33 3A 97 36 32 34 2C 31 33 3A 97 31 35 |3,13:.624,13:.15|
00000600: 38 2C 32 3A 80 00 27 0E 70 17 49 4E 24 B2 22 5A |8,2:..'.p.IN$."Z|
00000610: 5A 22 3A 81 49 B2 31 A4 36 3A 49 4E 24 B2 49 4E |Z":.I.1.6:IN$.IN|
00000620: 24 AA 49 4E 24 3A 82 00 44 0E 7A 17 49 4E 24 B2 |$.IN$:..D.z.IN$.|
00000630: CA 28 49 4E 24 2C 32 29 3A 49 4E 24 B2 49 4E 24 |.(IN$,2):IN$.IN$|
00000640: AA 49 4E 24 00 6A 0E 84 17 8B C2 28 36 35 35 33 |.IN$.j.....(6553|
00000650: 35 29 B2 32 35 35 A7 58 41 B2 32 31 34 3A 58 42 |5).255.XA.214:XB|
00000660: B2 31 39 38 3A 89 36 30 34 30 00 7C 0E 8E 17 58 |.198:.6040.|...X|
00000670: 41 B2 32 31 36 3A 58 42 B2 31 35 38 00 A2 0E 98 |A.216:XB.158....|
00000680: 17 81 49 B2 38 39 36 A4 39 32 39 3A 87 58 24 3A |..I.896.929:.X$:|
00000690: 8B C8 28 58 24 2C 31 29 B3 B1 22 41 22 A7 36 30 |..(X$,1).."A".60|
000006A0: 36 30 00 C8 0E A2 17 58 24 B2 C4 28 C5 28 C9 28 |60.....X$..(.(.(|
000006B0: 58 24 2C C3 28 58 24 29 AB 31 29 29 AA 33 AC 28 |X$,.(X$).1)).3.(|
000006C0: 58 41 B2 32 31 36 29 29 00 D7 0E AC 17 97 49 2C |XA.216))......I,|
000006D0: C5 28 58 24 29 3A 82 00 DD 0E B6 17 8E 00 11 0F |.(X$):..........|
000006E0: C0 17 83 31 36 30 2C 32 2C 31 37 37 2C 41 34 35 |...160,2,177,A45|
000006F0: 2C 31 35 33 2C 41 31 33 37 2C 30 2C 32 30 30 2C |,153,A137,0,200,|
00000700: 31 39 32 2C 36 2C 32 30 38 2C 32 34 36 2C 31 36 |192,6,208,246,16|
00000710: 32 00 44 0F CA 17 83 31 2C 33 32 2C 31 39 38 2C |2.D....1,32,198,|
00000720: 32 35 35 2C 33 32 2C 32 32 38 2C 32 35 35 2C 31 |255,32,228,255,1|
00000730: 36 34 2C 41 31 34 32 2C 31 34 35 2C 41 31 34 30 |64,A142,145,A140|
00000740: 2C 32 30 30 00 6E 0F D4 17 83 31 33 32 2C 41 31 |,200.n....132,A1|
00000750: 34 32 2C 31 39 36 2C 41 31 33 39 2C 32 30 38 2C |42,196,A139,208,|
00000760: 32 34 32 2C 37 36 2C 32 30 34 2C 32 35 35 00 00 |242,76,204,255..|
00000770: 00 38 |.8 |
.......1000......Z$:.Z$."".1.".....9....
15,ER,ER$:.ER.0...X...."DISK ERROR #"ER:
.ER$:.:....D.."....":.I.0.15:.J.0.NC:..J
.20);V$(I.J.16);...N..J:.:.I...X..XB,0:R
L.0:CL.0:.600.Z....I.0.1.0:.1:Z.F(Z$):TC
.CL:TR.RL:.J.0.1.0......(Z.127).29.CL.(C
L.1.2.(Z.157)).NC.(....(Z.127).17.RL.(RL
.1.2.(Z.145)).15.6. ..Z.13.I.1.P....V$(R
L.CL.16)..B$.J.1.O....:.(TC..CL).(TR..RL
).. 500.W....:.......XA,TR.3:.:..TC.20);
V$(TR.16.TC).G.X..XA,RL.3:.:..CL.20);"."
;V$(RL.16.CL):.......I.1.NV:V$(I).B$:.:.
......"...":.6000.....NC.1:.B(213).79.NC
.3.D...NV.(NC.1).16.1:.2000:B$."
":.V$(NV).N.L.NP.0:SL.1:V$(0)
."NEXT PAGE":."..."HE$...V.SL.SL.NP:NP.M
A.SL.1:.NP.NV.NP.NV...`..NP.0.3000.G.J..
900:.I.1.NP:V$(I).PR$(SL.I.1):....T..100
:.CL.RL.0.1110...~..5000...P..2900:MA.0.
..Z..15,UN,15,"I".DR$:.10.%....1,UN,3,"$
".DR$......896.M...FO.F(IN$):.(FO . 3).1
.2100.M... 1: 15:."BAD DISK FORMAT":....
4.HE$.J(IN$,143,16)...>..FO.1.SE.18:HE$.
HE$.", 1541/4040 FORMAT":.2200...H..FO.1
.SE.19:HE$.HE$.", 2040 FORMAT"......PR$(
SE.8):.I.1.SE:.896......J.1.254.32:A.F(J
(IN$,J)).127.C....A.2.MA.MA.1:PR$(MA).J(
IN$,J.3,16).J....J.W....ST.I.SE.^.J..I.K
.T. 1: 15:....T.UN.8:DR.0:DR$."0"...^...
..H.."UNIT # ";UN;:."....";UN.V.R.."DRI
VE # ";DR;:."....";DR:.DR.(DR.1).2930..
.|.DR$.D(DR):.......900:."..NO MORE PROG
RAMS ON DISK. OPTIONS ARE:.[.L.V$(0)."S
EE NEW DISK":V$(2)."RESTART THIS DISK":V
$(4)."QUIT".L.V..100:.RL.0...{....RL.2.1
100......".":..D...."...LOAD";G(34);V$(R
L.16.CL);G(34);",8,1":." ....RUN.";....
..XA.214..631,13:.632,13:.XB,2:.......62
3,13:.624,13:.158,2:..'.P.IN$."ZZ":.I.1.
6:IN$.IN$.IN$:..D.Z.IN$.J(IN$,2):IN$.IN$
.IN$.J....B(65535).255.XA.214:XB.198:.60
40.|...XA.216:XB.158......I.896.929:.X$:
.H(X$,1).."A".6060.H...X$.D(E(I(X$,C(X$)
.1)).3.(XA.216)).W....I,E(X$):..........
...160,2,177,A45,153,A137,0,200,192,6,20
8,246,162.D.J..1,32,198,255,32,228,255,1
64,A142,145,A140,200.N.T..132,A142,196,A
139,208,242,76,204,255...8
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL