Google
 

Trailing-Edge - PDP-10 Archives - BB-BL69D-SB_1986 - c.unv
There are 18 other files named c.unv in the archive. Click here to see a list.
x
,55@P C
t+<Q  C
tHyQ C
uX<Q @CIg 	`BCC@ 	`;Cd+"P CdHbP CeP Ce+P Ce^P C$bP C%P C%P 	`C%jBP C&
bP C&KP C' w0;OP%%IA	(A,B,ADD,SUB)(AC2L{G T(&<^D35-<^L<THRGHBT.(A)>>+<^D3Th7*<<^L<RGHBT.(A)>>/^D36>>>.(A)C2e"P C2eP C2eBP C2eBP C2ebP C2exg 	`8C:' AH
TXZ	A,-1-<B>TXZ	A,-1-C<uh6P'C<vN8Q xC<wQ |C@tUP @C@t{P C@t;P C@tk{P  C@uP  C@unP C@v9P C@v{P"C@v)7P$CC[Q 	`CPv[6Q @CPv]6Q  CS$t 	`"EuQQ  EuzQ @EuhPP'Ev:=Q ?xEv=P'EvhYQ @EJMj' hpO4X
W0.==A
W1.==B				;INITiXIALIZE BREAK MASKix
W2.==C
W3.==D
==C
W3.==+'=00,<
DEF0	(AC,FL}0CREF
IEJZ cP1	..V22==acp
	..V1==a
	IFNdB <B>,<..V22==Bd0>
REPEAT ..V22-<dPa>+1,<	
	%%W==.dp.V1/^D32	
	%%X==e..V1-%%W*^D32	
	e0IFE C,BRKC1 \"<%eP%W+"0">	
	IFN Cep,BRKC2 \"<%%W+"0"f>
	..V1==..V1+1
		   >
.V1+1 fP5	WA.==WA.!<1B<%%X>>
AEJ\4@ g;	WA.==WAg0.&<-1-1B<%%X>>
&<-1-1B<%%X>>
EJ\: b
%%FOO==b0a
	BRK0 (%%FOO,B,0)
 (%%FOO,EJn:g j8]
	BRINI. AjX,B,C,D	
	IRPCjx E,<	UNBRK. "E"k>	
	IRPC F,<	BRk8KCH. "F">	
	EXPkX W0.,W1.,W2.,W3.		
W1.,W2.,W3.	ES| U(,
	REPEAT	UH3,<
	TXCE	A,1B<B>!1B<C>
>B<EVMI 
l==-1
0IRP E,<l==l+1
IFE D-l, <l==p-1
IRP G,<l==l+1
IFE F-l, <0

;+.PARA -8
;PXXXTTL	MACRO TO GpENERATE A TITLE STATEMENT OF THE F0ORM:
;.BREAK
;-PTITLE A COMMENT pVERSION
	DEFINE KTTL,<IFG I,<
0	TITLE	A - J  %PBEG(H)-I
>IpFE I,<
	TITLE	A - J  %BEG(0H)
>>

;+.PARAP -8
;XXX137	MACRpO TO SETUP LOCATION 137 WITH THE S0PECIFIED
;-VERSIPON NUMBER. NOTE: pTHE MACRO DOES ITS OWN "LOC" AND "0RELOC".
	DEFINE PK137,<IFG I,<
p	IF2,<LALL>
	LOC	137
	BYTE (3)K0WHO(9)KVER(6)KMPIN(18)KEDT	; A p%BEG(H)-I
	RELOC
	SALL
>	I0FE I,<
	IF2,<LAPLL>
	LOC	137
	BpYTE (3)KWHO(9)KVER(6)KMIN(18)K0EDT	; A %BEG(PH)
	RELOC
	SALpL
>>

; MACRO  TO DEFINE VERSION 0 # AT CURRENT LOC PATION
;+.PARA -8 p
;XXXVRS	MACRO T!O DEFINE THE VERS!0ION NUMBER AT AN
;-ARBITRARY USER!p LOCATION.
	DEFI"NE KVRS,<IFG I,"0<
	IF2,<LALL>
	"PBYTE (3)KWHO(9)"pKVER(6)KMIN(18)#KEDT	; A %BEG#0(H)-I
	SALL
>#P	IFE I,<
	IF2,<#pLALL>
	BYTE (3)$KWHO(9)KVER(6)K$0MIN(18)KEDT	; A$P %BEG(H)
	SA$pLL
>>
; GENERA%TE A PASS2 PRINTX%0 STATEMENT
;+.PA%PRA -8
;-XXXPTX	G%pENERATES A PASS2 &PRINTX STATEMENT.&0
	DEFINE KPTX,<&P
	IF2,<
	IFG I&p,<PRINTX A %BE'G(H)-I	J
>	I'0FE I,<PRINTX A 'P%BEG(H)	J
>'p>>

;+.PARA -8
;XXXSTL	THE XXXS(0TL MACRO GENERATE(PS A NEW PAGE
;VI(pA THE MACRO PAGE )PSEUDO-OP AND OPT)0IONALLY
;DEFINES)P A NEW SUBTTL COM)pMAND. THE CALL IS* "XXXSTL (COMMENT*0)".
;IF THE XXXS*PTL MACRO IS CALLE*pD WITH A NULL ARG+UMENT A COMMENT
+0; LINE IS GENERAT+PED AT THE BOTTOM +pOF THE CURRENT PA,GE
; AND AT THE ,0TOP OF THE NEXT P,PAGE INDICATING TH,pAT THE PAGE
;-HA-S BEEN CONTINUED.-0
	DEFINE KSTL (-PTEXT),<IFNB <TEXT-p>,<
	SUBTTL	TEXT.
	PAGE
>	IFB <T.0EXT>,<
	LALL
	P.PAGE		; CONTINUED .pTO NEXT PAGE
	SA/LL		; CONTINUED F/0ROM PREVIOUS PAGE/P
>>
;+.PARA -8
;XXXUNV	MACRO TO0 GENERATE A UNIVE00RSAL STATEMENT. T0PHE MACRO IN
;EFF0pECT IS AN EXACT C1OPY OF THE XXXTTL10 MACRO EXCEPT THA1PT THE
;-WORD "UN1pIVERSAL" REPLACES2 THE WORD "TITLE"20.
	DEFINE KUNV,2P<IFG I,<
	LALL
	UNIVERSAL A - 3J  %BEG(H)-30I
	SALL
>IFE I3P,<
	LALL
	UNIVE3pRSAL A - J  %B4EG(H)
	SALL
40>>
;+.PARA -8
4P;XXXERR	MACRO TO 4pTYPE A FATAL ERRO5R MESSAGE ON THE
;USER'S TERMINAL5P. THE CALL IS OF 5pTHE FORM:
;.BREA6K
;XXXERR (ZZZ,E60RROR MESSAGE,<PDP6P-10 INSTRUCTION>)6p
;.BREAK
;ZZZ I7S THE 3-CHARACTER70 ERROR CODE, ERRO7PR MESSAGE IS THE 7pASCIZ
;STRING TO8 BE TYPED ON THE 80TERMINAL AND PDP-8P10 INSTRUCTION IS8p
;AN OPTIONAL AR9GUMENT INDICATING90 WHAT THE USER WA9PNTS TO DO
;ABOUT9p THE ERROR JUST T:YPED. IF THE ARGU:0MENT IS NULL AN
:P;-EXIT IS EXECUTE:pD.
	DEFINE KERR; (COD,MSG,INSTR),;0<
...'COD:	JRST	;P[
	OUTSTR	[ASCIZ;p \
? K'COD MSG\<]
	IFNB <INSTR>,<0<INSTR>
	IFB <IN<PSTR>,<EXIT>
]>
<p
;+.PARA -8
;XX=XWRN	MACRO SIMILA=0R TO THE XXXERR M=PACRO EXCEPT THAT =pA
;WARNING MESSA>GE IS ISSUED RATH>0ER THAN A FATAL A>PND
;-THE DEFAULT>p PDP-10 INSTRUCTI?ON TO BE EXECUTED?0 IS "JRST .+1".
?P	DEFINE KWRN (CO?pD,MSG,INSTR),<
.@..'COD:	JRST	[
	@0OUTSTR	[ASCIZ \
@P% K'COD MSG\]
	@pIFNB <INSTR>,<INSATR>
	IFB <INSTR>A0,<JRST .+1>
]>
AP

STOPI>>STOPI>Ap>
	PURGE l,m,n
URGE l,m,FDrwQ @FDrQP'FDrSQ @FDrWQ 8FDrWQ xFDrZQ @FDrQ 8FDrQ FDrQ ?`FE
KP FE
K"P 
FE
MP 	FE,P FELbP FEYBP Gb' 	`*Gbv 	`7G@ qOP%%CA (A,B,)OP%%CA (AGD tH$OP%%CA (A,B,A)P%%CA (AGDP rHOP%%CA (A,B,E)P%%CA (AGDp sOP%%CA (A,B,G)P%%CA (AGDy  sHOP%%CA (A,B,GE)%%CA (AGE@ qH
OP%%CA (A,B,L)P%%CA (AGEI  rOP%%CA (A,B,LE)%%CA (AGE` t OP%%CA (A,B,N)P%%CA (AG
,+Q `G
,,PP'G
,;Q `G
,<PP'G
,KQ `G
,LPP'G
-kQ `G
-lPP'G
.Q `G
.
PP'G
.+Q `G
.,PP'G
.;Q `G
.<PP'G">
 	`G"\q 	` G&tkg VH8
	DEFINE	VhINFO.(OPCODE,NEWAWRG)<
	OPCODE	NEWARG>	OPCODE	NEWG0tyP G0tH:P  G0tKP G0u@P G0uk1P G0u}:P G0v,zP G2~9  G3)T 
