00000000: 01 08 49 08 05 00 8F 20 43 4F 50 59 52 49 47 48 |..I.... COPYRIGH|
00000010: 54 20 31 39 38 37 20 43 4F 4D 50 55 54 45 21 20 |T 1987 COMPUTE! |
00000020: 50 55 42 4C 49 43 41 54 49 4F 4E 53 2C 20 49 4E |PUBLICATIONS, IN|
00000030: 43 2E 20 20 20 41 4C 4C 20 52 49 47 48 54 53 20 |C. ALL RIGHTS |
00000040: 52 45 53 45 52 56 45 44 2E 00 55 08 08 00 97 20 |RESERVED..U.... |
00000050: 36 34 36 2C 31 00 72 08 0A 00 99 22 93 20 20 20 |646,1.r....". |
00000060: 20 20 12 4D 4C 20 52 45 4C 4F 43 41 54 4F 52 92 | .ML RELOCATOR.|
00000070: 11 22 00 AC 08 0C 00 99 22 20 20 20 20 20 43 4F |."......" CO|
00000080: 50 59 52 49 47 48 54 20 31 39 38 37 22 3A 99 22 |PYRIGHT 1987":."|
00000090: 43 4F 4D 50 55 54 45 21 20 50 55 42 4C 49 43 41 |COMPUTE! PUBLICA|
000000A0: 54 49 4F 4E 53 2C 20 49 4E 43 2E 22 00 CB 08 0E |TIONS, INC."....|
000000B0: 00 99 22 20 20 20 41 4C 4C 20 52 49 47 48 54 53 |.." ALL RIGHTS|
000000C0: 20 52 45 53 45 52 56 45 44 2E 22 00 DE 08 10 00 | RESERVED.".....|
000000D0: 81 20 58 B2 31 20 A4 20 31 30 30 30 3A 82 00 F5 |. X.1 . 1000:...|
000000E0: 08 14 00 86 20 43 44 28 32 35 35 29 2C 54 42 28 |.... CD(255),TB(|
000000F0: 32 30 2C 31 29 00 2A 09 1E 00 99 22 11 53 45 54 |20,1).*....".SET|
00000100: 54 49 4E 47 20 55 50 2E 2E 2E 22 3B 3A 81 20 41 |TING UP...";:. A|
00000110: B2 30 20 A4 20 32 35 35 3A 87 20 43 44 28 41 29 |.0 . 255:. CD(A)|
00000120: 3A 82 3A 99 22 44 4F 4E 45 22 00 4C 09 28 00 85 |:.:."DONE".L.(..|
00000130: 22 11 53 4F 55 52 43 45 3A 20 53 54 41 52 54 2C |".SOURCE: START,|
00000140: 45 4E 44 22 3B 43 53 24 2C 43 45 24 00 62 09 29 |END";CS$,CE$.b.)|
00000150: 00 4E 24 B2 43 53 24 3A 8D 20 35 30 30 3A 43 53 |.N$.CS$:. 500:CS|
00000160: B2 4E 00 78 09 2A 00 4E 24 B2 43 45 24 3A 8D 20 |.N.x.*.N$.CE$:. |
00000170: 35 30 30 3A 43 45 B2 4E 00 95 09 32 00 85 22 54 |500:CE.N...2.."T|
00000180: 41 52 47 45 54 3A 20 20 20 20 20 53 54 41 52 54 |ARGET: START|
00000190: 22 3B 54 53 24 00 AB 09 33 00 4E 24 B2 54 53 24 |";TS$...3.N$.TS$|
000001A0: 3A 8D 20 35 30 30 3A 54 53 B2 4E 00 F0 09 3C 00 |:. 500:TS.N...<.|
000001B0: 4E 54 B2 30 3A 99 22 11 45 4E 54 45 52 20 53 45 |NT.0:.".ENTER SE|
000001C0: 43 54 49 4F 4E 53 20 4F 46 20 4D 45 4D 4F 52 59 |CTIONS OF MEMORY|
000001D0: 20 54 4F 20 53 4B 49 50 2C 20 20 20 20 20 20 20 | TO SKIP, |
000001E0: 45 4E 44 20 57 49 54 48 20 43 4F 4D 4D 41 11 22 |END WITH COMMA."|
000001F0: 00 0A 0A 46 00 99 22 54 41 42 4C 45 22 4E 54 AA |...F.."TABLE"NT.|
00000200: 31 3B 3A 85 20 41 24 2C 42 24 00 1C 0A 48 00 8B |1;:. A$,B$...H..|
00000210: 20 41 24 B2 22 22 20 A7 20 31 30 30 00 30 0A 4A | A$."" . 100.0.J|
00000220: 00 8B 20 42 24 B2 22 22 20 A7 20 42 24 B2 41 24 |.. B$."" . B$.A$|
00000230: 00 54 0A 4C 00 4E 24 B2 41 24 3A 8D 20 35 30 30 |.T.L.N$.A$:. 500|
00000240: 3A 41 B2 4E 3A 4E 24 B2 42 24 3A 8D 20 35 30 30 |:A.N:N$.B$:. 500|
00000250: 3A 42 B2 4E 00 64 0A 50 00 8B 20 42 B2 30 20 A7 |:B.N.d.P.. B.0 .|
00000260: 20 42 B2 41 00 8F 0A 55 00 8B 20 41 B3 43 53 20 | B.A...U.. A.CS |
00000270: B0 20 41 B1 43 45 20 B0 20 42 B3 43 53 20 B0 20 |. A.CE . B.CS . |
00000280: 42 B1 43 45 20 B0 20 42 B3 41 20 A7 20 37 30 00 |B.CE . B.A . 70.|
00000290: B6 0A 5A 00 4E 54 B2 4E 54 AA 31 3A 54 42 28 4E |..Z.NT.NT.1:TB(N|
000002A0: 54 2C 30 29 B2 41 3A 54 42 28 4E 54 2C 31 29 B2 |T,0).A:TB(NT,1).|
000002B0: 42 3A 89 20 37 30 00 C9 0A 64 00 99 22 11 57 4F |B:. 70...d..".WO|
000002C0: 52 4B 49 4E 47 2E 2E 2E 22 00 DA 0A 6E 00 8B 20 |RKING..."...n.. |
000002D0: 4E 54 B3 32 20 A7 20 31 32 30 00 F9 0A 70 00 81 |NT.2 . 120...p..|
000002E0: 20 41 B2 4E 54 20 A4 20 32 20 A9 AB 31 3A 81 20 | A.NT . 2 ..1:. |
000002F0: 42 B2 31 20 A4 20 41 AB 31 00 35 0B 72 00 8B 20 |B.1 . A.1.5.r.. |
00000300: 54 42 28 41 2C 30 29 B3 54 42 28 42 2C 30 29 20 |TB(A,0).TB(B,0) |
00000310: A7 20 54 B2 54 42 28 41 2C 30 29 3A 54 42 28 41 |. T.TB(A,0):TB(A|
00000320: 2C 30 29 B2 54 42 28 42 2C 30 29 3A 54 42 28 42 |,0).TB(B,0):TB(B|
00000330: 2C 30 29 B2 54 00 3F 0B 74 00 82 20 42 2C 41 00 |,0).T.?.t.. B,A.|
00000340: 57 0B 78 00 54 50 B2 30 3A 50 54 B2 43 53 3A 4F |W.x.TP.0:PT.CS:O|
00000350: 46 B2 54 53 AB 43 53 00 69 0B 82 00 8B 20 4E 54 |F.TS.CS.i.... NT|
00000360: B2 54 50 20 A7 20 31 34 30 00 AB 0B 87 00 5A 31 |.TP . 140.....Z1|
00000370: B2 54 50 AA 31 3A 8B 20 50 54 B2 B1 54 42 28 5A |.TP.1:. PT..TB(Z|
00000380: 31 2C 30 29 20 AF 20 50 54 B3 B2 54 42 28 5A 31 |1,0) . PT..TB(Z1|
00000390: 2C 31 29 20 A7 20 50 54 B2 54 42 28 5A 31 2C 31 |,1) . PT.TB(Z1,1|
000003A0: 29 AA 31 3A 54 50 B2 54 50 AA 31 00 C9 0B 8C 00 |).1:TP.TP.1.....|
000003B0: 5A 31 B2 43 44 28 C2 28 50 54 29 29 3A 8B 20 5A |Z1.CD(.(PT)):. Z|
000003C0: 31 B3 32 20 A7 20 31 36 30 00 E4 0B 96 00 5A 32 |1.2 . 160.....Z2|
000003D0: B2 C2 28 50 54 AA 31 29 AA C2 28 50 54 AA 32 29 |..(PT.1)..(PT.2)|
000003E0: AC 32 35 36 00 24 0C 9B 00 8B 5A 32 B2 B1 43 53 |.256.$....Z2..CS|
000003F0: AF 5A 32 B3 B2 43 45 A7 5A 32 B2 5A 32 AA 4F 46 |.Z2..CE.Z2.Z2.OF|
00000400: 3A 97 50 54 AA 32 2C 5A 32 AD 32 35 36 3A 97 50 |:.PT.2,Z2.256:.P|
00000410: 54 AA 31 2C 5A 32 AB B5 28 5A 32 AD 32 35 36 29 |T.1,Z2..(Z2.256)|
00000420: AC 32 35 36 00 41 0C A0 00 50 54 B2 50 54 AA 5A |.256.A...PT.PT.Z|
00000430: 31 AA 31 3A 8B 20 50 54 B3 43 45 20 A7 20 31 33 |1.1:. PT.CE . 13|
00000440: 30 00 56 0C AA 00 99 22 11 46 49 4E 49 53 48 45 |0.V....".FINISHE|
00000450: 44 2E 20 22 3B 3A 00 8A 0C B4 00 85 20 22 52 45 |D. ";:...... "RE|
00000460: 4C 4F 43 41 54 45 20 28 59 2F 4E 29 22 3B 41 24 |LOCATE (Y/N)";A$|
00000470: 3A 8B 20 41 24 B3 B1 22 59 22 20 AF 20 41 24 B3 |:. A$.."Y" . A$.|
00000480: B1 22 4E 22 20 A7 20 31 38 30 00 9B 0C BE 00 8B |."N" . 180......|
00000490: 20 41 24 B2 22 4E 22 20 A7 20 80 00 AF 0C C8 00 | A$."N" . ......|
000004A0: 99 22 11 57 4F 52 4B 49 4E 47 2E 2E 2E 22 3B 00 |.".WORKING...";.|
000004B0: DC 0C D2 00 8B 20 54 53 B1 43 53 20 A7 20 81 20 |..... TS.CS . . |
000004C0: 41 B2 43 45 20 A4 20 43 53 20 A9 20 AB 31 3A 97 |A.CE . CS . .1:.|
000004D0: 20 41 AA 4F 46 2C C2 28 41 29 3A 82 00 04 0D DC | A.OF,.(A):.....|
000004E0: 00 8B 20 54 53 B3 43 53 20 A7 20 81 20 41 B2 43 |.. TS.CS . . A.C|
000004F0: 53 20 A4 20 43 45 3A 97 20 41 AA 4F 46 2C C2 28 |S . CE:. A.OF,.(|
00000500: 41 29 3A 82 00 12 0D E6 00 99 22 44 4F 4E 45 22 |A):......."DONE"|
00000510: 3A 80 00 2D 0D F4 01 4E 31 24 B2 C8 28 4E 24 2C |:..-...N1$..(N$,|
00000520: 31 29 3A 4E 24 B2 CA 28 4E 24 2C 32 29 00 4C 0D |1):N$..(N$,2).L.|
00000530: FE 01 8B 20 4E 31 24 B3 B1 22 24 22 20 A7 20 4E |... N1$.."$" . N|
00000540: B2 C5 28 4E 31 24 AA 4E 24 29 3A 8E 00 83 0D 08 |..(N1$.N$):.....|
00000550: 02 4E B2 30 3A 81 20 4E 31 B2 31 20 A4 20 34 3A |.N.0:. N1.1 . 4:|
00000560: 4E 32 B2 C6 28 CA 28 4E 24 2C 4E 31 2C 31 29 29 |N2..(.(N$,N1,1))|
00000570: AB 35 35 3A 4E 32 B2 4E 32 AB 37 AC 28 4E 32 B3 |.55:N2.N2.7.(N2.|
00000580: 31 30 29 00 9C 0D 12 02 4E B2 4E AA 4E 32 AC 31 |10).....N.N.N2.1|
00000590: 36 AE 28 34 AB 4E 31 29 3A 82 3A 8E 00 E2 0D E8 |6.(4.N1):.:.....|
000005A0: 03 83 20 30 2C 31 2C 30 2C 30 2C 30 2C 31 2C 31 |.. 0,1,0,0,0,1,1|
000005B0: 2C 30 2C 30 2C 31 2C 30 2C 30 2C 30 2C 32 2C 32 |,0,0,1,0,0,0,2,2|
000005C0: 2C 30 2C 31 2C 31 2C 30 2C 30 2C 30 2C 31 2C 31 |,0,1,1,0,0,0,1,1|
000005D0: 2C 30 2C 30 2C 32 2C 30 2C 30 2C 30 2C 32 2C 32 |,0,0,2,0,0,0,2,2|
000005E0: 2C 30 00 28 0E F2 03 83 20 32 2C 31 2C 30 2C 30 |,0.(.... 2,1,0,0|
000005F0: 2C 31 2C 31 2C 31 2C 30 2C 30 2C 31 2C 30 2C 30 |,1,1,1,0,0,1,0,0|
00000600: 2C 32 2C 32 2C 32 2C 30 2C 31 2C 31 2C 30 2C 30 |,2,2,2,0,1,1,0,0|
00000610: 2C 30 2C 31 2C 31 2C 30 2C 30 2C 32 2C 30 2C 30 |,0,1,1,0,0,2,0,0|
00000620: 2C 30 2C 32 2C 32 2C 30 00 6E 0E FC 03 83 20 30 |,0,2,2,0.n.... 0|
00000630: 2C 31 2C 30 2C 30 2C 30 2C 31 2C 31 2C 30 2C 30 |,1,0,0,0,1,1,0,0|
00000640: 2C 31 2C 30 2C 30 2C 32 2C 32 2C 32 2C 30 2C 31 |,1,0,0,2,2,2,0,1|
00000650: 2C 31 2C 30 2C 30 2C 30 2C 31 2C 31 2C 30 2C 30 |,1,0,0,0,1,1,0,0|
00000660: 2C 32 2C 30 2C 30 2C 30 2C 32 2C 32 2C 30 00 B4 |,2,0,0,0,2,2,0..|
00000670: 0E 06 04 83 20 30 2C 31 2C 30 2C 30 2C 30 2C 31 |.... 0,1,0,0,0,1|
00000680: 2C 31 2C 30 2C 30 2C 31 2C 30 2C 30 2C 32 2C 32 |,1,0,0,1,0,0,2,2|
00000690: 2C 32 2C 30 2C 31 2C 31 2C 30 2C 30 2C 30 2C 31 |,2,0,1,1,0,0,0,1|
000006A0: 2C 31 2C 30 2C 30 2C 32 2C 30 2C 30 2C 30 2C 32 |,1,0,0,2,0,0,0,2|
000006B0: 2C 32 2C 30 00 FA 0E 10 04 83 20 30 2C 31 2C 30 |,2,0...... 0,1,0|
000006C0: 2C 30 2C 31 2C 31 2C 31 2C 30 2C 30 2C 30 2C 30 |,0,1,1,1,0,0,0,0|
000006D0: 2C 30 2C 32 2C 32 2C 32 2C 30 2C 31 2C 31 2C 30 |,0,2,2,2,0,1,1,0|
000006E0: 2C 30 2C 31 2C 31 2C 31 2C 30 2C 30 2C 32 2C 30 |,0,1,1,1,0,0,2,0|
000006F0: 2C 30 2C 30 2C 32 2C 30 2C 30 00 40 0F 1A 04 83 |,0,0,2,0,0.@....|
00000700: 20 31 2C 31 2C 31 2C 30 2C 31 2C 31 2C 31 2C 30 | 1,1,1,0,1,1,1,0|
00000710: 2C 30 2C 31 2C 30 2C 30 2C 32 2C 32 2C 32 2C 30 |,0,1,0,0,2,2,2,0|
00000720: 2C 31 2C 31 2C 30 2C 30 2C 31 2C 31 2C 31 2C 30 |,1,1,0,0,1,1,1,0|
00000730: 2C 30 2C 32 2C 30 2C 30 2C 32 2C 32 2C 32 2C 30 |,0,2,0,0,2,2,2,0|
00000740: 00 86 0F 24 04 83 20 31 2C 31 2C 30 2C 30 2C 31 |...$.. 1,1,0,0,1|
00000750: 2C 31 2C 31 2C 30 2C 30 2C 31 2C 30 2C 30 2C 32 |,1,1,0,0,1,0,0,2|
00000760: 2C 32 2C 32 2C 30 2C 31 2C 31 2C 30 2C 30 2C 30 |,2,2,0,1,1,0,0,0|
00000770: 2C 31 2C 31 2C 30 2C 30 2C 32 2C 30 2C 30 2C 30 |,1,1,0,0,2,0,0,0|
00000780: 2C 32 2C 32 2C 30 00 CC 0F 2E 04 83 20 31 2C 31 |,2,2,0...... 1,1|
00000790: 2C 30 2C 30 2C 31 2C 31 2C 31 2C 30 2C 30 2C 31 |,0,0,1,1,1,0,0,1|
000007A0: 2C 30 2C 30 2C 32 2C 32 2C 32 2C 30 2C 31 2C 31 |,0,0,2,2,2,0,1,1|
000007B0: 2C 30 2C 30 2C 30 2C 31 2C 31 2C 30 2C 31 2C 32 |,0,0,0,1,1,0,1,2|
000007C0: 2C 30 2C 30 2C 30 2C 32 2C 32 2C 30 00 00 00 |,0,0,0,2,2,0... |
..I.... COPYRIGHT 1987 COMPUTE! PUBLICAT
IONS, INC. ALL RIGHTS RESERVED..U....
646,1.R....". .ML RELOCATOR.."......
" COPYRIGHT 1987":."COMPUTE! PUBLICA
TIONS, INC.".K...." ALL RIGHTS RESERVE
D."...... X.1 . 1000:....... CD(255),TB(
20,1).*....".SETTING UP...";:. A.0 . 255
:. CD(A):.:."DONE".L.(..".SOURCE: START,
END";CS$,CE$.B.).N$.CS$:. 500:CS.N.X.*.N
$.CE$:. 500:CE.N...2.."TARGET: START
";TS$...3.N$.TS$:. 500:TS.N...<.NT.0:.".
ENTER SECTIONS OF MEMORY TO SKIP,
END WITH COMMA."...F.."TABLE"NT.1;:. A$,
B$...H.. A$."" . 100.0.J.. B$."" . B$.A$
.T.L.N$.A$:. 500:A.N:N$.B$:. 500:B.N.D.P
.. B.0 . B.A...U.. A.CS . A.CE . B.CS .
B.CE . B.A . 70...Z.NT.NT.1:TB(NT,0).A:T
B(NT,1).B:. 70.I.D..".WORKING...".Z.N..
NT.2 . 120...P.. A.NT . 2 ..1:. B.1 . A.
1.5.R.. TB(A,0).TB(B,0) . T.TB(A,0):TB(A
,0).TB(B,0):TB(B,0).T.?.T.. B,A.W.X.TP.0
:PT.CS:OF.TS.CS.I.... NT.TP . 140.....Z1
.TP.1:. PT..TB(Z1,0) . PT..TB(Z1,1) . PT
.TB(Z1,1).1:TP.TP.1.I...Z1.CD(B(PT)):. Z
1.2 . 160.....Z2.B(PT.1).B(PT.2).256.$..
..Z2..CS.Z2..CE.Z2.Z2.OF:.PT.2,Z2.256:.P
T.1,Z2..(Z2.256).256.A. .PT.PT.Z1.1:. PT
.CE . 130.V....".FINISHED. ";:...... "RE
LOCATE (Y/N)";A$:. A$.."Y" . A$.."N" . 1
80...... A$."N" . ....H..".WORKING...";.
..R.. TS.CS . . A.CE . CS . .1:. A.OF,B(
A):....... TS.CS . . A.CS . CE:. A.OF,B(
A):......."DONE":..-...N1$.H(N$,1):N$.J(
N$,2).L.... N1$.."$" . N.E(N1$.N$):.....
.N.0:. N1.1 . 4:N2.F(J(N$,N1,1)).55:N2.N
2.7.(N2.10).....N.N.N2.16.(4.N1):.:.....
.. 0,1,0,0,0,1,1,0,0,1,0,0,0,2,2,0,1,1,0
,0,0,1,1,0,0,2,0,0,0,2,2,0.(.... 2,1,0,0
,1,1,1,0,0,1,0,0,2,2,2,0,1,1,0,0,0,1,1,0
,0,2,0,0,0,2,2,0.N.... 0,1,0,0,0,1,1,0,0
,1,0,0,2,2,2,0,1,1,0,0,0,1,1,0,0,2,0,0,0
,2,2,0...... 0,1,0,0,0,1,1,0,0,1,0,0,2,2
,2,0,1,1,0,0,0,1,1,0,0,2,0,0,0,2,2,0....
.. 0,1,0,0,1,1,1,0,0,0,0,0,2,2,2,0,1,1,0
,0,1,1,1,0,0,2,0,0,0,2,0,0.@.... 1,1,1,0
,1,1,1,0,0,1,0,0,2,2,2,0,1,1,0,0,1,1,1,0
,0,2,0,0,2,2,2,0...$.. 1,1,0,0,1,1,1,0,0
,1,0,0,2,2,2,0,1,1,0,0,0,1,1,0,0,2,0,0,0
,2,2,0.L.... 1,1,0,0,1,1,1,0,0,1,0,0,2,2
,2,0,1,1,0,0,0,1,1,0,1,2,0,0,0,2,2,0...