@echo off
rem    Command file to call ETPM and beep in case of error.  Can be given
rem  a list of macro files to compile; the default is to compile all of
rem  the distributed .ex files.                         by Larry Margolis
setlocal
@if .%1 == . goto all
:loop
etpm %1 /v  || echo 'Error in %1!'
@shift
@if .%1 == . goto end
@goto loop
:all
etpm EPM /v      || echo 'Error in EPM!'
etpm EXTRA /v    || echo 'Error in Extra!'
etpm E3EMUL /v   || echo 'Error in E3EMUL!'
etpm BOX /v      || echo 'Error in Box!'
etpm DRAW /v     || echo 'Error in Draw!'
etpm GET /v      || echo 'Error in Get!'
etpm MATHLIB /v  || echo 'Error in Mathlib!'
etpm PUT /v      || echo 'Error in Put!'
etpm HELP /v     || echo 'Error in Help!'
etpm EPMLEX /v   || echo 'Error in EPMlex!'
:end
endlocal
