.TITLE TABLE .ENABLE LC .NLIST BEX ; ; DEFINE INTERNAL COMMANDS THAT ARE LEGITIMATE ; .PSECT $TABLE,RO,D,GBL,REL,OVR $TABLE:: .WORD 6 ;BYTE COUNT .ASCII /$1100?/ ;KEYWORD LINE .EVEN .WORD 11. .ASCII /*HELP %A%%$/ ;MCR LINE .EVEN .WORD 14. .ASCII /$3900DIRECTORY/ .EVEN .WORD 33. .ASCII ^*RUN $DIR/TASK=...DIR/PRM="%A%"%$^ .EVEN .WORD 11. .ASCII /$3600DELETE/ .EVEN .WORD 33. .ASCII ^*RUN $DIR/TASK=...DEL/PRM="%A%"%$^ .EVEN .WORD 10. .ASCII /$3500PURGE/ .EVEN .WORD 36. .ASCII ^*RUN $DIR/TASK=...PUR/PRM="%A%/PU"%$^ .EVEN .WORD 9. .ASCII /$2411TYPE/ .EVEN .WORD 9. .ASCII /$2411LIST/ .EVEN .WORD 10. .ASCII /?BFile(s) / .EVEN .WORD 17. .ASCII &*PIP TI:=%B\%%Q%$& .EVEN .WORD 10. .ASCII /$3511PRINT/ ;Define a print command if queue manager ;is not installed. .EVEN .WORD 10. .ASCII /?BFile(s) / .EVEN .WORD 14. .ASCII ^*PIP LP:%B=%%$^ .EVEN .WORD 11. .ASCII /$3622RENAME/ .EVEN .WORD 7. .ASCII /?BFrom / .EVEN .WORD 5. .ASCII /?CTo / .EVEN .WORD 23. .ASCII ^*PIP %C%/NV/RE=%B\%%Q%$^ .EVEN .WORD 13. ; TRUNCATE FILES .ASCII /$3811TRUNCATE/ .EVEN .WORD 10. .ASCII /?BFile(s) / .EVEN .WORD 16. .ASCII ^*PIP %B\%/TR%Q%$^ .EVEN .WORD 9. .ASCII /$3422COPY/ .EVEN .WORD 7. .ASCII /?BFrom / .EVEN .WORD 5. .ASCII /?CTo / .EVEN .WORD 23. .ASCII ^*PIP %C%/NV/FO=%B\%%Q%$^ .EVEN .WORD 10. .ASCII /$3572MERGE/ .EVEN .WORD 8. .ASCII /?BFiles / .EVEN .WORD 5. .ASCII /?CTo / .EVEN .WORD 20. .ASCII ^*PIP %C%=%B\%/ME%Q%$^ .EVEN .WORD 11. .ASCII /$5611UNLOCK/ .EVEN .WORD 10. .ASCII /$3511CLOSE/ .EVEN .WORD 10. .ASCII /?BFile(s) / .EVEN .WORD 16. .ASCII ^*PIP %B\%/UN%Q%$^ .EVEN .WORD 12. .ASCII /$2755PROTECT/ .EVEN .WORD 7. .ASCII /?1File / .EVEN .WORD 41. .ASCII /?2System access rights (RWED, default=D) / .EVEN .WORD 29. .ASCII /?3Owner access rights (RWED) / .EVEN .WORD 29. .ASCII /?4Group access rights (RWED) / .EVEN .WORD 29. .ASCII /?5World access rights (RWED) / .EVEN .WORD 47. .ASCII ^*PIP %1\%/PR/SY:%2D\D%/OW:%3%/GR:%4%/WO:%5%%Q%$^ .EVEN .WORD 9. .ASCII /$3400EDIT/ .EVEN .WORD 9. .ASCII /$3400TECO/ .EVEN .WORD 33. .ASCII ^*RUN $TEC/TASK=...TEC/PRM="%A%"%$^ .EVEN .WORD 11. .ASCII /$3611CREATE/ .EVEN .WORD 9. .ASCII /$3411MAKE/ .EVEN .WORD 7. .ASCII /?BFile / .EVEN .WORD 36. .ASCII ^*RUN $TEC/TASK=...MAK/PRM="%0%%B%"%$^ .EVEN .WORD 9. .ASCII /$3400MUNG/ .EVEN .WORD 33. .ASCII ^*RUN $TEC/TASK=...MUN/PRM="%A%"%$^ .EVEN .WORD 13. .ASCII /$2811ASSEMBLE/ .EVEN .WORD 7. .ASCII /?1File / .EVEN .WORD 47. .ASCII ^*RUN $BIGMAC/PRM="%1.OBJ%,%1.LST%/-SP=%1\%"%Q%$^ .EVEN .WORD 10. .ASCII /$3500MACRO/ .EVEN .WORD 36. .ASCII ^*RUN $BIGMAC/TASK=...MAC/PRM="%A%"%$^ .EVEN .WORD 12. .ASCII /$5711COMPILE/ .EVEN .WORD 7. .ASCII /?1File / .EVEN .WORD 43. .ASCII ^*RUN $FOR/PRM="%1.OBJ%,%1.LST%/SP=%1\%"%Q%$^ .EVEN .WORD 12. .ASCII /$3700FORTRAN/ .EVEN .WORD 33. .ASCII ^*RUN $FOR/TASK=...FOR/PRM="%A%"%$^ .EVEN .WORD 9. .ASCII /$3412LINK/ .EVEN .WORD 10. .ASCII /$3512BUILD/ .EVEN .WORD 10. .ASCII /?1Program / .EVEN .WORD 16. .ASCII /?2Subroutine(s) / .EVEN .WORD 54. .ASCII ^*RUN $BIGTKB/PRM="%1.TSK%%1=\%%2,%%3,%%4,%%5,%%6,%%Q%$^ .EVEN .WORD 8. .ASCII /$3300TKB/ .EVEN .WORD 36. .ASCII ^*RUN $BIGTKB/TASK=...TKB/PRM="%A%"%$^ .EVEN .WORD 10. .ASCII /$5500FILEX/ .EVEN .WORD 8. .ASCII /$3300FLX/ .EVEN .WORD 33. .ASCII ^*RUN $FLX/TASK=...FLX/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300LBR/ .EVEN .WORD 33. .ASCII ^*RUN $LBR/TASK=...LBR/PRM="%A%"%$^ .EVEN .WORD 9. .ASCII /$3412DUMP/ .EVEN .WORD 10. .ASCII /?BFile(s) / .EVEN .WORD 5. .ASCII /?CTo / .EVEN .WORD 40. .ASCII ^*RUN $DMP/PRM="%C?\TI:%%C.DMP%=%B\%"%Q%$^ .EVEN .WORD 8. .ASCII /$3300DMP/ .EVEN .WORD 33. .ASCII ^*RUN $DMP/TASK=...DMP/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300CMP/ .EVEN .WORD 33. .ASCII ^*RUN $CMP/TASK=...CMP/PRM="%A%"%$^ .EVEN .WORD 12. .ASCII /$5723COMPARE/ .EVEN .WORD 16. .ASCII /$3823DIFFERENCES/ .EVEN .WORD 9. .ASCII /?1File 1 / .EVEN .WORD 9. .ASCII /?2File 2 / .EVEN .WORD 9. .ASCII /?3Output / .EVEN .WORD 45. .ASCII ^*RUN $CMP/PRM="%3?\TI:%%3/-SP%=%1\%%2,\%"%Q%$^ .EVEN .WORD 13. .ASCII /$3812DOCUMENT/ .EVEN .WORD 13. .ASCII /?1Input file / .EVEN .WORD 14. .ASCII /?2Output file / .EVEN .WORD 40. .ASCII ^*RUN $RNO/PRM="%2?\TI:%%2/-SP%=%1\%"%Q%$^ .EVEN .WORD 8. .ASCII /$3300RNO/ .EVEN .WORD 33. .ASCII ^*RUN $RNO/TASK=...RNO/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300WHO/ .EVEN .WORD 11. .ASCII ^*DEV /LOG%$^ .EVEN .WORD 9. .ASCII /$4422SEND/ .EVEN .WORD 12. .ASCII /?BTo (TTn:) / .EVEN .WORD 10. .ASCII /?CMessage / .EVEN .WORD 19. .ASCII ^*BRO %B:\CO:% %C%%$^ .EVEN .WORD 9. .ASCII /$4400ACNT/ .EVEN .WORD 16. .ASCII /$4800NEWPASSWORD/ .EVEN .WORD 11. .ASCII /*RUN ACNT%$/ .EVEN .WORD 8. .ASCII /$3300UIC/ .EVEN .WORD 25. .ASCII ^*SET /UIC%1?=[%%1%%2,]%%$^ ; Check if %1% null, if no ; insert =[ then %1% followed by ; %2% .EVEN .WORD 11. .ASCII /$3600SYSUIC/ .EVEN .WORD 28. .ASCII ^*SET /SYSUIC%1?=[%%1%%2,]%%$^ .EVEN .WORD 8. .ASCII /$3311UFD/ .EVEN .WORD 12. .ASCII /?1DEV:[UFD] / .EVEN .WORD 29. .ASCII ^*INS $UFD/PRM="%1%"/RUN=REM%$^ .EVEN .WORD 8. .ASCII /$3300ACS/ .EVEN .WORD 50. .ASCII ^*INS $ACS/RUN=REM/PRM="%1/BLKS\SY:/BLKS%=%2\0.%"%$^ .EVEN .WORD 9. .ASCII /$3400POOL/ .EVEN .WORD 12. .ASCII ^*SET /POOL%$^ .EVEN .WORD 11. .ASCII /$3600RMDEMO/ .EVEN .WORD 31. .ASCII ^*INS $RMD/TASK=...RMD/RUN=REM%$^ .EVEN .WORD 8. .ASCII /$3311FMT/ .EVEN .WORD 9. .ASCII /?ADevice / .EVEN .WORD 24. .ASCII ^*RUN $FMT/PRM="%A%/VE"%$^ .EVEN .WORD 8. .ASCII /$3311BAD/ .EVEN .WORD 9. .ASCII /?ADevice / .EVEN .WORD 24. .ASCII ^*RUN $BAD/PRM="%A%/LI"%$^ .EVEN .WORD 8. .ASCII /$3300VFY/ .EVEN .WORD 11. .ASCII /$3800VERIFY/ .EVEN .WORD 33. .ASCII ^*RUN $VFY/TASK=...VFY/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3311UFD/ .EVEN .WORD 12. .ASCII /?1DEV:[UFD] / .EVEN .WORD 29. .ASCII ^*INS $UFD/PRM="%1%"/RUN=REM%$^ .EVEN .WORD 9. .ASCII /$3400FREE/ .EVEN .WORD 17. .ASCII ^*PIP %1\SY:%/FR%$^ .EVEN .WORD 13. .ASCII /$4800FRAGMENT/ .EVEN .WORD 26. .ASCII ^*RUN $FRAG/PRM="%1\SY:%"%$^ .EVEN .WORD 8. .ASCII /$3300VMR/ .EVEN .WORD 33. .ASCII ^*RUN $VMR/TASK=...VMR/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300SLP/ .EVEN .WORD 33. .ASCII ^*RUN $SLP/TASK=...SLP/PRM="%A%"%$^ .EVEN .WORD 10. .ASCII /$3500PATCH/ .EVEN .WORD 33. .ASCII ^*RUN $PAT/TASK=...PAT/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300ZAP/ .EVEN .WORD 33. .ASCII ^*RUN $ZAP/TASK=...ZAP/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300BRU/ .EVEN .WORD 33. .ASCII ^*RUN $BRU/TASK=...BRU/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300DSC/ .EVEN .WORD 33. .ASCII ^*RUN $DSC/TASK=...DSC/PRM="%A%"%$^ .EVEN .WORD 12. .ASCII /$5700SHUTUP/ .EVEN .WORD 26. .ASCII ^*RUN $SHUTUP/TASK=...SHT%$^ .EVEN .WORD 11. .ASCII /$6600ERRLOG/ .EVEN .WORD 8. .ASCII /$3300ERL/ .EVEN .WORD 9. .ASCII ^+INS $ERL^ .EVEN .WORD 13. .ASCII ^*RUN ERRLOG%$^ .EVEN .WORD 8. .ASCII /$3300PSE/ .EVEN .WORD 41. .ASCII ^*INS $PSE/RUN=REM/TASK=...PSE/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300SYE/ .EVEN .WORD 21. .ASCII ^*RUN $SYE/PRM="%A%"%$^ .EVEN .WORD 8. .ASCII /$3300ERF/ .EVEN .WORD 11. .ASCII /$6600ERROFF/ .EVEN .WORD 29. .ASCII ^+INS $ERF/RUN=REM/TASK=...ERF^ .EVEN .WORD 7. .ASCII ^-ERRLOG^ .EVEN .WORD 13. .ASCII ^*REM ERRLOG%$^ .EVEN .WORD 9. .ASCII /$3411LOAD/ .EVEN .WORD 9. .ASCII /?1Driver / .EVEN .WORD 24. .ASCII ^*RUN $LOA/PRM="%1\%"%Q%$^ .EVEN .WORD 11. .ASCII /$3611UNLOAD/ .EVEN .WORD 9. .ASCII /?1Driver / .EVEN .WORD 24. .ASCII ^*RUN $UNL/PRM="%1\%"%Q%$^ .EVEN .WORD 0 ;EOF .WORD 0 .END