! ! ATPK COMMAND FILE TO ASSEMBLE FORTH IN A RSTS SYSTEM ! EMULATING RT11 ! ! IN THIS FILE 19 IS A PROJECT NUMBER AND THE 116 IS THE ! PROGRAMMER NUMBER. IT IS ASSUMED THAT THIS FILE RESIDES ! ON DEVICE DB2 AS DOES THE MACRO SOURCE FILE FORTH.MAC. ! ! TO RUN TYPE: ! ! ATPK DB2:FRT11.CMD ! ! DATE: 4-DEC-85 ! HUMBOLDT STATE UNIVERSITY ! FOR RSTS/E VERSION 7.2, RT11 EMULATION. ! ! MAKE SURE FORTH.X DOES NOT EXIST. PIP DB2:[19,116]FORTH.X/DE/W ! COPY ALL REQUIRED FILES TO THE SYSTEM DISK. PIP [19,116]*.*=LB:SYSMAC.SML/W PIP [19,116]*.*=[19,116]DB2:FORTH.MAC/W RUN MACRO [19,116]FORTH,[19,116]FORTH=[19,116]FORTH ^Z ! MAKE SURE FORTH.TSK DOES NOT EXIST. PIP FORTH.TSK/DE/W RUN LINK [19,116]FORTH.TSK,[19,116]FORTH.MAP=[19,116]FORTH.OBJ // ! SAVE FORTH.TSK AS RUN ONLY FILE ON DEVICE DB2. PIP [19,116]DB2:FORTH.TSK<104>=[19,116]FORTH.TSK/W ! SAVE LISTING AND MAP IN DB2:FORTH.X !PIP DB2:[19,116]*.X=[19,116]FORTH.LST,[19,116]FORTH.MAP/W/AP ! CLEAN UP THE SYSTEM DISK PIP [19,116] FORTH.*/DE/W PIP [19,116] FORTH.MAC/DE/W PIP [19,116] SYSMAC.SML/DE/W ! ! DON'T FORGET: ! [19,116] DB2:TEACHER.DAT<40> ! SHOULD RESIDE ON THE SYSTEM DISK AS ! FORTH.DAT ! ! ALSO REMEMBER TO QUE FOR LISTING ON THE LINEPRINTER: ! ! QUE HANSON = DB2:[19,116]FORTH.X/DE ! ! THIS WILL DELETE THE FILE AFTER IT PRINTS. TO SAVE THE FILE ! OMIT THE /DE SWITCH IN THE QUE REQUEST. !