REM parameter is program name to be compiled, linked and run
REM format of entry is "compile program"
REM Note that the ".c" suffix is omitted
if NOT EXIST \qc2\marietta\%1.c GOTO END
copy \qc2\marietta\%1.c program.c
bin\qcl /c /Iinclude /W2 /AM program.c
if EXIST lib\mlibce.lib GOTO LINK1
if EXIST lib\mlibc7.lib GOTO LINK2
bin\link program,,NUL,lib\mc_wndw+lib\mc_ndx+lib\MLIBC+lib\LIBH /NOI /NOD /ST:10000
GOTO RUN1
:LINK1
bin\link program,,NUL,lib\mc_wndw+lib\mc_ndx+lib\MLIBCE /NOI /NOD /ST:10000
GOTO RUN1
:LINK2
bin\link program,,NUL,lib\mc_wndw+lib\mc_ndx+lib\MLIBC7 /NOI /NOD /ST:10000
GOTO RUN1
:RUN1
PAUSE examine compile for errors, then press any key
program
:END