2G3)W 
4G3P G3kbP G3= 	`.G4t;ZP'G4v[HQ @G4v[IQ  G4v[IQ G4v[JQ G4v[XQ xG6
HbPG6DG6%iBPG6LPG6t\BP G6v;BP G8-[QP G8-[YP `G8-[ZP'pG8-[\Q @G:;"P G:M"P G:"P G:hbP G:iBP G:k"P G:kbP G:9P G:YP G:YBP G:,= 	`,G>n

		L	   PAGE	;(CONTINL(UED ON NEXT PAGE)LH
			   SALL	;(COLhNTINUED FROM PREVIOUS PAGE)
REVG?T P=ASCIZ .COPYRIGHT CIZ .COPG?P 	`GHv88P GHv<Q GHv<{Q GRe+q 	`GX.-7Q @I,j7 	`"I-[w 	`!I$P 	`I
tQ @I
tvQ I
t;WP `I
t;ZP ~I
t<Q I
tHwP'I
uQ I
u\qQ I
ukPQ I
ulQ @I
uyVQ  I
v
[Q I
v*Q @I
v83Q I
v=Q `I
v=xQ I
vN8Q 8I
vXqQ `I
vXzQ xI
vX|P'I
v[WP I
v[ZP I
w+:Q I$} 	`I%@ 	`I%}: 	`I&+ 	`I
= 	`I*g 	`/I6= \h~
	..OLD==]10
	..TYP==3
IF](E <C>+1,..TYP==0]H
IFE <C>-^O7777]h77,..TYP==1
IFE ^<C>-^O777777B17,^(..TYP==2
..POS==^HPOS(<C>)
..WID=^h=WID(<C>)
	RADI_X	10
	DF%%ST (\._(.TYP,A,<B>,\..P_HOS,\..WID)
	PURG_hE	..OLD,..TYP,..POS,..WIDTYP,..PI	` 	`5I4: 	`I4y7 	`I5KV 	`#I5h6 	`I5| 	`<I6
 	`I6:= 	` I6= 	`I6N8 	`I(\z `(

	RADIX	.`H.OLD
DEFINE	B (`hOPS,AC,E),<
	..Ca==0
	IRP OPS,<
a(		IFE A-..C,<
	aH		STOPI
			IFN 3ah-..C, OPS <AC>,Cb'E
			IFE 3-..C,b( OPS <AC>,[POINT bHE,C'E,D]
		>
	..C==..C+1>
	PURGE	..C>

	PIt;Q It;Q @It<wP'IuHxQ @IuKP IuMRP IuyVQ @Iv	qQ  Iv;QQ  Iv<VP Iv=vQ @IvN8Q `IviZQ I
<bQ IlbP I%{P I-j"P I=BP I=KBP I=lP I>
P ILhbP ILiP ItMBP Iu"P IuLBP IvbP IvhbP Iw	P I-BP I&
"P I&
BP I&
"P I&
("P I&
<P I&
K"P I&
hbP I&
s@ 	`9I& I'3@ 	`(I'7 y0KOP%%IN	(A,B,DIV)%IN	(AI6
:bPI6yBPI64hBPI6MIBPI6vSP'I8t:P'I8t<zP'I8tKP'I8tKqQ xI8tkQ ~I8tkQ I8tkQ  I8tkQ I8tkQ @I8tkQQ xI8uxQ xI8u:Q xI8u+qQ xI8uKUQ ?xI8uL{Q xI8u\QQ xI8u^P'I8u|:P'I8v(sP'I8v(tQ @I8v;qP'I8v=P'I8vkQ @I8w3Q xI8wQ |I:
I"P I:.C@ 	`CI:5i"P I:LKBP I:MIBP I:v8bP I:v;BP I;=h"P IHt]ZP IN\: 	`IPtMQ @IPtMQ IPt[sP IPti9P @IPu	9P IPuxP IPunP IPuyVP IPv
Q  IPv+Q IPv,
P @IPv99P IPv<Q IR)` 	`<IR,P IR,;"P 	IR,HbP IR,IP IR,I"P IR,]BP 
IR,hBPRIR,i"PRIR-BPRIR-BPRIR-P IR-"P 	IR-hbP IR-iBP IR-j"P IR-lP IR.
IS&I"P IV
"P IV9BP IV$P IV$IBP IV%hbP IV%iP IV%lbP IV5iP IVMIBQ IVMlQ IV|\bP IV}P IV}bP IV~
"P IV~:bPvIV~<bPIW"P IWPvIWkbP@IW;"P IWPeIW-"PIW-j"P IW-m"PIXr*7QIXtqP$IXtxP"IXtVQIXt9Q IXtJ9Q IXtJ9Q@IXtLTQ@IXtLuQKIXtMQuIXu@QwIXuKSQ  IXuLQ IXuTP IXuT P IXuT(P IXuT(P IXuT)P IXuT)P IXuT*P IXuT*P  IXuT+P @IXuT+P!IXuT@P IXuT`P IXuUP IXuU P IXuU@P  IXuU`P @IXu]Q IXu}:Q IXv
vQ  K;	` 	`4K;
BP 
K;
(BP K;
(bP K;
)BP K;
*BP K;
+P K;
,P K;
3@ 	`5K;
8bP K;
IP 
LBP 	K;
YP K;
kBP K;
yBP K;
K;P K;
K;P K;	P 	K;
"P K;"P K;-"P K;=P K;I"P 
K;KP K;$\@ `KDt*Q ~KDt-1Q PKDt9TQ @KDt9UP'KDt9VQ xKDt9WQ  KDt9XQ KDt9\Q KDt:2P'KDt:8Q xKDtITP'KDtIVQ xKDtIyQ xKDtJWP KDtJ[Q KDtKQ KDtKQ @KDtKQ KDtKQ  KDtKQ KDtLP'KDtLQ xKDtL2Q  KDtL4Q @KDtLTP'KDtNQ KDth1Q KDthVQ  KDthqP'KDth{Q KDtiQ KDti6Q KDtkQ KDtkQ xKDtlyQ @KDuKP'KDuKVQ xKDuXVQ xKDu\uP'KDv
P'KDv
Q xKDvHVP'KDvKQ xKHt<Q 8KHtZ5P  KHtm6P KHuqP KHuP KHu\sQ @KHuyVP KHv2Q xKHvrP KHv	Q xKHv
WP'~KHv<P KHvKP KJ
<BP KJ
<bP KJ
YBP"KJLbP"KJYP KJY"P KJiBP KJBP KJkbP KJ9P KJHBP KJ$BP KJ$;"P KJ$M"P KJ%h"P KJ%i"P 	KJ&,bP KJ&HBP KJ&["P KJ-hbP KJ-l"P 
KJ5iBP KJLK"P KJMM"P KJN
P KJN="P KJT:P KJd(bP KJd+P KJek"P KJezP 
KJf= 	`-KJfkP 
KJt9"P`KJtLBPKJtXbPKJt]P KJthbP KJuJ"P KK-P KK
KKiBP 	KKlbP KK;P KK%h"P KK&+BP KK,iBP KK-kBP KK-xBP KK=JbP KbN@ 	`Kc  G0IRP A,<IFF2,<IFNDEF A,<EXTERN A>>>A,<EXTL(TQ  LuQ @LQ 9L)6P L93Q (L=xQ  L.]7Q 0L24Q @L
8zQ@LQ0LMQL;vQ@L{zQLRQ@L)Q8@L:7PL;QL;QLLYQ HL	1Q (L\yQ Lk`Q L
0Q 2L%SQ 8L%6Q @ L%uQ 8L%\QQ 8 L%|Q 8L&
TQ 0L&Q 0L&)Q 0L&95Q 0@L&:6Q 1L&;1Q 8L&=Q 8L&=8Q 0 L&X6Q XL&YQQ 8L'(Q PL-@Q  L-\ZQ  L.P  L/6Q L/	 Q L/wQ   L4H2Q L4lRQ 8L5TQ L<P L<]P L>iQ @L><QQ 0LDQ (LDLQ @LE[Q LF
Q LF;Q"HLNsP LT;wP L\(Qm L\=Q!L](Q mL]Q@mL]D(QmL]LQ!L^4(Q(m@Le@Q00LexuQhLeytQ 89LfHLnLrQ HLt]Q HLv8tQ Lv[Q 0@L~
RQ HLQ (LHYQ  LY5P @L7Q 0LP L+qQ LzrP  L-@P L8rQ L=Q `LN:P L
;vQ L:Q (LHPQ JLNQ @@LX9Q L[ Q HL
Q AL<Q (@LH`Q  LMQ L;Q @L;YQ @LYQ  L]Q LiQ 0L	VQ @LHuQ :LI2Q LP LL@Q 0Lx8Q L|Q 8L$Q L$Q IL$uQ H L$+Q @L%2Q L%H1Q H@L%J6Q L%\Q HL&3Q @@L&(1Q (L&,Q L&lQ @L'Q @L-h6Q L4\YQ L5PQ L<Q L= Q ( LFH`Q HM&. 0{OP%%FP	(A,B,FADR)FP	(AM6. pOP%%FP	(A,B,FDVR)FP	(AM&eG SH<<A>!<<LFShTBT.(A)>-<RGHBT.(A)>>>-<RGHBT.M&e| 	`6M0tH0Q @M0tHvQ  M0tJP'M0tLQ xM0tLxQ M0tNQ M7. 0OP%%FP	(A,B,FMPR)FP	(AM<tqQ  M<t9[Q M<t:Q xM<tkQP'M<v
[Q @M<v[qQ MH(X6 \(b
	DEFINE	A,<-^OB(P)>
MJ XH^
	OLD%%%=Xh=10	
	RADIX	8
	YN%%%==0		
IRP AY(,<
	FR%%AM (A,\YH<N%%%+1>)	
	N%%%Yh==N%%%+1		
>
	AZDD	P,[N%%%,,N%%%]Z(	
	PUSHJ	P,b		
	  SKIPA
	AOS	-ZhN%%%(P)	
	SUB	P,[[N%%%,,N%%%]	
	P[(OPJ	P,		
b:
	R[HADIX	OLD%%%
	PUR[hGE	N%%%,OLD%%%
E	N%%%,OLD%%%
MJ]7	`#MJ,: 	`MLu[QQPMLu]vQ @MLv,pQ-PMLv-vQ @MLv\pQOMLv]vQ@MN;P MN. pOP%%FP	(A,B,FSBR)FP	(AMN68"P MNMI"P MNMIBP MNMKP MNN;BP MNl;BP MNt<bP MNtlbP MNv
,O%J7 	`O&
 	`
O&93 	`O&= 
@O&H1O	`O0t=QO)O0tLvQOO0tLxQOO0u	QO0uQ @O0uHvQ O0uHxQ  O0uJ7Q O0ui1Q O0v
	IRP	A,F`<
	IF2,<
		.IF E`A,OPCODE,<.IFN E@A,LOCAL,<EXTERN E A>>
		.IF A,NEEEDED,<EXTERN A>
JH		.IF A,OPDEF ,<Jh.IFN A,LOCAL,<EXKTERN A>>
		.IF K(A,LOCAL ,<INTERN A>
	>>
TERNO>= 	`ORn9g 	pY
	.XCREF	1P		
	HRROI	A,.GT1pWCH	
	.CREF
	GE2TTAB	A,		
	.XCR20EF
	  MOVEI	A,02P		
	TXNN	A,JW.W*MS	
	TXO	A,.JWW*0PO_<ALIGN. (JW.WM*PS)>  
	TXNE	A,J*pW.WCN	
	TXO	A,J+W.WFL	
	.CREF
.WFL	
	.CREF
ORvKG 	`:OSFKG 	`;Qf@ +QuQ Qv*7Q Qv,Q Qv-Q @Qv-Q Qv-uQ  Qv-xQ Qv-zQ Qv91Q  Qv=xQ @Q&\@ 	`QC 	`SuX<P'SuZ7Q xSNn ypOOP%%IN	(A,B,IDIV)IN	(AS7-N xpGOP%%IN	(A,B,IMUL)IN	(AS8 @S:Y@ 
Y 
$S:
[ 
 S:
v 
*S:
(S:N@PVS;]<>B<POS(<B>)>>&<B>>S<tYPPS<tzPPS<t*pPPS<t*zPP@S<t+zPPS<tDLPP S<tI7PP@S<tI9P"S<tMP!S<t[sP  S<t[zP S<t\YP'@S<thyP  S<u8P$S<uI6P  S<uX4P S<u[rP S<ulQP  S<ulrP  S<v9P S<v
S>EI"P S>M|P S>NbP S>f("P 	S>fI"P S>tN 	`+S>t[z 
:S>uiP S>u|P S?BP S?I"P S?	"P 	S? ATXO	A,<B>TXO	A,<BS?%I"P S?%]BP S?,YBP S?-hbP S?4i"P S?5I"P S?6	BP 
S?=I"P S@t9PP @S@t9QQ @S@t9QP S@t9RP `S@t9VQ S@t9VP S@t9WQ S@t9XP$S@t9YQ S@t9YQ  S@t9ZQ S@t9[P"S@t9]P!S@t<1P'S@t<2Q xS@t<7P S@t<8P'~S@t<8Q  S@t<9P S@t<9P'~S@t<<Q @S@t<XQ S@uQ S@u(1Q @S@u+Q  S@vuQ S@v:WP S@v>Q SBbP SB*"P 	SB*BP SB+BP SB,P SB9BP SBIP SBKBP SBM"P SBiBP SBl' 	`2SBlG 	`1SBlg 	`1SBm"P SB"P 	SBbP SB"P SBkP SBkBP SBlP SB	BP SB
"P SB
BP SBP SB,BP SB,bP SB-"P 
SB."P SBKP SBYBP SBZ"P 
SB\P UuHZQ UuHyQ ?pUuL|Q UuMQ @UuMQ UvXUQ  UvXqQ UvYQ UvYQQ @UvZPQ @UvZQQ UvZWP Uv[Q  Uv[6Q Uv[RQ Uv[ZQ @Uv[pQ Uv\WQ Uv]Q U] 	`%U +,U +(U  +$Ut-3P UtH2Q Uu\uQ ~Uv
ZQ `Uv9Q Up +U~` +"U,t7Q U,t]PQ U,u+qQ xU,v\Q  U,vxzP'U,v|ZQ @U.
.BPU.%h"PU.LPU.M+BPU.My"P=U.v	`U>= 	`U?0 +0U@t8qQ U@tLQ 0U@t[XQ U@u
Q pU@uQ @U@uHuQ @U@uY:Q U@ulxQ U@vuQ U@v-Q U@v<Q U@v<Q U@vLXQ  UKI@ +ULtIYP ULv6P ULvxP ULvyP ULvP ULv
P ULv
P ULv
TP ULw`P UVn	 Sh:IFE <<B>_T1>,<
IFE <B>,<
	JUMP	A,D
>
THIFN <B>,<
IFE <Th<C>&<B>>,<
	JUUMPL	A,D
>
IFNU( <<C>&<B>>,<
	UHJUMPGE	A,D
>>>Uh
IFN <<B>1>,<
	TXCA	A,<<C>&<V(B>>
	JRST	.+5
VH	TXCE	A,<<C>&<VhB>>
	JRST	D
	TWXNE	A,<<-<C>-1>W(&<B>>
	JRST	D
>>>
	JRST	D
' Oh
IFE <<BP>_1>,<
IFE <B>,P(<
	JUMPA	A,D
PH>
IFN <B>,<
IFPhE <<C>&<B>>,<
Q	JUMPGE	A,D
>Q(
IFN <<C>&<B>>,QH<
	JUMPL	A,D
Qh>>>
IFN <<B>_1>R,<
	TXCA	A,<<CR(>&<B>>
	JRST	.+RH5
	TXCE	A,<<C>Rh&<B>>
	JRST	.+3S
	TXNN	A,<<-<CS(>-1>&<B>>
	JRST	D
>>>
	JRSTUVn
 Wh
IFDIF <XB><C>,<
	JFCL	1X(,.+1		
	JRST	.+1XH		
IFNB <B>,<	JXhFCL	1,B
YIFNB Y<C>,<IFIDN <C><Y(D>,<IFIDN <D><YHE>,< JRST	C>>>>
IFB <B>,<	JFCL	Z1,i
  IFIDN <CZ(><D>,<IFIDN <D>ZH<E>,< JRST	C>>>Zh
>

IFDIF <C>[<D>,<
	HRLOI	A[(,-2		
IFNB <C>,[H<	AOBJP	A,C
  [hIFNB <D>,<IFIDN \<D><E>,<JRST	D\(>>>
IFB <C>,<IF\HDIF <D><E>,<AOB\hJP A,i>
	    I]FIDN <D><E>,<AO](BJN A,D>>
>
]H
IFDIF <D><E>,<]h
	IF2,<IFE A,<P^RINTX ? A MUST B^(E NON-ZERO IN JUM^HPPT>>
	MOVEI	A,^h0		
	BLT	A,0		
IFNB <D>,<	JUMP_(E	A,D
  IFNB <_HE>,<	JRST	E>>
_hIFB <D>,<	JUMPN	`A,E>
>

i:A,E>
>

i:U\vx6Q"?`U\vxwQU\vyQU\vyQU\vyQbKU\vyTQ`U\vyVQ@U\v{9Q2U\v{:Q@U\v|QU\v|WQ^U\v}YQU\v}zQWY&=
C@ c( B (<MOVEcH,HRRZ,HLRZ,LDB>,<A>,<C>)LDB>,<Y> 	`Y>0 	`Y>=@ 	`Y>=}: 	`Y>}=8 @YO%yG M(r
	IFNDEF	MHLSTIN.,	LSTIN.==0Mh
IFE LSTIN.,<
	NIFB <A>,	.XCREF
			XLIST>
LSTIN.==LSTIN.+1
INYO%{G Nh|
IFG LSTION., LSTIN.==LSTINO(.-1
IFLE LSTIN.,OH<	.CREF
		LIST>
CREF
		LIST> 'MIFG 0,<
	'0IF2,<LALL>
	BYTE'P (3)MACWHO(9)MACV'pER(6)MACMIN(18)MA(CEDT	; MACTEN %4((045)-0
	SALL
>	I(PFE 0,<
	IF2,<LAL(pL>
	BYTE (3)MACW)HO(9)MACVER(6)MAC)0MIN(18)MACEDT	; M)PACTEN %4(45)
	SALL
>4(45)
	SA[3@ R<<<1_<A>>-1>B<B>>_<A>>[
v=Q ~[
v\pQ  [
vx5Q@[LP [LBP [L=P [MIBP [MX"P [N
P [KP [h"P [y' 	`=[$\G 	`$[>&: B0
	LALL
	BP%%A==BYTE (3)AWBpHO(9)AVER(6)AMICN(18)AEDT
	SALL
)AEDT
	SALL[>v- 	b[?7 fp
	.XCREF
	TEST%%=B
.IFNfH <TEST%%>,ABSOLUTfhE,<
	.CREF
	MOVgE	A,[B]
	.XCREg(F
>
.IF <TEST%%gH>,ABSOLUTE,<
	TEghST%%=0
IFE	<<B>h_-^D18>,<
	TEST%h(%=1
	.CREF
	MOVhHEI	A,<B>
	.XCRhhEF
>
IFE	TEST%%i,<IFE	<<B>_^D18>i(,<
	TEST%%=1
	.iHCREF
	MOVSI	A,(ihB)
	.XCREF
>>
IFE	TEST%%,<IFE	j(<<<B>_-^D18>-^O7jH77777>,<
	TEST%%jh=1
	.CREF
	HRROkI	A,<B>
	.XCREk(F
>>
IFE	TEST%%kH,<IFE	<<<B>^D18kh>-^O777777B17>,<
	TEST%%=1
	.CREl(F
	HRLOI	A,(<BlH>-^O777777)
	.XClhREF
>>
IFE	TESTm%%,<
	.CREF
	MOm(VE	A,[B]
	.XCRmHEF
>
>	;[35][32mh] END OF .IF <B>n,ABSOLUTE
	PURGE	TEST%%
	.CREF[@t[QQJ@[@v=Q9~[@v\pQ<[O%2 	`	[Pr}P [PtqQ x[Pt<QP'~[PtI7P [PuhyP `[Pv{P [R
G 	`%[R$Xg @ [R-yG @[R-} @[RMh"Q [RMi @ [RMnQ [RfJ @@[S]g @[S9G @[S<G @[S-k @[S< @[Vg x0COP%%IN	(A,B,MUL)%IN	(A[ZDLBP [ZDLG 	`,] CpRIF2,<IFDEFCP A,<A==A>> IFNJ(DEF A,<A==<B>>F A,<A==<B>>]t;SP ]t=P ]tH:P ]uH8P ]uH9P ]uH9P ]uK0P ]uK8P ]uK9P ]uK9P ]u[vP ]ukVP ]u|P ]v:2P ]v;VP ]vKxP ]LBP ]LP ]MkBP ]My"P ]N9BP ]thbP ]uHbP ]uMP ]uX"P ]uh"P ]uiP ]vYbP ]-BP ],bP ]nBP ]` I`HND (A,<BI@>)
PRINTX %PLEASH`E USE ND MACRO, NIDS. MACRO IS NOW OBSOLETE
 NOW ]%h"P ]%y"P ]
HbQh]|bQz]5lbQs]MYBQ]Mj"Q{]N	bQr]N"Qtu]-BQt~]kQ t]\bQ x]XbP ],kbQt].]LuQ @]LuQ  ]LuP ]LuiQ ]LuiQ ]Lv=Q x]Lvx4Q @]N
)"P ]N
+"P ]N
+bP ]N
<BP ]N
I"P ]N9BP ]N;BP ]NmP ]N+P 	]Ni"P ]N$+bP ]N&8bP ]NLKP ]NLk"P ]NMIBP ]NMYbP ]NMiBP ]NMyBP ]NVP ]NelbP ]NfP ]Nt9P ]NuJbP ]Nv+bP ]Nv\BP ]N~HBP ]O` 	`B]O+P 
]ObP ]O-BP ]O+bP ]OZBP ]O\bP ]OlbP ]O+P 
]OHBP ]O,9BP 
]O,;"P ]O,LbP ]O-;BP ]O-JbP 
]O-kBP ]O-lBP 
bP ]O=h"P ]O>,bP 	]RlG 	`C]RtP ]Rv9P ]S%hbP _t,wQ x_t,yQ _u|Q _v}Q `_@(Xp u7
	.XCREF
IFE	<<B>_-^D18>uH,<
	.CREF
	CAIuhC	A,<B>
	.XCREvF
>
IFN	<<B>_-v0^D18>,<
	.CREF
vP	CAMC	A,[B]
	vp.XCREF
>
	.CREFCREF
>
	.CREF_@(YX 0
	.XCREF
IFE	<<B>_^D18>,p<
	.CREF
	CI	A,(B)
	.XCREF
0>
IFN	<<B>_^D18P>,<
	.CREF
	C	pA,[B]
	.XCREF
>
	.CREFCREF0g
	.XCREF
	TEST%%=0
IFE	<zp<<B>_-^D18>-^O77{7777>,<
IFN	<<B{0>&^O777777>,<
	T{PEST%%=1
	.CREF
{p	DI	A,-<B>
	.|XCREF
>>
IFE	TE|0ST%%,<
	OP%%IN	|PA,<B>,C
>
	PU|pRGE	TEST%%
	.CREF	TEST%%
	.CRE_@(Z7 }0w
	.XCREF
IFE	<<B>_-^D18>}p,<
	.CREF
	CI	~A,<B>
	.XCREF
>
IFN	<<B>_-^D~P18>,<
	.CREF
	~pC	A,[B]
	.XCREF
>
	.CREFCRE_@(] <H

	.XCREF
IFN <<A>&^O7777=77777760>, PRINTX=( ? A IS NOT AN A=HCCUMULATOR

	TE=hMP%%=0
IFE	<<B>>_^D18>,<
IFN	<B>(>,<
	TEMP%%=1
	>H.CREF
	C	A,(B>h)
	.XCREF
>>
I?FE	<<B>_-^D18>,<?(
	TEMP%%=1
	.CR?HEF
	D	A,<B>
?h	.XCREF
>
IFE	T@EMP%%,<
	.CREF
@(	E	A,[B]
>
	@HPURGE	TEMP%%
	.CREF	TEMP%%
	.C_B-` 
RF\y 	`W  `W$-3 
"W&= 
&atx0Q atx3Q @atx=Q atxrQ  atxxQ atzQ @at{Q at{QQ at{RQ @at|Q at|RQ at|pQ  at|tQ  at|vQ  at|xQ at}yQ  a<9"P a<:"P a<S@ 	`2a="P a=P a=bP a=P a=I"P a=Y"P a=Z"P a=lP a=lbP a=nP a>:P a>YBP a%@ 	`$a
tTQ  a
tTP a
tQ a
t*9Q a
t>(Q  a
t>(Q a
tk{Q a
tm3Q a
uJ8Q @a
uiQ a
u}SQ @a
v	P a
vM	P a
vZ7Q a
v\yQa-0Q	`auqQ @au	QP'au
Q xa&Jg 	`Ea&Mj' 	`.a&T*' 	`>a'= 	`0a'G 	`0a'g 	`/a'%\G 	`Aa*n	r 5 a*n 4`a*|  	`
a+=45a+=4+a+4-Pa+-\4@a+-\5`a+-\4 a+-\5@a.Pa.%BP4a.v a4tXjQ a4tXkQ a4tXkQ @a4t]qQ a4u8 Q  a4u: Q a4u;Q a4u<`Q a4u[rP$a4u\Q @a4ulQ  a4vQ  a4vQ @a4v	Q @a4v
(Q @a4v
(Q  a4v
)Q a4v
)Q a4v
*Q a4v
*Q a4v
+Q a4v
+Q @a4v=qQ a4v>7Q a4v\Q @a4w
Q  a>Mm Q(
<POINT	WIDQH(B),A,POS(B)>B),A,POS(B)>a>\S@	`&a?H6K+a?PH<^L<A>+^LPh<-<<A>x<^L<A>>>-1>-1><^L<A>>>aJuaLtkwQaLtlQQaLv)PaLv)PaLv)PaLv)3P@aLv*2P"aLv*2P aLv+rP!aLv+rPaLv+vP@aLv,2PaLv,QPaLv-zPaLv;wQ@aLvK9Q @aLvh4Q aLviQ aLvj8Q aLvlQ aLvlQ  aLvmQ aN)BP aN>BP aNLbP aN%kbP aNNkbP aNUi"P aNU|P aNtlbP aNuBP aNuP aNuY"P aNv,bP aNv-bP aN}yBP aOiP aO-BP aOKP aO%X"P aO%i"P aO,hBP aO-8bP aO-9BP aO-<BP aPt<RP aPtKP aPtMP aPtYP aPthwP'aPuP aPu(WQ xaPuJ1P aPuKuP aPui;P aPu}YQ aPv(wQ aPv8wP aPv90Q @aPv;P `aPv;[P aPv<QP aPv<|P aPv>9P aPvYQ  aR
8Q  cv,xQ @cHt+P'cHuI7Q xcTv(VP cTv(YP"cTv(ZP$cV
HbPcVlBPcV.Y'	`@cV4\BPcVLP;cVMIBP<cVtlbP<cVvpet<\P'etLvP"etXWQ etXwP etZwP'et[QQ `et]Q et]Q `et]Q et]Q et]7Q xet]YQ peu[rQ eukP @eulrP$ev
[Q `ev[TQ xe
uQQ |e
vMQeLPteL;BPetbPet9PGeuBP@eubP ev
	DEFINE	WhINFO.(OPCODE,NEWAXRG)<
	OPCODE	<A
	NEWARG>>	<AedX9  el 	`et2  e87 
0eMG 	`'e] 	`eD- RH<<A>&-<A>><<A>&-<Ae tP'e4v9Q e4v=8Q xe8vwQ @e@tQP  e@tZP e@t)P e@t)PP e@t8YP e@t:Q e@t;8P e@t<TP e@tJ9P$e@tK8P!e@t\YP fe@thrP e@tlRP  e@tmrP @e@uKsQ @e@uiP"e@uiYP @e@ul1P e@v6P e@v+9P e@vXrQ e@vY9Q e@v\RQ e@v]rQ eR%"P eR,BP eRL"P eRMIBP eRUkP @eRUlP eRt4P eRtXbP eSh"P eShBP eSz"P eSI"P  eS$BP eS&, 	`eVp 	`eVvJ6 	`g4S@ 	`Dg
t+9Q g
t;Q ?xg
t;P'g
thxQ @gDbP gDXBP gDY 	`4gDkBP gEbP gEZ"P gEhbP gEjP gElP gFXbP gFYBP gFZBP gF[bP gF\"P g-0 	`gv9' 	`-g$I 	`g%Ht 
.g%h6 	`g&{ 	`
g&]7 	`g&]x 	`g"~s@ H@B	.XCREF
	H EXP	<A>
	.ORG	.-1
			.CREFG	.g/Q 
6g/V 
8g0tP'g0uX1Q xg0uX<Q `g0vN8Q g2,\ 	`
g8,}Q g8-KuQ g8-YQ g8-hyQ g8.:Q  g8.<Q @g8.]xQ g:}| 	`?g;)P g>
HbPg>LPg>L*"Pg>MkPg>l.Pg>tlbPg>vIP g@t<JP g@t<JP g@tIYQ 0g@uMqQ  g@v
P$g@v8hP  g@vN8P g@v[TP g@v\Q @gCbQ gC"P gCP gCBP gCh"P gChbP gClbP gC+' 	`=gCH 	`gL.<tQ @gP,{Q @gP,yP  gP,+wP gP,,P$gP,,P"gP,,	P!gP,,	P @gP,,
P  gP,,
P gP,,P'pgP,<Q gP,>1Q gP,DkQ gP,HSQ @gP,LuQ @gP,M6Q gP,Y9P gP,[7Q  gP,[XP gP,\ZP!gP,^P @gP,mQ gP,x6P gP-
Q @gP-3Q gP-RQ gP-P gP-Q gP-;Q gP-KsQ gP-LqQ gP-XRP gP-XSQ gP-YQ gP-Y9P gP-\QQ gP-\sP gP-h9Q gP-hyQ gP-iP gP-iP$gP-i9Q  gP-jWP  gP-kP gP-kxP gP-lVP gP-lZP gP-lrP  gP-lxP @gP.
[Q gP.
tP gP.)Q  gP.*RQ gP.-Q gP.:P @gP.<xP gP.=xQ  gP.H8P gP.IQ pgP.MyQ gP.k9P gP/
P"gPtzQ xgPtP'gPt<Q @gPtRQ  gPt:Q gPtyQ gPv\RP$gPv\zP"gPvlsP$gPvx6P#|gPvxwQ gPvyP  gPvyP gPvyP"gPvyTP gPvyVQ gPv{9Q gPv{:P gPv|Q gPv|WP!gPv}YP gPv}zP @gRK` 
 gRN@ 
`gR%
P gRN;BP gRNK"P gRtBP gR~#@ d" B (<MOVEd(M,HRRM,HRLM,DPB>,<A>,<C>)DPB>,gR~)  nH
IFE <D>nh,<	SETZM	B>	
IFoE <D>+1,<	SETOM	o(B>	
IFN <D>*<<oHD>+1>,<MOVX	A,<ohD>	
		   MOVEM pA,B>	
IFNB <Cp(>,<			
	MOVE	A,pH[B,,B+1]
	BLT	A,C		
>	BLT	gS]7 	`gTv8VQ gTv8tQ ~gTv;7Q gTv;zQ  gV wp?OP%%IA	(A,B,SUB,ADD)(AgW] 	`3gWlQ gX,;wQ gX,lP gX-
9Q @gX.
P gX.)8Q `gX.:Q  gX.>6Q gX.|ZQ g^NHt 	`gg
 	`gg= 	`i| 	`6it+zP"itKHP itKIP itKIP itKJP itKJP iuyVP iv);P @iv96P iv=P iv[YP$iv{P!i&l\@ 	`	i'%I' 
-
	.XCREF
0
	Z==0
	IFNDEF 
PAVER,<Z==-1>
	IF
pNDEF AMIN,<Z==-1>
	IFNDEF AEDT,0<Z==-1>
	IFNDEF PAWHO,<Z==-1>
	IpFL Z,<PRINTX ?SYM
BOLS AWHO,AVER,
0AMIN AND AEDT N
POT DEFINED
	PRIN
pTXB?VERSIONDSYMBO
END
	.CREF
	IF2,<LALL>
	ASIX==SI0XBIT /A/	; B ABPBREVIATION IN SIXpBIT
	AASC==ASCIZ /A/	; B ABBRE0VIATION IN ASCII
	SALL
	.XCREF
p%FIRST=AMIN/^D26
IFE %FIRST,<%SE0CON==AMIN
	%FIRPST==0>
IFG %FIRSpT,<%SECON=AMIN-<^D26*%FIRST>>
IF0E AMIN-^D26,<%SEPCON==AMIN
	%FIRpST=0>
IFE AMIN-^D52,<%SECON==^D206
	%FIRST=1>
; PDEFINE ALL THE MApCROS
BUILD$ (B,\AVER,\AMIN,\%F0IRST,<,A,B,C,D,E,PF,G,H,I,J,K,L,M,Np,O,P,Q,R,S,T,U,V,W,X,Y,Z>,\%SECON,0<,A,B,C,D,E,F,G,HP,I,J,K,L,M,N,O,P,pQ,R,S,T,U,V,W,X,Y,Z>,\AEDT,\AWHO0,C,A)

	IF2,<PPURGE %SECON,%FIRST,Z>
.CREFFIRi.LbP i.MHbP i.MIBP i.MKBP i.MLbP i.thbP i.tkP i.vLbP i.wBP i/%kP i/,MbP i/-lP i7;y 	`i<t1P ?@i<tqQ ?@i<t47Q i<t8:Q i<t8ZQ i<t8zQ  i<t:Q @i<t<Q i<tXyQ i<uK6Q @i<uKsQ i<uM6Q  i<u[5P ?i<uxyQ i<v,xQ i<v,|Q i<v=Q i>
HBP i>%P i>MIBP i>M\P i>t+"P i>uBP i?(bP i?xBP i?%h"P i@tXyQ xi@tY<P'i@ty7Q xi@vi9P'iB
<BP iB
<bQ iB,bP iB%hbP iB.HbP iBLhbP iBM+BP iBey"P iBf)BP iBf:"P iBu"P iBuLP iBu]P iC-BP iC5|BP iC>{P iHthzQ xiHv)VP'iJmkg 	`&iJm| 	`'iK)7 	`iK9: 	`
iNY` 	`?ib 
p`
	.XCREF
IFB <B>, TXC	(<8h^O37777777&A>,1B9<A_-^D30>)
IFNB9( <B>,<
IFN <<A9H>&^O777777777760>9h, PRINTX ? A IS :NOT AN ACCUMULATO:(R
IFE	<<<B>_-^D:H18>-^O777777>,<
:h	.CREF
	EQVI	A,;<,,-1-<B>>
	.XC;(REF>
IFN	<<<B>_;H-^D18>-^O777777>,;h<
	OP%%TX	A,<B<>,TLC,TRC,TDC
>>	.CREFC,TDC
>>ib 6H@
	.XCREF
IFB  <B>,	OP%%T7X	<^O37777777&A>7(,1B<A_-^D30>,TLC7HA,TRCA,TDCA
IFNB7h <B>,	OP%%TX	A,8<B>,TLCA,TRCA,TDCA
	.CREF
,TDibP 
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLC E,TRCE,TDCE
IFNB 0 <B>,	OP%%TX	A, P<B>,TLCE,TRCE,TDCE
	.CREF
,TDib` !0
	.XCREF
IFB  <B>,	OP%%T5X	<^O37777777&A>5(,1B<A_-^D30>,TLC5HN,TRCN,TDCN
IFNB5h <B>,	OP%%TX	A,6<B>,TLCN,TRCN,TDCN
	.CREF
,TDibp 0
IFB <B>P, JFCL	0
IFNB <pB>, TRN	A,<,,<B>>
N	A,<,,<Bibt 
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLNA,TRNA,TDNA
IFNB0 <B>,	OP%%TX	A,P<B>,TLNA,TRNA,TDNA
	.CREF
,TDibtC@ L(z
IFE <<BLH>_<1+^L<B>>>,<
LhIFE <<B>&<C>>,<M
	TXNN	A,<B>
M(>
IFN <<B>&<C>MH>,<
	TXNE	A,<BMh>
>>
IFN <<B>_N<1+^L<B>>>,<
	TN(XCA	A,<<C>&<B>NH>
	JRST	.+4
	TXNhCE	A,<<C>&<B>>O
	JRST	.+3
	TXNO(N	A,<<-<C>-1>&<B>>
>C>-1>&<ibtP 
	.XCREF
IFB<^<B>,	OP%%T>E,TRNE,TDNE
IFNB0 <B>,	OP%%TX	A,P<B>,TLNE,TRNE,TDNE
	.CREF
,TDibu@ Hh^
IFE <<BI>_<1+^L<B>>>,<
I(IFE <<B>&<C>>,<IH
	TXNE	A,<B>
Ih>
IFN <<B>&<C>J>,<
	TXNN	A,<BJ(>
>>
IFN <<B>_JH<1+^L<B>>>,<
	TJhXCA	A,<<C>&<B>K>
	JRST	.+4
	TXK(CE	A,<<C>&<B>>KH
	JRST	.+2
	TXNKhE	A,<<-<C>-1>&<B>>
>C>-1>&<ibu` 
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLNN,TRNN,TDNN
IFNB0 <B>,	OP%%TX	A,P<B>,TLNN,TRNN,TDNN
	.CREF
,TDibx Pc
	.XCREF
IFB <B>, TXO	(<	^O37777777&A>,1B	0<A_-^D30>)
IFNB	P <B>,<
IFN <<A	p>&^O777777777760>
, PRINTX ? A IS 
0NOT AN ACCUMULATO
PR
IFE	<<<B>_-^D
p18>-^O777777>,<
	.CREF
	ORCMI	A0,<,,-1-<B>>
	.XPCREF>
IFN	<<<B>p_-^D18>-^O777777>
,<
	OP%%TX	A,<
0B>,TLO,TRO,TDO
>>	.CREFO,TDO
>ib| u
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLOA,TROA,TDOA
IFNB0 <B>,	OP%%TX	A,P<B>,TLOA,TROA,TDOA
	.CREF
,TDib|P U
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLOE,TROE,TDOE
IFNB0 <B>,	OP%%TX	A,P<B>,TLOE,TROE,TDOE
	.CREF
,TDib}` e
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLON,TRON,TDON
IFNB0 <B>,	OP%%TX	A,P<B>,TLON,TRON,TDON
	.CREF
,TDicP 0A
	.XCREF
IFB <B>, TXZ	(<p^O37777777&A>,1B<A_-^D30>)
IFNB0 <B>,<
IFN <<AP>&^O777777777760>p, PRINTX ? A IS NOT AN ACCUMULATOPR
IFE	<<<B>_-^D018>-^O777777>,<
p	.CREF
	ANDI	A,<,,-1-<B>>
	.XC0REF>
IFN	<<<B>_P-^D18>-^O777777>,p<
	OP%%TX	A,<B>,TLZ,TRZ,TDZ
>>	.CREFZ,TDZ
>>icT E
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLZA,TRZA,TDZA
IFNB0 <B>,	OP%%TX	A,P<B>,TLZA,TRZA,TDZA
	.CREF
,TDicTP %
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLZE,TRZE,TDZE
IFNB0 <B>,	OP%%TX	A,P<B>,TLZE,TRZE,TDZE
	.CREF
,TDicU` 5
	.XCREF
IFB  <B>,	OP%%TPX	<^O37777777&A>p,1B<A_-^D30>,TLZN,TRZN,TDZN
IFNB0 <B>,	OP%%TX	A,P<B>,TLZN,TRZN,TDZN
	.CREF
,TDidtVQ idtI;P idtZQ idty7Q  idu@Q iduZQ @idu+qP'~iduX7Q @iduYQ idu\Q idu}:Q idv(9P  idv<Q idvh9Q  if` GHB
	MOVX	AGh,1B<B_-^D30>
	.HXCREF
	<XORM	A,H(>!<37777777&B>
	.CREF
7&B>
iftS@ BH
	MOVX	ABh,1B<B_-^D30>
	.CXCREF
	<TDNE	A,C(>!<37777777&B>
	.CREF
7&B>
ifuc@ Ch$
	MOVX	AD,1B<B_-^D30>
	.D(XCREF
	<TDNN	A,DH>!<37777777&B>
	.CREF
7&B>
ify` E.
	MOVX	AE(,1B<B_-^D30>
	.EHXCREF
	<IORM	A,Eh>!<37777777&B>
	.CREF
7&B>
igQ` F(8
	MOVX	AFH,1B<B_-^D30>
	.FhXCREF
	<ANDCAM	GA,>!<37777777&B>
	.CREF
7&B>k.I@ `k*-` k:*g bp
%%FOO==ca
	BRK0 (%%FOO,B,1)
 (%%FOO,k:ezg 	`(kN.J  kN.K`  kRLP kRNKBP kRN]P kS; 	`kS@ 	`>kS-9BP kTt7Q kTt*XQ kTt=9Q 8kTtI1Q ?@kTtI6Q  kTtI9Q kTtK9Q kTtlxQ  kTuQQ kTuHSQ @kTv
Q @kTv
P"kTv,QQ kTv;rQ k`vN8P ~k`v[ZP mHtYP'mHuZ7Q xmHvi9Q |mHvzQ pmKc@ D#BYTE (3)AD0WHO (9)AVER (6)AMIN (18)AEDToN@ 	`o\P 	`o
uQQ |o
vMQ o".)  	`o&  P<^L<-<<A>_<^L<A>>>-1>>>q"eJ  P q*-` +
q+= +q+= +
q6~i4 C q? BTXC	A,<B>TXC	A,<Bq@ G@>IFB <C>,<G`A==:<B>> IFNB <C>,<A=:<B>><qBp +qN5P +qRuMP qS&:g 	`*qS-mP us@ dh, B (<SETZeM,HLLZS,HRRZS,<PRe(INTX ?CAN'T ZERO eHBYTE>>,<A>,<C>)TE>>,<A>,<C>)
Q 8}
.[yQ 8},Q <qQ J|Q `LqQ XYQ hKsQ  XYQ p\Q 8nQ xzxQ 9Q P
Q (X-Q @-Q H9Q 99Q KyQ N8Q 0n{Q %n	Q %n:P %tyQ Ht(vQ t(xQ xt+7Q Pt+<Q Ht+VQ ht,Q 0t-Q Ht8:Q  t8tQ xt:Q 8t:8Q `t<Q `t=WQ @tH2Q 8tH:Q HtH<Q tHSQ (tHtQ `tIQ 8tI;Q `tIQQ PtJQQ htKQ ptLqQ htMQ (tMQ 0tMQ XtMWQ Ht]Q t^Q (tihP tihQ tiiQ tiiQ tijQ  tkQ tlRQ tlZQ 0t{:Q  u	Q @uyQ u
Q `u
tQ @u
vQ u
wQ uQ Hu,Q 0uIQ huIQ  uKQ uK<Q @uKVQ `uKXQ XuKYQ PuKqQ  uLQ (uLrQ uMWQ @uXRQ (uXSQ uXYQ uX\Q  uY9Q uZ7Q uZ8Q xu[<Q pu[ZQ Pu[wQ xu]Q Xu]WQ pu^Q 8uhyQ uiQ (ulqQ xulvQ umqQ unQ  uxxQ `uxyQ Xu|Q 0u|Q Xv	Q (v	yQ hv
0Q Hv
6Q @v
6Q 8vXQ vuQ v-Q Xv91Q v99Q v9HQ hv9IQ pv9IQ xv9JQ v9JQ v9RQ Xv9zQ v:=Q Pv:WQ hv=	Q 0v=Q (v=Q xv=8Q pvH8Q 8vHvQ 8vIQ PvJ1Q  vJ6Q @vJqQ 0vKxQ PvMQ @vMQ 8vMQ HvMyQ pv]Q vi9Q `vltQ PvzQ w9Q p4PQ @4QQ 849Q 4,Q p4,Q @491Q 4:P 4:P 4:	P 4:	P 4:
P 4:
P 
4:P 
4:P 4;Q p4;Q x4<WQ 4<rQ 4<wQ h4IWP 
4YQ 4ZWQ 84\Q @4]Q `4]VQ 4]ZQ  4h2P 
4hTQ H4hWQ P4iP 4k8P 4lqP 
5
QlP5+qQ5JYQH5KQm(5LzQnP5[PQ X5\Q x5\Q p5\Q 5\Q 5h0P 5hyP 5iQ 05i4P 5jPQ P5kP 5k9P 5kpP 5lQ 5lTP 
(P 6
(P 6
)P 6
)P 6
*P 6
*P 6
+P 6
+P 6P 69P 6pP 6qP 6
Q @6
Q H6
qP 66(6*P 	6*P 6*P 6*P 6*P 6+P 	6+P 6+P 6+P 6+P 6+QP 6+TP 6+WP 6+YP 6+\P 6,9Q X6,qP 6,tP 6,wP 6,yP 6,|P 6-7Q p64Q (640Q 868+P -68+P /684P 688P 68HQ  68HQ 068TQ X68WQ `68YQ 869P 	69(P 69(P 699P 6:WQ 6;QQ h6;RQ p6;RQ H6;UQ x6;VQ 6<P 6<P 6<Q h6<P 6<Q 6<Q 6<Q X6<RP 6<qP 06=Q  6=Q h6=(P +6=8Q (6=:Q 06HRQ x6ITQ `6IWQ h6IrQ 6JQQ 86KRQ @6LQ `6LQ P6LrQ  6M1Q 06YPP 
6\Q(tzQ<t:Q@<t<zQh<t]Q <uxQ p<u;wQ H<uHvQ x<uKqQ 0<uhtQ  <uiQ (<uiQ <ulQ <ul[Q P<uluQ <uyYQ X<v
Q  +
I8Q (+
LyQ +
\yQ +$qQ $;vQ $I1Q ($LiQ X$LuQ 8$\YQ  &	)Q P&	9Q H&-Q &8wQ @&=	Q `&=Q 0&])Q h&]7P '8xQ ('9Q ':1Q P';6P ';8Q 8';XQ @'<Q 0'<tQ '<xQ X'=Q  '=Q H'=Q '|Q p'LQ h'MzQ `2$zQ H2$Q P2$Q P2$(9Q H2$(XQ 2$+Q X2$+Q `2$9Q (2$:Q H2$;qQ P2$;yQ p2$<WQ H2$<XQ p2$<}Q 2$=Q 82$EHQ 2$HYQ 2$I1Q 82$I9Q 02$K8Q h2$KqQ  2$KyQ h2$MZQ x2$XzQ X2$\ZQ 2$\}Q `2$^Q  2$h4Q (2$iPQ 2$kyQ `2$x6Q @2%Q 2%
qQ 02%
sQ (2%
vQ 82%
zQ @2%TQ X2%ZQ x2%;wQ h2%HSQ p2%LwQ 2%MQ 2%X1Q h2%XWQ `2%XYQ 2%YRP 2%Z1Q&(2%[ZQ&2%\vQ&H2%\yQ&@2%]9Q&02%^Q&X2%^Q& 2%iQ&@2%i6Q&`2%i;Q&(2%k1Q&p2%{Q&02&xQ&p2&2&LQ 02&LzQ x2&YXQ X2&[2Q 82&[TQ 82&[[Q p2&\Q x2&]Q P2&|QQ 2&|TQ  :$=Q H8:$I;Q  8:%H8Q X8:%H9Q P8:%H9Q p8:%I7P 8:%K0Q h8:%K8Q 8:%K9Q x8:%K9Q `8:%[vQ 8:%itQ (8:%ivQ 08:%iwQ 88:%kVQ 8:%nQ 8:%|Q @8:&9Q 8:&:2Q 8:&;VQ 8:&J6Q  8;PQ ;QQ x;yQ ;;Q H;;Q ;;7Q p;;<Q @;=Q P;\Q P;\Q X;
QQ ;Q `;=Q h;JYQ ;LzQ ;[9Q ;\Q 8;\Q 0;\Q H;\Q @;^Q `;hyQ ;8yQ  ;:Q p;:Q X;<Q (;=Q x;LQ  ;\Q h;$SQ 0;$(2Q 0;$+Q P0;$.4Q X0;$.7Q `0;$;yP 0;%X<Q 0;&)Q 00;&+:Q (0;&-Q  0;'	Q H0;':Q @0;'
PQ >&
ZQ >&=xP Nh2P Nh6Q  Nh6Q Nh9Q Ni4Q Nk1Q NlQ (NlPQ 0NlTP NmQ @NnQ 8NnQ N(xQ XN,3Q `NIXQ PNIZQ HNLzQ 8+NLKvQ P+NLiQ (+NLyYQ h+NMSQ +NMP +NMYQ +NMYQ 0+NMk6Q `+NM|Q @+NNyQ +NN96Q H+NNItQ X+NNKQ  +NNKvQ 0+OIyP 1O]yQ 1OQ p1O	Q x1OQ 1O<hQ 1O<iQ 1O<tQ 1OYyQ 1O]qQ p1OjHQ  1OjIQ (1OjTQ 01OlYQ P1OmQ X1O
9Q (1OyQ 01OHQ X1OIQ `1OTQ h1O)Q H1O+hQ P1O,hQ 81O-hQ @1O<qQ 1O<yQ `1O=qQ x1OHhQ 81OHiQ @1OHtQ H1OJ9Q 1OKyQ  1OYQ 8&O(XQ x&O(YQ &O;Q `&O;yQ  &OX3Q H&OX:Q P&OkQ &OvQ (&OsQ &O*6Q h&OKyQ &O\tQ 0&Om6Q &O|UQ &O|wP &O,1Q  &O,yQ X&O9:Q &O=xQ p&OL:Q @&O<)tP O<\QQ (O<]5Q 8O<j7Q O<j:Q O<lQQ O>
7Q 0O>lZQ @OL8wQ OLI6Q OL\YP OMhxQm0OMiQm OMjYQn(ON:WQ 8ON<Q ON<Q HON<Q `ON=Q @ON=8Q XON=:Q PZl;<Q (%Zl;wQ 8%Zl=Q p%ZlJ3Q %Zl^Q x%ZlhqQ h%Zm
Q P%Zn
Q X%Zn
Q `%ZnQQ @%Zn+5Q H%Zn+<Q 0%Zn8wQ %Zn:8Q %Zn;Q %Zn<Q X%Zn=hQ `%Zn=iQ h%Zn=iQ p%Zn=xP %ZnKQ P%ZnMQ  %Zn\Q %Zn\Q 0%Zn\Q  %P <P <RP ^P )2P )7P <QP HtP LRP \P |TP eH2P eIRP 
| /0
	XLIST
10	.ORG 0
	LIST
.ORG 0
	LIST

4P 
4;ZP 
4=P 
5	P 
6P 
6=P 
6YP 
2P 
wP 
P 
P 
P 
P 
7P 
<P 
QP 
rP 
VP 
:P 
VP 
vP 
P 
8P 
9RP 
EHP 
EjP 
EkP 
FP 
;SP 
;yP 
IP 
i:P KP 8<P :<P ;P <|P D	P ?DP >D)6P D8YP D8sP D;PP D;QP D;QP D;RP D;RP D;SP D;TP D;WP D;WP D;XP D;XP D;YP 	D;YP 	D;ZP 
D;ZP 
D;[P D;[P D;\P 
D;\P 
D;]P D<ZP D=7P DI6P ?D\qP exuP f,zP f,|P lP l;7P l;ZP lI6P lI;P lK8P l^P lj6P lkP mTP mLzP mX<P mh6P n
P n):P n9RP n:=P t8wP t9P t9P uP uyRP vD(P vDHP vK\P S@P 8:P 8sP 8wP 9P ;3P ;7P ;SP ;WP =P >P P 
,qP 
-1P 	-6P 9P 9TP 9YP <WP <XP >6P hzP 5P LP 	MP 
X<P |RP }wP 9P 
rP 
85P ;:P ;VP <P =P =P =P H1P HqP HwP IP IYP LP M3P XtP Y	P Y	P YRP YVP YYP YZP Z2P [P [HP [ZP \P \IP \JP \KP \KP \jP \}P |P .P .P .2P 44LP 45JP 46*P 4MVP 4[[P 4\YP 4yP 4zWP 4{VP 4|P 4|zP 5{P 5(VP 5)P 5+VP 5,zP 5KP 5LIP 5MIP 5YP 5YP 6zP 6
rP 6)P 6)9P 64HP 68(P 68)P 68\P 69:P 6;P 6=5P 6YSP 6[P 6]5P 6h9P 6mP 6mP 6mP LyP LP LzP LVP TYP T;WP T=VP TH:P TI;P 	TMVP U
P U
P U
SP U
ZPJUPXUP\UP]UPkU,wP U8zP UJ6P 
Uk)P 
V
P V
SP V
[P<V(zP V,xP V-P 
V<P V=P V=xP VIP 	VJ6P VK8P VLXP V\P Vi9P VlZP VxtP 
VxzP l=P l\YP n2P tP t:zP t;ZP tiVP tkP u(wP uKP uKP uKWP u\P u\sP uh6P uiP ukP uk9P ukrP uxUP v7P v-P v93P v;P v;P v=P $XvP $YP 
$YP $Y1P $YSP $YYP $YYP $YsP $YyP $Z3P $[P 
$[7P $[sP $\P $\QP $\UP $\ZP $\ZP 	$\[P $\zP $\zP 	$]P ,rP ,{P ,;P ,lRP -I7P -{P -{P -{VP .
TP .,rP .96P .=P .=xP .YRP .[VP | I
	XLIST
0	.....X=.
	.ORG
	.ORG 0
	REPEATp .....X,<EXP 0>
		PURGE .....X
	.ORG
	LIST

	.$;ZP $<zP $H:P $\P %
qP %
sP %I7P &<P &>6P &\|P v0P vVP vXP vqP vrP vsP vsP vtP vyP vzP vVP vP v0P v9P vP vTP vtP vP vP 
IUP 
IVP 
ItP 
LP 
LzP 
MP 
ivP'
jQP'
lP'~8vP;PlP|PqP <qP I1P KP LRP LqP LqP MP  NP X;P [sP i9P 
qP 	P 
0P 
qP8P 9P :8P ;P 
;P <P <wP LP YP [zP \P \[P \rP iP AjP DkP LkYP LkrP HlrP DmP Hm2P Am9P @nP ySP ~;P ;\P <P =rP H8P LP zP 
=P<dHpPQdIPRdJ1PdKqPsdLPxdNP:|P|,TPX|;Py|<RP1|I;P:|KP<|iP|i<P |iWP |j6P 
}hSP }}:P ~:P ~
P ~
RP)~(;P)P 	~+VP ~,QP ~8:P ~95P 
~9:P ~:7P ~\QP ~\tP ~\wP ~]P 
~x:P 
~|ZP 9YP ;P <wP I3P IVP JWP LP LvP LwP XpP XqP XwP YP YP YP YzP ]P ]7P hwP {VP |P VP P 5P KVP KuP YVP YYP [VP [[P lzP m7P 
P 
 	)P )6P *WP +VP ,P ,zP 8QP 8ZP 8pP 	8qP 8uP 8yP 
:P :3P ;6P ;8P ;VP ;ZP ;rP <QP <SP <XP <zP <}P =P =P =7P XQP XvP XyP YP YxP Z2P ZyP [P [P [P [VP \qP \qP \xP \zP ]P ]yP $YP $$P $zP >$4P $4P $41P $4;P $4QP $4[P $4qP $4{P $5P $5P $51P $5;P $88P 5$;)P $;8P %$;:P $;;P  $;SP $;WP 
$;yP $<5P )$<8P ($<YP $<ZP )$=VP !$HYP $HrP 8$HsP '$HwP :$I;P 
$IVP 0$KZP <$MVP $$XYP -$XZP ,$YP $[XP +$\5P 9$i:P $}P 6%P 6%P "%P %P #%P "%P #%qP %+P ,%-P (%8zP %HYP :%J6P %KqP %MRP %XYP .%XZP -%]VP !%iP =%iP 8%k(P 
%k)P =%l{P %mP 0%xTP 7%yP %|qP &`P 5&	P 9&
2P &
P &
SP &
[P &QP &8P &(zP &)P /&)P .&)WP /&,hP 2&,hP 3&,iP 3&,iP 4&,jP 4&,xP &-P &8wP &9P &9wP &:2P +&:QP <&;P 	&;PP &<P 1&<P &<P &< P *&<4P *&<8P )&<qP &<zP &&=	P '&=P ;&=P &=xP &>9P &IP 	&J6P &K8P &KVP 7&LXP &MP &\P  &]1P 2&jyP 1&k P %&lZP &&xtP &xzP &zP &|wP 
&tj7Q ?&|qP &|vP &|*7P &|.:P &|K8P &|LP &}WP &}P &}3P &~
6P8'81P8P '8sP '8sP '8xP '8yP '9P '9P '9QP '9VP '9WP '9XP '9YP '9YP '9ZP ':(P ':(P ':)P ':2P ':3P ':4P ':5P ':6P ':9P ':9P ':;P ';P ';2P ';:P ';VP ';wP 
'<YP '<hP '<hP '<iP '<iP '<qP '<rP '<rP '<sP '<tP '<uP '<vP '<wP '<xP '<xP '<yP '<yP '<zP '<{P '<}P '=P 
'=7P 
'=xP 
'>P *D A  *D *A  **+A  *+*,A  *,*:A  *:*;TA  *;T*;yA  *;y*<zA  *<z*H A  *H *IA  *I*YA  *Y*\YA  *\Y*i@A  *i@*A  **yA  *y*	A  *	*	pA  *	p*	tA  *	t*VA  *V*
VA  *
V*
WA  *
W*
pA  *
p*
vA  *
v***Z*|A  *|*|A  *|*}VA  *}V*	TA  *	T*	TA  *	T*)6A  *)6*)7A  *)7*8 A  *8 *>6A  *>6*LA  *L*\|A  *\|*]7A  *]7*i9A  *i9+>{P +>{vP +>|P +>|P +>|P .%JP !.%LYP  .%LZP ".%LzP !.%LzP ".&	P .&
P .&
wP .&1P .&
RP .&
yP .&
zP .&
P 6)VP 6-3P 6:2P 6;ZP 6kP 6m7P 6|P 6+qP 6hyP 6,lP 6,lP 6,lP 6MiTQ @7P 7P 7:2P 7\YP 7m7P 7+qP 7h6P 7m6P 79P 7
2P 7
XP 7
ZP 7+@P 7-P 7-P 7-@P 7-TP 7=P 7$8yP 7$:P 7$<RP 7$=yP 7$D+P 7$EIP 7$KIP 7$KJP 7$KLP 7$i9P 7%
RP 7%RP 7&)1P 7&*2P 7&-P 7&<RP 7&=rP 7&IP 7&K2P 7&M7P 7&|RP :$P :${SP :%@P :%KRP :%iP :%}:P :&(VP :&(tP :&+WP :&<vP :&HwP :&IP ;(P ;)P ;)P ;tP ;WP ;<P ;vP ;zP ;81P ;9P ;;<P ;;RP ;;VP ;<P ;<rP ;<}P ;=2P ;=9P ;IVP ;IVP ;K<P ;KqP ;LP ;LP ;L}P ;h1P ;h1P ;iP ;iP ;i0P ;i8P ;j9P ;j9P ;jYP 	;jYP 	;k<P 
;lP 
;lQP ;lRP ;lTP ;lUP ;lVP ;lXP ;lYP ;lrP ;lxP ;8sP ;8vP ;8yP ;8yP ;8{P ;9P ;9P ;9P ;;P ;;<P ;;YP ;<UP ;<WP ;$zQ ;$,P ;$.:P ;$:P ;$:zP ;$;P ;$;ZP ;$;zP ;$Z2P ;$[ZP ;$\YP ;$]XP ;$]ZP ;$kQP ;%;WQ ;%J7P ;%KsP ;%KxQ ~;%LzP ;%X8Q ;%X<P ;%krP ;&0P ;&):P ;&)<Q ;&96P ;&9:P ;&:P ;&=P ;&=6P ;&>QP ;',WP >%0P >%9P >P >P >)6P >86P >=P 
>=P >IP >ZP 
>[:P 
>]YP>>kP>>mP>>y7P>>xP >
>XhP >XiP >[P >\yP d>j1P 	>kvP >kxP >lVP >myP >|tP >:P 
zP =>*RP >+xP >-P >-P >-P 	>;PP >;xP >KP >LP >LYP >\RP >]P >k:P >LP ?-3P ?I;P ?[rP B
x0P B
xpP B
xqP B
xrP B
xtP B
y6P B
ypP B
z7P B
|xP B
}yP BUQ vBuQ |BQ zBTQ |BH:Q wBLqQ xBMQ sBMZQ uB9Q }BQ vB:Q }B(TQ tB<|Q xBi:Q tBlxQ {BnQ zB	Q {B2Q uB=Q ~BKQ BK9Q BY5Q yB]7Q ~Bx5Q wB	5Q yB5	QP B5
YP B5PP B5TP B5xP B5
P B5
P B5
zP B5TP B5ZP Bl,P Bl:P Bl<P Bl<P Bl<tP Bm1P Bm
P Bm
P Bm+qP BmI7P BmK1P BmLP BmMP Bm[rP Bm\P Bmm6Q BnrP Bn
2P Bn;Q C,P C,P C)2P C)9P C9:P C=P C=P CXwP C[yP C\P C8VP C9QP C:;P CiVP Cj9P CkXP CkxP C$P C$<P C$^P C$^P C$hwP C$j6P C$lRQ C$lVQ ~C$lWQ }C$lrQ C$lvQ ~C$lwQ }C%I6P C%KP 2C%KSP C%KVP C%KWP C%LP C%LqP C%LsP C%LvP C%NZP C%X<P C%krP C%kwP C&
P C&)2P C&)7P C&8wP C&8|P C&9RP C&;P C&;P C&;P C&;P C&=P C&=zP C&\P C&|TP FhP FiP FiP FjP FjP FkP FkP FlP FzP 	FP F:P FWP FZP F)P F)wP F+P 
F+RP F,P F,xP F-VP F9P F<iP F<jP F<jP FI7P FLKP FLLP FL[P Fi<P FiVP Fj6P FkQP 
FlP FlVP FlhP FliP FliP FljP FljP FlyP FmP F(WP 	FMP FMVP FX9P FYP FYSP F\sP Fh6P FjQP Fk(P Fk)P Fk6P FkHP FkIP FkRP FkWP FkrP 
FkzP 
FmP FmP FmP FmVP Fn2P FyP FyP FyP FyP FyP Fz2P F|P F(P FP F4P F9P FqP FrP F	YP F
6P F
TP F
pP F)6P F)9P F+5P F+WP F-VP F.2P FH9P FIP FLUP FN8P FYP FYwP F[P F[TP F[ZP F\P F]1P Fh9P FkP FkvP FlwP G,P G,SP G,[P G,(:P G,9P G,H6P G,J9P G,kQP G-X2P G-[ZP G-krP G.P G.
ZPmG.,xPG.h6P G.}P G.}P JiP JiP JjP JjP JkP JkP JlP JzP JP J:P J;ZP JI2P JI;P J[P J\zP J]7P J^P JkP 
JH2P JX<P J]P Jh6P JhpP JnP JpP 
JyP J
P J
RP 
J
[P JP 	JP 	JP 
J:=P J<P J=P JJ6P JYRP 
Ji9P J
PP J-P J:+P Jh9P J(1P J+P J+vP J<P Jn=2P Jn=3P Jn=6P Jn=7P N(QP N(YP N(xP N(zP N(zP N)P N)3P N*7P N*8P N*QP N+1P N+4P N+6P N+8P N+8P N+9P N+<P N,P N,	P N,P N,QP N,hP N,hP N,qP N,sP N,tP N,wP N,xP N,yP N,{P N-3P N(QP 	N(YP 	N(xP N(zP N)P N)3P N*7P N*8P N*QP N+1P N+4P N+6P N+6P N+<P N,P N,QP N,qP N,sP 
N,tP N,wP 
N,xP N,yP N,{P 
N-P N-3P N8QP$	N8YP$	N8xP$N9P$N93P$N:7P$N:8P$N:QP$N;1P$N;4P$N;6P$N;6P$N;<P$N<P$N<QP$N<qP$N<sP$
N<tP$N<xP$N<yP$N<{P$
N=P$N=3P$N:D P )N<IP &N<I; #0
PRINTX %2p .SGDEV will be o3bsolete; please u30se GETTAB .GTRDV 3Pinstead.
DEFINE	.SGDEV<11>
;E	N=K{ 4w
PRINTX %.P .SGLOW will be o.pbsolete.
DEFINE	.SGLOW<17>
;E	N=h6 +P
PRINTX %+p .SGNAM will be o,bsolete; please u,0se GETTAB .GTRFN !0instead.
DEFINE	.SGNAM<0>
;NE	N>
 !p
PRINTX %" .SGPPN will be o"0bsolete; please u"Pse GETTAB .GTRDI "pinstead.
DEFINE .SGPPN <7>
;E NeP NeP NeP NeP NeP Nej1P Nv9P Nv9P Nv<zP N|,P N|HXP N}XP N}I7P N}\qP N}]PP N}m6P N~(XP N~XXP OIRP OITP OX<P Ok(P Ok)P O3P OxP O	P O	P O	VP O	WP OP ORP O
sP O9XP O<P O<wP$
O$UP O$+7P O$+<P O$,P O$,wP O$8qP O$8yP O$8{P O$9P O$9P O$;P O$;7P O$;<P O$<P O$<P O$<P O$<P O$<WP O$<qP O$<}P O$=VP 
O$H2P O$H:P O$H<P O$I3P 
O$KQP O$LP O$LqP O$XXP O$lP O%
zP<P O%K<P O%]VP 	O%]YP 	O%|P O%|P O&	vP 
O&
[P O&zP O&8tP O&<P O&KP O&K9P O&MVP O&]VP 
O&}P O&}P O,pP O,tP O,vP O,P O4J9P O4[RP O4lP O6
P O<\P O<\ZP O<\wP O<]P O=\hP O=\iP R)P R)P R)YP R,RP R,SP R-sP R4+zP R4,qP R4,sP R4,}P R486P R487P R489P R48PP R48YP R491P 
R4;P R4;6P 
R4;WP R4;ZP R4<QP R4DP R4D+P R4DHP R4E*P R4EIP R4FP R4I7P R4K9P R4LrP R4i2P 	R4i8P R4i9P 	R4i;P R4kSP R4lqP R4lsP R4lwP 
R58P R59P R5xP R59	P R5<TP R5=P R5=P R5=P R5=P R5=P R5=P R5H6P R5H:P R5HSP R5HVP 
R5HXP R5IP R5J6P R5J:P R5KVP R5KYP R5K[P R5LP R5VP R5YP R5YQP 
R5Z2P R5[rP R69P R6	P 
R6
rP R6)P R6);P R6*2P R69:P R6;P R6;6P 	R6=P R6=P R6HxP R6IP R6IP R6JP R6KP R6K;P R6LRP R6LUP R6L\P R6MP R6MVP R6MvP R6[VP R6\XP 	R6x:P R6{P R6{P R6{P R6}P R\(P R\)P R\)P R\tP R\WP R\KXP R\KuP R\KzP R\LQP R\NP R\NP R\i0P R\i4P R\i8P R\j7P R\kzP R\lYP R\l\P R\mzP R][VP 2R]kP R]kRP R]lP R^8qP R^8tP R^9P R^:2P R^;uP R^IP R^IP Rz
PzRzP{Rz(P|Rz)P|Rz*P|RzHP|RzhP|RzHP|RzHP|RzP|Rz%P|Rz%jP|KP R|(zP R|*pP R|*qP R|+P 
R|:1P R|;P 
R|;qP R|;vP R|HUP R|LrP R|LrP R|LsP R|LxP 
R|LyP 
R|X1P R|XqP R|XtP R|[P R|^P R|^P R|hyP R|kP R|kQP R|lVP R|lxP R|x7P R|{9P R|{9P 	R}P R}
PHR}zPHR}1PKR}QPKR}qPKR}wPXP R}iQP R}lZP R}xzP R}yVP R}z1P R}z8P R}|zP R}}1P R}}9P R~3P R~YP R~zP 
R~
}P+	R~(YP,P R~,xP 
R~-P R~8VP R~8YP 
R~9:P R~:8P R~;P R~;9P 	R~;RP R~;xP R~<zP R~<}P R~=P R~=P R~=P 	R~H1P R~H8P R~IP R~J1P R~KqP R~LVP R~LwP R~LxP 
R~MP R~N8P R~YP R~[UP R~z2P RSP RwP S,}P SI;P S^P SkVP Sm7P Sy7P SI7P S
WP S)1P S,}P S98P SiP Si\P SlxP Sm7P SmYP S8yP S<RP S=yP SI;P Si9P Sj6P Sm7P S
RP SRP S)1P S*2P S-P S<RP S=rP SIP SK2P SM7P SL9P SL9P SLElP 
SLIP SLK9P SLLPP 
SLLuP SLMP SLMP 
SMLPSSMLPSSMXyP SM\P SM]P SN8P SN9P SNxP 	SNyP SNP SN
SNMP SN}P 	W$sP W&{P W&)2P W&9:P WD:P WF
QP#WFLVP"j.+jP >}{woP