00000000: 01 04 1F 04 00 00 85 20 22 11 44 2F 44 49 53 4B |....... ".D/DISK|
00000010: 20 20 4D 2F 4D 45 4D 4F 52 59 22 3B 44 4D 24 00 | M/MEMORY";DM$.|
00000020: 3D 04 01 00 8B 20 44 4D 24 B3 B1 22 44 22 20 AF |=.... DM$.."D" .|
00000030: 20 44 4D 24 B3 B1 22 4D 22 20 A7 20 80 00 6B 04 | DM$.."M" . ..k.|
00000040: 02 00 44 B2 39 30 32 30 3A 20 44 4D B2 31 3A 20 |..D.9020: DM.1: |
00000050: 8B 20 44 4D 24 B2 22 44 22 20 A7 20 44 4D B2 32 |. DM$."D" . DM.2|
00000060: 3A 20 8D 20 32 35 3A 20 89 20 35 00 8B 04 03 00 |: . 25: . 5.....|
00000070: 85 20 22 11 53 54 41 52 54 2C 20 45 4E 44 20 28 |. ".START, END (|
00000080: 48 45 58 29 22 3B 41 24 2C 42 24 00 AB 04 04 00 |HEX)";A$,B$.....|
00000090: 8D 20 31 36 3A 20 41 B2 55 3A 20 41 24 B2 42 24 |. 16: A.U: A$.B$|
000000A0: 3A 20 8D 20 31 36 3A 20 42 B2 55 00 D0 04 05 00 |: . 16: B.U.....|
000000B0: 97 20 32 35 32 2C 41 AD 32 35 36 20 3A 20 97 20 |. 252,A.256 : . |
000000C0: 32 35 31 2C 41 AB 32 35 36 AC C2 28 32 35 32 29 |251,A.256..(252)|
000000D0: 00 F0 04 06 00 8B 20 42 B3 B2 41 20 A7 20 99 20 |...... B..A . . |
000000E0: 22 52 41 4E 47 45 20 45 52 52 4F 52 22 3A 20 80 |"RANGE ERROR": .|
000000F0: 00 12 05 07 00 47 B2 33 39 3A 20 4B B2 44 AA 33 |.....G.39: K.D.3|
00000100: 3A 20 97 20 31 39 38 2C 35 3A 20 99 20 22 93 11 |: . 198,5: . "..|
00000110: 11 22 00 4F 05 08 00 81 20 50 B2 36 33 31 20 A4 |.".O.... P.631 .|
00000120: 20 50 AA 34 3A 20 97 20 50 2C 31 33 3A 20 82 3A | P.4: . P,13: .:|
00000130: 20 43 B2 41 3A 20 81 20 49 B2 44 20 A4 20 4B 3A | C.A: . I.D . K:|
00000140: 20 8B 20 43 B2 42 20 B0 20 53 20 89 20 31 33 00 | . C.B . S . 13.|
00000150: 6B 05 09 00 99 20 49 20 22 9D 44 41 54 41 22 3B |k.... I ".DATA";|
00000160: 3A 20 81 20 4A B2 31 20 A4 20 47 00 9B 05 0A 00 |: . J.1 . G.....|
00000170: 4D B2 C2 28 43 29 3A 20 8B 20 44 4D B2 32 20 A7 |M..(C): . DM.2 .|
00000180: 20 A1 23 32 2C 4D 24 3A 20 4D B2 C6 28 4D 24 AA | .#2,M$: M..(M$.|
00000190: C7 28 30 29 29 3A 20 53 B2 53 54 00 C7 05 0B 00 |.(0)): S.ST.....|
000001A0: 5A B2 4D AB 31 36 AC 28 B5 28 4D AD 31 36 29 29 |Z.M.16.(.(M.16))|
000001B0: 3A 20 99 20 C7 28 36 35 AA 4D AD 31 36 29 AA C7 |: . .(65.M.16)..|
000001C0: 28 36 35 AA 5A 29 3B 00 F4 05 0C 00 43 B2 43 AA |(65.Z);.....C.C.|
000001D0: 31 3A 20 59 B2 AB 49 AC 28 43 B2 42 20 B0 20 53 |1: Y..I.(C.B . S|
000001E0: B1 30 29 3A 20 8B 20 43 B3 42 20 AF 20 53 B2 30 |.0): . C.B . S.0|
000001F0: 20 A7 20 82 00 0A 06 0D 00 99 3A 20 82 20 49 3A | . .......: . I:|
00000200: 20 8B 20 59 20 A7 20 49 B2 59 00 24 06 0E 00 54 | . Y . I.Y.$...T|
00000210: B2 37 3A 20 8B 20 43 B2 42 20 B0 20 53 20 A7 20 |.7: . C.B . S . |
00000220: 54 B2 31 39 00 62 06 0F 00 99 22 41 3D 22 43 22 |T.19.b...."A="C"|
00000230: 3A 42 3D 22 42 22 3A 44 3D 22 49 22 3A 53 3D 22 |:B="B":D="I":S="|
00000240: 53 22 3A 20 44 4D 3D 22 44 4D 22 3A 50 4F 4B 45 |S": DM="DM":POKE|
00000250: 31 35 32 2C 32 3A 47 4F 54 4F 22 54 22 13 22 3A |152,2:GOTO"T".":|
00000260: 20 80 00 7D 06 10 00 55 B2 30 3A 20 41 24 B2 C9 | ..}...U.0: A$..|
00000270: 28 22 30 30 30 30 22 AA 41 24 2C 34 29 00 9B 06 |("0000".A$,4)...|
00000280: 11 00 81 20 49 B2 31 20 A4 20 34 3A 20 56 B2 C6 |... I.1 . 4: V..|
00000290: 28 CA 28 41 24 2C 49 2C 31 29 29 00 C5 06 12 00 |(.(A$,I,1)).....|
000002A0: 56 B2 56 AB 34 38 AA 37 AC 28 56 B1 36 34 29 3A |V.V.48.7.(V.64):|
000002B0: 20 55 B2 55 AA 56 AC 31 36 AE 28 34 AB 49 29 3A | U.U.V.16.(4.I):|
000002C0: 20 82 3A 20 8E 00 EA 06 13 00 44 24 B2 C4 28 44 | .: ......D$..(D|
000002D0: AB 39 30 32 30 29 3A 20 51 24 B2 C7 28 33 34 29 |.9020): Q$..(34)|
000002E0: 3A 20 A0 20 32 3A 20 A0 20 31 00 2B 07 14 00 41 |: . 2: . 1.+...A|
000002F0: 24 B2 22 39 30 30 32 20 50 4F 4B 45 20 32 35 31 |$."9002 POKE 251|
00000300: 2C 22 AA C4 28 C2 28 32 35 31 29 29 3A 20 42 24 |,"..(.(251)): B$|
00000310: B2 22 39 30 30 33 20 50 4F 4B 45 20 32 35 32 2C |."9003 POKE 252,|
00000320: 22 AA C4 28 C2 28 32 35 32 29 29 00 6B 07 15 00 |"..(.(252)).k...|
00000330: 43 24 B2 22 39 30 30 34 20 46 4F 52 20 49 3D 30 |C$."9004 FOR I=0|
00000340: 20 54 4F 22 AA 44 24 AA 22 3A 20 52 45 41 44 20 | TO".D$.": READ |
00000350: 41 24 22 3A 20 99 20 22 93 11 11 11 22 20 41 24 |A$": . "...." A$|
00000360: 3A 20 99 20 42 24 3A 20 99 43 24 00 81 07 16 00 |: . B$: .C$.....|
00000370: 99 20 22 55 3D 30 3A 20 47 4F 54 4F 20 32 34 13 |. "U=0: GOTO 24.|
00000380: 22 00 AA 07 17 00 81 20 49 B2 36 33 31 20 A4 20 |"...... I.631 . |
00000390: 49 AA 33 3A 20 97 20 49 2C 31 33 3A 20 82 3A 20 |I.3: . I,13: .: |
000003A0: 97 20 31 39 38 2C 34 3A 20 80 00 E2 07 18 00 99 |. 198,4: .......|
000003B0: 20 22 93 11 11 11 30 22 3A 20 97 20 36 33 31 2C | "....0": . 631,|
000003C0: 31 33 3A 20 97 20 36 33 32 2C 31 34 37 3A 97 20 |13: . 632,147:. |
000003D0: 31 39 38 2C 32 3A 8D 20 33 30 3A 99 20 22 13 22 |198,2:. 30:. "."|
000003E0: 3A 80 00 06 08 19 00 85 20 22 11 46 49 4C 45 4E |:....... ".FILEN|
000003F0: 41 4D 45 22 3B 46 4C 24 3A 20 8B 20 46 4C 24 B2 |AME";FL$: . FL$.|
00000400: 22 22 20 A7 20 80 00 27 08 1A 00 9F 20 31 2C 38 |"" . ..'.... 1,8|
00000410: 2C 31 35 3A 20 9F 20 32 2C 38 2C 32 2C 46 4C 24 |,15: . 2,8,2,FL$|
00000420: AA 22 2C 50 2C 52 22 00 49 08 1B 00 84 31 2C 44 |.",P,R".I....1,D|
00000430: 45 2C 44 45 24 2C 44 46 2C 44 46 3A 20 8B 20 44 |E,DE$,DF,DF: . D|
00000440: 45 B1 31 39 20 89 20 32 39 00 85 08 1C 00 A1 23 |E.19 . 29......#|
00000450: 32 2C 41 24 2C 42 24 3A 20 5A 24 B2 C7 28 30 29 |2,A$,B$: Z$..(0)|
00000460: 3A 20 41 B2 C6 28 41 24 AA 5A 24 29 AA 32 35 36 |: A..(A$.Z$).256|
00000470: AC C6 28 42 24 AA 5A 24 29 3A 20 42 B2 36 35 35 |..(B$.Z$): B.655|
00000480: 33 36 3A 20 8E 00 A2 08 1D 00 99 20 22 11 44 49 |36: ....... ".DI|
00000490: 53 4B 20 45 52 52 4F 52 3A 20 22 20 44 45 24 3A |SK ERROR: " DE$:|
000004A0: 20 80 00 B1 08 1E 00 57 B2 34 33 20 3A 20 58 B2 | ......W.43 : X.|
000004B0: 57 00 C0 08 1F 00 81 20 49 B2 31 20 A4 20 33 37 |W...... I.1 . 37|
000004C0: 00 E4 08 20 00 57 B2 C2 28 57 29 AA 32 35 36 AC |... .W..(W).256.|
000004D0: C2 28 57 AA 31 29 20 3A 20 8B 20 49 B2 31 20 A7 |.(W.1) : . I.1 .|
000004E0: 20 59 B2 57 00 EA 08 21 00 82 00 F7 08 22 00 97 | Y.W...!....."..|
000004F0: 20 59 2C C2 28 57 29 00 08 09 23 00 97 20 59 AA | Y,.(W)...#.. Y.|
00000500: 31 2C C2 28 57 AA 31 29 00 28 09 24 00 97 20 58 |1,.(W.1).(.$.. X|
00000510: AA 33 2C C2 28 58 AA 33 29 AB B5 28 28 57 AB 59 |.3,.(X.3)..((W.Y|
00000520: 29 AD 32 35 36 29 3A 8E 00 2E 09 25 23 3A 00 34 |).256):....%#:.4|
00000530: 09 26 23 80 00 3A 09 27 23 3A 00 4C 09 28 23 81 |.&#..:.'#:.L.(#.|
00000540: 20 49 B2 33 31 39 20 A4 20 33 38 34 00 5E 09 29 | I.319 . 384.^.)|
00000550: 23 87 20 41 3A 20 97 20 49 2C 41 3A 20 82 00 71 |#. A: . I,A: ..q|
00000560: 09 2D 23 9E 20 33 31 39 2C 41 24 3A 20 82 3A 20 |.-#. 319,A$: .: |
00000570: 8E 00 77 09 2E 23 3A 00 9A 09 2F 23 83 20 20 33 |..w..#:.../#. 3|
00000580: 32 2C 20 32 35 33 2C 20 32 30 36 2C 20 20 33 32 |2, 253, 206, 32|
00000590: 2C 20 31 35 38 2C 20 32 30 35 00 BD 09 30 23 83 |, 158, 205...0#.|
000005A0: 20 20 33 32 2C 20 31 36 33 2C 20 32 31 34 2C 20 | 32, 163, 214, |
000005B0: 31 33 33 2C 20 20 33 36 2C 20 31 36 32 00 E0 09 |133, 36, 162...|
000005C0: 31 23 83 20 20 20 30 2C 20 31 36 30 2C 20 32 35 |1#. 0, 160, 25|
000005D0: 35 2C 20 20 33 32 2C 20 31 30 32 2C 20 20 20 31 |5, 32, 102, 1|
000005E0: 00 03 0A 32 23 83 20 20 31 30 2C 20 20 31 30 2C |...2#. 10, 10,|
000005F0: 20 20 31 30 2C 20 20 31 30 2C 20 31 33 33 2C 20 | 10, 10, 133, |
00000600: 20 33 37 00 26 0A 33 23 83 20 20 33 32 2C 20 31 | 37.&.3#. 32, 1|
00000610: 30 32 2C 20 20 20 31 2C 20 20 20 35 2C 20 20 33 |02, 1, 5, 3|
00000620: 37 2C 20 31 32 39 00 49 0A 34 23 83 20 32 35 31 |7, 129.I.4#. 251|
00000630: 2C 20 32 33 30 2C 20 32 35 31 2C 20 32 30 38 2C |, 230, 251, 208,|
00000640: 20 32 33 36 2C 20 32 33 30 00 6C 0A 35 23 83 20 | 236, 230.l.5#. |
00000650: 32 35 32 2C 20 32 30 38 2C 20 32 33 32 2C 20 32 |252, 208, 232, 2|
00000660: 30 30 2C 20 31 39 36 2C 20 20 33 36 00 8F 0A 36 |00, 196, 36...6|
00000670: 23 83 20 32 34 30 2C 20 20 31 36 2C 20 31 37 37 |#. 240, 16, 177|
00000680: 2C 20 20 33 34 2C 20 32 30 31 2C 20 20 38 31 00 |, 34, 201, 81.|
00000690: B2 0A 37 23 83 20 31 37 36 2C 20 20 31 33 2C 20 |..7#. 176, 13, |
000006A0: 32 30 31 2C 20 20 36 35 2C 20 31 34 34 2C 20 20 |201, 65, 144, |
000006B0: 20 39 00 D5 0A 38 23 83 20 32 33 33 2C 20 20 20 | 9...8#. 233, |
000006C0: 31 2C 20 20 34 31 2C 20 20 31 35 2C 20 20 31 36 |1, 41, 15, 16|
000006D0: 2C 20 20 20 32 00 F8 0A 39 23 83 20 31 30 34 2C |, 2...9#. 104,|
000006E0: 20 31 30 34 2C 20 20 39 36 2C 20 20 37 36 2C 20 | 104, 96, 76, |
000006F0: 20 20 38 2C 20 32 30 37 00 FE 0A 3A 23 3A 00 00 | 8, 207...:#:..|
00000700: 00 |. |
....... ".D/DISK M/MEMORY";DM$.=.... DM
$.."D" . DM$.."M" . ..K...D.9020: DM.1:
. DM$."D" . DM.2: . 25: . 5...... ".STAR
T, END (HEX)";A$,B$...... 16: A.U: A$.B$
: . 16: B.U.P.... 252,A.256 : . 251,A.25
6.B(252)...... B..A . . "RANGE ERROR": .
.....G.39: K.D.3: . 198,5: . "...".O....
P.631 . P.4: . P,13: .: C.A: . I.D . K:
. C.B . S . 13.K.... I ".DATA";: . J.1
. G.....M.B(C): . DM.2 . .#2,M$: M.F(M$.
G(0)): S.ST.G...Z.M.16.(.(M.16)): . G(65
.M.16).G(65.Z);.....C.C.1: Y..I.(C.B . S
.0): . C.B . S.0 . .......: . I: . Y . I
.Y.$...T.7: . C.B . S . T.19.B...."A="C"
:B="B":D="I":S="S": DM="DM":POKE152,2:GO
TO"T".": ..}...U.0: A$.I("0000".A$,4)...
... I.1 . 4: V.F(J(A$,I,1)).E...V.V.48.7
.(V.64): U.U.V.16.(4.I): .: ......D$.D(D
.9020): Q$.G(34): 2: 1.+...A$."9002
POKE 251,".D(B(251)): B$."9003 POKE 252,
".D(B(252)).K...C$."9004 FOR I=0 TO".D$.
": READ A$": . "...." A$: . B$: .C$.....
. "U=0: GOTO 24."...... I.631 . I.3: . I
,13: .: . 198,4: ....... "....0": . 631,
13: . 632,147:. 198,2:. 30:. ".":.......
".FILENAME";FL$: . FL$."" . ..'.... 1,8
,15: . 2,8,2,FL$.",P,R".I....1,DE,DE$,DF
,DF: . DE.19 . 29......#2,A$,B$: Z$.G(0)
: A.F(A$.Z$).256.F(B$.Z$): B.65536: ....
... ".DISK ERROR: " DE$: ......W.43 : X.
W...... I.1 . 37... .W.B(W).256.B(W.1) :
. I.1 . Y.W...!.....".. Y,B(W)...#.. Y.
1,B(W.1).(.$.. X.3,B(X.3)..((W.Y).256):.
...%#:.4.&#..:.'#:.L.(#. I.319 . 384.^.)
#. A: . I,A: ..Q.-#. 319,A$: .: ..W..#:.
../#. 32, 253, 206, 32, 158, 205...0#.
32, 163, 214, 133, 36, 162...1#. 0,
160, 255, 32, 102, 1...2#. 10, 10,
10, 10, 133, 37.&.3#. 32, 102, 1,
5, 37, 129.I.4#. 251, 230, 251, 208,
236, 230.L.5#. 252, 208, 232, 200, 196,
36...6#. 240, 16, 177, 34, 201, 81.
..7#. 176, 13, 201, 65, 144, 9.U.8#.
233, 1, 41, 15, 16, 2...9#. 104,
104, 96, 76, 8, 207...:#:...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL