Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

;THIS FILE WILL CREATE A MESSAGE FILE OF ALL ERROR MESSAGES
;WHEN ASSEMBLED WITH ANY MICRO-DIAGNOSTIC FOR THE DX20

	RIM10
	LOC	0
	LALL
	.DIRECTIVE .XTABM
	IF2,<PRINTX	STARTING MESSAGE FILE>

%%%LOC=0

DEFINE	DEFTST(NAME),<%%%PRG NAME,\EDIT,\VERSION>

DEFINE	%%%PRG(PROG,EDT,VERS),<
	%%%CHK
	ASCII	\;PROG'.MSG   VER EDT'.'VERS
\
	%%%LOC=.
>

DEFINE	TEST(NUM,NAME),<
	%%%CHK
	ASCII \:NUM:NAME
\
	%%%LOC=.
>

DEFINE	ERRMSG(MSG1,MSG2),<
	%%%CHK
	ASCII \!MSG1
\
	IFNB <MSG2>,<ASCII \]MSG2
\>
	%%%LOC=.
>

DEFINE	ERROR(A,M1,M2,P),<ERRMSG <M1>,<M2>>
DEFINE	ERRORM(A,M1,M2,P),<ERRMSG <M1>,<M2>>
DEFINE	ERRORA(A,M1,M2,P),<ERRMSG <M1>,<M2>>
DEFINE	ERRORD(A,M1,M2,P),<ERRMSG <M1>,<M2>>

DEFINE	CHKTRM(A,M1,M2,P),<ERRMSG <M1>,<M2>>
DEFINE	CHKERR(A,M1,M2,P),<ERRMSG <M1>,<M2>>

DEFINE	.ECRAM,<%%%END>
DEFINE	.MEM,<%%%END>
DEFINE	.END,<%%%END>

DEFINE	%%%END,<
	%%%CHK
	ASCII \;EOF
\
	END
>

DEFINE	%%%CHK,<IFN .-%%%LOC,<PRINTX ???????? LOCATION COUNTER CHANGED>>

DEFINE	D(OP),<DEFINE OP(A1,A2,A3,A4,A5),<>>

D .INIT
D .LOC
D WRITE
D READ
D READB
D SNDADR
D REPEAT

D NOP
D LDBR
D LDMEM
D LDMAR
D LDMARX
D IMAR
D RETURN
D SHR

D DATI

D ADM
D ADMR
D ADMC
D ADMCR
D OSMC
D OSMCR
D INC
D INCR
D ADC
D ADCR
D SHL
D SHLR
D ROTL
D ROTLR
D DEC
D DECR
D MOV
D MOVR
D MOVMEM
D LORCM
D LORCMR
D LANDM
D LANDMR
D LORM
D LORMR
D LXORM
D LXORMR
D TSM
D TSMR
D OSM
D OSMR

D ADB
D ADBR
D ADBC
D ADBCR
D OSBC
D OSBCR
D MOVB
D LORCB
D LORCBR
D LANDB
D LANDBR
D LORB
D LORBR
D LXORB
D LXORBR
D TSB
D TSBR
D OSB
D OSBR

D JMP
D JUMP
D JMPI
D JUMPI
D JMPB0
D JUMPB0
D JMPB4
D JUMPB4
D JMPB7
D JUMPB7
D JMPC
D JUMPC
D JMPZ
D JUMPZ
D JMPSUB
D GOSUB