home *** CD-ROM | disk | FTP | other *** search
- @echo off
-
- front2 /X
-
- if %1 ! == ! goto useage
-
- if exist \pads2000.swp goto BADSWAP
- if exist \sr2000.swp goto BADSRSWAP
-
- :pcb
- if exist therm.1 ren therm.1 therm.0
- if not exist p2000.exe goto bad
- rem qemm off
- cls
- echo (f1) > files\jobin.mac
- echo (f1) >> files\jobin.mac
- echo %1(cr) >> files\jobin.mac
- echo Loading PADS-2000 with job file %1
- p2000 /s /r:jobin.mac
- del files\jobin.mac > nul:
- rem qemm off
- goto end
-
- :bad
- echo Program not found!
- pause
- goto end
-
- :useage
- cls
- echo
- echo This program is used to start PADS-2000 and automaticallly
- echo job in a specified filename.
- echo
- echo To use this command type the following:
- echo
- echo 2000in [filename]
- echo
- echo Where [filename] = Any job file that reside in the files directory.
- echo The filename can be entered as:
- echo myjob or myjob.job
- goto end
-
- :badswap
- del \pads2000.swp
- echo *
- echo *****************************************************************************
- echo A previous crash of a 386 application has probably left some lost clusters on
- echo your hard drive. It is therefore suggested you run chkdsk /f or an equivalent
- echo utility which is compatible with your disk manager.
- echo *****************************************************************************
- echo *
- goto end
-
- :badsrswap
- del \sr2000.swp
- echo *
- echo *****************************************************************************
- echo A previous crash of a 386 application has probably left some lost clusters on
- echo your hard drive. It is therefore suggested you run chkdsk /f or an equivalent
- echo utility which is compatible with your disk manager.
- echo *****************************************************************************
- echo *
- goto end
-
- :end
-