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 13 05 07 00 47 B2 33 34 3A 20 4B B2 44 AA 38 |.....G.34: K.D.8|
00000100: 3A 20 97 20 31 35 38 2C 31 30 3A 20 99 20 22 93 |: . 158,10: . ".|
00000110: 11 11 22 00 50 05 08 00 81 20 50 B2 36 32 33 20 |..".P.... P.623 |
00000120: A4 20 50 AA 39 3A 20 97 20 50 2C 31 33 3A 20 82 |. P.9: . P,13: .|
00000130: 3A 20 43 B2 41 3A 20 81 20 49 B2 44 20 A4 20 4B |: C.A: . I.D . K|
00000140: 3A 20 8B 20 43 B2 42 20 B0 20 53 20 89 20 31 33 |: . C.B . S . 13|
00000150: 00 6C 05 09 00 99 20 49 20 22 9D 44 41 54 41 22 |.l.... I ".DATA"|
00000160: 3B 3A 20 81 20 4A B2 31 20 A4 20 47 00 9C 05 0A |;: . J.1 . G....|
00000170: 00 4D B2 C2 28 43 29 3A 20 8B 20 44 4D B2 32 20 |.M..(C): . DM.2 |
00000180: A7 20 A1 23 32 2C 4D 24 3A 20 4D B2 C6 28 4D 24 |. .#2,M$: M..(M$|
00000190: AA C7 28 30 29 29 3A 20 53 B2 53 54 00 C8 05 0B |..(0)): S.ST....|
000001A0: 00 5A B2 4D AB 31 36 AC 28 B5 28 4D AD 31 36 29 |.Z.M.16.(.(M.16)|
000001B0: 29 3A 20 99 20 C7 28 36 35 AA 4D AD 31 36 29 AA |): . .(65.M.16).|
000001C0: C7 28 36 35 AA 5A 29 3B 00 F5 05 0C 00 43 B2 43 |.(65.Z);.....C.C|
000001D0: AA 31 3A 20 59 B2 AB 49 AC 28 43 B2 42 20 B0 20 |.1: Y..I.(C.B . |
000001E0: 53 B1 30 29 3A 20 8B 20 43 B3 42 20 AF 20 53 B2 |S.0): . C.B . S.|
000001F0: 30 20 A7 20 82 00 0B 06 0D 00 99 3A 20 82 20 49 |0 . .......: . I|
00000200: 3A 20 8B 20 59 20 A7 20 49 B2 59 00 25 06 0E 00 |: . Y . I.Y.%...|
00000210: 54 B2 37 3A 20 8B 20 43 B2 42 20 B0 20 53 20 A7 |T.7: . C.B . S .|
00000220: 20 54 B2 31 39 00 63 06 0F 00 99 22 41 3D 22 43 | T.19.c...."A="C|
00000230: 22 3A 42 3D 22 42 22 3A 44 3D 22 49 22 3A 53 3D |":B="B":D="I":S=|
00000240: 22 53 22 3A 20 44 4D 3D 22 44 4D 22 3A 50 4F 4B |"S": DM="DM":POK|
00000250: 45 31 37 34 2C 32 3A 47 4F 54 4F 22 54 22 13 22 |E174,2:GOTO"T"."|
00000260: 3A 20 80 00 7E 06 10 00 55 B2 30 3A 20 41 24 B2 |: ..~...U.0: A$.|
00000270: C9 28 22 30 30 30 30 22 AA 41 24 2C 34 29 00 9C |.("0000".A$,4)..|
00000280: 06 11 00 81 20 49 B2 31 20 A4 20 34 3A 20 56 B2 |.... I.1 . 4: V.|
00000290: C6 28 CA 28 41 24 2C 49 2C 31 29 29 00 C6 06 12 |.(.(A$,I,1))....|
000002A0: 00 56 B2 56 AB 34 38 AA 37 AC 28 56 B1 36 34 29 |.V.V.48.7.(V.64)|
000002B0: 3A 20 55 B2 55 AA 56 AC 31 36 AE 28 34 AB 49 29 |: U.U.V.16.(4.I)|
000002C0: 3A 20 82 3A 20 8E 00 EB 06 13 00 44 24 B2 C4 28 |: .: ......D$..(|
000002D0: 44 AB 39 30 32 30 29 3A 20 51 24 B2 C7 28 33 34 |D.9020): Q$..(34|
000002E0: 29 3A 20 A0 20 32 3A 20 A0 20 31 00 2C 07 14 00 |): . 2: . 1.,...|
000002F0: 41 24 B2 22 39 30 30 32 20 50 4F 4B 45 20 32 35 |A$."9002 POKE 25|
00000300: 31 2C 22 AA C4 28 C2 28 32 35 31 29 29 3A 20 42 |1,"..(.(251)): B|
00000310: 24 B2 22 39 30 30 33 20 50 4F 4B 45 20 32 35 32 |$."9003 POKE 252|
00000320: 2C 22 AA C4 28 C2 28 32 35 32 29 29 00 6C 07 15 |,"..(.(252)).l..|
00000330: 00 43 24 B2 22 39 30 30 34 20 46 4F 52 20 49 3D |.C$."9004 FOR I=|
00000340: 30 20 54 4F 22 AA 44 24 AA 22 3A 20 52 45 41 44 |0 TO".D$.": READ|
00000350: 20 41 24 22 3A 20 99 20 22 93 11 11 11 22 20 41 | A$": . "...." A|
00000360: 24 3A 20 99 20 42 24 3A 20 99 43 24 00 82 07 16 |$: . B$: .C$....|
00000370: 00 99 20 22 55 3D 30 3A 20 47 4F 54 4F 20 32 34 |.. "U=0: GOTO 24|
00000380: 13 22 00 AB 07 17 00 81 20 49 B2 36 32 33 20 A4 |."...... I.623 .|
00000390: 20 49 AA 33 3A 20 97 20 49 2C 31 33 3A 20 82 3A | I.3: . I,13: .:|
000003A0: 20 97 20 31 35 38 2C 34 3A 20 80 00 E3 07 18 00 | . 158,4: ......|
000003B0: 99 20 22 93 11 11 11 30 22 3A 20 97 20 36 32 33 |. "....0": . 623|
000003C0: 2C 31 33 3A 20 97 20 36 32 34 2C 31 34 37 3A 97 |,13: . 624,147:.|
000003D0: 20 31 35 38 2C 32 3A 8D 20 33 30 3A 99 20 22 13 | 158,2:. 30:. ".|
000003E0: 22 3A 80 00 07 08 19 00 85 20 22 11 46 49 4C 45 |":....... ".FILE|
000003F0: 4E 41 4D 45 22 3B 46 4C 24 3A 20 8B 20 46 4C 24 |NAME";FL$: . FL$|
00000400: B2 22 22 20 A7 20 80 00 28 08 1A 00 9F 20 31 2C |."" . ..(.... 1,|
00000410: 38 2C 31 35 3A 20 9F 20 32 2C 38 2C 32 2C 46 4C |8,15: . 2,8,2,FL|
00000420: 24 AA 22 2C 50 2C 52 22 00 4A 08 1B 00 84 31 2C |$.",P,R".J....1,|
00000430: 44 45 2C 44 45 24 2C 44 46 2C 44 46 3A 20 8B 20 |DE,DE$,DF,DF: . |
00000440: 44 45 B1 31 39 20 89 20 32 39 00 86 08 1C 00 A1 |DE.19 . 29......|
00000450: 23 32 2C 41 24 2C 42 24 3A 20 5A 24 B2 C7 28 30 |#2,A$,B$: Z$..(0|
00000460: 29 3A 20 41 B2 C6 28 41 24 AA 5A 24 29 AA 32 35 |): A..(A$.Z$).25|
00000470: 36 AC C6 28 42 24 AA 5A 24 29 3A 20 42 B2 36 35 |6..(B$.Z$): B.65|
00000480: 35 33 36 3A 20 8E 00 A3 08 1D 00 99 20 22 11 44 |536: ....... ".D|
00000490: 49 53 4B 20 45 52 52 4F 52 3A 20 22 20 44 45 24 |ISK ERROR: " DE$|
000004A0: 3A 20 80 00 B2 08 1E 00 57 B2 34 30 20 3A 20 58 |: ......W.40 : X|
000004B0: B2 57 00 C1 08 1F 00 81 20 49 B2 31 20 A4 20 33 |.W...... I.1 . 3|
000004C0: 37 00 E5 08 20 00 57 B2 C2 28 57 29 AA 32 35 36 |7... .W..(W).256|
000004D0: AC C2 28 57 AA 31 29 20 3A 20 8B 20 49 B2 31 20 |..(W.1) : . I.1 |
000004E0: A7 20 59 B2 57 00 EB 08 21 00 82 00 F8 08 22 00 |. Y.W...!.....".|
000004F0: 97 20 59 2C C2 28 57 29 00 09 09 23 00 97 20 59 |. Y,.(W)...#.. Y|
00000500: AA 31 2C C2 28 57 AA 31 29 00 29 09 24 00 97 20 |.1,.(W.1).).$.. |
00000510: 58 AA 33 2C C2 28 58 AA 33 29 AB B5 28 28 57 AB |X.3,.(X.3)..((W.|
00000520: 59 29 AD 32 35 36 29 3A 8E 00 2F 09 25 23 3A 00 |Y).256):../.%#:.|
00000530: 35 09 26 23 80 00 3B 09 27 23 3A 00 4D 09 28 23 |5.&#..;.'#:.M.(#|
00000540: 81 20 49 B2 33 31 39 20 A4 20 33 38 34 00 5F 09 |. I.319 . 384._.|
00000550: 29 23 87 20 41 3A 20 97 20 49 2C 41 3A 20 82 00 |)#. A: . I,A: ..|
00000560: 72 09 2D 23 9E 20 33 31 39 2C 41 24 3A 20 82 3A |r.-#. 319,A$: .:|
00000570: 20 8E 00 78 09 2E 23 3A 00 9B 09 2F 23 83 20 20 | ..x..#:.../#. |
00000580: 33 32 2C 20 32 34 35 2C 20 31 39 30 2C 20 20 33 |32, 245, 190, 3|
00000590: 32 2C 20 31 35 32 2C 20 31 38 39 00 BE 09 30 23 |2, 152, 189...0#|
000005A0: 83 20 20 33 32 2C 20 31 38 31 2C 20 31 39 39 2C |. 32, 181, 199,|
000005B0: 20 31 33 33 2C 20 20 33 36 2C 20 31 36 32 00 E1 | 133, 36, 162..|
000005C0: 09 31 23 83 20 20 20 30 2C 20 31 36 30 2C 20 32 |.1#. 0, 160, 2|
000005D0: 35 35 2C 20 20 33 32 2C 20 31 30 32 2C 20 20 20 |55, 32, 102, |
000005E0: 31 00 04 0A 32 23 83 20 20 31 30 2C 20 20 31 30 |1...2#. 10, 10|
000005F0: 2C 20 20 31 30 2C 20 20 31 30 2C 20 31 33 33 2C |, 10, 10, 133,|
00000600: 20 20 33 37 00 27 0A 33 23 83 20 20 33 32 2C 20 | 37.'.3#. 32, |
00000610: 31 30 32 2C 20 20 20 31 2C 20 20 20 35 2C 20 20 |102, 1, 5, |
00000620: 33 37 2C 20 31 32 39 00 4A 0A 34 23 83 20 32 35 |37, 129.J.4#. 25|
00000630: 31 2C 20 32 33 30 2C 20 32 35 31 2C 20 32 30 38 |1, 230, 251, 208|
00000640: 2C 20 32 33 36 2C 20 32 33 30 00 6D 0A 35 23 83 |, 236, 230.m.5#.|
00000650: 20 32 35 32 2C 20 32 30 38 2C 20 32 33 32 2C 20 | 252, 208, 232, |
00000660: 32 30 30 2C 20 31 39 36 2C 20 20 33 36 00 90 0A |200, 196, 36...|
00000670: 36 23 83 20 32 34 30 2C 20 20 31 36 2C 20 31 37 |6#. 240, 16, 17|
00000680: 37 2C 20 20 33 31 2C 20 32 30 31 2C 20 20 38 31 |7, 31, 201, 81|
00000690: 00 B3 0A 37 23 83 20 31 37 36 2C 20 20 31 33 2C |...7#. 176, 13,|
000006A0: 20 32 30 31 2C 20 20 36 35 2C 20 31 34 34 2C 20 | 201, 65, 144, |
000006B0: 20 20 39 00 D6 0A 38 23 83 20 32 33 33 2C 20 20 | 9...8#. 233, |
000006C0: 20 31 2C 20 20 34 31 2C 20 20 31 35 2C 20 20 31 | 1, 41, 15, 1|
000006D0: 36 2C 20 20 20 32 00 F9 0A 39 23 83 20 31 30 34 |6, 2...9#. 104|
000006E0: 2C 20 31 30 34 2C 20 20 39 36 2C 20 20 37 36 2C |, 104, 96, 76,|
000006F0: 20 20 20 30 2C 20 31 39 31 00 FF 0A 3A 23 3A 00 | 0, 191...:#:.|
00000700: 00 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.34: K.D.8: . 158,10: . "...".P...
. P.623 . P.9: . P,13: .: C.A: . I.D . K
: . C.B . S . 13.L.... I ".DATA";: . J.1
. G.....M.B(C): . DM.2 . .#2,M$: M.F(M$
.G(0)): S.ST.H...Z.M.16.(.(M.16)): . G(6
5.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.C...."A="C
":B="B":D="I":S="S": DM="DM":POKE174,2:G
OTO"T".": ..~...U.0: A$.I("0000".A$,4)..
.... I.1 . 4: V.F(J(A$,I,1)).F...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)).L...C$."9004 FOR I=0 TO".D$
.": READ A$": . "...." A$: . B$: .C$....
.. "U=0: GOTO 24."...... I.623 . I.3: .
I,13: .: . 158,4: ....... "....0": . 623
,13: . 624,147:. 158,2:. 30:. ".":......
. ".FILENAME";FL$: . FL$."" . ..(.... 1,
8,15: . 2,8,2,FL$.",P,R".J....1,DE,DE$,D
F,DF: . DE.19 . 29......#2,A$,B$: Z$.G(0
): A.F(A$.Z$).256.F(B$.Z$): B.65536: ...
.... ".DISK ERROR: " DE$: ......W.40 : X
.W.A.... 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):
../.%#:.5.&#..;.'#:.M.(#. I.319 . 384._.
)#. A: . I,A: ..R.-#. 319,A$: .: ..X..#:
.../#. 32, 245, 190, 32, 152, 189...0#
. 32, 181, 199, 133, 36, 162...1#. 0
, 160, 255, 32, 102, 1...2#. 10, 10
, 10, 10, 133, 37.'.3#. 32, 102, 1
, 5, 37, 129.J.4#. 251, 230, 251, 208
, 236, 230.M.5#. 252, 208, 232, 200, 196
, 36...6#. 240, 16, 177, 31, 201, 81
...7#. 176, 13, 201, 65, 144, 9.V.8#
. 233, 1, 41, 15, 16, 2...9#. 104
, 104, 96, 76, 0, 191...:#:...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL