	.ENABLE SUBSTITUTION
	.SETS MCR ""
	.IF <CLI> <> "MCR" .SETS MCR "MCR "
	.ASK YN LIST
	.SETS LIST ""
	.IFT YN .SETS LIST ",LP"
	'MCR'MAC CATCHALL'LIST'=LB:[11,10]RSXMC/PA:1,[1,1]RUNMAC/ML,SY:[5,1]DEBUG,CATCHALL
	'MCR'TKB @CATDEBBLD
	'MCR'PIP TI:=CATCHALL.MAP
	'MCR'PIP CATCHALL.*/PU
.CMD:	.ASKS COMM Command
	.IF COMM <> "" 'MCR'RUN CATCHALL/CMD="'COMM'"
	.IF COMM <> "" .GOTO CMD
/
