00000000: 01 08 27 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..'.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 14 00 8F 20 2A 2A |*******.M.... **|
00000030: 20 59 45 50 21 20 49 54 27 53 20 42 41 53 49 43 | YEP! IT'S BASIC|
00000040: 21 20 53 4F 20 57 48 41 54 3F 20 2A 2A 00 73 08 |! SO WHAT? **.s.|
00000050: 1E 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000070: 2A 2A 2A 00 98 08 28 00 97 35 33 32 38 30 2C 30 |***...(..53280,0|
00000080: 3A 97 35 33 32 38 31 2C 30 3A 97 37 37 34 2C 38 |:.53281,0:.774,8|
00000090: 3A 97 37 37 35 2C 38 38 00 BD 08 32 00 99 22 93 |:.775,88...2..".|
000000A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 05 54 41 50 45 20 |...........TAPE |
000000B0: 41 4E 54 49 2D 52 55 4E 20 56 31 2E 32 00 ED 08 |ANTI-RUN V1.2...|
000000C0: 3C 00 99 3A 99 22 54 48 49 53 20 52 41 54 48 45 |<..:."THIS RATHE|
000000D0: 52 20 55 53 45 46 55 4C 20 55 54 49 4C 49 54 59 |R USEFUL UTILITY|
000000E0: 20 57 49 4C 4C 20 54 52 41 4E 53 2D 22 00 1B 09 | WILL TRANS-"...|
000000F0: 46 00 99 22 46 45 52 20 9E 41 4E 59 05 20 54 41 |F.."FER .ANY. TA|
00000100: 50 45 20 54 55 52 42 4F 20 4C 4F 41 44 45 52 20 |PE TURBO LOADER |
00000110: 54 48 41 54 20 41 55 54 4F 2D 22 00 47 09 50 00 |THAT AUTO-".G.P.|
00000120: 99 22 52 55 4E 53 20 54 4F 20 44 49 53 4B 20 46 |."RUNS TO DISK F|
00000130: 4F 52 20 44 49 53 41 53 53 45 4D 42 4C 59 20 57 |OR DISASSEMBLY W|
00000140: 49 54 48 20 41 4E 22 00 69 09 5A 00 99 22 45 58 |ITH AN".i.Z.."EX|
00000150: 50 45 52 54 20 4F 52 20 4F 54 48 45 52 20 4D 4F |PERT OR OTHER MO|
00000160: 4E 49 54 4F 52 2E 22 3A 99 00 9A 09 64 00 99 22 |NITOR.":....d.."|
00000170: 59 4F 55 20 48 41 56 45 20 54 48 45 20 4F 50 54 |YOU HAVE THE OPT|
00000180: 49 4F 4E 20 4F 46 20 53 41 56 49 4E 47 20 49 54 |ION OF SAVING IT|
00000190: 20 54 4F 20 44 49 53 4B 22 3B 00 C8 09 6E 00 99 | TO DISK";...n..|
000001A0: 22 57 49 54 48 20 4F 52 20 57 49 54 48 4F 55 54 |"WITH OR WITHOUT|
000001B0: 20 54 48 45 20 42 59 54 45 53 20 54 48 41 54 20 | THE BYTES THAT |
000001C0: 4D 41 4B 45 20 49 54 22 00 F9 09 78 00 99 22 41 |MAKE IT"...x.."A|
000001D0: 55 54 4F 52 55 4E 2C 20 54 4F 20 52 45 4C 4F 41 |UTORUN, TO RELOA|
000001E0: 44 20 41 5C 20 54 48 45 20 4F 52 49 47 49 4E 41 |D A\ THE ORIGINA|
000001F0: 4C 20 41 44 44 52 2E 22 3B 00 27 0A 82 00 99 22 |L ADDR.";.'...."|
00000200: 4F 52 20 54 48 45 20 4F 52 49 47 2E 41 44 44 52 |OR THE ORIG.ADDR|
00000210: 2B 24 38 30 30 30 2E 20 28 49 54 20 57 4F 4E 27 |+$8000. (IT WON'|
00000220: 54 20 52 55 4E 29 22 00 56 0A 8C 00 99 3A 99 22 |T RUN)".V....:."|
00000230: 49 20 46 49 4E 44 20 54 48 49 53 20 41 42 53 4F |I FIND THIS ABSO|
00000240: 4C 55 54 45 4C 59 20 49 4E 56 41 4C 55 41 42 4C |LUTELY INVALUABL|
00000250: 45 20 46 4F 52 22 00 85 0A 96 00 99 22 48 41 43 |E FOR"......"HAC|
00000260: 4B 49 4E 47 20 4C 4F 41 44 45 52 53 2C 20 41 53 |KING LOADERS, AS|
00000270: 20 54 48 45 20 45 58 50 45 52 54 20 57 4F 4E 27 | THE EXPERT WON'|
00000280: 54 20 44 4F 22 00 B2 0A A0 00 99 22 41 20 54 41 |T DO"......"A TA|
00000290: 50 45 20 4C 4F 41 44 20 53 4F 20 48 41 43 4B 49 |PE LOAD SO HACKI|
000002A0: 4E 47 20 54 48 45 4D 20 57 41 53 20 41 20 4C 4F |NG THEM WAS A LO|
000002B0: 54 22 00 C9 0A AA 00 99 22 4D 4F 52 45 20 44 49 |T"......"MORE DI|
000002C0: 46 46 49 43 55 4C 54 2E 22 00 F7 0A B4 00 99 22 |FFICULT."......"|
000002D0: 4E 2E 42 2E 20 53 4F 4D 45 20 4C 4F 41 44 45 52 |N.B. SOME LOADER|
000002E0: 53 20 55 53 45 20 54 48 45 20 48 45 41 44 45 52 |S USE THE HEADER|
000002F0: 20 53 50 41 43 45 22 00 22 0B BE 00 99 22 28 24 | SPACE"."...."($|
00000300: 33 33 35 2D 24 33 46 46 29 20 54 4F 20 43 4F 4E |335-$3FF) TO CON|
00000310: 54 41 49 4E 20 43 4F 44 45 20 54 4F 4F 2C 20 53 |TAIN CODE TOO, S|
00000320: 4F 22 00 51 0B C8 00 99 22 59 4F 55 20 4D 41 59 |O".Q...."YOU MAY|
00000330: 20 46 49 4E 44 20 59 4F 55 20 4E 45 45 44 20 54 | FIND YOU NEED T|
00000340: 4F 20 53 41 56 45 20 54 48 41 54 20 54 4F 4F 2E |O SAVE THAT TOO.|
00000350: 22 00 81 0B D2 00 99 22 49 54 20 49 53 20 53 41 |"......"IT IS SA|
00000360: 56 45 44 20 41 53 20 53 45 50 45 52 41 54 45 20 |VED AS SEPERATE |
00000370: 46 49 4C 45 20 27 24 33 33 35 2D 24 33 46 46 27 |FILE '$335-$3FF'|
00000380: 22 00 92 0B E6 00 99 22 9F 3C 53 50 41 43 45 3E |"......".<SPACE>|
00000390: 05 22 00 AB 0B F0 00 A1 20 52 24 3A 8B 20 52 24 |."...... R$:. R$|
000003A0: B3 B1 22 20 22 20 A7 20 32 34 30 00 B4 0B FA 00 |.." " . 240.....|
000003B0: 99 22 93 22 00 CF 0B 04 01 48 45 24 B2 22 30 31 |.".".....HE$."01|
000003C0: 32 33 34 35 36 37 38 39 41 42 43 44 45 46 22 00 |23456789ABCDEF".|
000003D0: F7 0B 0E 01 9E 20 36 33 32 37 36 3A 53 31 B2 C2 |..... 63276:S1..|
000003E0: 28 38 33 30 29 3A 45 31 B2 C2 28 38 33 32 29 3A |(830):E1..(832):|
000003F0: 97 20 31 34 37 2C 30 00 31 0C 18 01 97 20 38 33 |. 147,0.1.... 83|
00000400: 30 2C 53 31 AA 31 32 38 3A 97 20 38 33 32 2C 45 |0,S1.128:. 832,E|
00000410: 31 AA 31 32 38 3A 9E 20 36 32 38 32 30 3A 53 32 |1.128:. 62820:S2|
00000420: B2 C2 28 38 32 39 29 3A 45 32 B2 C2 28 38 33 31 |..(829):E2..(831|
00000430: 29 00 47 0C 22 01 48 B2 53 31 AC 32 35 36 AA 53 |).G.".H.S1.256.S|
00000440: 32 3A 8D 20 35 35 30 00 64 0C 2C 01 99 22 4F 52 |2:. 550.d.,.."OR|
00000450: 49 47 49 4E 41 4C 20 53 54 41 52 54 3A 22 48 22 |IGINAL START:"H"|
00000460: 20 22 4E 24 00 7A 0C 36 01 48 B2 45 31 AC 32 35 | "N$.z.6.H.E1.25|
00000470: 36 AA 45 32 3A 8D 20 35 35 30 00 97 0C 40 01 99 |6.E2:. 550...@..|
00000480: 22 4F 52 49 47 49 4E 41 4C 20 45 4E 44 20 20 3A |"ORIGINAL END :|
00000490: 22 48 22 20 22 4E 24 00 B3 0C 4A 01 48 B2 28 53 |"H" "N$...J.H.(S|
000004A0: 31 AA 31 32 38 29 AC 32 35 36 AA 53 32 3A 8D 20 |1.128).256.S2:. |
000004B0: 35 35 30 00 D0 0C 54 01 99 22 52 45 4C 4F 43 41 |550...T.."RELOCA|
000004C0: 54 45 20 53 54 41 52 54 3A 22 48 22 20 22 4E 24 |TE START:"H" "N$|
000004D0: 00 EC 0C 5E 01 48 B2 28 45 31 AA 31 32 38 29 AC |...^.H.(E1.128).|
000004E0: 32 35 36 AA 45 32 3A 8D 20 35 35 30 00 09 0D 68 |256.E2:. 550...h|
000004F0: 01 99 22 52 45 4C 4F 43 41 54 45 20 45 4E 44 20 |.."RELOCATE END |
00000500: 20 3A 22 48 22 20 22 4E 24 00 33 0D 72 01 99 3A | :"H" "N$.3.r..:|
00000510: 99 22 53 41 56 45 20 54 4F 20 44 49 53 4B 3F 22 |."SAVE TO DISK?"|
00000520: 3A 8D 20 35 33 30 3A 8B 20 58 24 B2 22 4E 22 20 |:. 530:. X$."N" |
00000530: A7 20 80 00 5B 0D 7C 01 99 3A 99 22 57 49 54 48 |. ..[.|..:."WITH|
00000540: 20 4F 52 49 47 49 4E 41 4C 20 41 44 44 52 45 53 | ORIGINAL ADDRES|
00000550: 53 45 53 3F 22 3A 8D 20 35 33 30 00 80 0D 86 01 |SES?":. 530.....|
00000560: 4C 31 B2 53 31 3A 8B 20 58 24 B2 22 4E 22 20 A7 |L1.S1:. X$."N" .|
00000570: 20 4C 31 B2 53 31 AA 31 32 38 3A 89 20 34 33 30 | L1.S1.128:. 430|
00000580: 00 B6 0D 90 01 99 3A 99 22 44 4F 20 59 4F 55 20 |......:."DO YOU |
00000590: 57 41 4E 54 20 54 48 45 20 41 55 54 4F 52 55 4E |WANT THE AUTORUN|
000005A0: 20 42 59 54 45 53 20 52 45 4D 4F 56 45 44 3F 22 | BYTES REMOVED?"|
000005B0: 3A 8D 20 35 33 30 00 C9 0D 9A 01 8B 20 58 24 B2 |:. 530...... X$.|
000005C0: 22 4E 22 20 A7 20 34 33 30 00 EC 0D A4 01 81 20 |"N" . 430...... |
000005D0: 54 B2 37 36 38 20 A4 20 38 31 35 3A 97 20 33 32 |T.768 . 815:. 32|
000005E0: 37 36 38 AA 54 2C C2 28 54 29 3A 82 00 03 0E AE |768.T,.(T):.....|
000005F0: 01 99 3A 85 20 22 46 49 4C 45 4E 41 4D 45 3F 22 |..:. "FILENAME?"|
00000600: 3B 46 24 00 1F 0E B8 01 9F 20 35 2C 38 2C 35 2C |;F$...... 5,8,5,|
00000610: 22 40 30 3A 22 AA 46 24 AA 22 2C 50 2C 57 22 00 |"@0:".F$.",P,W".|
00000620: 33 0E C2 01 98 35 2C C7 28 53 32 29 3B C7 28 4C |3....5,.(S2);.(L|
00000630: 31 29 3B 00 5D 0E CC 01 81 20 54 B2 28 53 31 AA |1);.].... T.(S1.|
00000640: 31 32 38 29 AC 32 35 36 AA 53 32 20 A4 20 28 45 |128).256.S2 . (E|
00000650: 31 AA 31 32 38 29 AC 32 35 36 AA 45 32 00 73 0E |1.128).256.E2.s.|
00000660: D6 01 98 35 2C C7 28 C2 28 54 29 29 3B 3A 82 3A |...5,.(.(T));:.:|
00000670: A0 20 35 00 A0 0E E0 01 99 20 22 53 41 56 45 20 |. 5...... "SAVE |
00000680: 24 33 33 35 2D 24 33 46 46 3F 22 3A 8D 20 35 33 |$335-$3FF?":. 53|
00000690: 30 3A 8B 20 58 24 B2 22 4E 22 20 A7 20 35 32 30 |0:. X$."N" . 520|
000006A0: 00 BF 0E EA 01 9F 20 35 2C 38 2C 35 2C 22 40 30 |...... 5,8,5,"@0|
000006B0: 3A 24 33 33 35 2D 24 33 46 46 2C 50 2C 57 22 00 |:$335-$3FF,P,W".|
000006C0: D2 0E F4 01 98 35 2C C7 28 35 33 29 3B C7 28 33 |.....5,.(53);.(3|
000006D0: 29 3B 00 F5 0E FE 01 81 20 54 B2 38 32 31 A4 31 |);...... T.821.1|
000006E0: 30 32 33 3A 98 35 2C C7 28 C2 28 54 29 29 3B 3A |023:.5,.(.(T));:|
000006F0: 82 3A A0 20 35 00 08 0F 08 02 99 22 46 49 4E 49 |.:. 5......"FINI|
00000700: 53 48 45 44 2E 22 3A 80 00 2B 0F 12 02 A1 20 58 |SHED.":..+.... X|
00000710: 24 3A 8B 20 58 24 B3 B1 22 59 22 20 AF 20 58 24 |$:. X$.."Y" . X$|
00000720: B3 B1 22 4E 22 20 A7 20 35 33 30 00 31 0F 1C 02 |.."N" . 530.1...|
00000730: 8E 00 5E 0F 26 02 4E B2 B5 28 48 AD 32 35 36 29 |..^.&.N..(H.256)|
00000740: 3A 8D 20 35 37 30 3A 4E 24 B2 52 24 3A 4E B2 48 |:. 570:N$.R$:N.H|
00000750: AB 28 4E AC 32 35 36 29 3A 8D 20 35 37 30 00 71 |.(N.256):. 570.q|
00000760: 0F 30 02 4E 24 B2 22 24 22 AA 4E 24 AA 52 24 3A |.0.N$."$".N$.R$:|
00000770: 8E 00 AB 0F 3A 02 52 31 B2 B5 28 4E AD 31 36 29 |....:.R1..(N.16)|
00000780: 3A 52 32 B2 28 4E 20 AF 20 31 35 29 3A 52 24 B2 |:R2.(N . 15):R$.|
00000790: CA 28 48 45 24 2C 52 31 AA 31 2C 31 29 AA CA 28 |.(HE$,R1.1,1)..(|
000007A0: 48 45 24 2C 52 32 AA 31 2C 31 29 00 B1 0F 44 02 |HE$,R2.1,1)...D.|
000007B0: 8E 00 00 00 |.... |
..'.... *******************************.
M.... ** YEP! IT'S BASIC! SO WHAT? **.S.
... *******************************...(.
.53280,0:.53281,0:.774,8:.775,88...2..".
...........TAPE ANTI-RUN V1.2...<..:."TH
IS RATHER USEFUL UTILITY WILL TRANS-"...
F.."FER .ANY. TAPE TURBO LOADER THAT AUT
O-".G.P.."RUNS TO DISK FOR DISASSEMBLY W
ITH AN".I.Z.."EXPERT OR OTHER MONITOR.":
....D.."YOU HAVE THE OPTION OF SAVING IT
TO DISK";.H.N.."WITH OR WITHOUT THE BYT
ES THAT MAKE IT"...X.."AUTORUN, TO RELOA
D A\ THE ORIGINAL ADDR.";.'...."OR THE O
RIG.ADDR+$8000. (IT WON'T RUN)".V....:."
I FIND THIS ABSOLUTELY INVALUABLE FOR"..
...."HACKING LOADERS, AS THE EXPERT WON'
T DO"... .."A TAPE LOAD SO HACKING THEM
WAS A LOT".I...."MORE DIFFICULT."......"
N.B. SOME LOADERS USE THE HEADER SPACE".
"...."($335-$3FF) TO CONTAIN CODE TOO, S
O".Q.H.."YOU MAY FIND YOU NEED TO SAVE T
HAT TOO."...R.."IT IS SAVED AS SEPERATE
FILE '$335-$3FF'"......".<SPACE>."......
R$:. R$.." " . 240......".".O...HE$."01
23456789ABCDEF"...... 63276:S1.B(830):E1
.B(832):. 147,0.1.... 830,S1.128:. 832,E
1.128:. 62820:S2.B(829):E2.B(831).G.".H.
S1.256.S2:. 550.D.,.."ORIGINAL START:"H"
"N$.Z.6.H.E1.256.E2:. 550...@.."ORIGINA
L END :"H" "N$...J.H.(S1.128).256.S2:.
550.P.T.."RELOCATE START:"H" "N$...^.H.(
E1.128).256.E2:. 550...H.."RELOCATE END
:"H" "N$.3.R..:."SAVE TO DISK?":. 530:.
X$."N" . ..[.|..:."WITH ORIGINAL ADDRES
SES?":. 530.....L1.S1:. X$."N" . L1.S1.1
28:. 430......:."DO YOU WANT THE AUTORUN
BYTES REMOVED?":. 530.I.... X$."N" . 43
0...... T.768 . 815:. 32768.T,B(T):.....
..:. "FILENAME?";F$...... 5,8,5,"@0:".F$
.",P,W".3.B..5,G(S2);G(L1);.].L.. T.(S1.
128).256.S2 . (E1.128).256.E2.S.V..5,G(B
(T));:.: 5. .... "SAVE $335-$3FF?":. 53
0:. X$."N" . 520...... 5,8,5,"@0:$335-$3
FF,P,W".R....5,G(53);G(3);...... T.821.1
023:.5,G(B(T));:.: 5......"FINISHED.":.
.+.... X$:. X$.."Y" . X$.."N" . 530.1...
..^.&.N..(H.256):. 570:N$.R$:N.H.(N.256)
:. 570.Q.0.N$."$".N$.R$:....:.R1..(N.16)
:R2.(N . 15):R$.J(HE$,R1.1,1).J(HE$,R2.1
,1)...D.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL