Trailing-Edge
-
PDP-10 Archives
-
BB-J724B-SM_1982
-
sources/20tk3.p11
There are 3 other files named 20tk3.p11 in the archive. Click here to see a list.
.SBTTL D6TK3 - front end version condtional switches
; this file conditions the dn60 front-end source code
; to assemble for the DTE-KMC/DUP-2780/3780 front end.
.REPT 0
COPYRIGHT (c) 1982,1981, 1980, 1979
DIGITAL EQUIPMENT CORPORATION, maynard, mass.
THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE
INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY
TRANSFERRED.
THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
CORPORATION.
DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.
.ENDR
.IF EQ,DEBUG
.TITLE D6TK3 IBM HASP/3780/2780 DECSYSTEM-20 FRONT END WITH DTE
.MACRO PGMNAM
MYNAME: .ASCII \D6TK3 IBM HASP/3780/2780 DECSYSTEM-20 FRONT END,\
.BYTE 15,12
.ASCII \ WITH DTE INTERFACE ON A DEC-20\
.ENDM
.IFF
.TITLE D6TK3D DEBUGGING IBM HASP/3780/2780 DECSYSTEM-20 FRONT END WITH DTE
.MACRO PGMNAM
MYNAME: .ASCII \D6TK3D DEBUGGING IBM HASP/3780/2780 DECSYSTEM-20 FRONT END,\
.BYTE 15,12
.ASCII \ WITH DTE INTERFACE ON A DEC-20\
.ENDM
.ENDC ;.IF EQ,DEBUG
; SPECIFY MAJOR AND MINOR VERSION NUMBERS
;VMAJOR=1
;VMINOR=0
VEDIT=0 ;THIS GETS INCREMENTED BY EACH MODULE
; CONDITION CHK11 TO USE DN87S DEVICE ADDRESSING
FT.87S=0
FT.D20=1
FTDL10=0 ;NOT USING A DL10
FTGLOM=0 ;CHK11 HARDWARE CONFIGURATION SWITCH
FT.CPU=1
CK..VR=1 ;CHK11 WILL PRINT THE VERSION NUMBER
; DEFINE THE AMOUNT OF SPACE TO LEAVE FOR DISPATCHER PUSH-DOWN
; LIST AND VECTORS
LVPDVC=500 ;LEAVE 1200 BYTES (DTE20 USES TO 1000)
; DEFINE MODEL OF PDP-11, SO THE MACROS WHICH DO INSTRUCTION
; SIMULATION CAN EXPAND EFFICIENTLY
PDP11=34
FT.DQ=0 ;no DQ11 driver
FT.DMC=0 ;no DMC11 driver
FT.DUP=0 ;no DUP11 driver
FT.KDP=1 ; KMC11/DUP11 driver
.IIF NE,FT.DQ,SPCVFY=1 ;CHK11 WILL TEST DQ11 SPECIAL CHARACTERS
; SPECIFY THAT THE DN87S CONFIGURATION DOES NOT HAVE A KG11-A
FTKG11=1
; SPECIFY THAT WE ARE USING A DTE20
FTDTE20=1
; specify use(1)/no use(0) of TOPS-20 version 5 protocol
FTP5=1
; SPECIFY THAT WE ARE(1)/ARE NOT(0) ARE USING A FRONT END DEVICE
FTFEDV=0
; SPECIFY LARGE CHUNKS
CHSIZE=320
; SPECIFY THE MAXIMUM NUMBER OF LINES SUPPORTED ON THIS FRONT-END.
NLINES=6
; SPECIFY THE TRANSLATION OPTIONS (IBM 2780/3780 OR HASP-MULTILEAVING)
; XLOPTN IS CHANGED BY XLATE AND XLHASP TO INDICATE RESPECTIVE
; TRANSLATION OPTIONS AVAILABLE.
XLOPTN=0
;THE FOLLOWING FLAG INDICATES THE PRESENCE OF THE HASP
;OPTION.
FT.HSP=0 ;0 => no hasp, not 0 => hasp