.;
.; ACMP.CMD
.;  	COMMAND FILE TO COMPILE MAC FILES
.;
	.ENABLE SUBSTITUTION
	.ENABLE GLOBAL
	.ENABLE ESCAPE
	.PARSE <UIC> "[,]" A $GRUP $MEM A
	.ASKS  $PRJPF 3 CHAR PROCESS PREFIX
	@['$GRUP',200]'$PRJPF'INIT
	.OPEN #1 ACMPCMP.CMD
.1:
	.ASKS FILEN WHAT FILE
	.IFT <ESCAPE> .GOTO 2
	.TESTFILE 'FILEN'.MAC
	.IF <FILERR> EQ 1 .GOTO 3
	; FILE DOES NOT EXIST -- TRY AGAIN
	.GOTO 1
.3:
	.DATA  #1 'FILEN','FILEN'/-SP/CR='$ASPRF','<UIC>''FILEN'
	.GOTO 1
.2:
	.CLOSE #1
	MAC @ACMPCMP
	PIP ACMPCMP.CMD;*/DE
/
