Google
 

Trailing-Edge - PDP-10 Archives - BB-H506D-SM_1983 - cobol/build/opctab.unv
There are 15 other files named opctab.unv in the archive. Click here to see a list.
x
,5@P B:8 +	XPOINT 1,A,17POINT 1,AB;:8P F:8 +)ZPOINT 1,A,16POINT 1,AF;:8P S@$` '	8POINT 4,A,6POINT 4,AS@$^ &I4POINT 1,A,0POINT 1,AS@%| (	@POINT 8,A,17POINT 8,AS@&:h )ILPOINT 1,A,8POINT 1,AS@&:i *	PPOINT 1,A,7POINT 1,AS@&:p )	HPOINT 1,A,9POINT 1,AS@&:x 'I<POINT 3,A,9POINT 3,AS@&x` (IDPOINT 2,A,2POINT 2,AS@,`P xS@,^P$S@-|P S@.:hP S@.:iP S@.:pP S@.:xP S@.x`P#\;:8P _BH1 h}B

IFNB <A>,<
A:	>

X(LIST
%OPCT%(MOVEH,	000,	MOV,	200,	h1,1,0,0,0,	N.SKIP,	MVEPAT	)
%OPCT(%(MOVEI,	001,	MOVHEI.,	201,	1,1,1,0h,0,	N.SKIP,	MVIPAT	)
%OPCT%(MOVEM(,	002,	MOVEM.,	20H2,	1,1,0,0,0,	N.ShKIP,	MVMOPT	)
%OPCT%(MOVM,	003,	M(OVM.,	214,	1,1,0,H0,0,	N.SKIP,	MVMPhAT	)
%OPCT%(MOVMM,	004,	MOVMM.,	2(16,	1,1,0,0,0,	N.HSKIP,	MMMPAT	)
%hOPCT%(MOVN,	005,		MOVN.,	210,	1,1,0	(,0,0,	N.SKIP,	MOV	HNPT	)
%OPCT%(MOV	hNI,	006,	MOVNI.,	
211,	1,1,1,0,0,	N
(.SKIP,	LODSTR	)

H%OPCT%(MOVNM,	007
h,	MOVNM.,	212,	1,1,0,0,0,	N.SKIP,	(0	)
%OPCT%(MOVS,H	010,	MOVS.,	204,h	1,1,0,0,0,	N.SKI
P,	0	)

%OPCU%(
(MOVSI,	011,	HRLZI
H.,	205,	1,1,0,0,0
h,	N.SKIP,	LODSTR	
%OPCT%(MOVSI,	05,
%OPCT%(ADD,	012,	AD,	2(70,	1,1,0,0,0,	N.HSKIP,	0	)
%OPCT%h(ADDI,	013,	ADDI.,	271,	1,1,1,0,0,(	N.SKIP,	0	)
%OPHCT%(ADDM,	014,	ADhDM.,	272,	1,1,0,0,0,	N.SKIP,	ADMPA(T	)
%OPCT%(ADDB,H	015,	ADDB.,	273,h	1,1,0,0,0,	N.SKIP,	0	)
%OPCT%(SU(B,	016,	SUB.,	274H,	1,1,0,0,0,	N.SKhIP,	0	)
%OPCT%(SUBI,	017,	SUBI.,	(275,	1,1,1,0,0,	NH.SKIP,	SBIPAT	)
h%OPCT%(SUBM,	020,	SUBM.,	276,	1,1,(0,0,0,	N.SKIP,	0	H)
%OPCT%(MUL,	02h1,	MUL.,	224,	1,1,0,0,0,	N.SKIP,	0(	)
%OPCT%(MULI,	H022,	MULI.,	225,	h1,1,1,0,0,	N.SKIP,	0	)
%OPCT%(IMU(L,	023,	IMUL.,	22H0,	1,1,0,0,0,	N.ShKIP,	0	)
%OPCT%(IMULI,	024,	IMULI(.,	221,	1,1,1,0,0H,	N.SKIP,	IMIPAT	h)
%OPCT%(XCT,	025,	XCT.,	256,	1,1(,0,0,0,	N.SKIP,	0H	)
%OPCT%(DIV,	0h26,	DIV.,	234,	1,1,0,0,0,	N.SKIP,	(0	)
%OPCT%(DIVI,H	027,	DIVI.,	235,h	1,1,1,0,0,	N.SKIP,	0	)
%OPCT%(DI(VM,	030,	DIVM.,	2H36,	1,1,0,0,0,	N.hSKIP,	0	)
%OPCT%(IDIV,	031,	IDIV.(,	230,	1,1,0,0,0,H	N.SKIP,	0	)
%OPhCT%(IDIVI,	032,	IDIVI.,	231,	1,1,1(,0,0,	N.SKIP,	0	)H
%OPCT%(IDIVM,	0h33,	IDIVM.,	232,	1,1,0,0,0,	N.SKIP(,	0	)
%OPCT%(FADHR,	034,	FAD.,	144h,	1,1,0,0,0,	N.SKIP,	0	)
%OPCT%(F(ADRM,	035,	FADM.,H	146,	1,1,0,0,0,	hN.SKIP,	0	)
%OPCT%(FSBR,	036,	FSB(.,	154,	1,1,0,0,0H,	N.SKIP,	0	)
%OhPCT%(FSBRM,	037,	FSBM.,	156,	1,1,0(,0,0,	N.SKIP,	0	)H
%OPCT%(FMPR,	04h0,	FMP.,	164,	1,1 ,0,0,0,	N.SKIP,	0 (	)
%OPCT%(FMPRM, H	041,	FMPM.,	166, h	1,1,0,0,0,	N.SKI!P,	0	)
%OPCT%(FD!(VR,	042,	FDV.,	17!H4,	1,1,0,0,0,	N.S!hKIP,	0	)
%OPCT%("FDVRM,	043,	FDVM."(,	176,	1,1,0,0,0,"H	N.SKIP,	0	)
%OP"hCT%(DPB,	044,	DPB#.,	137,	1,1,0,0,0#(,	N.SKIP,	0	)
%O#HPCT%(LDB,	045,	LD#hB.,	135,	1,1,0,0,$0,	N.SKIP,	LODSTR$(	)	
%OPCT%(IDPB,$H	046,	IDPB.,	136,$h	1,1,0,0,0,	N.SKI%P,	0	)
%OPCT%(IL%(DB,	047,	ILDB.,	1%H34,	1,1,0,0,0,	N.%hSKIP,	0	)
%OPCT%&(AOS,	050,	AOS.,	&(350,	0,1,0,0,0,	N&H.SKIP,	AOSPAT	)
&h%OPCT%(SOS,	051,	'SOS.,	370,	0,1,0,'(0,0,	N.SKIP,	0	)
%OPCT%(SOSGE,	05'h2,	SOSGE.,	375,	0(,1,0,0,0,	C.SKIP,((	SGEPAT	)
%OPCT%(H(SOSLE,	053,	SOSL(hE.,	373,	0,1,0,0,)0,	C.SKIP,	SLEPAT)(	)

%OPCU%(CAM,)H	052,	CAM.,	310,	)h0,1,0,0,0,	N.SKIP*,	0	)
%OPCU%(CAI*(,	053,	CAI.,	300,*H	0,1,0,0,0,	N.SKI*hP,	0	)
%OPCT%(CA+ME,	054,	CAME.,	3+(12,	1,1,0,0,0,	C.+HSKIP,	CNDSKP	)
%+hOPCT%(CAIE,	055,	,CAIE.,	302,	1,1,1,(,0,0,	C.SKIP,	CAI,HXX	)
%OPCT%(CAMG,h,	056,	CAMG.,	317-,	1,1,0,0,0,	C.SK-(IP,	CNDSKP	)
%OP-HCT%(CAIG,	057,	CA-hIG.,	307,	1,1,1,0.,0,	C.SKIP,	CAIXX.(	)
%OPCT%(CAMGE,.H	060,	CAMGE.,	315.h,	1,1,0,0,0,	C.SK/IP,	CNDSKP	)
%OP/(CT%(CAIGE,	061,	C/HAIGE.,	305,	1,1,1/h,0,0,	C.SKIP,	CAI0XX	)
%OPCT%(CAML0(,	062,	CAML.,	3110H,	1,1,0,0,0,	C.SK0hIP,	CNDSKP	)
%OP1CT%(CAIL,	063,	CA1(IL.,	301,	1,1,1,01H,0,	C.SKIP,	CAIXX1h	)
%OPCT%(CAMLE,2	064,	CAMLE.,	3132(,	1,1,0,0,0,	C.SK2HIP,	CNDSKP	)
%OP2hCT%(CAILE,	065,	C3AILE.,	303,	1,1,13(,0,0,	C.SKIP,	CAI3HXX	)
%OPCT%(CAMN3h,	066,	CAMN.,	3164,	1,1,0,0,0,	C.SK4(IP,	CNDSKP	)
%OP4HCT%(CAIN,	067,	CA4hIN.,	306,	1,1,1,05,0,	C.SKIP,	CAIXX5(	)

%OPCU%(JUMP5H,	067,	JUMP.,	3205h,	0,1,0,0,0,	N.SK6IP,	0	)
%OPCT%(J6(UMPE,	070,	JUMPE.6H,	322,	1,1,0,0,0,6h	N.SKIP,	DOTREF	)7
%OPCT%(JUMPG,	07(71,	JUMPG.,	327,	7H1,1,0,0,0,	N.SKIP7h,	DOTREF	)
%OPCT8%(JUMPGE,	072,	JM8(PGE.,	325,	1,1,0,8H0,0,	N.SKIP,	DOTR8hEF	)
%OPCT%(JUMP9L,	073,	JUMPL.,	39(21,	1,1,0,0,0,	N.9HSKIP,	DOTREF	)
%9hOPCT%(JUMPLE,	074:,	JMPLE.,	323,	1,:(1,0,0,0,	N.SKIP,	:HDOTREF	)
%OPCT%(:hJUMPN,	075,	JUMPN;.,	326,	1,1,0,0,0;(,	N.SKIP,	DOTREF	;H)
%OPCT%(JRST,	0;h76,	JRST.,	254,	0<,1,0,0,0,	N.SKIP,<(	JRSTXX	)

%OPC<HU%(SKIP,	076,	SKI<hP.,	330,	0,1,0,0,=0,	N.SKIP,	0	)
%=(OPCT%(SKIPE,	077,=H	SKIPE.,	332,	0,1=h,0,0,0,	C.SKIP,	C>NDSKP	)
%OPCT%(S>(KIPG,	100,	SKIPG.>H,	337,	0,1,0,0,0,>h	C.SKIP,	CNDSKP	)?
%OPCT%(SKIPGE,	?(101,	SKPGE.,	335,?H	0,1,0,0,0,	C.SKI?hP,	CNDSKP	)
%OPC@T%(SKIPL,	102,	SK@(IPL.,	331,	0,1,0,@H0,0,	C.SKIP,	SKLP@hAT	)
%OPCT%(SKIPALE,	103,	SKPLE.,	A(333,	0,1,0,0,0,	CAH.SKIP,	CNDSKP	)
Ah%OPCT%(SKIPN,	104B,	SKIPN.,	336,	0,B(1,0,0,0,	C.SKIP,	BHCNDSKP	)
%OPCT%(BhSKIPA,	105,	SKIPAC.,	334,	0,0,0,0,0C(,	A.SKIP,	SKPA	)

%OPCT%(TRNE,	1Ch06,	TRNE.,	602,	1D,1,0,0,0,	C.SKIP,D(	0	)
%OPCT%(TRNNDH,	107,	TRNN.,	606Dh,	1,1,0,0,0,	C.SKEIP,	0	)
%OPCT%(TE(LNE,	110,	TLNE.,	EH603,	1,1,0,0,0,	CEh.SKIP,	0	)
%OPCTF%(TLNN,	111,	TLNNF(.,	607,	1,1,0,0,0FH,	C.SKIP,	0	)
%OFhPCT%(JSA,	112,	JSGA.,	266,	1,1,0,0,G(0,	N.SKIP,	0	)
%GHOPCT%(PUSHJ,	113,Gh	PUSHJ.,	260,	1,1H,0,0,0,	N.SKIP,	0H(	)
%OPCT%(BLT,	1HH14,	BLT.,	251,	1,Hh1,0,0,0,	N.SKIP,	I0	)
%OPCT%(SETZMI(,	115,	SETZM.,	40IH2,	0,1,0,0,0,	N.SIhKIP,	0	)
%OPCT%(JSETOM,	116,	SETOMJ(.,	476,	0,1,0,0,0JH,	N.SKIP,	0	)
%OJhPCT%(TDCA,	117,	TKDCA.,	654,	1,1,0,K(0,0,	A.SKIP,	0	)
%OPCT%(ANDM,	120Kh,	ANDM.,	406,	1,1L,0,0,0,	N.SKIP,	0L(	)
%OPCT%(IORCAMLH,	121,	ORCAM.,	45Lh6,	1,1,0,0,0,	N.SMKIP,	0	)
%OPCT%(M(HRLOI,	122,	HRLOIMH.,	525,	1,1,0,0,0Mh,	N.SKIP,	0	)
%ONPCT%(HRROI,	123,	N(HRROI.,	561,	1,1,NH0,0,0,	N.SKIP,	0	Nh)
%OPCT%(HRRI,	1O24,	HRRI.,	541,	1O(,1,0,0,0,	N.SKIP,OH	HRRIXX	)
%OPCT%Oh(HRRZI,	125,	HRRZPI.,	551,	1,1,0,0,P(0,	N.SKIP,	LODSTRPH	)
%OPCT%(SETZB,Ph	126,	SETZB.,	403Q,	1,1,0,0,0,	N.SKQ(IP,	0	)
%OPCT%(AQHRG,	127,	ARG.,	32Qh0,	1,1,0,0,0,	N.SRKIP,	0	)
%OPCT%(R(SOJG,	130,	SOJG.,RH	367,	1,1,0,0,0,	RhN.SKIP,	0	)
%OPCST%(EXCH,	131,	EXCS(H.,	250,	1,1,0,0,SH0,	N.SKIP,	0	)
%ShOPCT%(CALLI,	132,T	CALLI.,	047,	1,1T(,0,0,0,	N.SKIP,	0TH	)
%OPCT%(TLZ,	1Th33,	TLZ.,	621,	1,U1,0,0,0,	N.SKIP,	U(0	)
%OPCT%(TLO,	UH134,	TLO.,	661,	1Uh,1,0,0,0,	N.SKIP,V	0	)
%OPCT%(SETCV(AM,	135,	SETCA.,	VH452,	1,1,0,0,0,	NVh.SKIP,	0	)
%OPCTW%(SETCMM,	136,	SEW(TCM.,	462,	0,1,0,WH0,0,	N.SKIP,	0	)
%OPCT%(POPJ,	137X,	POPJ.,	263,	1,0X(,0,0,0,	N.SKIP,	0	)

LIST
,	0_BHI XiD

IFNB <Y	A>,<
A:	>

XY(LIST
%OPCT%(DMOVYHE,	000,	DMOVE.,	1Yh20,	1,1,0,0,0,	N.ZSKIP,	0	)
%OPCT%Z((DMOVN,	001,	DMOVZHN.,	121,	1,1,0,0,Zh0,	N.SKIP,	0	)
%[OPCT%(DMOVEM,	002[(,	DMOVM.,	124,	1,[H1,0,0,0,	N.SKIP,	[h0	)
%OPCT%(DMOVN\M,	003,	DMVNM.,	1\(25,	1,1,0,0,0,	N.\HSKIP,	0	)
%OPCT%\h(DADD,	004,	DADD.],	114,	1,1,0,0,0,](	N.SKIP,	0	)
%OP]HCT%(DSUB,	005,	DS]hUB.,	115,	1,1,0,0^,0,	N.SKIP,	0	)
^(%OPCT%(DMUL,	006,^H	DMUL.,	116,	1,1,^h0,0,0,	N.SKIP,	0	_)
%OPCT%(DDIV,	0_(07,	DDIV.,	117,	1_H,1,0,0,0,	N.SKIP,_h	0	)
%OPCT%(ASHC`,	010,	ASHC.,	244`(,	1,1,1,1,0,	N.SK`HIP,	ASHCPT	)
%OP`hCT%(HLRZ,	011,	HLaRZ.,	554,	1,1,0,0a(,0,	N.SKIP,	LODSTaHR	)
%OPCT%(HRLM,ah	012,	HRLM.,	506,b	1,1,0,0,0,	N.SKIb(P,	0	)
%OPCT%(HRbHRZ,	013,	HRRZ.,	5bh50,	1,1,0,0,0,	N.cSKIP,	LODSTR	)
%c(OPCT%(HRRM,	014,	cHHRRM.,	542,	1,1,0ch,0,0,	N.SKIP,	0	)d
%OPCT%(HLLZS,	0d(15,	HLLZS.,	513,	dH0,1,0,0,0,	N.SKIPdh,	0	)
%OPCT%(HLLeOS,	016,	HLLOS.,	e(523,	0,1,0,0,0,	NeH.SKIP,	0	)
%OPCTeh%(HRRZS,	017,	HRRfZS.,	553,	0,1,0,0f(,0,	N.SKIP,	0	)
fH%OPCT%(HRROS,	020fh,	HRROS.,	563,	0,g1,0,0,0,	N.SKIP,	g(0	)
%OPCT%(FLTR,gH	021,	FLTR.,	127,gh	1,1,0,0,0,	N.SKIhP,	FLTPAT	)
%OPCh(T%(JFCL,	022,	JFChHL.,	255,	0,0,0,0,hh0,	N.SKIP,	0	)
%iOPCT%(ASH,	023,	Ai(SH.,	240,	1,1,1,1iH,0,	N.SKIP,	0	)
ih%OPCT%(FADRI,	024j,	FADRI.,	145,	1,j(1,0,0,0,	N.SKIP,	jH0	)
%OPCT%(FSBRIjh,	025,	FSBRI.,	15k5,	1,1,0,0,0,	N.Sk(KIP,	0	)
%OPCT%(kHFMPRI,	026,	FMPRIkh.,	165,	1,1,0,0,0l,	N.SKIP,	0	)
%Ol(PCT%(FDVRI,	027,	lHFDVRI.,	175,	1,1,lh0,0,0,	N.SKIP,	0	m)
%OPCT%(PUSH,	0m(30,	PUSH.,	261,	1mH,1,0,0,0,	N.SKIP,mh	PSHPAT	)
%OPCT%n(POP,	031,	POP.,	n(262,	1,1,0,0,0,	NnH.SKIP,	0	)
%OPCTnh%(IBP,	032,	IBP.,o	133,	0,1,0,0,0,	o(N.SKIP,	0	)
%OPCoHT%(ADJBP,	033,	ADohJBP.,	133,	1,1,0,p0,0,	N.SKIP,	ADJPp(AT	)
%OPCT%(LSH,pH	034,	LSH.,	242,	ph1,1,1,1,0,	N.SKIPq,	0	)
%OPCT%(TLZq(E,	035,	TLZE.,	62qH3,	1,1,0,0,0,	C.SqhKIP,	0	)
%OPCT%(rTLZN,	036,	TLZN.,r(	627,	1,1,0,0,0,	rHC.SKIP,	0	)
%OPCrhT%(TLZA,	037,	TLZsA.,	625,	1,1,0,0,s(0,	C.SKIP,	0	)
%sHOPCT%(TRZE,	040,	shTRZE.,	622,	1,1,0t,0,0,	C.SKIP,	0	)t(
%OPCT%(TRZN,	04tH1,	TRZN.,	626,	1,th1,0,0,0,	C.SKIP,	u0	)
%OPCT%(TRZA,u(	042,	TRZA.,	624,uH	1,1,0,0,0,	A.SKIuhP,	0	)
%OPCT%(TDvNE,	043,	TDNE.,	6v(12,	1,1,0,0,0,	C.vHSKIP,	0	)
%OPCT%vh(TDNN,	044,	TDNN.w,	616,	1,1,0,0,0,w(	C.SKIP,	0	)
%OPwHCT%(TDNA,	045,	TDwhNA.,	614,	1,1,0,0x,0,	A.SKIP,	0	)
x(%OPCT%(TDZE,	046,xH	TDZE.,	632,	1,1,xh0,0,0,	C.SKIP,	0	y)
%OPCT%(TDZN,	0y(47,	TDZN.,	636,	1yH,1,0,0,0,	C.SKIP,yh	0	)
%OPCT%(TDZAz,	050,	TDZA.,	634z(,	1,1,0,0,0,	A.SKzHIP,	0	)
%OPCT%(TzhDOE,	051,	TDOE.,	{672,	1,1,0,0,0,	C{(.SKIP,	0	)
%OPCT{H%(TDON,	052,	TDON{h.,	676,	1,1,0,0,0|,	C.SKIP,	0	)
%O|(PCT%(TDOA,	053,	T|HDOA.,	674,	1,1,0,|h0,0,	A.SKIP,	0	)
%OPCT%(HRLI,	054}(,	HRLI.,	505,	1,1}H,0,0,0,	N.SKIP,	0}h	)
%OPCT%(SETZ,	~055,	SETZ.,	400,	~(1,0,0,0,0,	N.SKIP~H,	STZPAT	)
%OPCT~h%(SETO,	056,	SETO.,	474,	1,0,0,0,0(,	N.SKIP, STOPAT	H)
%OPCT%(TRZ,	05h7,	TRZ.,	620,	1,1,0,0,0,	N.SKIP,	0(	)
%OPCT%(HRLZ,	H060,	HRLZ.,	514,	h1,1,0,0,0,	N.SKIP,	0	)
%OPCT%(HLR(,	061,	HLR.,	544,H	1,1,0,0,0,	N.SKIhP,	0	)
%OPCT%(HRR,	062,	HRR.,	540(,	1,1,0,0,0,	N.SKHIP,	0	)
%OPCT%(HhLLZ,	063,	HLLZ.,	510,	1,1,0,0,0,	N(.SKIP,	0	)
%OPCTH%(AND,	064,	AND..h,	404,	1,1,0,0,0,	N.SKIP,	0	)
%OP(CT%(LSHC,	065,	LSHHC.,	246,	1,1,1,1h,0,	N.SKIP,	0	)
%OPCT%(ANDI,	066,(	ANDI.,	405,	1,1,H0,0,0,	N.SKIP,	0	h)
%OPCT%(IOR,	067,	IOR.,	434,	1,1(,0,0,0,	N.SKIP,	0H	)
%OPCT%(IORI,	h070,	IORI.,	435,	1,1,0,0,0,	N.SKIP(,	0	)
%OPCT%(JRSHT,	071,	XJRST.,	2h54,	0,1,0,0,0,	N.SKIP,	XJPAT	)
%O(PCT%(SKIPA,	072,	HXSKPA.,	334,	0,0,h0,0,0,	A.SKIP,	0		)
%OPCT%(AOSA,	0	(73,	AOSA.,	354,	0	H,1,0,0,0,	A.SKIP,	h	0	)
%OPCT%(MOVM
S,	074,	MOVMS.,	2
(17,	0,1,0,0,0,	N.
HSKIP,	MVMSPT	)
%
hOPCT%(SOSL,	075,	SOSL.,	371,	0,1,0(,0,0,	C.SKIP,	SLPHAT	)
%OPCT%(SOSGh,	076,	SOSG.,	377
,	0,1,0,0,0,	C.SK
(IP,	SGPAT	)
%OPC
HT%(SETOB,	077,	SE
hTOB.,	477,	1,1,0,
%OPCT%(PUSHJ,	101	0	)
%OPCT%(PUSH(J,	101,	ERROR.,	2H60,	1,1,0,0,1,	N.hSKIP,	0	)
%OPCT%(MOVEI,	102,	XMOV(I.,	201,	1,1,1,0,H0,	N.SKIP,	0 )	;[h561]
%OPCT%(TLC,	103,	TLC.,	641,	(1,1,0,0,0,	N.SKIPH, 0 )	;[562]
%OPhCT%(TLCA,	104,	TLCA.,	645,	1,1,0,0(,0,	A.SKIP, 0 )
H%OPCT%(DFAD,	105,h	DFAD.,	110,	1,1,0,0,0,	N.SKIP,	0	()
%OPCT%(DFSB,	1H06,	DFSB.,	111,	1h,1,0,0,0,	N.SKIP,	0	)
%OPCT%(DFMP(,	107,	DFMP.,	112H,	1,1,0,0,0,	N.SKhIP,	0	)
%OPCT%(DFDV,	110,	DFDV.,	(113,	1,1,0,0,0,	NH.SKIP,	0	)
%OPCTh%(ANDCAM,	111,	NDCAM.,	412,	1,1,0,(0,0,	N.SKIP,	0	);H[1004]

%OPCT%(hEXTEND,	112,	XTND.,	123,	1,1,0,0,0(,	C.SKIP,	0	)
%OHPCT%(Z,	113,	ZOP.h,	  0,	0,1,0,0,0,	N.SKIP,	0	)

O(PCT%V=:	113	;EACHH MODULE THAT EXPAhNDS THIS MACRO GETS
			;GLOBAL SY(MBOL OPCT%V; LINKH COMPLAINS IF CONFLICT
LIST
ONg&k RB==Aq?H1 	0

XLIST
;%OPCT%(Z,	0,	Z,H	0,	0,1,0,0,0,	N.hSKIP,	0	)
%OPCT%(CMPSL,	1,	CMPSL,(	1,	0,1,0,0,0,	N.HSKIP,	0	)
%OPCT%h(CMPSE,	2,	CMPSE,	2,	0,1,0,0,0,	N.(SKIP,	0	)
%OPCT%H(CMPSLE,	3,	CMPSLhE,	3,	0,1,0,0,0,	N.SKIP,	0	)
%OPC(T%(EDIT,	4,	EDIT,H	4,	0,1,0,0,0,	N.hSKIP,	0	)
%OPCT%(CMPSGE,	5,	CMPSG(E,	5,	0,1,0,0,0,	HN.SKIP,	0	)
%OPChT%(CMPSN,	6,	CMPSN,	6,	0,1,0,0,0,	(N.SKIP,	0	)
%OPCHT%(CMPSG,	7,	CMPShG,	7,	0,1,0,0,0,	N.SKIP,	0	)
%OPC(T%(CVTDBO,	10,	CVHTDBO,	10,	0,1,0,0h,0,	N.SKIP,	0	)
 %OPCT%(CVTDBT,	11 (,	CVTDBT,	11,	0,1 H,0,0,0,	N.SKIP,	0 h	)
%OPCT%(CVTDBO!,	12,	CVTDBO,	12,!(	0,1,0,0,0,	N.SKI!HP,	0	)
%OPCT%(CV!hTBDT,	13,	CVTBDT,"	13,	0,1,0,0,0,	N"(.SKIP,	0	)
%OPCT"H%(MOVSO,	14,	MOVS"hO,	14,	0,1,0,0,0,#	N.SKIP,	0	)
%OP#(CT%(MOVST,	15,	MO#HVST,	15,	0,1,0,0,#h0,	N.SKIP,	0	)
%$OPCT%(MOVSLJ,	16,$(	MOVSLJ,	16,	0,1,$H0,0,0,	N.SKIP,	0	$h)
%OPCT%(MOVSRJ,%	17,	MOVSRJ,	17,	%(0,1,0,0,0,	N.SKIP%H,	0	)
%OPCT%(XBL%hT,	20,	XBLT,	20,	&0,1,0,0,0,	N.SKIP,	0	)

LIST
viP }H'P ~"&#@P ~CxgP R
s@P S@P >}{woP