IF (%1)==() GOTO NOLIST

:LIST
FORTH 1 CONSTANT #DOS 1 CONSTANT LISTING INCLUDE APPS\META32 BYE
L OUTPUT.PRN
GOTO DONE

:NOLIST
FORTH 1 CONSTANT #DOS INCLUDE APPS\META32 BYE

:DONE
copy/B X32.EXE+new.x new.COM
