!	PHASEL.COM


SET TT NOQUIET
R LINK
OUT:PHASEM,MAP:PHASEM.MAP=OUT:PHASEM,CSTAT,CNTXSW,IN:F4ROOT,GENLIB,SYSLIB.80K/C
IN:F4ADMN,READW,WRITW,GAMSTP,GAMCA,HDCHG/O:1/C
OUT:CRTFIL/O:1/C
OUT:FIXFRM/O:1
^C
R LINK
OUT:PHASEA,MAP:PHASEA.MAP=OUT:PHASEA,CSTAT,CNTXSW,IN:F4ROOT,GENLIB,SYSLIB.80K/C
IN:F4ADMN,READW,WRITW,GAMSTP,GAMCA,HDCHG/O:1/C
IN:CRTFIL/O:1/C
OUT:FIXFRM/O:1
^C
SET TT QUIET