Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/cnvrtt.mac
There are no other files named cnvrtt.mac in the archive.
;*MAINDEC-10-DDQDG
;*(CONVRT)
DECVER=014
MCNVER=000
XLIST
DEFINE NAME (MCNVER,DECVER),<
TITLE CONVRT [DDQDG] DECSYSTEM DIAGNOSTIC ASCIIZER CONVERSION PROGRAM,VER MCNVER,DECVER>
LIST
LALL
NAME \MCNVER,\DECVER
LOC 137
MCNVER,,DECVER
;*COPYRIGHT 1973, 1974, 1975, 1976, 1977, 1978
;*DIGITAL EQUIPMENT CORPORATION
;*MARLBORO, MASS. 01752
;*JOHN R. KIRCHOFF
NOSYM
SUBTTL PARAMETERS
DEFINE S,<;*******************************************************>
;*ACCUMULATORS
S
AC0= 0
AC1= 1
AC2= 2
AC3= 3
AC4= 4
AC= 5
BPNT= 6
CHR= 7
CHAR= 7
CHR1= 10
T1= 11
T2= 12
T3= 13
T4= 14
CNT= 15
INDX= 16
;*I/O CHANNEL ASSIGNMENTS
S
IN= 1
ICHAN= 1
OUT= 2
OCHAN= 2
RSQ= 3
;*MISCELLANEOUS
S
HLTBIT= 200
BLKSZ= ^D10
JOBSA= 120
JOBFF= 121
JOBDA= 140
DRMSTR= 400000
HICORE= DRMSTR+DRMSIZ*2
;*PDP-11 CONVERT PARAMETERS
S
BYTE= 5 ;8 BIT BYTE AC
BC= 6 ;BYTE COUNT
P1= 13 ;POINTERS
P2= 14
BA= 3 ;BLOCK STORAGE ADDRESSER
FB= 4 ;FILE BYTE COUNT
AWC11= ^D30 ;ASCIIZED WORD COUNT
CRMSIZ= ^D2048 ;C-RAM SIZE
DRMSIZ= ^D512 ;D-RAM SIZE
;*PDP-8 CONVERT PARAMETERS
S
G8DC=6
;*ASSEMBLY PARAMETERS
S
PRINT= 1
TYPIN= 1
UUOS= 1
PGMEND= 1
USRASB= 1
PSHLST= 20
DEBUG= 40
SADR1= BEGIN
SADR2= BEGIN
SADR3= BEGIN
SADR4= BEGIN
SADR5= BEGIN
SADR6= BEGIN
SADR7= 0
SADR8= 0
SADR9= 0
SADR10= 0
SADR11= 0
PAREA1= 0
PAREA2= 0
PAREA3= SIXBIT/CONVRT/
PAREA4= SIXBIT/LST/
PAREA5= 0
PAREA6= 0
ITERAT= 0
OPDEF PNT4 [JSR 4,$PRINT]
OPDEF PNT4F [JSR 4,$PRNTF]