.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