; ; COMMAND FILE TO BUILD PRINT SYMBIONT ; ; FOR RSX-11M MAPPED SYSTEM ; ; ; TASK MUST BE PRIVILEGED BECAUSE ERROR MESSAGES ARE OUTPUT ; TO CO: USING WRITE-BREAK-THROUGH. ; TK:[1,54]LPP/PR/MM/SL/CP/-FP,MP:[1,34]LPP/-SP=[1,24]LPPBLD/MP ; ; OPTIONS INPUT ; STACK=50 UNITS=6 TASK=LPP0 PRI=70 ASG=CO:2 GBLDEF=$CDDMG:0 ; ONE MUST SET THE VALUE FOR THE SYMBOL U.ACN. GBLDEF=U.ACN:177770 ; OFFSET WITH NO M$$CLI ;GBLDEF=U.ACN:177766 ; OFFSET WITH M$$CLI SUPPORT ; ; DEFINE DEFAULT MODULE TO DETERMINE WHETHER INPUT FILE SHOULD ; BE DELETED. IF USER-WRITTEN MODULE IS SUPPLIED, PRT WILL CALL ; IT WITH THE FILE FDB ADDRESS IN R0 (R0 MUST BE PRESERVED). USER ; SUPPLIED $DELCK MUST RETURN C-BIT SET TO DELETE THE FILE. ; ; TO INCLUDE USER-SUPPLIED $DELCK, INSERT THE OBJECT MODULE IN ; PRT.OLB AND DELETE THE FOLLOWING GLOBAL DEFINITION LINE. ; GBLDEF=$DELCK:0 ; ; NOTE: WHEN FILE DELETION IS DISABLED, THE FOLLOWING FILES WILL ; STILL BE DELETED: ; ; LP.LST;* ; LP.MAP;* ; *.DMP;* ; *.PMD;* ; ; ; ; DEFINE FORMS TYPE. ; ; ASSOCIATED WITH EVERY FORM NUMBER IS A FORM LENGTH WHICH DEFINES THE NUMBER ; OF LINES ON THE FORM. THE PURPOSE OF THIS IS TO ALLOW NON-STANDARD LENGTH ; FORMS TO BE HANDLED PROPERLAY ON PRINTERS THAT DO NOT FORM FEED PROPERLY TO ; FORMS OF THAT LENGTH. IF THE DEFINED FORM LENGTH FOR A PARTICULAR FORM IS ; NOT EQUAL TO ZERO, THE PRINT DESPOOLER COUNTS LINES AND SIMULATES FORM ; FEEDS WITH THE CORRECT NUMBER OF LINE FEEDS. IF THE FORM LENGTH IS DEFINED ; AS ZERO, IT IS ASSUMED THAT THE PRINTER IS SET RIGHT, AND NORMAL FORM ; FEEDS ARE USED. ; ; INITIALLY, THE TABLE IS SET WITH THE FORM LENGTH EQUAL TO THE FORM NUMBER ; SO THAT IF YOU ARE USING A 37 LINE FORMS, AND YOUR PRINTER DOES NOT HANDLE ; 37 LINE FORMS CORRECTLY, YOU CAN USE /FORM:37. THIS, HOWEVER, IS NOT GOOD ; IN ALL CASES. IF, FOR EXAMPLE, YOU HAVE A NUMBER OF FORMS OF THE SAME ; STANDARD LENGTH, YOU WILL WANT TO PICK FORM NUMBERS FOR THEN AND SET THEIR ; FORM LENGTH ENTRIES TO ZERO. THE FOLLOWING LINE SETS FORM #1 TO A STANDARD ; FORM LENGTH. (NOTE - ALL NUMBERS HERE ARE IN OCTAL WHILE IN THE COMMANDS ; THEY ARE DECIMAL. ALSO, FORM LENGTH ENTRIES ARE FULL WORDS, SO FORM #1 ; IS OFFSET 2 OFF OF THE FORM LENGTH TABLE.) GBLPAT=INIT:FRMTBL+2:0 /