.ENABLE SUBSTITUTION .SETS TASK "PAC" ; ; Assemble, build and install 'TASK' ; .TESTFILE 'TASK'BLD.CMD .IF = 1. .GOTO S ; ; 'TASK'BLD.CMD not found. ; .EXIT 0 .S: TIM MAC PAC,PAC/-SP=LB:[1,1]EXEMC/ML,LB:[11,10]RSXMC,TTMAC,SY:''PAC .IF = 1. .GOTO B ; ; MAC failed. ; .EXIT 4 .B: PIP 'TASK'.OBJ,'TASK'.LST/PU TIM TKB @'TASK'BLD .IF = 1. .GOTO E ; ; TKB failed. ; .EXIT 4 .E: PIP 'TASK'.TSK,'TASK'.MAP/PU TIM .TESTFILE 'TASK'INS.CMD .IF = 1. .GOTO INSTAL ; ; 'TASK'INS.CMD not found. ; .EXIT 0 .INSTAL: @'TASK'INS ; .EXIT 1