Fixed typos.
[retro-software/dec/tops10/v4.5.git] / src / ft50sd.mac
diff --git a/src/ft50sd.mac b/src/ft50sd.mac
new file mode 100644 (file)
index 0000000..f036bfc
--- /dev/null
@@ -0,0 +1,33 @@
+;THIS SUB-PROGRAM ASSEMBLED WITH CONFIGURATION DEPENDENT FEATURE SWITCHES - FT50SD.MAC(V003)\r
+       XLIST\r
+;      TH/RC  TS3.19  27 SEP 68  V002\r
+;CONFIGURATION DEPENDENT FEATURE SWITCHES FOR CONDITIONAL ASSEMBLY\r
+;-1 MEANS INCLUDE THE ASSOCIATED FEATURE, 0 MEANS ELIMINATE IT\r
+\r
+FTSWAP=-1      ;SWAPPING SYSTEM\r
+               ;IF FTSWAP=-1, THEN FTDISK MUST BE -1\r
+\r
+FTDISK=-1      ;DISK SYSTEM(MAY OR MAY NOT HAVE SWAPPING)\r
+               ;IF FTDISK=-1, THEN FTLOGIN MUST BE -1\r
+               ;IF FTSWAP=-1, THEN FTDISK MUST BE -1\r
+\r
+FTLOGIN=-1     ;LOGIN-LOGOUT COMMAND AND UUOS\r
+               ;FTDISK=-1 IMPLIES FTLOGIN=-1\r
+\r
+FTCCL=-1               ;CONCISE COMMAND LANGUAGE COMMANDS\r
+               ;USED IN APRSER\r
+               ;SHOULD BE 0 IN NON-DISK SYSTEMS\r
+               ;SHOULD BE -1 IN DISK SYSTEMS, WHEN IMPLEMENTED\r
+\r
+FTRC10=0       ;DATA PRODUCTS DISK\r
+\r
+FTKCT=-1       ;ACCUMULATE CORE*RUNNING TIME FOR CHARGING FOR EACH USER\r
+\r
+FTPRV=-1       ;PRIVILEGE BITS FOR EACH USER\r
+\r
+FTGETTAB=-1    ;GETTAB UUO - RETURN CONTENTS OF MONITOR JOBTABLES\r
+\r
+;LAST PAGE SHOULD BE WRITTEN WITH 'HP' TECO COMMAND SO FORM-FEED IS\r
+;NOT APPENDED AFTER LIST CAUSING EXTRA BLANK PAGE IN MONITOR LISTING\r
+\r
+       LIST\r