Google
 
Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_1_19910112 - 6-1-monitor/anaunv.unv
There are 32 other files named anaunv.unv in the archive. Click here to see a list.
x
,5	@P E
eQ xEv@Q E

L@QE}@Q:E@E;ZP EH2P E]4P EkP E>Q xE|P E

L@Q E&mQ E&'P'E7`P'EC& Q EC&( P'EC&,Q ~EC&,`Q |ER Q xESQ EW`P'EWpQ  E^hQ G"\ {ij$
IFB  <A@Y>,<	LOCAL <PARAMS@y>		>
IFNB <A>,<A	LOCAL <PARAMS,A!A>	>
	LALL
DEFIN!`E LH<0(PARAMS)>
"DEFINE LP<1(PARAM" S)>
DEFINE FH<2("@PARAMS)>
DEFINE "`FP<3(PARAMS)>
DE#FINE JCN<4(PARAMS# )>
DEFINE WILDOK#@<5(PARAMS)>
DEFI#`NE FN<6(PARAMS)>
DEFINE ARG1<7(PA$ RAMS)>
DEFINE AR$@G2<10(PARAMS)>
	SALL
RAMS)>
	G"\ %j,
	PURGE L%!H,LP,FH,FP,JCN,WI%@LDOK,FN,ARG1,ARG2
	RESTORE
RG2G"\P G6<`Q xG6yQ ?`G6>x Q xG6L@Q `G7L@Q @G7\ Q xG7&;`Q xG7&<@Q xG7&=Q xG7'Q @GCM|P @GfJ6P IP'I6= wh'L
	A==<-1xB<C>+1B<C-D>> x(
	IF1,<IFDEF %AxH,<PRINTX ?A ALRExhADY DEFINED>>
	DyEFINE %A (OP,AC,y(Y,MSK)<
	$A==<ZyH B>		
	OP (<AC>,B'Y,MSK)><AC>I6|R ?l	IF1 <IFDE?1F A,<PRINTX ? Mu?Pltiply defined of?pfset in DEFWRD>>

;Make symbol p@0rintable or not d@Pepending on if ov@perlaps AC's

	AA==:..OFST			;SetA0 value as offset APinto table
	IFB Ap<B>,<..OFST==..OBFST+1>	;IncrementB0 offset
	IFNB <BPB>,<..OFST==..OFSBpT+B> ;Incrment by buffer size
I0@ Id`Q IB^LQ xIC&(`Q IOQ xIRMY P'IT,lSP IT-

zP IT-i:P IT.

WP IT.

ZP IT.<SP IWP J:P @KP PK P @K3P pK3 P `K:%|P KKP KbN@ IQ\O
	IFN $ACIqVNM,<JRST A>
	IFE $ACVNM,<RET>M&v({P M&v;ZP M.E|zP ~MHP MJm8Q  MPt(xP O ,XQ @O ,K1Q  O'8 0Y[U<C>B1!<B>B5!<A>B35!<B	u*YY0PRFT,sE0ERI9O\,8P O\,M6P O\-

zP O\.

VP O^<}P O^E`Q ?@O^L=P'O_Q  O_`Q 8O_'Q O_.Q @Q"mQ Q'L}P Q2&,}P QJ&tQ xQJ&t P!QNnQ QO$yP QO%P'QO%\uQ QO%k8Q xQR~KQ QSHZP @QSH[XP SEQ ~SF=Q ~SM\P!Se}`P SmP!St]Q |ShYP ShY1P ShY9P ShZ8P ShZ9P Sh\P Sh\RP Sh\xP Sh]P Sh]P Sh]P SpP  S"

L@Q S"@ Y`'
	MOVEI C9X,2(A)
	ADDI CXy,0(B)
	AOS 0(CX)B)
	AOS 0(CXS"6N Q @S"F=Q |S"FD@P S"FN Q xS"M\Q S"dI@P!pS"d[@Q ?pS"ej`P S"m@Q xS"nN P xS"t]Q ?`S#D P S#N Q @S2&,}P S78tP S7
8Q @S;

@Q ?`S;l@Q xS;%KUP MS;%m6Q xSB~
  OPTIONQi(I,END,,^D0,^D1,R)A,B,C)
  OPTIORIN(I,NOP,,^D1,^D1,_iA,B,C)
  OPTIwION(I,LSR,C,^D3,^Dwh7,A,B,C)
  OPxTION(I,RRT,,^D7,^x(D7,A,B,C)
  OxHPTION(I,SID,C,^D8xh,^D4,A,B,C)
 y OPTION(I,SSR,,^Dy(9,^D7,A,B,C)
yH  OPTION(I,STY,C,yh^D2,^D11,A,B,Cz)

  OPTION(I,Tz(SP,,^D68,^D8,A,B,C)

8,A,SF5FQxSF5SFfQ`SGlQ xSGLQ `SG+ Q xSG-@P xSGK Q xSGM@Q xSG Q xSG
e|P YmQ Yf
zP Y&'Q Y2}<@Q Y:e<@P'Y> 6q[K
	IFG $AC7VNM,<	$IPMSG(\.,<70?LOCAL: Missing R7PESTORE>,\$ACVNM)
			$ACVNM==0>
	8IRP A,<	IFGE $AC80VNM-NLOCLS,<$IPMS8PG(\.,<?Too many L8pOCALs>)>
			$DFA9CL(A,\<$ACVNM>)
			$ACVNM==$ACVNM+1>CVNM==$ACVNY><}P Y>e<@Q xYO|P AY^~)Q []hz VQs-

;The fVqollowing section Wis the same amongW0 all NCT's
.NCTWPB=:.			;Set addreWpss of this NCT
	XEXP	0		;Link wordX0 to next NCT in lXPist
				;(filledXp in by MNTINI)
NYCTNUM==NCTNUM+1		Y0;Increment numberYP of NCTS defined

	XWD	NT.TYP,NTZ.DEV	;Protocal anZ0d device codes
	ZPEXP	NT.NUM		;Net Zpindex
NT.NUM==NT[.NUM+1		;incremen[0t net index
	EXP[P	-1		;Internet ne[ptwork number (not\ yet set)
	EXP	-\01		;Internet Addr\Pess of this inter\pface
	EXP	0		;Lo]gical host mask f]0or this network
]PIFB  <C>,<XWD 37]p7777,-1>	;Maximum^ packet size
IFN^0B <C>,<EXP C>		^P;Maximum packet s^pize

;NCP/_AN20  MAKSAV  MAC_0RO  Creates  an  _Pinterrupt  AC  sa_pve and dispatch
`;routine in the c`0urrent NCT at the`P current location`p. Uses The followaing
;locations (a0which therefore maPust be defined foapr  that  net  typbe).  The
;argumeb0nt  PDP  is the abPddress of a Push bpdown pointer for cthis routine.
;Dc0ISP is the offsetcP of the dispatch cpaddress.

DEFINdE MAKSAV(PDP,DISPd0)
<	MOVEM P,.NCTdPB+NTSVAC+17	;Savdpe P
	MOVEI P,.NCeTB+NTSVAC	;Wheree0 the AC's go
	BLePT P,.NCTB+NTSVACep+16	;Save all
	MfOVE P,PDP			;Set f0new P
	XMOVEI P1fP,.NCTB		;Point tfpo NCT
	CALL	@DISgP(P1)		;And Goto g0routine
>					;EgPnd of MAKSAV

gp
;MAKRES  -  Makeh  a 3 word AC resh0tore , dismiss inhPterrupt routine. hpAC's
;are assumeid stored at NTSVAi0C. Arg PCW is theiP address of the  ipinterrupt
;PC.
j
DEFINE	MAKRES(Pj0CW)
<	MOVSI P,.NjPCTB+NTSVAC	;Fromjp there to 0
	BLTk P,P				;Restore k0all AC's
	XJEN .kPNCTB+PCW		;And dkpismiss the interrlupt
>					;End ol0f MAKRES MACRO
lP
IFE <<NT.TYP-NT.lpNCP>!<NT.DEV-NT.AmNX>>,<

IFN NICm0SW,<			;[NIC002] mPModify symbols fompr different addrsn
	PURGE ANI,ANO
	ANI==ANXA		; InPnput device addrenpss
	ANO==ANXA+4o		; Output side ao0ddress
>;IFN NICoPSW
IFE NICSW,<
op	ANI==520		; Inpupt device address
	ANO==524		; OutpPput side address
>;IFE NICSW

	qCONSZ ANI,(T1)		;q0NTCNSZ - CONSZ InqPput
	CONSO ANI,(qpT1)		;NTCNSO - COrNSO Input
	CONO r0ANI,(T1)		;NTCONOrP - CONO Input
	CrpONI ANI,T1		;NTCOsNI - CONI Input
s0	DATAO ANI,T1		;NsPTDATO - DATAO Inpsput
	DATAI ANI,T1t		;NTDATI - DATAIt0 Input
	NCTDSP AtPNXINI		;NTINI  - tpInitialization inustruction
	NCTDSu0P ANXKIL		;NTKILLuP - Shutdown instrupuction
	NCTDSP AvNXRSS		;NTRSRT - v0Restart instructivPon
	NCTDSP ANISRvpT		;NTISRT - Starwt input instructiw0on
	NCTDSP ANOSRwPT		;NTOSRT - Starwpt output instructxion
	NCTDSP IMPEx0IN		;NTIDUN - InpxPut done dispatch
	NCTDSP IMODUN		y;NTODUN - Output y0done dispatch
	NyPCTDSP IMPHDR		;NTypLLDR - Make headezr instruction
	Nz0CTDSP RSKP		;NTOTzPOK - CLear packetzp for output
	NCT{DSP R			;NTMAIN -{0 Maintainance
	N{PCTDSP ANXSCK		;NT{pSCHK - Status che|ck instruction
	|0BLOCK NTOCNO-NTIB|P	;NTIB through  N|pTOTYP
	CONO ANO,}(T1)		;NTOCNO - C}0ONO Output
	CONI}P ANO,T1		;NTOCNI }p- CONI Output
	C~ONSO ANO,(T1)		;N~0TOCSO - CONSO Out~Pput
	CONSZ ANO,(~pT1)		;NTOCSZ - CONSZ Output
	DATA0O ANO,T1		;NTODTOP - DATAO Output
p	DATAI ANO,T1		;NTODTI - DATAI Out0put
	XPCW .+1		;PNTIINT - Interruppt instruction
	BLOCK 2			;NTIPCW 0- Inturrupt PC stPorage
	EXP 0			;pNTINPC - New flags (Input)
	IFE R0EL6,<MSEC1,,.+1>	P;         New PC p(Input save)
	IFN REL6,<XCDSEC,,.0+1>	;         NewP PC (Input save)
IFN NICSW,<
	MAKSAV	(IMPDPA,NTI0DSP) ; [NIC002] NPTIISV - 6 words opf AC save routine
>;IFN NICSW
IF0E NICSW,<
	MAKSAPV (IMPPDP,NTIDSP)p	;NTIISV - 6 words of AC save rout0ine
>;IFE NICSW
	MAKRES (NTIPCW)p		;NTIIRS - 3 words of AC restore 0routine
	XPCW .+P1	       	;NTOINTp - Interrupt instruction
	BLOCK 20			;NTOPCW - PC sPtorage
	EXP 0			p;NTONPC - New fla	gs
	IFE REL6,<MS	0EC1,,.+1>	;      	P   New PC (Output	p save)
	IFN REL6
,<XCDSEC,,.+1>	; 
0        New PC (O
Putput save)
IFN 
pNICSW,<
	MAKSAV (IMPDPA,NTODSP)	0;NTIOSV _ 6 wordsP of AC Save
>;IFpN NICSW
IFE NICS

W,<
	MAKSAV (IMP

0PDP,NTODSP)	;NTIO

PSV _ 6 words of A

pC Save
>;IFE NIC
	MAKRESN(NTOPes3o
	BLOCK 20		;NTSVAC - AC storag0e
>				;End of NPCP/ANX conditionapl

IFE <<NT.TYP-NT.NUN>!<NT0.DEV-NT.NIP>>,<
P
	JFCL          p		;NTCNSZ - CONSZ Input
	JFCL    0      		;NTCNSO -P CONSO Input
	JFpCL          		;NTCONO - CONO Input0
	JFCL          P		;NTCONI - CONI pInput
	JFCL          		;NTDATO - 0DATAO Input
	JFCPL          		;NTDpATI - DATAI Input
	NCTDSP NIPINI	0	;NTINI  - InitiaPlization instructpion
	NCTDSP NIPKIL		;NTKILL - Shu0tdown instructionP
	NCTDSP NIPRST	p	;NTRSRT - Restart instruction
	N0CTDSP R     		;NTPISRT - Start inpupt instruction
	NCTDSP NIPSTO		;NT0OSRT - Start outpPut instruction
	pNCTDSP R     		;NTIDUN - Input don0e dispatch
	NCTDPSP R       		;NTOpDUN - Output done dispatch
	NCTDS0P NIPHDR		;NTLLDRP - Make header inpstruction
	NCTDSP RSKP		;NTOTOK -0 CLear packet forP output
	NCTDSP pR      		;NTMAIN - Maintainance
	0NCTDSP NIPSTA		;NPTSCHK - Status chpeck instruction
	BLOCK NTSVAC-NTI0B	;NTIB through  PNTOTYP
>				;Endp of NIN/NIP conditional

;I0PCI nct definitioPn

IFN REL6,<IFpE <<NT.TYP-NT.NUN>!<NT.DEV-NT.CIP>0>,<

	JFCL     P     		; NTCNSZ -p CONSZ Input
	JFCL          		; N0TCNSO - CONSO InpPut
	JFCL        p  		; NTCONO - CONO Input
	JFCL  0        		; NTCONPI - CONI Input
	pJFCL          		;  NTDATO - DATAO I 0nput
	JFCL       P    		; NTDATI -  pDATAI Input
	NCT!DSP CIPINI		; NTI!0NI  - Initializat!Pion instruction
!p	NCTDSP CIPKIL		;" NTKILL - Shutdow"0n instruction
	N"PCTDSP CIPRST		; N"pTRSRT - Restart i#nstruction
	NCTD#0SP R     		; NTIS#PRT - Start input #pinstruction
	NCT$DSP CIPSTO		; NTO$0SRT - Start outpu$Pt instruction
	N$pCTDSP R     		; N%TIDUN - Input don%0e dispatch
	NCTD%PSP R      		; NTO%pDUN - Output done& dispatch
	NCTDS&0P CIPHDR		; NTLLD&PR - Make header i&pnstruction
	NCTD'SP RSKP		; NTOTOK'0 - CLear packet f'Por output
	NCTDS'pP R      		; NTMA(IN - Maintainance(0
	NCTDSP CIPSTA	(P	; NTSCHK - Statu(ps check instructi)on
	BLOCK NTSVAC)0-NTIB	; NTIB thro)Pugh  NTOTYP
>>		)p		; End of IPCIN/*CIP/REL6 conditio*0nal

IFN STANSW*P,<
; MEIS based *pEthernet (3 and 1+0MB)

IFE <NT.D+0EV-NT.MEI>,<
	JF+PCL			; CONSZ Inpu+pt
	JFCL			; CONS,O Input
	JFCL			,0; CONO Input
	JF,PCL			; CONI Input,p
	JFCL			; DATAO- Input
	JFCL			;-0 DATAI Input
	NC-PTDSP ETHINI		; NT-pINI - Initializat.ion instruction
.0	NCTDSP ETHOFF		;.P NTKILL - Shutdow.pn instruction
	N/CTDSP ETHON		; NT/0RSRT - Restart in/Pstruction
	NCTDS/pP R		; NTISRT - S0tart input instru00ction
	NCTDSP ET0PHOUT		; NTOSRT - 0pStart output inst1ruction
	NCTDSP 10R		; NTIDUN - Inp1Put done dispatch
	NCTDSP R		; NTO2DUN - Output done20 dispatch
	NCTDS2PP R		; NTLLDR - M2pake header instru3ction
	NCTDSP ET30HOOK		; NTOTOK - 3PClear packet for 3poutput
	NCTDSP R4		; NTMAIN - Main40tainance
	NCTDSP4P R		; NTSCHK - St4patus check instru5ction
	BLOCK	NTS50VAC+17-NTIB	; Sto5Prage
	>	
>;IFN STANSW

>;IFN[^s=XCDSEC,,.NCTAXCDSEC,,.N[EyP [EIP [F98Q [FKyP [&uP 
[&vJP 
[.t= Eqm1	XALL			;SFhow the lines temF0porarily

NT.NUFPM==0			;Start witFph Interface 0
NCGTNUM==0			;Start G0out at zero
DV.NGPUM==0			;Back to Gpnumber 0

NT.TYHP==NT.NCP			;NetwH0ork Type is NCP
HPNT.DEV==NT.ANX			Hp;Device type AN20I

IFE NICSW,<
I0IFN ANXN,<
MAKNCIPT(\DV.NUM,\NCTNUMIp,^D576)>	;Make thJat type NCT
>;IFJ0E NICSW

IFN NIJPCSW,<
REPEAT ANXJpN,<
MAKNCT(\DV.NKUM,\NCTNUM,^D576)K0
DV.NUM==DV.NUM+KP1
>;REPEAT ANXN
>;IFN NICSW

ILFN STANSW,<
NT.TL0YP==NT.ETH			;NetLPwork Type (reset Lpby MNETDV at starMtup)
NT.DEV==NT.M0MEI			;Device typMPe MEIS
REPEAT MEMpISN,<
MAKNCT(\DVN.NUM,\NCTNUM,^D57N06)	;Make that typNPe NCT
DV.NUM==DVNp.NUM+1		;IncremenOt number of that O0type
>;REPEAT MEOPISN
>;IFN STANSWOp

IFN IPNIN,<
PNT.TYP==NT.NUN			P0;No local protocoPPl 
NT.DEV==NT.NIPpP			;Device type QIPNI
DV.NUM==DV.Q0NUM+1		;NCT numbeQPr
MAKNCT(\DV.NUMQp,\NCTNUM,^D576)>	R;Make that type NR0CT

IFN REL6,<
IFN IPCIN,<
NT.RpTYP==NT.NUN			;NoS local protocol 
NT.DEV==NT.CIP		SP	;Device type IPCSpI
DV.NUM==DV.NUMT+1		;NCT number
T0MAKNCT(\DV.NUM,\NTPCTNUM,^D576)>>	;MTpake that type NCTU

DV.NUM==DV.NUU0M+1		; increment UPnumber of that tyUppe
	SALL			; AgaVin suppress expansions
ss expan[/LY 6s9
..TMP==061			;Start at NCT 6P#0
REPEAT %NETS,6p<
	MAKPTR(\..TMP7)
	..TMP==..TMP+1>
TMP==..TMP+[/<: 11[
	ROT T2,1Q-^D9
	LSHC T1,^D27
	HRRI T1,A[;$86 C1lCALL @A(P1)CALL @A(P[;%,Y CqlJRST @A(P1)JRST @A(P[;'z D1l#XCT A(P1)XCT A(P1)[>&98 #IbTLZ A,(-MAXSEQ)LZ A,(-M[Ne|P [b>z1P ]
>@P']Y Q x]$Lx Dql+IFE REL6,<EMSEC1,,A>
		  IE0FN REL6,<XCDSEC,,<A&777777>>C,,]$8 Q |]$8@Q ~]$8`Q ]$;Q ]%m6 K]

	TXNN	BJq,.NETCA		; Class JQA network?
	OJRSJ1T	[LOAD	A,NETCA,OI+B	; Get number
		 JRST	c]
	TXPNN	B,.NETCB		; CP(lass B?
	 JRST	[PHLOAD	A,NETCB,+BPh
		 JRST	c]
	LQOAD	A,NETCC,+B	Q(	; Must be class C
c:!e class ]%{@P ]"YP ]&EYP ]&EZP ]2|;P ]?|P ]?&>7P ]Pr;1P ]Pt\P ]Pt:8P ]Pt]P ]PuY4P ]PuhxP ]Puj7P ]Puj8P ]Pum7P ]Q
zP ]RiVP ]RP ]RP ]RlwP ]Rl}P ]R{TP ]R{WP ]R$P ]R$P ]R$]@P']R-\P ]R-hzP ]R.,SP ]R.JP ]R5L`P ]RExTP ]RExWP ]RF=P ]RF=P ]RF=P ]RL P 

]RLLxP 	]RMZP ]RMYP #]RM{P  ]RMj P ]RMlP ]RMlP ]RMxTP ]RMxWP ]RM|YP *]RM|{P ']RN{P ]RN7P ]RN<P ]RN<ZP ]RNN8P ]RN\P ]R]P ]RdP ]ReIP 
]Rej`Q ]RexTP ]RexWP ]Rl7P ]Rt]P ]RuJP ]Ru|P ]Rv[ P']R| P 

]R|;TP ]R|;WP ]R|<wP ]R|<}P ]R|LxP $]R}lP &]R~{P %]R~)P ]R~<ZP ]R~KuP 
]R~N8P ]R~\P ]S*7P ]S:=P ]SN P ]S<ZP ]S:P ]SHtP ]SXWP ]Sh1P +]S%}:P ]S'Q x]SDKZP ]SF\P _,P _C%w zI_X
IFDIF <@9C>,<C>,<	BOPT==ziD	>
IFIDN <C>,<{	C>,<	BOPT==CPYOPT+D	>
==CPYOP`:P`H@Q`L@a`P@`T@Qa0Qaa<`Qaxa%@Qaa@QPaQ@xa}@Qaa\QPaM`QaPad|`QPa@Qaa&<`QPxa&$`Qaa&%Qaxa&%pQa@a&5I`Qaa&5pP#xa&F+Qa&FL@Qa&dN Qa&l`P$a&vKQa'@Q	xa'(`Q 8a'+`Q ?`a'Q xa'Q `a'%|`Q ?`a'&KQ @a'4\@Q xa/ @ a/$[P a/$kP a/&P a/&:4P a2K`Q @a2\9Q  a:d;Q a? t /"<^L<<A>&<-<A>>>><<A>&<a@(]YQ a@,J`Q a@,M7Q a@,yQ a@,|yQ  a@-]Q @a@.
	|			IRP C,<.X==.X+|IPT%%C>
			PT%A==.X>
			PT%AaP(Y4Q aP(Y7Q aP(Y9Q aP(Y:Q aP(YsP @aP(Y{P aP(Z1P  aP(Z7P  aP(Z8P aP([Q  aP([Q @aP([Q aP([Q aP([ZP aP([zP @aP(\|P aP(]P"aP(]8P!aP(]9P aP(]QQ aP(]SQ @aP(]TQ aP(]TQ aP(]WQ  aP(]XQ aP,.8Q 
NaP,9Q ",aP,:qQ "%aP,:yQ "%aP,:zQ "'aP,:|Q "'aP,J3Q 
2aP,yQ B,aP,zqQ B%aP,zyQ B%aP,zzQ B'aP,z|Q B'aP-Q ,aP-Q WaP-YQ 
MaP-qQ %aP-xQ 'aP-3Q LaP-8Q 7aP-PQ 
2aP-8yQ 
%aP-9Q 
JaP-9Q 
&aP-9YQ 
HaP-:0Q 
IaP-:7Q 
IaP-:8Q 
$aP-:9Q 
(aP-::Q 
(aP-<Q 
HaP.3Q 
0aP.Q 
LaP.)tQ 
WaP.){Q 
,aP.H1Q @aP.H5Q @aP.HRQ 8aP.HuQ AaP.IQ B,aP.IQ 
2aP.IQ RaP.I9Q DaP.J2Q 
8aP.J7Q NaP.J9Q 
@aP.J9Q !aP.J:Q #aP.JqQ 
%aP.JrQ 
&aP.JwQ 
'aP.JyQ 
$aP.JyQ 
&aP.JzQ 
(aP.J|Q 
'aP.KuQ !aP.KwQ .aP.KyQ AaP.LQ XaP.L9Q 
0aP.L<Q PaP.LPQ 1aP.LRQ ,aP.LYQ 
 aP.L\Q LaP.LqQ BaP.LrQ WaP.LvQ "aP.LzQ  aP.MQ 
/aP.YQ ,aP.YQ AWaP.ZxQ 	DaP.ZxQ 	'aP.ZyQ 	(aP.ZzQ 	(aP.\0Q !aP.\2Q AaP.\7Q 	LaP.\:Q 7aP.\UQ ,aP.\uQ WaP/P aP/P aP/	P aP/	P aP/
P aP/
P aP/P aP/P aP/

PaR<`Q`aRKQ?`aR%pQ xaR8Q aSQ aS6@P'aWpQ aW|Q xaW&91 9Y[HRLZI A,BHRLZI A,a^tK`Q xac Q cI7P c:/

zP e-i:P e.LtP e.LwP eb`P eKy GQ\G
	IFLE $AGqCVNM+$STVNM+$TMVNHM,<$IPMSG(\.,<?ExH0tra RESTORE macroHP>,\$ACVNM,\$STVNMHp,\$TMVNM)>
	$HERETMVNM)>
	$HEReK%|Pgg yYHRLI A,BHRLI A,Bg&%|P Dg;I8Q gO|P gR

:v A\
	IFG $ACA1VNM+$STVNM,<	$IPMAPSG(\.,<?STACKL: MApissing RESTORE>,\B$ACVNM,\$STVNM)
B0				$ACVNM==0
		BP		$STVNM==0>
	IRBpP A,<	$STKL1(A)C>
	JSP CX,.TRSETC0##
	$STVNM,,$STVNM	$STVNM,,$STVgRAgftVP gft92P gfv({P gfv;ZP iI\P'i@ i`P i@P !i P &iHuP i
1P 
3P iP iP iP iPP i\P i(XP 

i,P	i8XPi:=P@iIP@iK`P+iLPiL@P0iLPP iL\P iM P 5i$&Q i$=`Q i$l`Q i$y Q i${@Q i%

`Q i&\@Q i&}Q @iYQ iY1Q @iY6Q iY9Q @i[Q  i\Q i\Q i]9Q  i]vQ i(t@ ?i(w@ >ilP i| $)c
  OPTION$	(I,END,,^D0,^D1,1YA,B,C)
  OPTIO1yN(I,NOP,,^D1,^D1,?A,B,C)
  OPTI?8ON(T,MSL,,^D2,^D4?X,A,B,C)
  OPT?xION(T,LBL,,^D33,^D4,A,B,C)
^i$,`Q xi&< P'i,0P"i.-P i.MP in <[{
	IFG $TM<1VNM+$STVNM+$STVNM<P,<	$IPMSG(\.,<?TE<pMP: Missing RESTO=RE>,\$ACVNM,\$STV=0NM,\$TMVNM)
				=P	$STVNM==0
					=p$TMVNM==0
					$>ACVNM==0>
	IRP >0A,<	IFGE $TMVNM-N>PTEMPS,<$IPMSG(\.,>p<?Too many TEMPs>?)>
			$DFTMP(A,?0\<$TMVNM>)
			$TMVNM==$TMVNM+1>i)@Q xi+@P'i Q @i)@Q xi-P$i@Q iD0Q iQ i&4I@Q @i&vJP i&vL@Q ~i&~	@P'i'K`Q i'|@Q |i'} Q xi*`P'i*5`P'i*L( @ >i*L) @ =i*|( @ =i*|)@@ <i2@Q i3Q i6v-P'i7F-Q i;,k P$i>6*`P'i?jQ i?lQ xi?JQ i?i@Q `i?=l@Q xiBL8 P iBL9 P'piBL<@Q |iBL<`Q xiBL= Q ~iBL>P `iBLh P'iBLi P'iBLl@P'iBLl`Q xiBLm Q xiBLnQ xiB^@@ iC4 Q xiC4@P'iC`Q iJ0Q iJ P'iJ. Q iJmQ piJN0Q iJd`Q iJdmQ iJf{@Q iKQ @iK@P 8iK.)`P iK.,Q iK=iQ xiKEQ iKFQ iKF	Q xiKF
 P'iKF@Q `iN

-P iNQ iNQ iN P'iN
`Q iN Q  iN.Q iN6Q iNdmQ iNfh`P'iNfk@Q xiNn-Q xiNo@Q iNo

Q iN~@P iO|P "iO,`P iO\ Q iO`P iO@P iO$P ?iO%pQ iO&k`P @iO-|P  iO.)`P iO.,Q iO=iQ xiRt]P iR~	@P'iR~0Q xiSK`Q iS|@Q |iS} Q xiS%@Q ?`iS6@Q i[%@P i^dK@Q  i^dLQ i^dMQ k@P o&  EIL,<^L<-<<A>_<^L<A>>>-1>>>qP q P q3P 0	kVP 	4v 9q[]
	IFDEF :A,<$IPMSG(\.,<?LO:0CAL AC A already:P defined>)>
	PUS:pH P,T1+NTEMPS+B
	A==T1+NTEMPS+;0B
	$PURGE A
	$;PPOP T1+NTEMPS+BOP T1+NTEMPS+B	6K8 ?q\
	IFDEF @A,<$IPMSG(\.,<?TE@0MP A already def@Pined>)>
	A==T1+B
	$PURGE A+	".)  4[!
	$INFO
	$INIT
	$INFO
	&tk` \IA
B	&u 2[
	DEFINE 21$INFO(X,Y)<X
Y>P
$ACVNM==0
$STVN2pM==0
$TMVNM==0
=0
$TMVNM==0
	'\s 4Q['
PRINTX B 4qat A (C,D,E)t A (C,D,E)	B~ 51[/
	GSOPDEF5Q %POP%,<POP P,>
5p	$REMOTE (<%POP% A>)TE (<%POP% 	C.)r 61[3$REMOTE (<PURGE A>)TE (<	J-[z 31[$INFO(<DEF3QINE $INFO(X,Y)><X
A,Y>)X,Y)><X	NL{V &aku
	XMOVEI &AT1,A		;Process t&!o signal
  IFE 'B,<
	MOVE T3,TOD7QCLK		;Now
	SKIPL7p T2,PRCWAK(T1)	;I8f no wakeup set, 80NOW is ok
	 CAML8PE T2,T3		;If past8p due, queue
	  S9KIPLE NSKED		;NOW90 is ok unless NOS9PKED
	:0 JRST c	9p	;No.  Get in Q f:or FIFO behavior
	PUSH P,PROC		;D:Po it NOW
	MOVEM :pT3,PRCSGT(T1)	;TO;DCLK of most rece;0nt SIGNAL
	CALL ;PTCPTSK		;Call the;p task
	POP P,PRO<C		;Restore our I<0D as running proc<Pess
	JRST d		;A<pll done
c:	>	;I=FE B

;Avoid s=0tack overflow on =PKA, always queue
	MOVX T2,B		;Nu>mber of milliseco>0nds
	CALL SIGNAL>P
  IFE B,<
d:  >

B,<
d:	O%; Cq\$STKL2(A)$STKL2(A)	O%;	 D1\+
	$STKL3(DQA,\$STVNM)
	IFBDp <B>,<$STVNM==$SETVNM+1>
	IFNB <E0B>,<$STVNM==$STVNM+B>VNM==$STVN	O%;	 Eq\9
	IFDEF FA,<$IPMSG(\.,<?STF0ACKL local A alrFPeady defined>)>
Fp	DEFINE A<^OB+1G(P6)>
	$PURGE A6)>
	$PURGE A	O&kVP 	RnkVP 
J8 /Ij~
	$BBLIP=/i=<Z 11>		
	A (<B>,11C,D) (<
m +)j^
	$BCNT==+I<Z BFRCNT>		
	A+h (<B>,BFRCNTC,D)B>,BFRCNTC,
$ &jV
	$BDADR=*A=<Z BFRDAD>		
	*`A (<B>,BFRDADC,D)B>,BFRDADC,
-{ (1jG
	$BEOL==(Q<Z BFRFLG>		
	A(p (<B>,BFRFLGC,D)B>,BFRFLGC,
6*| .jr
	$BFRKX=.!=<Z 10>		
	A (<B>,10C,D) (<
D ,1je
	$BHADR=,Q=<Z 6>		
	A (<B>,6C,D)A (<
L;Z -jk
	$BICNT=-9=<Z 7>		
	A (<B>,7C,D)A (<
LN 6	k2
	$BIDX==6)<Z 13>		
	A (<B>,13C,D) (<
n3 0)k
	$BMPAG=0I=<Z 11>		
	A(<B>,11C,D) (<L@ 1k
	$BPTR==11<Z BFRPTR>		
	A1P (<B>,BFRPTRC,D)B>,BFRPTRC,LP 4!k&
	$BPTRA=4A=<Z BFRPTR>		
	4`A (<B>,BFRPTRC,D)B>,BFRPTRC,LX 2k
	$BPTRP=29=<Z BFRPTR>		
	2XA (<B>,BFRPTRC,D)B>,BFRPTRC,LY 3!k
	$BPTRS=3A=<Z BFRPTR>		
	3`A (<B>,BFRPTRC,D)B>,BFRPTRC,$8@ 5)k,
	$BTCB==5I<Z 13>		
	A (<B>,13C,D) (<&0 6qk9
	$BTS==<7Z 14>		
	A (<B>,14C,D) (<B.3 .ajx
	$BUPAG=/=<Z 10>		
	A (<B>,10C,D) (<.)` ')j>
	$BURG=='I<Z BFRFLG>		
	A'h (<B>,BFRFLGC,D)B>,BFRFLGC,=P )9jO
	$BWM==<)YZ BFRFLG>		
	A )x(<B>,BFRFLGC,D)B>,BFRFLGC,Dl:y &!b4
	$CMCKS=&A=<Z 0>		
	A (<B>,0C,D)A (<l;r %9b-
	$CMCOD=%Y=<Z 0>		
	A (<B>,0C,D)A (<l}p )AbN
	$CMGWA=)a=<Z 1>		
	A (<B>,1C,D)A (<m '	b:
	$CMID==')<Z 1>		
	A (<B>,1C,D)A (<Bn
	$CMPTR=(y=<Z 1>		
	A (<B>,1C,D)A (<n98 'qbA
	$CMSEQ=(=<Z 1>		
	A (<B>,1C,D)A (<nLw *)bT
	$CMTSO=*I=<Z 2>		
	A (<B>,2C,D)A (<nLy +b[
	$CMTSR=+1=<Z 3>		
	A (<B>,3C,D)A (<nLz +yba
	$CMTST=,=<Z 4>		
	A (<B>,4C,D)A (<nN8 $Qb'
	$CMTYP=$q=<Z 0>		
	A (<B>,0C,D)A (<&0 _}
	$DDS==<9Z PPBFSZ+1>		
	XA (<B>,PPBFSZ+1C,D),PPBFSZ+15H3 }	_l
	$DFLAG=})=<Z PPBFSZ+0>		
}I	A (<B>,PPBFSZ+0C,D),PPBFSZ+= !`
	$DPKTP=A=<Z PPBFSZ+3>		
`	A (<B>,PPBFSZ+3C,D),PPBFSZ+LQ )`
	$DPTRC=I=<Z PPBFSZ+4>		
h	A (<B>,PPBFSZ+4C,D),PPBFSZ+0 ~_u
	$DSS==<~9Z PPBFSZ+1>		
	~XA (<B>,PPBFSZ+1C,D),PPBFSZ+1%2 `
	$DTIME=9=<Z PPBFSZ+2>		
X	A (<B>,PPBFSZ+2C,D),PPBFSZ+=
9 /b{
	$GWHIS=/9=<Z 0>		
	A (<B>,0C,D)A (<=z 0ac
	$GWICT=1=<Z 0>		
	A (<B>,0C,D)A (<>
8 -Ibn
	$GWPIP=-i=<Z 0>		
	A (<B>,0C,D)A (<>< 0c
	$GWSPC=0!=<Z 0>		
	A (<B>,0C,D)A (<>N8 .1bu
	$GWTYP=.Q=<Z 0>		
	A (<B>,0C,D)A (<>\ ,abh
	$GWUP==-<Z 0>		
	A (<B>,0C,D)A (<B"D;Z -	Zl
	$HHCNT=-)=<Z .NBHHL>		
	-HA (<B>,.NBHHLC,D)B>,.NBHHLC,#Mh C	t
	$HRDW0=C)=<Z NTHST0>		
	CHA (<B>,NTHST0C,D)B>,NTHST0C,#Mh D	t$
	$HRDW1=D)=<Z NTHST1>		
	DHA (<B>,NTHST1C,D)B>,NTHST1C,#\ "ib
	$HSMPL=#	=<Z 1>		
	A (<B>,1C,D)A (<#J2 =isr
	$HSTIDX>	==<Z HOSTN>		
	>(A (<B>,HOSTNC,D)B>,HOSTNC,#KV >qs{
	$HSTNMP?==<Z HOSTN>		
	?0A (<B>,HOSTNC,D)B>,HOSTNC,#%} "b
	$HTOTL="!=<Z 0>		
	A (<B>,0C,D)A (<&
  :sR
	$IAHI==:!<Z 0>		
	A (<B>,0C,D)A (<B&

z :isX
	$IAHST=;	=<Z 0>		
	A(<B>,0C,D)A (<&
	$IAIMP=;i=<Z 0>		
	A(<B>,0C,D)A (<&
	$IALOW==)=<Z 0>		
	A(<B>,0C,D)A (<&
	$IAMID=<I=<Z 0>		
	A(<B>,0C,D)A (<&
	$IANET=99=<Z 0>		
	A (<B>,0C,D)A (<&D $AZ(
	$IHADR=$a=<Z .NBLD1>		
	%A (<B>,.NBLD1C,D)B>,.NBLD1C,&Dm )Yv
	$IHFTY=I=<Z .NBLD0>		
	hA (<B>,.NBLD0C,D)B>,.NBLD0C,&E

z %IZ0
	$IHHST=%i=<Z .NBLD1>		
	&A(<B>,.NBLD1C,D)B>,.NBLD1C,&E
	$IHHT2="Q=<Z .NBLD0>		
	"pA(<B>,.NBLD0C,D)B>,.NBLD0C,&E
	$IHHTY=#Y=<Z .NBLD1>		
	#xA (<B>,.NBLD1C,D)B>,.NBLD1C,&E8 &QZ9
	$IHIMP=&q=<Z .NBLD1>		
	'A (<B>,.NBLD1C,D)B>,.NBLD1C,&EI  1Z
	$IHLDF= Q=<Z .NBLD0>		
	 pA (<B>,.NBLD0C,D)B>,.NBLD0C,&EI7 *iZZ
	$IHLEN=+	=<Z .NBLD2>		
	+(A (<B>,.NBLD2C,D)B>,.NBLD2C,&EKU 'QZA
	$IHLNK='q=<Z .NBLD1>		
	(A (<B>,.NBLD1C,D)B>,.NBLD1C,&EZ) (YZI
	$IHMI2=(y=<Z .NBLD2>		
	)A (<B>,.NBLD2C,D)B>,.NBLD2C,&E] !1Z
	$IHMTY=!Q=<Z .NBLD0>		
	!pA (<B>,.NBLD0C,D)B>,.NBLD0C,&Ei: 1Y
	$IHNET=Q=<Z .NBLD0>		
	pA (<B>,.NBLD0C,D)B>,.NBLD0C,&F	 +iZb
	$IHPD1=,	=<Z .NBLD2>		
	,(A (<B>,.NBLD2C,D)B>,.NBLD2C,&F= )aZR
	$IHSTY=*=<Z .NBLD2>		
	* A (<B>,.NBLD2C,D)B>,.NBLD2C,&v

 /Z}
	$INPPR=/9=<Z .INPRO>		
	/XA(<B>,.INPROC,D)B>,.INPROC,&v
	$INPVR=.1=<Z .INVER>		
	.PA (<B>,.INVERC,D)B>,.INVERC,&vKZ K9\]
	$INTNUMKY==<Z >		
	A (<B>,C,D)A (<'

j LAth
	$IQFHM=La=<Z .IQFHM>		
	MA (<B>,.IQFHMC,D)B>,.IQFHMC,'

j Ft5
	$IQFHV=F1=<Z .IQFHV>		
	FPA (<B>,.IQFHVC,D)B>,.IQFHVC,'

l Pau

	$IQFPM=Q=<Z .IQPTM>		
	Q A(<B>,.IQPTMC,D)B>,.IQPTMC,'
	$IQLPM=Oy=<Z .IQPTM>		
	PA (<B>,.IQPTMC,D)B>,.IQPTMC,'	X J1tW
	$IQPFP=JQ=<Z .IQPTV>		
	JpA (<B>,.IQPTVC,D)B>,.IQPTVC,' I)tN
	$IQPLP=II=<Z .IQPTV>		
	IhA (<B>,.IQPTVC,D)B>,.IQPTVC,'

V K9t_
	$IQPRM=KY=<Z .IQPRM>		
	KxA (<B>,.IQPRMC,D)B>,.IQPRMC,'

[ E	t,
	$IQPRV=E)=<Z .IQPRV>		
	EHA(<B>,.IQPRVC,D)B>,.IQPRVC,'
	$IQPTM=Nq=<Z .IQPTM>		
	OA(<B>,.IQPTMC,D)B>,.IQPTMC,'
	$IQPTV=HA=<Z .IQPTV>		
	H`A (<B>,.IQPTVC,D)B>,.IQPTVC,': MItp
	$IQSHM=Mi=<Z .IQSHM>		
	NA (<B>,.IQSHMC,D)B>,.IQSHMC,': Gt=
	$IQSHV=G9=<Z .IQSHV>		
	GXA (<B>,.IQSHVC,D)B>,.IQSHVC,2;Z Qa
	$LCCNT=q=<Z 3>		
	A (<B>,3C,D)A (<2LN ar
	$LIDX==!<Z 1>		
	A (<B>,1C,D)A (<B2ezy iax
	$LLOKR=	=<Z 2>		
	A (<B>,2C,D)A (<2uJy !b
	$LNLKR=!9=<Z 4>		
	A (<B>,4C,D)A (<2}Jy  9b
	$LOLKR= Y=<Z 4>		
	A (<B>,4C,D)A (<3=|R ak
	$LWORD=9=<Z 0>		
	A (<B>,0C,D)A (<:,} !Yn
	$NBBSZ=A=<Z .NBHDR>		
	`A (<B>,.NBHDRC,D)B>,.NBHDRC,:2 !Yf
	$NBQUE=A=<Z .NBHDR>		
	`A (<B>,.NBHDRC,D)B>,.NBHDRC,:.Hp M	\j
	$NETCA=M)=<Z 0>		
	A (<B>,0C,D)A (<:.Hq My\q
	$NETCB=N=<Z 0>		
	A (<B>,0C,D)A (<:.Hq Ni\x
	$NETCC=O	=<Z 0>		
	A (<B>,0C,D)A (<:.Hv L!\d
	$NETCLSLA==<Z 0>		
	A (<B>,0C,D)A (<;$I; AAt
	$NTDEV=Aa=<Z 1>		
	A (<B>,1C,D)A (<;%KU ?yt
	$NTLNK=@=<Z 0>		
	A (<B>,0C,D)A (<;%m6 B!t
	$NTNUM=BA=<Z 2>		
	A (<B>,2C,D)A (<;&N8 @at
	$NTTYP=A=<Z 1>		
	A (<B>,1C,D)A (<B

:` 8acH
	$PACK==9<Z 3>		
	A (<B>,3C,D)A (<BB

:y 4Yc'
	$PACKS=4y=<Z 2>		
	A (<B>,2C,D)A (<BK 5Ac.
	$PCTL==5a<Z 3>		
	A (<B>,3C,D)A (<BB$= ]9]m
	$PDCT==]Y<Z 5>		
	A (<B>,5C,D)A (<BB& 3	c
	$PDP==<3)Z 0>		
	A (<B>,0C,D)A (<B>B-{ 9IcN
	$PEOL==9i<Z 3>		
	A (<B>,3C,D)A (<BB.98 _	]z
	$PESEQ=_)=<Z 7>		
	A (<B>,7C,D)A (<B5@ <cb
	$PFIN==<!<Z 3>		
	A (<B>,3C,D)A (<BB5Iy Rq]
	$PFLGS=S=<Z 1>		
	A (<B>,1C,D)A (<B6:= U)],
	$PFSIZ=UI=<Z 1>		
	A (<B>,1C,D)A (<BL:y sY_#
	$PICKS=sy=<Z PKTELI+.IPKPRt>		
	A (<B>,PKt8TELI+.IPKPRC,D)LI+.IPKPRC,D)BLI@ m!^p
	$PIDF==mA<Z PKTELI+.IPKSG>m`		
	A (<B>,PKTnELI+.IPKSGC,D)LI+.IPKSGC,D)BLJ v)_8
	$PIDH==vI<Z PKTELI+.IPKDH>vh		
	A (<B>,PKTwELI+.IPKDHC,D)LI+.IPKDHC,D)BLK` a9^
	$PIDO==aY<Z PKTELI+.IPKVR>ax		
	A (<B>,PKTbELI+.IPKVRC,D)LI+.IPKVRC,D)BLk ky^e
	$PIFLG=l=<Z PKTELI+.IPKSGl8>		
	A (<B>,PKlXTELI+.IPKSGC,D)LI+.IPKSGC,D)BLk` oa_
	$PIFO==p<Z PKTELI+.IPKSG>p 		
	A (<B>,PKTp@ELI+.IPKSGC,D)LI+.IPKSGC,D)BM

V h^F
	$PIHRL=h!=<Z PKTELI+.IPKVRh@>		
	A (<B>,PKh`TELI+.IPKVRC,D)LI+.IPKVRC,D)BM
	$PIHTR=fy=<Z PKTELI+.IPKVRg>		
	A (<B>,PKg8TELI+.IPKVRC,D)LI+.IPKVRC,D)BMI e1^1
	$PILDY=eQ=<Z PKTELI+.IPKVRep>		
	A (<B>,PKfTELI+.IPKVRC,D)LI+.IPKVRC,D)BMY@ nA^z
	$PIMF==na<Z PKTELI+.IPKSG>o		
	A (<B>,PKTo ELI+.IPKSGC,D)LI+.IPKSGC,D)BMm TA]&
	$PINTL=Ta=<Z 1>		
	A (<B>,1C,D)A (<BN i)^P
	$PIPL==iI<Z PKTELI+.IPKVR>ih		
	A (<B>,PKTjELI+.IPKVRC,D)LI+.IPKVRC,D)BN

Q d	^&
	$PIPRC=d)=<Z PKTELI+.IPKVRdH>		
	A (<B>,PKdhTELI+.IPKVRC,D)LI+.IPKVRC,D)BN

W r1_
	$PIPRO=rQ=<Z PKTELI+.IPKPRrp>		
	A (<B>,PKsTELI+.IPKPRC,D)LI+.IPKPRC,D)BN: u_.
	$PISH==u!<Z PKTELI+.IPKSH>u@		
	A (<B>,PKTu`ELI+.IPKSHC,D)LI+.IPKSHC,D)BN:2 jQ^[
	$PISID=jq=<Z PKTELI+.IPKSGk>		
	A (<B>,PKk0TELI+.IPKSGC,D)LI+.IPKSGC,D)BNKy ba^
	$PITOS=c=<Z PKTELI+.IPKVRc >		
	A (<B>,PKc@TELI+.IPKVRC,D)LI+.IPKVRC,D)BNM q	_
	$PITTL=q)=<Z PKTELI+.IPKPRqH>		
	A (<B>,PKqhTELI+.IPKPRC,D)LI+.IPKPRC,D)BNi9 `^
	$PIVER=`1=<Z PKTELI+.IPKVR`P>		
	A (<B>,PK`pTELI+.IPKVRC,D)LI+.IPKVRC,D)Bd; Y1]M
	$PLCLO=YQ=<Z 1>		
	A (<B>,1C,D)A (<Be8r Z]S
	$PLKCD=Z9=<Z 1>		
	A (<B>,1C,D)A (<BuHv Wa]@
	$PNLCL=X=<Z 1>		
	A (<B>,1C,D)A (<C+s SY]
	$PPROG=Sy=<Z 1>		
	A (<B>,1C,D)A (<C= :1cU
	$PRST==:Q<Z 3>		
	A (<B>,3C,D)A (<BC	 V]3
	$PRXD==V1<Z 1>		
	A (<B>,1C,D)A (<BC
  \Q]g
	$PRXI==\q<Z 4>		
	A (<B>,4C,D)A (<BC<@ Vy]9
	$PSCR==W<Z 1>		
	A (<B>,1C,D)A (<BC\  3qc!
	$PSEQ==4<Z 1>		
	A (<B>,1C,D)A (<BC 2!c
	$PSP==<2AZ 0>		
	A (<B>,0C,D)A (<B>C+z XI]F
	$PSROU=Xi=<Z 1>		
	A (<B>,1C,D)A (<C@ ;c[
	$PSYN==;9<Z 3>		
	A (<B>,3C,D)A (<BC$:y =Qco
	$PTCKS==q=<Z 4>		
	A (<B>,4C,D)A (<C$= 7c;
	$PTCTL=71=<Z 3>		
	A (<B>,3C,D)A (<C$K` 6)c4
	$PTDO==6I<Z 3>		
	A (<B>,3C,D)A (<BC$p []Z
	$PTG==<[!Z 2>		
	A (<B>,2C,D)A (<B>C&0 ^!]t
	$PTS==<^AZ 6>		
	A (<B>,6C,D)A (<B>C&m yj
	$PTVT== <Z TTNETW>		
	A 8 (<B>,TTNETWC,D)B>,TTNETWC,C.)` 7ycA
	$PURG==8<Z 3>		
	A (<B>,3C,D)A (<BC.)x >9cu
	$PURGP=>Y=<Z 4>		
	A (<B>,4C,D)A (<C=i <ich
	$PWNDO==	=<Z 3>		
	A (<B>,3C,D)A (<CF@ ]`
	$PXT==<\	Z 3>		
	A (<B>,3C,D)A (<B>Ft^ y`1
	$QNEXT==<Z 0>		
	A (<B>,0C,D)A (<G); 1ae
	$QPREV=Q=<Z 0>		
	A (<B>,0C,D)A (<R

- }Qgo
	$TABTFX}q==<Z 54>		
	A (<B>,54C,D) (RHL ib
	$TCDB8=!=<Z 170>		
	A (<B>,170C,D)(RH{ i[
	$TCDCW=9=<Z 170>		
	A (<B>,170C,D)(RIY Ai.
	$TCDFS=a=<Z 170>		
	A (<B>,170C,D)(RIr yiA
	$TCDGE==<Z 170>		
	A (<B>,170C,D)(RIw i;
	$TCDGN=1=<Z 170>		
	A (<B>,170C,D)(RJ Yi'
	$TCDHT=y=<Z 170>		
	A (<B>,170C,D)(RJ1 1iU
	$TCDIB=Q=<Z 170>		
	A (<B>,170C,D)(RKq IiN
	$TCDOB=i=<Z 170>		
	A (<B>,170C,D)(RKx iih
	$TCDOQ=	=<Z 170>		
	A (<B>,170C,D)(RK{ )i4
	$TCDOW=I=<Z 170>		
	A (<B>,170C,D)(RL aiH
	$TCDPS==<Z 170>		
	A (<B>,170C,D)(RL Qio
	$TCDPU=q=<Z 170>		
	A (<B>,170C,D)(RM9 9iu
	$TCDUR=Y=<Z 170>		
	A (<B>,170C,D)(RMz qi!
	$TCDWT==<Z 170>		
	A (<B>,170C,D)(RHY yi
	$TCTBS==<Z 165>		
	A (<B>,165C,D)(RLx Yi
	$TCTSQ=y=<Z 165>		
	A (<B>,165C,D)(R$X` Oye
	$TDEC==P<Z 13>		
	A (<B>,13C,D) (<R.(S 1hu
	$TERBF=Q=<Z 164>		
	A (<B>,164C,D)(R.*W h{
	$TERJN=1=<Z 164>		
	A (<B>,164C,D)(R.,@ Gd;
	$TERR==G1<Z 13>		
	A (<B>,13C,D) (<R.,S rAg
	$TERRF=ra=<Z 37>		
	A (<B>,37C,D) (<R.,Z Od{
	$TERRT=O9=<Z 13>		
	A (<B>,13C,D) (<R5 C	d
	$TFH==<C)Z 7>		
	A (<B>,7C,D)A (<B>R5` Cqd!
	$TFHC==D<Z 7>		
	A (<B>,7C,D)A (<BR6 EAd.
	$TFP==<EaZ 11>		
	A (<B>,11C,D) (<BRLi {!g\
	$TIFDF={A=<Z 54>		
	A (<B>,54C,D) (<RMm ]iep
	$TINTR=^	=<Z 20>		
	A (<B>,20C,D) (<RM| 
1hU
	$TIOPF=
Q=<Z 66>		
	A (<B>,66C,D) (<RN	 hB
	$TIPDO=!=<Z 66>		
	A (<B>,66C,D) (<RNy ihH
	$TIPOR=		=<Z 66>		
	A (<B>,66C,D) (<RNz 	QhO
	$TIPOU=	q=<Z 66>		
	A (<B>,66C,D) (<RT;@ Bd
	$TJCN==BA<Z 6>		
	A (<B>,6C,D)A (<BRTk@ i{
	$TJFN==9<Z 170>		
	A (<B>,170C,D)(<Re DYd'
	$TLH==<DyZ 10>		
	A (<B>,10C,D) (<BRf F)d4
	$TLP==<FIZ 12>		
	A (<B>,12C,D) (<BRmlZ tig(
	$TMNRT=u	=<Z 40>		
	A (<B>,40C,D) (<Ro

Z uQg/
	$TMXRT=uq=<Z 41>		
	A (<B>,41C,D) (<RvYV ah
	$TNUFM==<Z 56>		
	A (<B>,56C,D) (<R|lU s!g
	$TOFRK=sA=<Z 37>		
	A (<B>,37C,D) (<R~	T )h
	$TOPFH=I=<Z 57>		
	A (<B>,57C,D) (<R~	X h
	$TOPFP=!=<Z 56>		
	A (<B>,56C,D) (<R~ h
	$TOPLH=1=<Z 60>		
	A (<B>,60C,D) (<R~S qYg
	$TOPNF=qy=<Z 37>		
	A(<B>,37C,D) (<R~{Y A9d
	$TOWNR=AY=<Z 6>		
	A (<B>,6C,D)A (<Sp j9fW
	$TPICA=jY=<Z TCBPIC>		
	jxA (<B>,TCBPICC,D)B>,TCBPICC,Sr h9fG
	$TPICE=hY=<Z TCBPIC>		
	hxA (<B>,TCBPICC,D)B>,TCBPICC,Sy f1f7
	$TPICR=fQ=<Z TCBPIC>		
	fpA (<B>,TCBPICC,D)B>,TCBPICC,Sy g9f?
	$TPICS=gY=<Z TCBPIC>		
	gxA (<B>,TCBPICC,D)B>,TCBPICC,Sz e)f.
	$TPICU=eI=<Z TCBPIC>		
	ehA (<B>,TCBPICC,D)B>,TCBPICC,S| i9fO
	$TPICX=iY=<Z TCBPIC>		
	ixA (<B>,TCBPICC,D)B>,TCBPICC,SP pQg	
	$TPIFA=pq=<Z TCBPIF+2>		
q	A (<B>,TCBPIF+2C,D),TCBPIF+SR nIfx
	$TPIFE=ni=<Z TCBPIF+1>		
o	A (<B>,TCBPIF+1C,D),TCBPIF+SY lAfh
	$TPIFR=la=<Z TCBPIF+0>		
m	A (<B>,TCBPIF+0C,D),TCBPIF+SY mIfp
	$TPIFS=mi=<Z TCBPIF+1>		
n	A (<B>,TCBPIF+1C,D),TCBPIF+SZ kAf`
	$TPIFU=ka=<Z TCBPIF+0>		
l	A (<B>,TCBPIF+0C,D),TCBPIF+S\ oQg
	$TPIFX=oq=<Z TCBPIF+2>		
p	A (<B>,TCBPIF+2C,D),TCBPIF+S,h )i
	$TPRS1=I=<Z 167>		
	A (<B>,167C,D)(S,i 	i
	$TPRS2=)=<Z 167>		
	A (<B>,167C,D)(S:1 d!f&
	$TPSIC=dA=<Z TCBPIC>		
	d`A (<B>,TCBPICC,D)B>,TCBPICC,S,` c9f
	$TRBS==cY<Z 30>		
	A (<B>,30C,D) (<S8@ aif
	$TRCB==b	<Z 26>		
	A (<B>,26C,D) (<S8\ bQf
	$TRCBY=bq=<Z 27>		
	A (<B>,27C,D) (<S;Z w!g<
	$TRCNT=wA=<Z 42>		
	A (<B>,42C,D) (<S` ^Qew
	$TRIS==^q<Z 23>		
	A (<B>,23C,D) (<SH5 ah(
	$TRLAK==<Z 62>		
	A (<B>,62C,D) (<SIZ _9e}
	$TRLFT=_Y=<Z 24>		
	A (<B>,24C,D) (<SMw Ih.
	$TRLWN=i=<Z 63>		
	A (<B>,63C,D) (<S

 Ldb
	$TRPP==L!<Z 13>		
	A(<B>,13C,D) (<S>7 Q9e
	$TRSYN=QY=<Z 13>		
	A (<B>,13C,D) (<S\S XeC
	$TRURG=X9=<Z 13>		
	A (<B>,13C,D) (<S\X `!f
	$TRURP=`A=<Z 25>		
	A (<B>,25C,D) (<S{R a	f

	$TRWND=a)=<Z 26>		
	A (<B>,26C,D) (<S
  v9g5
	$TRXI==vY<Z 42>		
	A (<B>,42C,D) (<S

 x	gB
	$TRXP==x)<Z 43>		
	A (<B>,43C,D) (<S

 yYgO
	$TRXPD=yy=<Z 43>		
	A (<B>,43C,D) (<S

 z9gU
	$TRXPI=zY=<Z 43>		
	A (<B>,43C,D) (<S

 xqgI
	$TRXPN=y=<Z 43>		
	A (<B>,43C,D) (<SZ Uye1
	$TSABT=V=<Z 13>		
	A (<B>,13C,D) (<S N9du
	$TSAP==NY<Z 13>		
	A (<B>,13C,D) (<S.: yh!
	$TSBYT==<Z 61>		
	A (<B>,61C,D) (<S8@ \ec
	$TSCB==\9<Z 17>		
	A (<B>,17C,D) (<S< Ai
	$TSCPK=a=<Z 166>		
	A (<B>,166C,D)(S<@ Lidh
	$TSCR==M	<Z 13>		
	A (<B>,13C,D) (<S\ Kd[
	$TSEP==K9<Z 13>		
	A (<B>,13C,D) (<Sl J1dU
	$TSFP==JQ<Z 13>		
	A (<B>,13C,D) (<SIZ YeJ
	$TSLFT=Y!=<Z 14>		
	A (<B>,14C,D) (<SMQ g{
	$TSLVC=9=<Z 55>		
	A (<B>,55C,D) (<SMW ~9gu
	$TSLVN=~Y=<Z 55>		
	A (<B>,55C,D) (<S\Z t	g"
	$TSMRT=t)=<Z 40>		
	A (<B>,40C,D) (<S^ 1h5
	$TSMXB=Q=<Z 64>		
	A (<B>,64C,D) (<S^ h;
	$TSMXP=9=<Z 65>		
	A (<B>,65C,D) (<S| T9e%
	$TSOPN=TY=<Z 13>		
	A (<B>,13C,D) (<S

Y Ue+
	$TSPRS=U9=<Z 13>		
	A (<B>,13C,D) (<S98 YieP
	$TSSEQ=Z	=<Z 15>		
	A (<B>,15C,D) (<S=@ VYe7
	$TSSV==Vy<Z 13>		
	A (<B>,13C,D) (<S>7 Re
	$TSSYN=R9=<Z 13>		
	A (<B>,13C,D) (<SH: PYe
	$TSTAT=Py=<Z 13>		
	A (<B>,13C,D) (<SK` ]ej
	$TSTO==]!<Z 20>		
	A (<B>,20C,D) (<SMW Rye
	$TSTVO=S=<Z 13>		
	A (<B>,13C,D) (<S[x SYe
	$TSUOP=Sy=<Z 13>		
	A (<B>,13C,D) (<S\S W9e=
	$TSURG=WY=<Z 13>		
	A (<B>,13C,D) (<S\X ZQeW
	$TSURP=Zq=<Z 16>		
	A (<B>,16C,D) (<S{R [9e]
	$TSWND=[Y=<Z 17>		
	A(<B>,17C,D) (<S%| 
	$TTOPF=	
	A (<B>,67C,D) (<S%|` |qgi
	$TTOS==}<Z 54>		
	A (<B>,54C,D) (<S&	 h[
	$TTPDO=9=<Z 67>		
	A (<B>,67C,D) (<S&y 

hb
	$TTPOR=

!=<Z 67>		
	A (<B>,67C,D) (<S&z 

ihh
	$TTPOU=	
	A (<B>,67C,D) (<S&K |	gb
	$TTTL==|)<Z 54>		
	A (<B>,54C,D) (<S&m MQdo
	$TTVT==Mq<Z 13>		
	A (<B>,13C,D) (<S6K Ah
	$TVTL==a<Z 56>		
	A (<B>,56C,D) (<S=I GydA
	$TWLDN=H=<Z 13>		
	A (<B>,13C,D) (<S=I IIdN
	$TWLDP=Ii=<Z 13>		
	A (<B>,13C,D) (<S=I HadH
	$TWLDT=I=<Z 13>		
	A (<B>,13C,D) (<:|lzP P mTP S@P P >	VP =P &YVP &DIP &DJP &DZ6P &D\RP &D\[P &D]wP &E	rP &ErP &EQP &EkxP &F)3P &F)9P &F)WP &v

WP &vLP &vLP &vLP &vLP &vLP &vLP &vLP &vLP &vLP &vLP &vLP &vMYP &vi9P '9P '<P '<sP '<tP '=YP '
P :IP :IP :I	P :.HpQ :.HqQ :L:P :L[HP :L[IP :LxsP :L}P :MZP :MI7P :MZ9P @P K%,z 9 [L<<<A>&<B9@>>B<^D70-POS(<B>)>>D70-POS(<B>N)VP RPP RQP RSP RTP RWP RYP R	VP R{P RF)P RF-8P `Q A>}{woP