home *** CD-ROM | disk | FTP | other *** search
- PARSE -i%1.abl -o%1.tm1 -l%1.lst -h %2 %3 %4 %5 %6 %7 %8 %9
- if errorlevel 1 goto errparse
- TRANSFOR -i%1.tm1 -o%1.tm2
- if errorlevel 1 goto errtrans
- if exist %1.tm1 del %1.tm1
- REDUCE -i%1.tm2 -o%1.tm3 %2 %3 %4 %5 %6 %7 %8 %9
- if errorlevel 1 goto erreduce
- if exist %1.tm2 del %1.tm2
- FUSEMAP -i%1.tm3 -o%1.out -j%2 %3 %4 %5 %6 %7 %8 %9
- if errorlevel 1 goto errfuse
- if exist %1.tm3 del %1.tm3
- SIMULATE -i%1.out -o%1.sim %2 %3 %4 %5 %6 %7 %8 %9
- if errorlevel 1 goto errsim
- DOCUMENT -i%1.out -o%1.doc -g -q2 %2 %3 %4 %5 %6 %7 %8 %9
- if errorlevel 1 goto errdoc
- goto exit
- :errparse
- echo Error(s) in PARSE
- goto exit
- :errtrans
- DOCUMENT -i%1.tm1 -o%1.doc -g -q0 %2 %3 %4 %5 %6 %7 %8 %9
- echo Error(s) in TRANSFOR
- goto exit
- :erreduce
- DOCUMENT -i%1.tm2 -o%1.doc -g -q1 %2 %3 %4 %5 %6 %7 %8 %9
- echo Error(s) in REDUCE
- goto exit
- :errfuse
- DOCUMENT -i%1.tm3 -o%1.doc -g -v -q2 %2 %3 %4 %5 %6 %7 %8 %9
- echo Error(s) in FUSEMAP
- goto exit
- :errsim
- DOCUMENT -i%1.out -o%1.doc -f -g -v -q2 %2 %3 %4 %5 %6 %7 %8 %9
- echo Error(s) in SIMULATE
- copy *.sim \abel
- goto exit
- :errdoc
- echo Error(s) in DOCUMENT
- :exit
- rem conjed
- if exist *.jed copy *.jed \abel
- if exist *.lst copy *.lst \abel
- if exist *.doc copy *.doc \abel
- if exist *.sim copy *.sim \abel
- rem delete abel work files
- if exist *.tm? del *.tm?
- if exist *.jed del *.jed
- if exist *.sim del *.sim
- if exist *.lst del *.lst
- if exist *.doc del *.doc
- if exist *.bak del *.bak
- if exist *.out del *.out
- if exist *.p8? del *.p8?
- del *.abl
- if exist temp del temp
- if exist *.vec del *.vec
- cd \abel