$3300PAGE
*ERASE
$3399F4P
$3399FTN
$3799FORTRAN
.20:A*@
.20:A*=
.1:1\
.10:2\
1:?2 Filename
?1 Options (/Sw1/Sw2...)
.2:1*/LI
.2:1*SP
*INS $F4P/RUN=REM/TASK=FOR%T%/PRM="%2%%2=%%1%"
2:*INS $F4P/RUN=REM/TASK=FOR%T%/PRM="%2%%2,%%2=%%1%"
10:*INS $F4P/RUN=REM/TASK=FOR%T%/PRM="%1%%1=%"
20:*INS $F4P/RUN=REM/TASK=FOR%T%/PRM="%A%"
$3499LINK
.20:A*@
.20:A*=
.1:1\
.10:2\
1:?2 Filename
?1 Options (/Sw1/Sw2...)
.2:1*/SH
.5:1\/
*INS $TKB/RUN=REM/TASK=TKB%T%/PRM="%2%%2=%%1%%3,%%4,%%5,%%6,%%7,%"
2:*INS $TKB/RUN=REM/TASK=TKB%T%/PRM="%2%%2=%%1%%3,%%4,%%5,%%6,%%7,%%8,%%9,%"
5:*INS $TKB/RUN=REM/TASK=TKB%T%/PRM="%1%%2=%%3,%%4,%%5,%%6,%%7,%%8,%%9,%"
10:*INS $TKB/RUN=REM/TASK=TKB%T%/PRM="%1%%1=%"
20:*INS $TKB/RUN=REM/TASK=TKB%T%/PRM="%A%"
$3311ACC
?1COMMAND STRING
*INS $ACC/PRI=65./TASK=ACC%T%/PRM="%1%"/RUN=REM
$4400ACNT
*RUN ACNT
$3300ACS
*INS $ACS/TASK=ACS%T%/PRI=80./PRM="%A%"/RUN=REM
$3622APPEND
?1File(s) to append
?2ONTO File
*PIP %2%/AP%1=%
$3622ASSIGN
?1Physical Device to use (DEV:) 
?2Logical Name to call it (DEV:) 
*ASN %1:%  %2=:%
$3311BAD
?; CAUTION -- All data will be completely lost
?1DEV: (which disk)
*INS $BAD/TASK=BAD%T%/RUN=REM/PRM="%1:%"/INC=0
$3311BOO
?1DEV:filename
*INS $BOO/RUN=REM/PRM="%1%"/INC=0/PRI=150
$3611BUFFER
?1Terminal buffer size (0-132.)
*SET /BUF=TI:%1%
$5511BUILD
?1FILENAME
*@LB:[1,5]BATCH/NOLI/NOTR %1% %2% %3% %4% %5% %6% %7% %8%
$4711COMPILE
?1FILE
*@LB:[1,5]COMPILE/NOLI %1% %2%
$4400DUMP
$4400DMP
*INS $DMP/RUN=REM/PRM="%1%%2=%"/TASK=DMP%T%
$3300CMP
$4700COMPARE
*INS $CMP%T%/RUN=REM/PRM="%A%"/TASK=CMP%T%
$3811CONTINUE
?1Taskname
*RES %1%
$3322DIFF
?1File 1 to compare
?2File 2 to compare
*INS CMP/RUN=REM/TASK=DIF%T%/PRM="%1.FTN%%2,.FTN%"
$3311DIS
?1Device
*DMO %1:%
$3300FLX
*INS $FLX/RUN=REM/PRM="%A%"/TASK=FLX%T%
$3311FMT
?1DEV:(which disk)
*INS $FMT/RUN=REM/TASK=FMT%T%/PRM="%1:%"/INC=0
$3311FRG
$4411FRAG
?1 Disk  
*INS $FRAG/TASK=FRG%T%/PRM="%1:%"/RUN=REM
$3300FTB
*INS $FTB/PRM="%A%"/RUN=REM
$5500LOWER
*SET /LOWER=TI:
$5500UPPER
$5700NOLOWER
*SET /NOLOWER=TI:
$4622RENAME
?1OLD filename
?2NEW filename
*PIP %2%=%1%/RE
$3300/TB
*PIP %1%/TB
$3300/FR
*PIP %1%/FR
$4400HOLD
*SET /HOLD=TI:
$4400NOHOLD
*SET /NOHOLD=TI:
$6600ACCLOG
*INS $ACCLOG/RUN=REM/TASK=ACCLOG
$5800DISKSAVE
*@LB:[1,5]DISKSAV
$6600INCBKP
*@LB:[1,5]INCBKP
$3311INI
?1DEV:NAME (the DEV: must be allocated, CAUTION all data will be lost)
*INS $INI/RUN=REM/PRM="%1%"/INC=0
$3300LBR
*INS $LBR/RUN=REM/PRM="%A%"/TASK=LBR%T%
$7733EXTRACT
?1LIBRARY
?2MODULE
?3OUTPUT NAME
*INS $LBR/RUN=REM/TASK=L%T% /PRM="%3%%1=/EX:%%2%"
$8811COMPRESS
?1LIBRARY
*INS $LBR/RUN=REM/TASK=L%T% /PRM="%1/CO%%1=%"
$7722REPLACE
?1LIBRARY FILE
*INS $LBR/RUN=REM/TASK=L%T% /PRM="%1/RP%%2=%"
$3411LINK
?1Filename
*INS $FTB/RUN=REM/TASK=FTB%T%/PRM="%1%%2=%"
$4500LOGIN
*HEL %A%
$4600LOGOUT
*BYE %A%
$3300MAC
*INS $MAC/RUN=REM/TASK=...MAC/PRM="%A%"
$3522MERGE
?1File(s) to MERGE
?2INTO File
*PIP %2%/ME%2=%%1,%
$3311SCH
?1COMMAND STRING
*INS $SCH/TASK=...SCH/PRI=65./PRM="%1%"/RUN=REM
$6611UNLOCK
?1FILE
*PIP %1.TMP%/UN
$3411LOAD
?1DEVICE
*INS $LOA/RUN=REM/PRM="%1:%/PAR=DRVPAR"/INC=0
$3300OTB
*INS $BIGTKBOLD/RUN=REM/PRM="%A%"
$3300RTB
*INS $TKB/RUN=REN/TASK=...RTB/PRM=%A%
$3300RMC
*INS $RMC/RUN=REM/TASK=...RMC/PRM=%A%
$4400SHOW
*@LB:[1,5]SHOW/NOLI
$3411STOP
?1Name of task to STOP
*STP %1%
$4310RSET
$4510RESET
*INS $RESET/RUN=REM/PRM="%A%"
$3300TKB
*INS $TKB/RUN=REM/TASK=TKB%T%/PRM="%A%"
$3311UFD
?1DEV:[UIC] (the DEV: must be allocated)
*INS $UFD/RUN=REM/PRM="%1%"/INC=0
$3611UNLOAD
?1DEVICE
*INS $UNL/RUN=REM/PRM="%1:%"/INC=0
$6600VERIFY
$3300VFY
*INS $VFY/RUN=REM/TASK=VFY%T%/PRI=60./INC=40000/PRM="%A%"
$3300VMR
*INS LB1:$VMR/RUN=REM/PRI=60./TASK=VMR%T%/PRM="%A%"
$6611CHKSUM
?1FILE
*INS $PAT/RUN=REM/PRM="NL:=%1%/CS%1,%"/INC=0
$3300PAT
*INS $PAT/RUN=REM/PRM="%A%"/INC=0
$4422COPY
?1From file 
?2  To file 
*PIP %2%/CD%1=%
$3300WHO
*RUN $WHO/TASK=...WHO
$3300ZAP
*INS $ZAP/RUN=REM/TASK=...ZAP
$3311CVL
?1COMMAND
*INS $CVL/RUN=REM/PRI=80./PRM="%1%%2=%%3=%%4=%"
$3300ERF
*INS $ERF/RUN=REM/TASK=...ERF/PRI=70.
3311TTY
?1TERMINAL(TTN:)
*INS $TTYDIS/RUN=REM/TASK=TTYDIS/PRM=%1%
$3302SYE
*INS $SYE/TASK=...SYE/RUN=REM/PRM="%1%%2=%"
$3301PSE
*INS $PSE/RUN=REM/TASK=...PSE/PRM=%1%%2=%
$3300TCF
*INS $TCF/RUN=REM/TASK=...TCF/PRM="%A%"
$3300SLP
*INS $SLP/RUN=REM/PRM="%A%"
$3312RNO
?1OUTPUT:
?2INPUT:
*INS $RNO/RUN=REM/PRM="%1%%2=%%3,%%4,%%5,%%6,%%7,%%8,%%9,%"
$3399DSC
?; A virgin tape must be zeroed before use.
?+1In  device (DEV:)
?-1Out device (DEV:)
.10:-1*MT
*INS $DSC/RUN=REM/TASK=DSC%T%/PRM="%-1%%+1=%"
10:*INS $DSC/RUN=REM/TASK=DSC%T%/PRM="%-1/VE/AP%%+1=%"
$6600ERRORS
*@LB:[1,5]ERROR/NOLI 
$3300CDA
*INS $CDA/RUN=REM/PRM="%A%"
$6600SHUTUP
*@LB:[1,2]SHUTDOWN