//NNNNNNNNNN1N1N1N1N1N1N1N2N2N2N2N2N3N3N4N8N11N12N12N14N15N17N20N24N25N25N25N70N75N75N76N76MMM1SSEGESEGPSPEPIPRF1F2SDNSEGABUFBBUFOFFHDHMN1MN2CIOMAXIOLRODRSEPRELTPPNNPONSOPHFLAV  !"#$%&'()*@+@,@-@.@/@0@1234@5@6@7@8@9:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXd*****************n* *x* RELOCATE+ ** ******************>I:, B;(}SORRY... 48K MINIMUM REQUIRED>o6-6-@'6-@36-@?6-@K6-@W6-@c6-@o6-@6-@6-@'6-@36-@?6-@K6-@W6-@c6-@ o6-@${6-@%6-@&6-@(6-@16-@6u6-@H6-@'6-A36-A'?6-A(K6-ADW6-AQc6-Avi6-u6-A@c6-AT6-AU'6-AV36-A?6-ARK6-ASW6-Adc6-Af6-@@. (} ((%( ҠԠ((+(.(``(X What is the estimated MAXIMUM number ofphases found in the program(s) to be re-located?W(W(L -Disk access speed decreases as the number of phases reserved increases-E(9(. The program must be rerun to reset thisvalue!<(?(B(E(&[ AP6(# Enter number of phases (1-70):=[ @)!@pAP:AA9,9<,9<,9,9,9,9,;,;,;@@,D<<9,9,9,9,9,;,;$,;$,;@,N!6-I:,&A!;,X@b# 6.67@@,.#67,.l 6. 67$,.67,.v 6. 67$,.67,.2 (}-2(ɠΠɠԠɠ̠ɠڠɠΠ 6-6--Ae@:"68'@,-")67<%,.-":67<%,.! 6-%6-% A! --@@")67<,.>:,-  6-F -68,-68,-&68,-/68,-868,-B AF = -68,-68,-&68,-/68,-9 A= ; --68<,-)68<,-- 7 A; - 6-0#AU@- A  < 0 F:AU,"@2AU@< AAU@ $4 A0> A@H A`\ fAdp71()}ū 4(7(z A$`E((Do you need a directory? (Y/N):/E0Y*0NAp4NA `-(&(Enter directory file spec.:-'@$ A P'( ( A @ A$`@(( Ap)("(Enter input file spec.:)K7@<@,0D(>(MUST be a DISK file...REDOA(K A p&7<,4:6-@& A 6-A:7<,, A$`.(.(#Ready to perform load file check...'('(-Use '[CONTROL]-1' to pause-$,(%((Press [RETURN] to begin),. A`8G )))=(Not a DOS 2.0 compatible fileG A$`B 6-L AV# ))#)A0`L(/($Secondary header ID found...new file>68,-@E)L)j$ 6-%$($( Start Addr.= t A`~P ))6-%$/( End Addr. = B( Code Length= L6-&%P(%%A6)A7)"AO ))68,-%$E((Phase  Run Addr. - 8,)O A%%A8*A9)"AQ ))68,-%$G((Phase  Init. Addr. - 8,)Q A 6-%68,-68,-( (Phase # ) Ap 6-6-/ 6-6- A1%6-/ A A16-& A@^(-("Bad phase start/end address header5(ORT(Not enough phases reserved^ A$`9(/($Phase length <> header specification9 A$`6-  A$`.( ( (.(Ready to begin relocation...(*(#(Enter output file spec.:*2? 4 (5($Output file same as input file- REDO? A <FPS:Z ))d -n! (}6-!Adx ) ) @A068&@,((File header found/)6) 6-%$ ) ) 6-%$ 6-&% 6-6-/ 6-6- A1%6-/ A A16-& A((Program Phase # ((Start Addr. = (End Addr. = (Phase Length= 8(Run Addr. =  8,".( Not found8 Ap (8,"8(Init. Addr. =  8,".( Not found8 A, (8,6 A@/( (((Enter new start address: /J A$`TK )!BU5)%!BU5"(A(Address out of range- REDOK A^68,-&h 6-%&r((New Start Addr.= |(New End Addr. = --(Moving a distance of 8, byte(s) Ac(S(GEnter len. of adjacent buffer area program start addr.: Zc68,-a(Q(EEnter len. of adjacent buffer area program end addr.: Xa68,-O&8, )%8,!BU5 (E( Buffer length out of range- REDOO AO&8, )%8,!BU5 (E( Buffer length out of range- REDOO A APF(-(!Enter # of data segments (0-10): 4F )!A` 68,-8,"A@-8, AE(%(Enter start,end for<( Segment # : E68<,-68<,-& 8,"AP0 -8,%68<,-6 : A$`?6 8,))!)()/)6)D6 8,))!)()/)6)N X  lv )) ** -A 6-8,6-8,#6-8,%8,16-8,%8,A6-8,&8,% ))))+6-&P:',$6-P:',$*+*+6-&P:',$6-P:',$*+* 6- (}6-( ( (( )6-8,"A -8, $8<,*8<,'$ A   A  ; *6-6-6+(Data byte moved16-; A!*8,"6@A!4 6-8,6- A!0>Z6-6@'(Incoherent code...C(Accept as data? (Y/N):JZ4NA$pH4 *6-$(Data byte moved*6-4 A!R *\+ "!(1 byte instr. moved+ A!f )p= " A&P*3(2 byte instr. moved = A!z(3 byte instr. " ) A%P*"* A( F:,"A$p F:," A10 6-% A 08,"*8,"A$(Press [RETURN]6- 8,6-%@ 8,6-%@ (} A$  ))6-&@ "A$ ( Run Addr.=  ""A&"( Init. Addr.= $  **.  ))**8  ))6-%$(B = A' "3(-Adjusted /Inter-phase - = A$L 4 *6-%8,*( -Adjusted- 4 A$V (-Moved` C6-&+P:',$,6-P:',&*-*9!C A#j 8,@A$@t  ))**~ F(File header ID writtenF(#-Next phase starts an appended file 0)( Phase relocated...Press [RETURN]0   A$` A$p B(B( # F:A, at line F:A,%F:A,$  A$  A$ (- END OF RUN - (Restart? (Y/N):  A%0 , 0N+"(, A0 ;@!@@9'++5 B8;  6-%$6- / *6-%8,%(adjusted/ A& ? *6-%8,5(adjusted /assumed buffer? A& F&8,*%8,"6-%8,<(adjusted /buffer areaF A& 7 A' "-(adjusted /inter-phase7 A&( (moved2 6-&+P:',$,6-P:',< 6-F $Z  6-6-d --")")")")")")")"A&n  6-6- A'x + 6-%%%!6-%%%+ A'  6-&6-%&6-%& $  6-6- - "A'p  8,)!8,A'p 6-%8,' A'   A' 6- 6- $   A(` E --A(' | E " 6-, A) 6 - ( 7<@9,@ - ( 7<@9,J  -(PHASE: T  -(BYTE:^ 7 -7(% Press [ESC] to abort, [P] to pauseh  -(%r  -(%| 6-++,$,%6-++,$,% 6A0    6.>:,"A%6.  -(   -(  -(  ! -(! A0p  -(7<%,  -(7<%, "A0  -(7<%,  -(7<%,  -(  -(  -(%&   6-%& $: = -=(% Press any key D N F:,"A1PX 7 -7(% Press [ESC] to abort, [P] to pauseb  $v JAIAP/ASP:C:,',JARC:,&P:C:,',$ 5AWP:',)AV&P:',$5AX 6-?:C:,,$ 001,BRK,,2,ORA (,.X),-1,,,-1,,,-1,,,2,ORA,,2 //ASL,,-1,,,1,PHP,,2,ORA #,,1,ASL,,-1,,,-1, 00,3,ORA,,3,ASL,,-1,,,2,BPL,,2,ORA (,).Y,-1, --,-1,,,-1,,,2,ORA,.X,2,ASL,.X,-1,,,1,CLC --,3,ORA,.Y,-1,,,-1,,,-1,,,3,ORA,.X,3,ASL 00.X,-1,,,3,JSR,,2,AND (,.X),-1,,,-1,,,2,BIT //,2,AND,,2,ROL,,-1,,,1,PLP,,2,AND #,,1,ROL ++,-1,,,3,BIT,,3,AND,,3,ROL,,-1,,,2,BMI 00,2,AND (,).Y,-1,,,-1,,,-1,,,2,AND,.X,2,ROL ++.X,-1,,,1,SEC,,3,AND,.Y,-1,,,-1,,,-1, 44,3,AND,.X,3,ROL,.X,-1,,,1,RTI,,2,EOR (,.X),-1, )),-1,,,-1,,,2,EOR,,2,LSR,,-1,,,1,PHA //,2,EOR #,,1,LSR,,-1,,,3,JMP,,3,EOR,,3,LSR ,,,-1,,,2,BVC,,2,EOR (,).Y,-1,,,-1,,,-1,* 11,2,EOR,.X,2,LSR,.X,-1,,,1,CLI,,3,EOR,.Y,-1,4 --,-1,,,-1,,,3,EOR,.X,3,LSR,.X,-1,,,1,RTS> ..,2,ADC (,.X),-1,,,-1,,,-1,,,2,ADC,,2,RORH )),-1,,,1,PLA,,2,ADC #,,1,ROR,,-1,,,3R 33JMP (,),3,ADC,,3,ROR,,-1,,,2,BVS,,2,ADC (,).Y\ **-1,,,-1,,,-1,,,2,ADC,.X,2,ROR,.X,-1,f %%,1,SEI,,3,ADC,.Y,-1,,,-1,,,-1,,p 113,ADC,.X,3,ROR,.X,-1,,,-1,,,2,STA (,.X),-1,z '',-1,,,2,STY,,2,STA,,2,STX,,-1,,,1 ))DEY,,-1,,,1,TXA,,-1,,,3,STY,,3,STA, --3,STX,,-1,,,2,BCC,,2,STA (,).Y,-1,,,-1, //,2,STY,.X,2,STA,.X,2,STX,.Y,-1,,,1,TYA,,3 ++STA,.Y,1,TXS,,-1,,,-1,,,3,STA,.X,-1,, 33-1,,,2,LDY #,,2,LDA (,.X),2,LDX #,,-1,,,2,LDY ++,2,LDA,,2,LDX,,-1,,,1,TAY,,2,LDA #,,1 ))TAX,,-1,,,3,LDY,,3,LDA,,3,LDX,,-1,, 112,BCS,,2,LDA (,).Y,-1,,,-1,,,2,LDY,.X,2,LDA 00.X,2,LDX,.Y,-1,,,1,CLV,,3,LDA,.Y,1,TSX,,-1 00,,3,LDY,.X,3,LDA,.X,3,LDX,.Y,-1,,,2,CPY #, //2,CMP (,.X),-1,,,-1,,,2,CPY,,2,CMP,,2,DEC )),-1,,,1,INY,,2,CMP #,,1,DEX,,-1,,,3 00CPY,,3,CMP,,3,DEC,,-1,,,2,BNE,,2,CMP (,).Y**-1,,,-1,,,-1,,,2,CMP,.X,2,DEC,.X,-1,%%,1,CLD,,3,CMP,.Y,-1,,,-1,,,-1,,663,CMP,.X,3,DEC,.X,-1,,,2,CPX #,,2,SBC (,.X),-1,,$**-1,,,2,CPX,,2,SBC,,2,INC,,-1,,,1,INX.++,2,SBC #,,1,NOP,,-1,,,3,CPX,,3,SBC,,38,,INC,,-1,,,2,BEQ,,2,SBC (,).Y,-1,,,-1,,B..-1,,,2,SBC,.X,2,INC,.X,-1,,,1,SED,,3,SBCL...Y,-1,,,-1,,,-1,,,3,SBC,.X,3,INC,.X,-1,,`104,162,16,76,86,228 D8:T