PDP-10 Archive: conversion/utility/tables.unv from BB-H506D-SM

Trailing-Edge - PDP-10 Archives - BB-H506D-SM_1983 - conversion/utility/tables.unv

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

x
,55@P C/$!1 3`s 
		XLIST
		AKTB.C
		LIST
KTB.C
		LISTC/$#Q 

	RADIX

IFN ANS74,
	D.PNTR	AKTTAB

	AK.ITM	FL
	AK.ITM1,18,35

	XAK.FLG	DUP,2,0
>x

	RADIX	8



	RADIX	8

C;fP%C;uP-G,H`Q%$HG-ZQDG-J7Q 4G-h6Q $<G-}:Q FG.)Q $HG.;VQ HGtk  Pr	CD%A==<POINT 1,B-1,C>Gu Pq[	CD%A==<P8OINT D-C+1,B-1,D>D-C+1,B-1Gv;2 !r		CD%A==CD%B	CD%A==CDGv|R !Pr
		XLIST
		CDTB.C
		LIST
DTB.C
		LISTG$#Q 

	RADIX

	D.PNTR	CD

	CD.ITM1,3,17
	CD.M	SNL,1,18,35
UX
	CD.FLG	OUT,2,0
	CD.ITM	INT,2,0
	CD.ITM	LIN,2E NUMB

	CD.ITM	RDL

	CD.IT,6,0,17

IFN ANS74,<
	CD.ITL,9,0,17
	CDITM	DUP,9,18,35
>
	RADIX	8

>
	RADIX	8

G<,H:Q $HG<-h6Q $<G<-mVQ HG<tk q	CO%A==<POINT 1,B-1,C>G<u q

	CO%A==<P@OINT D-C+1,B-1,D>D-C+1,B-1G<v;2 Pq	CO%A==CO%B	CO%A==COG<v|R q	CO%A==B-1	CO%A==BG?$!1 / r|
		XLIST
		COTB.C
		LIST
OTB.C
		LISTG?$#Q 

	RADIX

	D.PNTRCCO

	CO.ITM,1,3,17

	xCO.ITM	DAT,2,0,17
	CO.ITM	NVL,2,1

	RADIX	8



	RADIX	8
	XLIST
z
	DEFINEDB.ITM,LFTB
		XLT
B.'ITMID::	<TA>B17
		LIST
	>	

vx	DEFINEDB.FLGN(F
		XLIST
		BTM	FLGID,WRDNO,
		LI
	>	

	DEFIN.SME	(ID1,ID2
		XLIST
		BID1==:B.'ID2
y		LIST
	>	

	DEFINE	B.WRD	(ITM
		XLI
		B.'ITMID==
		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.
1QqI.xQP$HI.(YQ12I.)QI.)QI.)Q.I.)9QR0I.,QHI.8sQ1&I.8zQB,I.9wQj>I.;Q I.;VQ HI.;wQ HI.<qQ (I.=1Q :I.>6Q BI.>9Q @I.\sQ $I.h6Q $HI.jQ I/\Q HItk `p6	DA%A==<POINT 1,B-1,C>Iu 
		XLIST
		DATB.C
		LIST
ATB.C
		LISTI$#Q 

	RADIX

	D.PNTR	DA

	DA.ITM,1,3,17
	DAITM	SNL,1,18,35

	DA.ITM	VAL,2,
	DA.SME	ARG
	DA.ITM	LOC

	DA.IPOP,3,0,17
	DA.SME	BRO,POP
	DA.ITM	SON,3,18,35

	DA.ITM	LVL,4
	DA.ITM	RES
	DA.FLG	12
	DA.FLG4,13
	DA.ITG,4,14,17
	DA.ITM	RPW,4,18,35

	DA.ITM	CLA,5
	DA.FLG	SYL
	DA.FLG	SYR
	DA.FLG	SGN
	DA.FLG	BWZ
	DA.FLG	SUB
	DA.FLG	EDT
	DA.FLG	FAL
	DA.FLG	DEF
	DA.FLG	RBS
	DA.FLG	FA
	DA.FLG	R
	DA.FLG	13
	DA.FLG5,14
	DA.FLC,5,15
	DA.FLSC,5,16
	DA.M	SCF,5,15,16
.X	DA.FLG	DLL,5,17
	DA.FLG	ERR,5,18
	DA.FLG	IDX,5,1
	DA.FLG	RDF,5,
	DA.FLG	PIC,5
	DA.FLG	DFS,
	DA.FLG	DRC
IFN ANS68,
	DA.FLG	LRC,5,
>
IFN ANS74,
	DA.FLG	DEB,5,
>
	DA.FLG	SL
	DA.FLG	P
	DA.FLG	27
	DA.FLG5,28
	DA.FLS,5,29
	DA.FDPR,5,30
	DA.M	NDP,5,31,35
38
	DA.ITM	EXS,6,0
	DA.ITM	INS,

	DA.ITC,7,0,14
	DAFLG	OCC,7,15
	DA.ITM	LN,7,16,28
	DA.ITM	CP,7,29,
	DA.ITM	LNC,7

	DA.ITM8,0,17
	DA.M	DEP,8,18,35
6
	DA.ITM	DCR,9,0
	DA.ITM	KEY,9
	DA.ITM	XB5

	DA.M	FSC,10,6,11

	RADIX	8


I$!1 6`s8
		XLIST
		DBTB.C
		LIST
BTB.C
		LISTI$#Q 

	RADIX

IFN ANS74,
	D.PNTR	DEBTAB

	DB.ITM	DA
	DB.FLG1,18
	DB.ITP,1,21,35

^	DB.FLG	IDP,2,0
^8	DB.ITM	LN,2,5,17
	DB.ITM	PRM,2,1
>
	RADIX	8

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

K`,[ZQ @K`-Q HK`-RQ DK`-h6Q $<K`-lYQ FK`.
2Q BK`tk

Xpe	EX%A==<POINT1,B-1,C>K`u @pB	EX%A==<P OINT D-C+1,B-1,D>D-C+1,B-1K`v;2 
		XLIST
		EXTB.C
		LIST
XTB.C
		LISTKc$#Q 

	RADIX

	D.PNTR	EX

	EX.ITM,1,3,17

	XEX.FLG	NRS,2,0
	xEX.FLG	IND,2,1
	EX.FLG	PID,2,2
	8EX.FLG	ENT,2,3
	XEX.FLG	CAL,2,4
	xEX.ITM	CNT,2,15,1
	EX.ITM	HLD,2,

	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$.)9QF2M$.*|QTHM$.+)Q$BM$.+9Q(M$.,Q8M$.,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 
		XLIST
		FITB.C
		LIST
ITB.C
		LISTM'$#Q 

	RADIX

	D.PNTR	FI

	FI.ITM,1,3,17

	XFI.FLG	MLT,2,0
	xFI.ITM	RCT,2,2,17
	FI.ITM	OFT,2,1

	FI.ITM	F15
	FI.IT,3,16,28
	FIITM	CP,3,29,35
8	FI.ITM	LNC,3,16,

	FI.ITM	LRS
	FI.ITM	12,17
	FI.M	VAL,4,18,35
X
IFN ANS68,<
	FI.ITM	NFL,5,0,4
>
IFN ANS74,<
	8FI.ITM	FAM,5,3,4
>
	FI.ITM	ERM,5
	FI.ITM	IRM
	FI.ITM	12,17
	FI.M	NXT,5,18,35
	x
	FI.ITM	LBL,6,2
,3
	FI.FLG	INO,6
8,4
	FI.FLG	OUO,6
X,5
	FI.FLG	IOO,6
x,6
	FI.FLG	ADV,6
	FI.FLG	DSD,6
	FI.FLG	VLR,6
	FI.FLG	RER,6
	FI.FLG	RRC,

6,11
	FI.FLG	FDD

8,6,12
	FI.FLG	OP

XT,6,13
	FI.FLG	P

xSN,6,14
	FI.FLG	5
	FI.ITM,16,17
	FIME	ORG,ACC
	FITM	ACK,6,18,35

	FI.ITM	NBF,7,
	FI.ITM	MRS,
	FI.ITM	D,35

IFNANS74,<
	FI.ITM8,0,17
>
	XFI.ITM	SDL,8,18,3

	FI.ITM	VID,
	FI.ITM	V,35

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

IFN<ANS68

	FI.ITM	BBR
	FI.ITM11,18,35

8	FI.ITM	ABR,12,0,
	FI.ITM	ABF,1

	FI.ITR,13,0,17
	FI.ITM	BEF,13,18,3

	FI.ITM	AER,
	FI.ITM	,18,35
>
8
IFN ANS74,<

X	FI.ITM	LCP,11,18

	FI.ITM	LP7
	FI.ITA,12,18,35
X
	FI.ITM	LAT,13,0
	FI.ITM	LAB,

	FI.IDEB,14,0,17
	XFI.ITM	LCI,14,18,
>

	FI.ITM	,0,17
	FI.M	LRL,15,18,35

	FI.FLG	DRC,16
	FI.FLG	ADR,1
	FI.FLG	RM2,
	FI.ITM	RD,
	FI.ITM	R7
	FI.FLG16,8
	FI.FLR,16,9
	FI.FBM,16,10
	FI.G	CKP,16,11
	FI.FLG	AKS,16,12
8	FI.FLG	KYE,16,13
	FI.ITM	LOC,16,

	FI.ITM	,0,17
	FI.M	RKY,17,18,35

IFN ANS74,<
	xFI.FLG	RLC,18,0
>
	FI.ITM	BLF,18
IFN ANS74,
	FI.ITM	ALN,18
	FI.ITM	A6,35
	FI.M	ACP,18,29,35
>

	FI.ITM	VPP
	FI.ITM19,18,35

8	FI.ITM	OWA,20,0,
	FI.ITM	OTA,20
	FI.ITM	RT35
	FI.SSPT,RTC

	FIITM	PFS,21,0,17
	FI.ITM	PEN,21,1

	FI.ITM	P,17
	FI.IPIV,22,18,35
 x
	FI.ITM	PBN,23,
	FI.ITM	PRN

	FI.M	PFN,24,0,17
!x	FI.ITM	PFT,24,18

IFN ANS74,
	FI.ITM	CKB,25
	FI.ITM	CK35
>

#	FI.ITM	CRC,26,0,
	FI.ITM	FLN,26
	FI.ITM	F6,35
	FI.M	FCP,26,29,35

	FI.ITM	NUM,27
;	FI.ITM	X,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 xqO	FL%A==<POINT 1,B-1,C>M0u q	FL%A==<PpOINT D-C+1,B-1,D>D-C+1,B-1M0v;2 8qS	FL%A==FL%B	FL%A==FLM0v|R xqW	FL%A==B-1	FL%A==BM3$!1 1@s
		XLIST
		FLTB.C
		LIST
LTB.C
		LISTM3$#Q 

	RADIX

	D.PNTR	FL

	FL.FLD,1,0
	FL.FLF,1,1
	FL.FLF,1,2
	FL.FLL,1,3
	FL.FLL,1,4
	FL.FLO,1,5
	FL.FLN,1,6
IFN7AN<
	FL.FLG	DE
>
	FL.FLG1,16
	FL.FLC,1,17
	FL.IPRO,1,18,35
Jx
	FL.ITM	NAM,2,1,
	FL.ITM	NLC,2
	FL.ITM	LN
	FL.ITM2,16,35
	FLITM	CP,2,29,35
L8	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 Hq$	HL%A==<POINT 1,B-1,C>Q0u xp	HL%A==<PXOINT D-C+1,B-1,D>D-C+1,B-1Q0v;2 q(	HL%A==HL%B	HL%A==HLQ0v|R Hq,	HL%A==B-1	HL%A==BQ3$!1 0s
		XLIST
		HLTB.C
		LIST
LTB.C
		LISTQ3$#Q 

	RADIX

	D.PNTRHHL

	HL.ITM,1,1,15
	HLITM	LNC,1,16,35
	HL.ITM	LN,1,16,
	HL.ITM	CP,1,
	HL.ITM	RD;R[415] R
	HL.ITM	CID,1,]PCID

	HL.ITM	COD,
	HL.ITM	QA
	HL.ITM2,18,35
	HLITM	FCD,2,0,8;	;

	RADIX	8



	RADY$,QY8Y$,hqQHY$,iqQ4Y$-ZQ2Y$-htQ$Y$-kQA6Y$.T D-C+1,B-1,D>D-C+1,B-1Y$v;2 xp	LI%A==LI%B	LI%A==LIY$v|R 8q	LI%A==B-1	LI%A==BY'$!1 .@rv
		XLIST
		LITB.C
		LIST
ITB.C
		LISTY'$#Q 

	RADIX

	D.PNTR	LI

	LI.FLR,1,6
	LI.FLL,1,7
	LI.FLT,1,8
	LI.FLC,1,9
	LI.FLT,1,10
	LI.INCH,1,11,17
	LI.ITM	FCC,1,18,3

	RADIX	8



	RADIX	8

[;$#Q

	RADIX

	D.PNTR	MN

	MN.ITM1,3,17
	MN.M	SNL,1,18,35

	RADIX	8


]2N=LIST1	AWNLIST1	A]2N= 
		DEFINE<
		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/qb	PR%A==<P OINT D-C+1,B-1,D>D-C+1,B-1aHv;2 Xqm	PR%A==PR%B	PR%A==PRaHv|R qq	PR%A==B-1	PR%A==BaK$!1 2 s
		XLIST
		PRTB.C
		LIST
RTB.C
		LISTaK$#Q 

	RADIX

	D.PNTR	PR

	PR.ITM,1,3,17
	PRITM	SNL,1,18,35

	PR.ITM	LSC,2,
	PR.ITM	GNW
	PR.ITM	18,35

	PR.ITM	AOB,3,0,17
	PR.ITM	PRI,3,18
	PR.FLG	SEC,
	PR.FLG	EXR
	PR.FLG	DE
	PR.FLG	A
	PR.FLG	29
	PR.FLG3,30
	PR.FLD,3,31
	PR.FDFD,3,32
	PR.G	MDF,3,33
	PRFLG	TUT,3,34

R8	PR.ITM	XTW,4,0,1
	PR.ITM	FLO,4,

IFN,ANS7
	PR.WRD	DUP,
	PR.ITM	DEB,5,
	PR.ITM	SFI
>

	RADIX	8



	Re8* Q $He8*e@Q He8tk (prG	RN%A==<POINT 1,B-1,C>e8u $Hqw	RN%A==<PxOINT D-C+1,B-1,D>D-C+1,B-1e8v;2 )0rK	RN%A==RN%B	RN%A==RNe8v|R )prO	RN%A==B-1	RN%A==Be;$!1 7@s>
		XLIST
		RNTB.C
		LIST
NTB.C
		LISTe;$#Q 
	RADIX	1
	D.PNTR	RENTAB
	RN.ITM	01,1
	RN.ITM	66
	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 "0r	RW%A==<POINT 1,B-1,C>e\u 8r	RW%A==<P"OINT D-C+1,B-1,D>D-C+1,B-1e\v;2 #(r	RW%A==RW%B	RW%A==RWe\v|R #hr	RW%A==B-1	RW%A==Be_$!0 4@s&
		XLIST
		RWTB.A
		LIST
WTB.A
		LISTe_$!1 5 s,
		XLIST
		RWTB.B
		LIST
WTB.B
		LISTe_$!1 6s2
		XLIST
		RWTB.C
		LIST
WTB.C
		LISTe$#P 

	RADIX

	D.PNTRRRP


	
aX
	RW.ITM	NAM,1,3,K

	RADIX	8


e8$#Q

	RADIX

	D.PNTR	RP

	RW.ITM,1,18,35

c8	RW.ITM	BRO,2,0,1
	RW.ITM	LN,2,1
	RW.ITM	CP,
	RW.ITM	16,35

	RW.ITM	FIL,3,0,17
	RW.ITM	FGP,3,18

	RW.ITM	LC
	RW.ITM	8,35

	RWITM	PHL,5,0,8
	RW.ITM	CFL,5,9,17
	RW.ITM	FDE,5,1
	RW.ITM	LDE

	RW.IPAG,6,0,8
	RWITM	RWT,6,18,35

	RW.ITM	RHR,7,
	RW.ITM	RFR

	RW.IPHR,8,0,17
	RW.ITM	PFR,8,18,35

	RW.ITM	GIR,9
	RW.ITM	CO5

	RW.M	CID,10,0,17
ix	RW.ITM	NCI,10,18

	RW.ITM	BK7
	RW.ITT,11,18,35
jx

	

	RW.ITM	R17
	RW.SMT,SAM

	RW.M	LCD,2,0,1
	RW.ITM	NLC,2,2,3
l	RW.ITM	SCD,2,4,5
	RW.ITM	TYP,2,6
	RW.ITM	NSI,2

	RW.ITM3,0,8
	RW.ICOL,3,9,17
	RW.ITM	NXT,3,18,26

	RW.SME	RES,L
	RW.SME	SLK,PC

	RW.ITM	UPN,5
	RW.ITM	US5

	RW.M	SUP,6,0,17
o8
	;WORDSE7STHRUO2STO
	;3(ALLOWRFORS WITH
	;S(EWP.MAC, SYMBOL

	
q8
	RW.ITM	DCI,1,0,
	RW.SME	SAV,S

	RW.ITM	CHG
	RW.FLG	9
	RW.FLG	10
	RW.ITM2,9,10
	RW.G	GPI,2,11
	RWFLG	GEN,2,12
	RW.FLG	FNC,2,13
	xRW.FLG	RSU,2,16
t	RW.SME	CFG,NSI
t8
	RW.SME	REE,FIL

	RADIX	8



	RADIX	8

eo$#Q

	RWTB.A
	RWTB.B

.kL,;ZQ $0kL.

WQ HkL.N8Q 0$kL/	US%A==<POINT 1,B-1,C>kLu q2	US%A==<P(OINT D-C+1,B-1,D>D-C+1,B-1kLv;2 xq?	US%A==US%B	US%A==USkLv|R 8qC	US%A==B-1	US%A==BkO$!1 0`s
		XLIST
		USTB.C
		LIST
STB.C
		LISTkO$#Q 

	RADIX

	D.PNTR	US

	US.ITP,1,3,11
	USFLG	XTR,1,17
	US.ITM	PRO,1,18,35

	US.ITM	CNT,2

	RADIX	8



	RADIX	8S@P >}{woP