home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Jason Aller Floppy Collection
/
99.img
/
ORGP50D2.ZIP
/
FD.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-06-26
|
6KB
|
154 lines
echo off
cls
if exist printer0.bin goto error1
if not exist a:org.exe goto error2
:tryagain
echo ┌────────────────────────────────────────────────────┐
echo │ This program installs Org Plus Advanced to the │
echo │ current directory on your fixed disk. │
echo │ │
echo │ "Diskette 1 - Chart" should be in the A drive. │
echo │ │
echo │ Press Ctrl-Break to cancel. │
echo └────────────────────────────────────────────────────┘
echo
pause
cls
echo ┌────────────────────────────────────────────────────┐
echo │ Copying files from A: to fixed disk, current │
echo │ directory. │
echo │ │
echo │ Press Ctrl-Break to cancel. │
echo └────────────────────────────────────────────────────┘
echo
copy/v a:*.exe
if not exist org.exe goto error2
if not exist chart.exe goto error2
copy/v a:*.bin
if not exist names.bin goto error2
if not exist printer0.bin goto error2
if not exist printer1.bin goto error2
if not exist chelp.bin goto error2
if not exist cnfg.bin goto error2
copy/v a:*.bat
cls
echo ┌────────────────────────────────────────────────────┐
echo │ Remove the diskette from the A drive. │
echo │ │
echo │ Then place "Diskette 2 - Draw" in the A drive. │
echo │ │
echo │ Press Ctrl-Break to cancel. │
echo └────────────────────────────────────────────────────┘
echo
pause
cls
if not exist a:draw.exe goto error2
echo ┌────────────────────────────────────────────────────┐
echo │ Copying files from A: to fixed disk, current │
echo │ directory. │
echo │ │
echo │ Press Ctrl-Break to cancel. │
echo └────────────────────────────────────────────────────┘
echo
copy/v a:*.exe
if not exist draw.exe goto error2
if not exist fonts.exe goto error2
copy/v a:*.bin
if not exist names.bin goto error2
if not exist dhelp.bin goto error2
if not exist cnfg.bin goto error2
if not exist readme.bin goto error2
copy/v a:*.bat
if not exist readme.bat goto error2
if not exist printdoc.bat goto error2
copy/v a:*.org
if not exist sample1.org goto error2
if not exist sample2.org goto error2
cls
echo ┌────────────────────────────────────────────────────┐
echo │ Unpacking LaserJet fonts. │
echo │ │
echo │ Ignore any "File not found" messages. │
echo │ │
echo │ Press Ctrl-Break to cancel. │
echo └────────────────────────────────────────────────────┘
echo
del go060r20.#&p
del go060r23.#&p
del go050r30.#&p
del go040r37.#&p
del ro100i12.#&p
del ro100r12.#&p
del go060r20.#&l
del go060r23.#&l
del go050r30.#&l
del go040r37.#&l
del ro100i12.#&l
del ro100r12.#&l
del go060r23.#&1
del go050r30.#&1
del go040r37.#&1
del go060r23.#&2
del go050r30.#&2
del go040r37.#&2
cls
echo ┌────────────────────────────────────────────────────┐
echo │ Unpacking LaserJet fonts. │
echo │ │
echo │ Ignore any "File not found" messages. │
echo │ │
echo │ Press Ctrl-Break to cancel. │
echo └────────────────────────────────────────────────────┘
echo
fonts
if not exist go060r20.#&p goto error2
if not exist go060r23.#&p goto error2
if not exist go050r30.#&p goto error2
if not exist go040r37.#&p goto error2
if not exist ro100i12.#&p goto error2
if not exist ro100r12.#&p goto error2
if not exist go060r20.#&l goto error2
if not exist go060r23.#&l goto error2
if not exist go050r30.#&l goto error2
if not exist go040r37.#&l goto error2
if not exist ro100i12.#&l goto error2
if not exist ro100r12.#&l goto error2
if not exist go060r23.#&1 goto error2
if not exist go050r30.#&1 goto error2
if not exist go040r37.#&1 goto error2
if not exist go060r23.#&2 goto error2
if not exist go050r30.#&2 goto error2
if not exist go040r37.#&2 goto error2
cls
echo ┌────────────────────────────────────────────────────┐
echo │ Org Plus Advanced is now installed on your fixed │
echo │ disk. Type ORG to start the program. │
echo │ │
echo │ Please store your Org Plus Advanced diskette in │
echo │ a safe place. │
echo └────────────────────────────────────────────────────┘
goto end
:error1
if exist \command.com goto tryagain
echo ┌────────────────────────────────────────────────────┐
echo │ Org Plus Advanced is NOT installed. │
echo │ │
echo │ You must make your fixed disk the current drive, │
echo │ then type A:FD and press Enter. See User's Guide │
echo │ page 2-3. │
echo └────────────────────────────────────────────────────┘
goto end
:error2
echo
pause
cls
echo ┌────────────────────────────────────────────────────┐
echo │ Org Plus Advanced is NOT installed. │
echo │ │
echo │ There has been an error in copying. Check to see │
echo │ if your fixed disk is out of space or if you have │
echo │ the wrong diskette in the A drive. │
echo └────────────────────────────────────────────────────┘
goto end
:end echo