> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 30 08 0A 23 8F 20 50 4F 53 49 54 49 4F 4E |..0..#. POSITION|
00000010: 20 54 4F 20 52 45 4C 41 54 49 56 45 20 52 45 43 | TO RELATIVE REC|
00000020: 4F 52 44 20 42 45 46 4F 52 45 20 57 52 49 54 45 |ORD BEFORE WRITE|
00000030: 00 60 08 14 23 8F 20 20 46 52 4F 4D 20 53 48 49 |.`..#. FROM SHI|
00000040: 4C 4F 48 27 53 20 52 41 49 44 20 28 43 29 20 31 |LOH'S RAID (C) 1|
00000050: 39 38 37 20 44 41 56 49 44 20 53 48 49 4C 4F 48 |987 DAVID SHILOH|
00000060: 00 95 08 1E 23 8F 20 20 41 44 41 50 54 45 44 20 |....#. ADAPTED |
00000070: 46 52 4F 4D 20 54 48 45 20 54 52 41 4E 53 41 43 |FROM THE TRANSAC|
00000080: 54 4F 52 2C 20 56 4F 4C 55 4D 45 20 37 20 49 53 |TOR, VOLUME 7 IS|
00000090: 53 55 45 20 34 00 B6 08 28 23 8B 20 53 52 20 A7 |SUE 4...(#. SR .|
000000A0: 20 52 31 B2 53 52 AA 31 3A 20 52 32 B2 53 52 AA | R1.SR.1: R2.SR.|
000000B0: 32 3A 20 52 B2 32 00 E4 08 32 23 51 B2 4E AC 4C |2: R.2...2#Q.N.L|
000000C0: 3A 20 51 25 B2 51 AD 32 35 34 3A 20 51 B2 51 AB |: Q%.Q.254: Q.Q.|
000000D0: 51 25 AC 32 35 34 3A 20 53 52 B2 AB 51 25 AC 28 |Q%.254: SR..Q%.(|
000000E0: 4C B1 51 29 00 FE 08 3C 23 8B 20 53 52 20 A7 20 |L.Q)...<#. SR . |
000000F0: 53 52 B2 AB 51 25 AC 28 51 AB 4C AB 31 29 00 18 |SR..Q%.(Q.L.1)..|
00000100: 09 46 23 48 25 B2 4E AD 32 35 36 3A 20 4C 4F B2 |.F#H%.N.256: LO.|
00000110: 4E AB 48 25 AC 32 35 36 00 3D 09 50 23 8F 20 50 |N.H%.256.=.P#. P|
00000120: 4F 49 4E 54 20 54 57 49 43 45 20 41 4E 44 20 57 |OINT TWICE AND W|
00000130: 41 49 54 20 49 46 20 4E 45 45 44 45 44 00 6E 09 |AIT IF NEEDED.n.|
00000140: 5A 23 8B 20 52 20 A7 20 52 B2 52 AB 31 3A 20 8B |Z#. R . R.R.1: .|
00000150: 20 51 25 B2 52 31 20 B0 20 51 25 B2 52 32 20 A7 | Q%.R1 . Q%.R2 .|
00000160: 20 8D 20 39 30 36 30 3A 20 57 B2 31 36 32 00 8D | . 9060: W.162..|
00000170: 09 64 23 98 4C 46 2C 22 50 22 C7 28 53 41 29 C7 |.d#.LF,"P".(SA).|
00000180: 28 4C 4F 29 C7 28 48 25 29 C7 28 30 29 00 AA 09 |(LO).(H%).(0)...|
00000190: 6E 23 8B 20 57 20 A7 20 97 20 57 2C 32 3A 20 92 |n#. W . . W,2: .|
000001A0: 20 57 2C 33 32 3A 20 57 B2 30 00 B0 09 78 23 8E | W,32: W.0...x#.|
000001B0: 00 00 00 |... |
..0..#. POSITION TO RELATIVE RECORD BEFO
RE WRITE.`..#. FROM SHILOH'S RAID (C) 1
987 DAVID SHILOH....#. ADAPTED FROM THE
TRANSACTOR, VOLUME 7 ISSUE 4...(#. SR .
R1.SR.1: R2.SR.2: R.2...2#Q.N.L: Q%.Q.2
54: Q.Q.Q%.254: SR..Q%.(L.Q)...<#. SR .
SR..Q%.(Q.L.1)...F#H%.N.256: LO.N.H%.256
.=.P#. POINT TWICE AND WAIT IF NEEDED.N.
Z#. R . R.R.1: . Q%.R1 . Q%.R2 . . 9060:
W.162...D#.LF,"P"G(SA)G(LO)G(H%)G(0)...
N#. W . . W,2: . W,32: W.0...X#....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL