PDP-10 Archive: tables.unv from BB-H580C-SB

Trailing-Edge - PDP-10 Archives - BB-H580C-SB_1981 - tables.unv

There are 15 other files named tables.unv in the archive. Click here to see a list.

x
,55@P C/$!1 1
		XLIST
		AKTB.C
		LIST
KTB.C
		LISTC/$#Q WP}K

	RADIXWp	10

IFN ANS74,X<
	D.PNTR	AKTTABX0,AK

	AK.ITM	FLXPK,1,1,17
	AK.ITMXp	DLK,1,18,35

	YAK.FLG	DUP,2,0
>Y0

	RADIX	8



	RADIX	8

C;fP C;uP G,H`Q $HG-ZQ DG-J7Q 4G-h6Q $<G-}:Q FG.)Q $HG.;VQ HGtk 	p	CD%A==<POINT 1,B-1,C>Gu 	G	CD%A==<PqOINT D-C+1,B-1,D>D-C+1,B-1Gv;2 It	CD%A==CD%B	CD%A==CDGv|R 	x	CD%A==B-1	CD%A==BG$!1 09
		XLIST
		CDTB.C
		LIST
DTB.C
		LISTG$#Q Qp}-

	RADIXR	10

	D.PNTR	CDR0TAB,CD

	CD.ITMRP	NAM,1,3,17
	CD.RpITM	SNL,1,18,35
S
	CD.FLG	OUT,2,0S0
	CD.ITM	INT,2,0SP,1
	CD.ITM	LIN,2Sp,16,28	;LINE NUMBTER

	CD.ITM	RDLT0,3,0,17

	CD.ITTPM	DC,6,0,17

IFTpN ANS74,<
	CD.ITUM	FDL,9,0,17
	CDU0.ITM	DUP,9,18,35
>
	RADIX	8

>
	RADIX	8

G<,H:Q $HG<-h6Q $<G<-mVQ HG<tk I|	CO%A==<POINT 1,B-1,C>G<u Qw	CO%A==<PyOINT D-C+1,B-1,D>D-C+1,B-1G<v;2 		CO%A==CO%B	CO%A==COG<v|R I	CO%A==B-1	CO%A==BG?$!1 ,Yg
		XLIST
		COTB.C
		LIST
OTB.C
		LISTG?$#Q ;0{g

	RADIX;P	10

	D.PNTR CO;pNTAB,CO

	CO.IT<M	NAM,1,3,17

	<0CO.ITM	DAT,2,0,17<P
	CO.ITM	NVL,2,1<p8,35

	RADIX	8



	RADIX	8rpO
	XLIST
wP
	DEFINE B.ITM s(ITMID,WRDNO,LFTBs0IT,RTBIT),<
		XLsPIST
B.'ITMID::	spB%'ITMID+<TA>B17t
		LIST
	>	

t0	DEFINE B.FLG (FtPLGID,WRDNO,BITNO)tp,<
		XLIST
		Bu.ITM	FLGID,WRDNO,u0BITNO,BITNO
		LIuPST
	>	

	DEFINupE	B.SME	(ID1,ID2v)<
		XLIST
		Bv0.'ID1==:B.'ID2
vP		LIST
	>	

	DvpEFINE	B.WRD	(ITMw0ID,WRDNO)<
		XLIyPST
		B.'ITMID==yq:WRDNO-1
		LIST
	>	

	LIST
I,SQ $HI,,WQ $HI,-}Q <I,;Q DI,<Q I,HyQ 6$I,I3Q 4I,I8Q HI,IYQ I,KQ $I,LQ 
I,LQQ I,YQ 8I,\YQ "I,^Q $HI,h5Q 0I,h6Q 6I,lqQ 0I-Q  I-YQ HI-,zQ *I-9<Q $$I-JyQ

I-K@Q 4I-KQQ PI-KqQ HI-LQ .I-LQQ I-LqQ &I-MVQ <I-h6Q $<I-iQ I-kqQ *<I-xqQ (I-xtQ $HI.
1Q I.xQ $HI.(YQ 2I.)Q I.)Q I.)Q .I.)9Q 0I.,Q HI.8sQ &I.8zQ ,I.9wQ >I.;Q I.;VQ HI.;wQ HI.<qQ (I.=1Q :I.>6Q BI.>9Q @I.\sQ $I.h6Q $HI.jQ I/\Q HItk !	DA%A==<POINT 1,B-1,C>Iu {0]	DA%A==<P{QOINT D-C+1,B-1,D>D-C+1,B-1Iv;2 Y%	DA%A==DA%B	DA%A==DAIv|R )	DA%A==B-1	DA%A==BI$!1 *9U
		XLIST
		DATB.C
		LIST
ATB.C
		LISTI$#Q "p{%

	RADIX#	10

	D.PNTR	DA#0TTAB,DA

	DA.IT#PM	NAM,1,3,17
	DA#p.ITM	SNL,1,18,35

	DA.ITM	VAL,2,$00,17
	DA.SME	ARG$P,VAL
	DA.ITM	LOC$p,2,18,35

	DA.I%TM	POP,3,0,17
	D%0A.SME	BRO,POP
	D%PA.ITM	SON,3,18,35%p

	DA.ITM	LVL,4&,0,5
	DA.ITM	RES&0,4,6,11
	DA.FLG	&PLPC,4,12
	DA.FLG&p	RBE,4,13
	DA.IT'M	USG,4,14,17
	D'0A.ITM	RPW,4,18,35'P

	DA.ITM	CLA,5'p,0,1
	DA.FLG	SYL(,5,2
	DA.FLG	SYR(0,5,3
	DA.FLG	SGN(P,5,4
	DA.FLG	BWZ(p,5,5
	DA.FLG	SUB),5,6
	DA.FLG	EDT)0,5,7
	DA.FLG	FAL)P,5,8
	DA.FLG	DEF)p,5,9
	DA.FLG	RBS*,5,10
	DA.FLG	FA*0K,5,11
	DA.FLG	R*PDS,5,12
	DA.FLG	*pSCT,5,13
	DA.FLG+	JST,5,14
	DA.FL+0G	SSC,5,15
	DA.F+PLG	LSC,5,16
	DA.+pITM	SCF,5,15,16
,	DA.FLG	DLL,5,17
	DA.FLG	ERR,5,18,P
	DA.FLG	IDX,5,1,p9
	DA.FLG	RDF,5,-20
	DA.FLG	PIC,5-0,21
	DA.FLG	DFS,-P5,22
	DA.FLG	DRC-p,5,23
IFN ANS68,.<
	DA.FLG	LRC,5,.024
>
IFN ANS74,.P<
	DA.FLG	DEB,5,.p24
>
	DA.FLG	SL/L,5,25
	DA.FLG	P/0WA,5,26
	DA.FLG	/PVHL,5,27
	DA.FLG/p	RDH,5,28
	DA.FL0G	LKS,5,29
	DA.F00LG	DPR,5,30
	DA.0PITM	NDP,5,31,35
0p
	DA.ITM	EXS,6,01,17
	DA.ITM	INS,106,18,35

	DA.IT1PM	NOC,7,0,14
	DA1p.FLG	OCC,7,15
	D2A.ITM	LN,7,16,28
	DA.ITM	CP,7,29,2P35
	DA.ITM	LNC,72p,16,35

	DA.ITM3	OCH,8,0,17
	DA.30ITM	DEP,8,18,35
3P
	DA.ITM	DCR,9,03p,8
	DA.ITM	KEY,94,9,17
	DA.ITM	XB40Y,9,18,35

	DA.4PITM	FSC,10,6,11

	RADIX	8


I$!1 4#
		XLIST
		DBTB.C
		LIST
BTB.C
		LISTI$#Q Yp}c

	RADIXZ	10

IFN ANS74,Z0<
	D.PNTR	DEBTABZP,DB

	DB.ITM	DAZpT,1,1,17
	DB.FLG[	ARO,1,18
	DB.IT[0M	DUP,1,21,35

[P	DB.FLG	IDP,2,0
[p	DB.ITM	LN,2,5,17\
	DB.ITM	PRM,2,1\08,35
>
	RADIX	8

>
	RADIX	8K`,86Q >K`,;ZQ $

K`,[ZQ @K`-Q HK`-RQ DK`-h6Q $<K`-lYQ FK`.
2Q BK`tk 
Q	EX%A==<POINT 1,B-1,C>K`u y-	EX%A==<PYOINT D-C+1,B-1,D>D-C+1,B-1K`v;2 
QU	EX%A==EX%B	EX%A==EXK`v|R Y	EX%A==B-1	EX%A==BKc$!1 +[
		XLIST
		EXTB.C
		LIST
XTB.C
		LISTKc$#Q 5{?

	RADIX50	10

	D.PNTR	EX5PTTAB,EX

	EX.IT5pM	NAM,1,3,17

	6EX.FLG	NRS,2,0
	60EX.FLG	IND,2,1
	6PEX.FLG	PID,2,2
	6pEX.FLG	ENT,2,3
	7EX.FLG	CAL,2,4
	70EX.ITM	CNT,2,15,17P7
	EX.ITM	HLD,2,7p18,35

	RADIX	8



	RADIX	8M$,SQ HM$,YQ $HM$,qQ $M$,uQ HM$,Q DM$,Q 8M$,3Q HM$,9Q $HM$,yQ .M$,(SQ HM$,(YQ $HM$,)3Q HM$,)9Q $HM$,+Q (0M$,+ Q 2M$,:xQ 0M$,<Q M$,<QQ 8

M$,IYQ 4M$,LQQ FM$,LVQ HM$,LrQ 6M$,[ZQ 6M$,\VQ 8

M$,\YQ HM$,hYQ (@M$,hxQ

M$,iQ .M$,kQ P

M$,kQ 4

M$-WQ >M$-wQ :M$-VQ 2

M$->2Q,M$-HVQ@M$-K@Q,4M$-KQQ$PM$-KqQ$HM$-LVQ<HM$-LYQ600M$-[Q$FM$-\YQ $0M$-h6Q $<M$-hSQ <M$-iQ $M$-iVQ >M$-m6Q $H
M$.WQ $HM$.	7Q H
M$.	WQ $HM$.	YQ $H
M$.	ZQ HM$.
;Q H
M$.yQ $M$.

WQ HM$.

wQ *M$.(zQ $@M$.)Q <

M$.)9Q 2M$.*|Q HM$.+)Q BM$.+9Q (M$.,Q 8M$.,Q H	M$.,QQ 0M$.-Q H	M$.86Q $HM$.8PQ $HM$.9Q HM$.:|Q $HM$.<Q H	M$.<PQ $HM$.h6Q HM$.iQ HM$.j2Q $HM$.kQ 4M$.lQ $H	M$tk |Pe	FI%A==<POINT 1,B-1,C>M$u {pa	FI%A==<P|OINT D-C+1,B-1,D>D-C+1,B-1M$v;2 }i	FI%A==FI%B	FI%A==FIM$v|R }Pm	FI%A==B-1	FI%A==BM'$!1 )YO
		XLIST
		FITB.C
		LIST
ITB.C
		LISTM'$#Q z

	RADIX0	10

	D.PNTR	FIPLTAB,FI

	FI.ITpM	NAM,1,3,17

	FI.FLG	MLT,2,0
	0FI.ITM	RCT,2,2,17P
	FI.ITM	OFT,2,1p8,35

	FI.ITM	FBS,3,0,15
	FI.IT0M	LN,3,16,28
	FIP.ITM	CP,3,29,35
p	FI.ITM	LNC,3,16,35

	FI.ITM	LRS0,4,0,11
	FI.ITM	PNDV,4,12,17
	FI.pITM	VAL,4,18,35

IFN ANS68,<
	F0I.ITM	NFL,5,0,4
P>
IFN ANS74,<
	pFI.ITM	FAM,5,3,4
>
	FI.ITM	ERM,50,5,7
	FI.ITM	IRMP,5,8,10
	FI.ITM	pPOS,5,12,17
	FI.ITM	NXT,5,18,35
0
	FI.ITM	LBL,6,2P,3
	FI.FLG	INO,6p,4
	FI.FLG	OUO,6,5
	FI.FLG	IOO,60,6
	FI.FLG	ADV,6P,7
	FI.FLG	DSD,6p,8
	FI.FLG	VLR,6	,9
	FI.FLG	RER,6	0,10
	FI.FLG	RRC,	P6,11
	FI.FLG	FDD	p,6,12
	FI.FLG	OP
T,6,13
	FI.FLG	P
0SN,6,14
	FI.FLG	
PRMS,6,15
	FI.ITM
p	ACC,6,16,17
	FI.SME	ORG,ACC
	FI0.ITM	ACK,6,18,35

	FI.ITM	NBF,7,p0,5
	FI.ITM	MRS,

7,6,17
	FI.ITM	D

0RL,7,18,35

IFN

P ANS74,<
	FI.ITM

p	ALK,8,0,17
>
	I.ITM	SDL,8,18,3

	FI.ITM	VID,
	FI.ITM	V5

	FI.ITM	SAL,10,0,17
	FI.SME	SBA,SAL
	FI.ITM	ERR,10,1p8,35

IFN ANS68,<

	FI.ITM	BBR0,11,0,17
	FI.ITMP	BBF,11,18,35

p	FI.ITM	ABR,12,0,17
	FI.ITM	ABF,102,18,35

	FI.ITPM	BER,13,0,17
	FpI.ITM	BEF,13,18,35

	FI.ITM	AER,014,0,17
	FI.ITM	PAEF,14,18,35
>
p
IFN ANS74,<

	FI.ITM	LCP,11,180,35

	FI.ITM	LPPP,12,0,17
	FI.ITpM	WFA,12,18,35

	FI.ITM	LAT,13,00,17
	FI.ITM	LAB,P13,18,35

	FI.IpTM	DEB,14,0,17
	FI.ITM	LCI,14,18,035
>

	FI.ITM	PSRA,15,0,17
	FI.pITM	LRL,15,18,35

	FI.FLG	DRC,160,0
	FI.FLG	ADR,1P6,1
	FI.FLG	RM2,p16,2
	FI.ITM	RD,16,3,5
	FI.ITM	R0P,16,6,7
	FI.FLGP	ENT,16,8
	FI.FLpG	DFR,16,9
	FI.FLG	BM,16,10
	FI.0FLG	CKP,16,11
	FPI.FLG	AKS,16,12
p	FI.FLG	KYE,16,13
	FI.ITM	LOC,16,018,35

	FI.ITM	PSKY,17,0,17
	FI.pITM	RKY,17,18,35

IFN ANS74,<
	0FI.FLG	RLC,18,0
P>
	FI.ITM	BLF,18p,4,15
IFN ANS74,<
	FI.ITM	ALN,180,16,28
	FI.ITM	APLC,18,16,35
	FI.pITM	ACP,18,29,35
>

	FI.ITM	VPP0,19,0,17
	FI.ITMP	RPG,19,18,35

p	FI.ITM	OWA,20,0,8
	FI.ITM	OTA,200,9,17
	FI.ITM	RTPC,20,18,35
	FI.SpME	SPT,RTC

	FI.ITM	PFS,21,0,17
	FI.ITM	PEN,21,1P8,35

	FI.ITM	PpAC,22,0,17
	FI.ITM	PIV,22,18,35
0
	FI.ITM	PBN,23,P0,17
	FI.ITM	PRNp,23,18,35

	FI.ITM	PFN,24,0,17
0	FI.ITM	PFT,24,18P,35

IFN ANS74,p<
	FI.ITM	CKB,25 ,0,17
	FI.ITM	CK 0A,25,18,35
>

 P	FI.ITM	CRC,26,0, p7
	FI.ITM	FLN,26!,16,28
	FI.ITM	F!0LC,26,16,35
	FI.!PITM	FCP,26,29,35

	FI.ITM	NUM,27",0,17
;	FI.ITM	X"0XX,27,18,35

	RADIX	8



	RM0,<Q M0-K@Q 4M0-KQQ PM0-h6Q (<M0-kQ

M0-x6Q >M0-y7Q :M0-ywQ <M0-|Q BM0.RQ FM0.yQ M0.

WQ HM0.0Q &M0.)Q $M0.86Q @M0.<Q DM0tk 1;	FL%A==<POINT 1,B-1,C>M0u Q
	FL%A==<P)OINT D-C+1,B-1,D>D-C+1,B-1M0v;2 q?	FL%A==FL%B	FL%A==FLM0v|R 1C	FL%A==B-1	FL%A==BM3$!1 .yy
		XLIST
		FLTB.C
		LIST
LTB.C
		LISTM3$#Q DP|O

	RADIXDp	10

	D.PNTR	FLEOTAB,FL

	FL.FLE0G	PND,1,0
	FL.FLEPG	SPF,1,1
	FL.FLEpG	OPF,1,2
	FL.FLFG	SAL,1,3
	FL.FLF0G	OAL,1,4
	FL.FLFPG	OGO,1,5
	FL.FLFpG	OEN,1,6
IFN ANGS74,<
	FL.FLG	DEG0B,1,7
>
	FL.FLGGP	QUA,1,16
	FL.FLGpG	RDC,1,17
	FL.IHTM	PRO,1,18,35
H0
	FL.ITM	NAM,2,1,HP15
	FL.ITM	NLC,2Hp,1,35
	FL.ITM	LNI,2,16,28
	FL.ITMI0	LNC,2,16,35
	FLIP.ITM	CP,2,29,35
Ip	FL.SME	POS,CP

	RADIX	8


Q0,:2Q HQ0,;rQ 6$Q0,<Q Q0,hrQ 6$Q0-K@Q 4Q0-KQQ PQ0-KUQ HQ0-h6Q (<Q0.6Q $$Q0.)Q $DQ0tk 	HL%A==<POINT 1,B-1,C>Q0u 0q	HL%A==<P~OINT D-C+1,B-1,D>D-C+1,B-1Q0v;2 A	HL%A==HL%B	HL%A==HLQ0v|R 	HL%A==B-1	HL%A==BQ3$!1 -9m
		XLIST
		HLTB.C
		LIST
LTB.C
		LISTQ3$#Q =0|

	RADIX=P	10

	D.PNTR HL=pDTAB,HL

	HL.IT>M	NAM,1,1,15
	HL>0.ITM	LNC,1,16,35
	HL.ITM	LN,1,16,>p28
	HL.ITM	CP,1,?29,35
	HL.ITM	RD?0,1,1,17	; [415] R?PD LINK FOR TYPE 1?p4
	HL.ITM	CID,1,@18,35	; [415] CID@0 LEVEL FOR TYPE 1@P4

	HL.ITM	COD,@p2,0,8
	HL.ITM	QAAL,2,9,17
	HL.ITMA0	LNK,2,18,35
	HLAP.ITM	FCD,2,0,8;	;ApFULL CODE

	RADIX	8



	RADY$,QY8Y$,hqQ HY$,iqQ 4Y$-ZQ 2Y$-htQ $Y$-kQ 6Y$.

qg	LI%A==<POINT1,B-1,C>Y$u ps	LI%A==<P~1OINT D-C+1,B-1,D>D-C+1,B-1Y$v;2 
		XLIST
		LITB.C
		LIST
ITB.C
		LISTY'$#Q 80{W

	RADIX8P	10

	D.PNTR	LI8pTTAB,LI

	LI.FL9G	PUR,1,6
	LI.FL90G	ALL,1,7
	LI.FL9PG	NLT,1,8
	LI.FL9pG	FGC,1,9
	LI.FL:G	INT,1,10
	LI.I:0TM	NCH,1,11,17
	:PLI.ITM	FCC,1,18,3:p5

	RADIX	8



	RADIX	8

[;$#Q V}9

	RADIXV0	10

	D.PNTR	MNVPTAB,MN

	MN.ITMVp	NAM,1,3,17
	MN.WITM	SNL,1,18,35

	RADIX	8


]2N= xANLIST1	ACNLIST1	A]2N= xPK
		DEFINExp	A%B<
		XLIST
		A.B
		LIST
>	;END OF DEFINE A%'TPE.
FINEaH,Q aH,YQ 
aH,qQ $HaH,YQ

aH,I3Q aH,IRQ aH,^Q aH,kQ HaH,{[Q $HaH-LqQ $HaH-YQ aH-h6Q $<aH.

SQ HaH.

TQ aH.)RQ aH.91QRaH.;VQ HaH.M:QuaH/M	PR%A==<PYOINT D-C+1,B-1,D>D-C+1,B-1aHv;2 Y	PR%A==PR%B	PR%A==PRaHv|R Q]	PR%A==B-1	PR%A==BaK$!1 /Y
		XLIST
		PRTB.C
		LIST
RTB.C
		LISTaK$#Q J0}

	RADIXJP	10

	D.PNTR	PRJpOTAB,PR

	PR.ITKM	NAM,1,3,17
	PRK0.ITM	SNL,1,18,35

	PR.ITM	LSC,2,Kp0,17
	PR.ITM	GNWL,2,0,17
	PR.ITM	L0PRF,2,18,35

	PLPR.ITM	AOB,3,0,17
	PR.ITM	PRI,3,18M,24
	PR.FLG	SEC,M03,25
	PR.FLG	EXRMP,3,26
	PR.FLG	DEMpF,3,27
	PR.FLG	ANLT,3,28
	PR.FLG	N0ARS,3,29
	PR.FLGNP	ANR,3,30
	PR.FLNpG	RFD,3,31
	PR.FOLG	DFD,3,32
	PR.O0FLG	MDF,3,33
	PROP.FLG	TUT,3,34

Op	PR.ITM	XTW,4,0,1P7
	PR.ITM	FLO,4,P018,35

IFN ANS7PP4,<
	PR.WRD	DUP,Pp5
	PR.ITM	DEB,5,Q0,17
	PR.ITM	SFIQ0,5,18,35
>

	RADIX	8



	Re8* Q $He8*e@Q He8tk &)2	RN%A==<POINT 1,B-1,C>e8u "c	RN%A==<P1OINT D-C+1,B-1,D>D-C+1,B-1e8v;2 &i6	RN%A==RN%B	RN%A==RNe8v|R '):	RN%A==B-1	RN%A==Be;$!1 4y)
		XLIST
		RNTB.C
		LIST
NTB.C
		LISTe;$#Q \p}o
	RADIX	1]0
	D.PNTR	RENTAB]0,RN
	RN.ITM	01,1]P,0,17
	RN.ITM	66]p,1,18,35
	RADIX 8
,35
	RADIX e\,*zQ $He\,,WQ (@e\,9SQ He\,9VQ $$e\,:Q $He\,:2Q $He\,;rQ He\,;vQ $$e\,<Q e\,H:Q He\,HtQ $He\,hZQ He\,iQ $e\,ixQ He\,j6Q $He\,kQQ ,e\,y7Q .e\,z9Q $He\,|Q 0e\-H`Q $He\-HrQ De\-IQ $e\-J7Q 6$e\-K@Q 4e\-KQQ Pe\-h6Q $<e\-htQ He\-kQ @e\-ltQ He\-nQ $e\.3Q 6$e\.`Q He\.	YQ He\.
Q 6$e\.
Q $He\.)Q $<e\.)2Q $He\.)9Q $He\.)YQ He\.*Q $He\.,sQ 4e\.,tQ 2e\.,zQ 2e\.,zQ &e\.-zQ He\.86Q He\.8;Q He\.8rQ <e\.;Q He\.=8Q $He\.N8Q 6

e\.\Q $He\.\rQ He\tk i~	RW%A==<POINT 1,B-1,C>e\u q|	RW%A==<PIOINT D-C+1,B-1,D>D-C+1,B-1e\v;2  a	RW%A==RW%B	RW%A==RWe\v|R !!
	RW%A==B-1	RW%A==Be_$!0 1y
		XLIST
		RWTB.A
		LIST
WTB.A
		LISTe_$!1 2Y
		XLIST
		RWTB.B
		LIST
WTB.B
		LISTe_$!1 39
		XLIST
		RWTB.C
		LIST
WTB.C
		LISTe_$#P ^0}{

	RADIX^P	10

	D.PNTR RP^pWTAB,RW


	

	RW.ITM	NAM,1,3,_017;	NAMTAB LINK

	RADIX	8


e_$#Q _p

	RADIX`	10

	D.PNTR	RP`0WTAB,RW

	RW.IT`PM	SAM,1,18,35

`p	RW.ITM	BRO,2,0,1a5
	RW.ITM	LN,2,1a06,28
	RW.ITM	CP,aP2,29,35
	RW.ITM	apLNC,2,16,35

	RbW.ITM	FIL,3,0,17
	RW.ITM	FGP,3,18bP,35

	RW.ITM	LCbp,4,0,17
	RW.ITM	cPC,4,18,35

	RWc0.ITM	PHL,5,0,8
	cPRW.ITM	CFL,5,9,17cp
	RW.ITM	FDE,5,1d8,26
	RW.ITM	LDEd0,5,27,35

	RW.IdPTM	PAG,6,0,8
	RWdp.ITM	RWT,6,18,35

	RW.ITM	RHR,7,e00,17
	RW.ITM	RFReP,7,18,35

	RW.IepTM	PHR,8,0,17
	RfW.ITM	PFR,8,18,35f0

	RW.ITM	GIR,9fP,0,17
	RW.ITM	COfpD,9,18,35

	RW.gITM	CID,10,0,17
g0	RW.ITM	NCI,10,18gP,35

	RW.ITM	BKgpT,11,0,17
	RW.IThM	FBT,11,18,35
h0

	

	RW.ITM	RhPDL,1,3,17
	RW.SMhpE	DAT,SAM

	RW.iITM	LCD,2,0,1
	Ri0W.ITM	NLC,2,2,3
iP	RW.ITM	SCD,2,4,5ip
	RW.ITM	TYP,2,6j,8
	RW.ITM	NSI,2j0,18,35

	RW.ITMjP	LIN,3,0,8
	RW.IjpTM	COL,3,9,17
	RkW.ITM	NXT,3,18,26k0

	RW.SME	RES,LkPC
	RW.SME	SLK,PCkp

	RW.ITM	UPN,5l,0,17
	RW.ITM	USl0E,5,18,35

	RW.lPITM	SUP,6,0,17
lp
	;WORDS 7 THRU 2m5 ARE USED TO STOm0RE THE SOURCE ITEmPM
	; (ALLOW FOR mp3 SUBSCRIPTS WITHn ADDITIVES)
	; (n0SEE P.MAC, SYMBOLnP .RWSRC )

	
np
	RW.ITM	DCI,1,0,o17
	RW.SME	SAV,So0AM

	RW.ITM	CHGoP,2,0,17
	RW.FLG	opRSF,2,9
	RW.FLG	pRSI,2,10
	RW.ITMp0	RST,2,9,10
	RW.pPFLG	GPI,2,11
	RWpp.FLG	GEN,2,12
	RqW.FLG	FNC,2,13
	q0RW.FLG	RSU,2,16
qP	RW.SME	CFG,NSI
qp
	RW.SME	REE,FILr

	RADIX	8



	RADIX	8

e_$#Q rP

	RWTB.A
	RWTB.B

.kL,;ZQ $0kL.

WQ HkL.N8Q 0$kL/	US%A==<POINT 1,B-1,C>kLu A	US%A==<PaOINT D-C+1,B-1,D>D-C+1,B-1kLv;2 1+	US%A==US%B	US%A==USkLv|R q/	US%A==B-1	US%A==BkO$!1 .s
		XLIST
		USTB.C
		LIST
STB.C
		LISTkO$#Q B0|!

	RADIXBP	10

	D.PNTR	USBpETAB,US

	US.ITCM	TYP,1,3,11
	USC0.FLG	XTR,1,17
	UCPS.ITM	PRO,1,18,35Cp

	US.ITM	CNT,2D,6,17

	RADIX	8



	RADIX	8S@P >}{woP