> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 64 00 8F 20 54 48 49 53 20 50 52 4F |..".d.. THIS PRO|
00000010: 47 52 41 4D 20 52 45 4C 4F 43 41 54 45 53 20 54 |GRAM RELOCATES T|
00000020: 48 45 00 48 08 6E 00 8F 20 27 48 52 50 52 49 4E |HE.H.n.. 'HRPRIN|
00000030: 54 27 20 4D 4C 20 52 4F 55 54 49 4E 45 20 41 4E |T' ML ROUTINE AN|
00000040: 44 20 57 52 49 54 45 53 00 69 08 78 00 8F 20 54 |D WRITES.i.x.. T|
00000050: 48 45 20 52 45 4C 4F 43 41 54 45 44 20 43 4F 44 |HE RELOCATED COD|
00000060: 45 20 54 4F 20 44 49 53 4B 00 89 08 82 00 8B 20 |E TO DISK...... |
00000070: 41 B2 30 20 A7 20 41 B2 31 3A 93 20 22 48 52 50 |A.0 . A.1:. "HRP|
00000080: 52 49 4E 54 22 2C 38 2C 31 00 AC 08 8C 00 85 20 |RINT",8,1...... |
00000090: 22 4E 45 57 20 4C 4F 43 41 54 49 4F 4E 20 46 4F |"NEW LOCATION FO|
000000A0: 52 20 48 52 50 52 49 4E 54 22 3B 4E 00 D0 08 96 |R HRPRINT";N....|
000000B0: 00 85 20 22 4E 45 57 20 46 49 4C 45 4E 41 4D 45 |.. "NEW FILENAME|
000000C0: 20 46 4F 52 20 48 52 50 52 49 4E 54 22 3B 46 24 | FOR HRPRINT";F$|
000000D0: 00 E9 08 A0 00 41 B2 B5 28 4E AD 32 35 36 29 3A |.....A..(N.256):|
000000E0: 42 B2 4E AB 32 35 36 AC 41 00 FC 08 AA 00 99 20 |B.N.256.A...... |
000000F0: 22 57 4F 52 4B 49 4E 47 2E 2E 2E 22 00 14 09 B4 |"WORKING..."....|
00000100: 00 A0 20 31 35 3A 9F 20 31 35 2C 38 2C 31 35 2C |.. 15:. 15,8,15,|
00000110: 22 49 30 22 00 1E 09 BE 00 8D 20 34 31 30 00 39 |"I0"...... 410.9|
00000120: 09 C8 00 9F 20 32 2C 20 38 2C 20 32 2C 20 46 24 |.... 2, 8, 2, F$|
00000130: 20 AA 20 22 2C 50 2C 57 22 00 43 09 D2 00 8D 20 | . ",P,W".C.... |
00000140: 34 31 30 00 56 09 DC 00 98 32 2C 20 C7 28 42 29 |410.V....2, .(B)|
00000150: 3B C7 28 41 29 3B 00 60 09 E6 00 8D 20 34 31 30 |;.(A);.`.... 410|
00000160: 00 76 09 F0 00 81 20 4A B2 34 39 31 35 32 20 A4 |.v.... J.49152 .|
00000170: 20 34 39 36 37 35 00 81 09 FA 00 50 B2 C2 28 4A | 49675.....P..(J|
00000180: 29 00 AD 09 04 01 8B 20 50 B3 B1 37 36 20 AF 20 |)...... P..76 . |
00000190: 50 B3 B1 31 30 38 20 AF 20 50 B3 B1 33 32 20 A7 |P..108 . P..32 .|
000001A0: 20 98 32 2C C7 28 50 29 3B 3A 82 20 4A 00 BA 09 | .2,.(P);:. J...|
000001B0: 0E 01 5A B2 C2 28 4A AA 32 29 00 DD 09 18 01 8B |..Z..(J.2)......|
000001C0: 20 5A B3 31 39 32 20 B0 20 5A B1 31 39 34 20 A7 | Z.192 . Z.194 .|
000001D0: 20 98 32 2C C7 28 50 29 3B 3A 82 20 4A 00 EB 09 | .2,.(P);:. J...|
000001E0: 22 01 58 B2 34 39 31 35 32 AB 4E 00 F8 09 2C 01 |".X.49152.N...,.|
000001F0: 59 B2 C2 28 4A AA 31 29 00 08 0A 36 01 41 B2 59 |Y..(J.1)...6.A.Y|
00000200: AA 5A AC 32 35 36 AB 58 00 17 0A 40 01 5A B2 B5 |.Z.256.X...@.Z..|
00000210: 28 41 AD 32 35 36 29 00 25 0A 4A 01 59 B2 41 AB |(A.256).%.J.Y.A.|
00000220: 32 35 36 AC 5A 00 3D 0A 54 01 98 32 2C 20 C7 28 |256.Z.=.T..2, .(|
00000230: 50 29 3B C7 28 59 29 3B C7 28 5A 29 3B 00 47 0A |P);.(Y);.(Z);.G.|
00000240: 5E 01 4A B2 4A AA 32 00 4F 0A 68 01 82 20 4A 00 |^.J.J.2.O.h.. J.|
00000250: 71 0A 72 01 99 20 22 4E 45 57 20 53 59 53 20 56 |q.r.. "NEW SYS V|
00000260: 41 4C 55 45 20 46 4F 52 20 27 49 4E 27 3A 22 3B |ALUE FOR 'IN':";|
00000270: 4E 00 96 0A 7C 01 99 20 22 4E 45 57 20 53 59 53 |N...|.. "NEW SYS|
00000280: 20 56 41 4C 55 45 20 46 4F 52 20 27 50 52 27 3A | VALUE FOR 'PR':|
00000290: 22 3B 4E AA 35 35 00 A5 0A 86 01 A0 20 32 3A A0 |";N.55...... 2:.|
000002A0: 20 31 35 3A 80 00 C9 0A 90 01 8F 20 43 48 45 43 | 15:....... CHEC|
000002B0: 4B 20 44 49 53 4B 20 44 52 49 56 45 20 45 52 52 |K DISK DRIVE ERR|
000002C0: 4F 52 20 53 54 41 54 55 53 00 DE 0A 9A 01 84 31 |OR STATUS......1|
000002D0: 35 2C 45 58 2C 45 58 24 2C 54 52 2C 53 45 00 ED |5,EX,EX$,TR,SE..|
000002E0: 0A A4 01 8B 20 45 58 B2 30 20 A7 20 8E 00 06 0B |.... EX.0 . ....|
000002F0: AE 01 99 20 C7 28 31 38 29 20 22 44 49 53 4B 20 |... .(18) "DISK |
00000300: 45 52 52 4F 52 22 00 19 0B B8 01 99 20 45 58 3B |ERROR"...... EX;|
00000310: 45 58 24 3B 54 52 3B 53 45 00 23 0B C2 01 89 20 |EX$;TR;SE.#.... |
00000320: 33 39 30 00 00 00 |390... |
..".D.. THIS PROGRAM RELOCATES THE.H.N..
'HRPRINT' ML ROUTINE AND WRITES.I.X.. T
HE RELOCATED CODE TO DISK...... A.0 . A.
1:. "HRPRINT",8,1...... "NEW LOCATION FO
R HRPRINT";N.P.... "NEW FILENAME FOR HRP
RINT";F$... .A..(N.256):B.N.256.A......
"WORKING..."..... 15:. 15,8,15,"I0"....
.. 410.9.H.. 2, 8, 2, F$ . ",P,W".C.R..
410.V....2, G(B);G(A);.`.... 410.V.... J
.49152 . 49675.....P.B(J)...... P..76 .
P..108 . P..32 . .2,G(P);:. J.....Z.B(J.
2)...... Z.192 . Z.194 . .2,G(P);:. J...
".X.49152.N...,.Y.B(J.1)...6.A.Y.Z.256.X
...@.Z..(A.256).%.J.Y.A.256.Z.=.T..2, G(
P);G(Y);G(Z);.G.^.J.J.2.O.H.. J.Q.R.. "N
EW SYS VALUE FOR 'IN':";N...|.. "NEW SYS
VALUE FOR 'PR':";N.55..... 2: 15:..I.
... CHECK DISK DRIVE ERROR STATUS......1
5,EX,EX$,TR,SE...... EX.0 . ....... G(18
) "DISK ERROR"...... EX;EX$;TR;SE.#.B..
390...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL