!	PHSTAC.COM

SET TT NOQUIET
R FORTRA
OUT:PHSTAM=IN:PHSTAM/V/E/S
OUT:PHSTAA=IN:PHSTAA/V/E/S
OUT:PBCRT=IN:PBCRT/E/V/S
OUT:ASCSIG=IN:ASCSIG/E/V/S
^C
R MACRO
OUT:PACK1=IN:MACLIB,PACK1
^C
SET TT QUIET