.;
.; UNDELETE TASK COMMAND FILE
.;
.; John Hayes	September,1981
;
;  ASSEMBLE AND TASK BUILD UNDEL
;
.ASK MP WANT MAP
.IFT MP ASN SY:=MP:
.IFF MP ASN NL:=MP:
.ASK AS WANT TO ASSEMBLE
.IFF AS .GOTO 10
.ASK LS WANT SOURCE LISTINGS
.IFT LS ASN SY:=LS:
.IFF LS ASN NL:=LS:
;
MAC UNDEL,LS:LP=UNDEL
PIP UNDEL.OBJ/PU
ASN =LS:
.10:
.OPEN FILEBLD.CMD
.DATA UNDEL/CP/PR:0,MP:LP=UNDEL
.DATA /
.;.DATA STACK=64
.DATA TASK=...UND
.DATA PRI=100
.DATA UIC=[1,1]
.DATA //
.CLOSE
TKB @FILEBLD
PIP FILEBLD.CMD;0/DE
PIP UNDEL.TSK/PU
ASN =MP:
