home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware 1 2 the Maxx
/
sw_1.zip
/
sw_1
/
DISK_CHK
/
PF271.ZIP
/
PRINTDOC.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-06-22
|
13KB
|
254 lines
@echo off
rem
rem +-------------------------------------------+
rem ! Port Finder PRINT DOCUMENT Batch File !
rem ! Copyright (c) 1990 mcTRONic Systems !
rem ! Revised on: August 7, 1990 !
rem ! File Name: PRINTDOC.BAT !
rem +-------------------------------------------+
rem
if not exist bh.com goto :error
bh ^
if errorlevel 1 goto :start
goto :error
:start
cls
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ ▒▒▒▒▄ ▒▒▒▒▄ ▒▒▒▒▄ ▒▒▒▒▒▄ ▒▒▒▒▄ ▒▒▒▄ ▒▒▄ ▒▄ ▒▒▒▒▄ ▒▒▒▒▄ ▒▒▒▒▄ ║
echo ║ ▒█▀▒█ ▒█▀▒█ ▒█▀▒█ ▀▒█▀▀ ▒█▀▀▀ ▒█▀ ▒█▒▄▒█ ▒█▀▀▒▄ ▒█▀▀▀ ▒█▀▒█ ║
echo ║ ▒▒▒▒█ ▒█ ▒█ ▒▒▒▄▀ ▒█ ▒▒▒▄ ▒█ ▒█▒█▒█ ▒█ ▒█ ▒█▀▀ ▒▒▒▄▀ ║
echo ║ ▒█▀▀▀ ▒▒▒▒█ ▒█▀▒▄ ▒█ ▒█▀▀ ▒▒▒▄ ▒█ ▒▒█ ▒▒▒▒▄▀ ▒▒▒▒▄ ▒█▀▒▄ ║
echo ║ ▀ ▀▀▀▀ ▀ ▀ ▀ ▀ ▀▀▀ ▀ ▀▀ ▀▀▀▀ ▀▀▀▀ ▀ ▀ ║
echo ║ ║
echo ║ The Number ONE Shareware COM and LPT Port Utility ║
echo ║ ║
echo ╠═══════════════════════════════════════════════════════════════════════╣
echo ║ ║
echo ║ 1) Display or Print PF.DOC, Port Finder Documentation ║
echo ║ 2) Display or Print PFREVIEW.DOC, Port Finder Reviews ║
echo ║ 3) Display or Print PROBLEM.DOC, Port Finder Problem Report ║
echo ║ 4) Display or Print REGISTER.DOC, Port Finder Registration Form ║
echo ║ 5) Display or Print MTSR.DOC, MTSR Documentation (Memory Usage) ║
echo ║ 6) Display or Print MUMB.DOC, MUMB Documentation (DOS 5 UMB's) ║
if exist INSTALL.BAT echo ║ 7) Run the Port Finder Hard Disk INSTALL Program ║
echo ║ ║
echo ║ Q) Quit Print Program, Exit to DOS ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
if exist INSTALL.BAT bh 1234567Q
if NOT exist INSTALL.BAT bh 123456Q
CLS
if errorlevel 8 goto end
if exist INSTALL.BAT if errorlevel 7 INSTALL
if NOT exist INSTALL.BAT if errorlevel 7 goto end
if errorlevel 6 goto 6prtred
if errorlevel 5 goto 5prtred
if errorlevel 4 goto 4prtred
if errorlevel 3 goto 3prtred
if errorlevel 2 goto 2prtred
if errorlevel 1 goto 1prtred
if errorlevel 0 goto end
:1prtred
if not exist pf.doc echo PF.DOC file NOT found!
if not exist pf.doc pause
if not exist pf.doc goto start
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ 1) Display PF.DOC, Port Finder Documentation ║
echo ║ 2) Print PF.DOC, Port Finder Documentation ║
echo ║ ║
echo ║ Q) Quit, Return to Main Menu ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
bh 12q
if errorlevel 3 goto start
if errorlevel 2 goto 1prt
if errorlevel 1 bh # PF.DOC
goto start
:1prt
cls
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ Printing PF.DOC, Port Finder Documentation ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
type pf.doc >prn
echo + +
echo ++++++++++++++++++++++++++ PRINTING COMPLETE! +++++++++++++++++++++++++
echo + +
pause
goto start
:2prtred
if not exist pfreview.doc echo PFREVIEW.DOC file NOT found!
if not exist pfreview.doc pause
if not exist pfreview.doc goto start
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ 1) Display PFREVIEW.doc, Port Finder Reviews ║
echo ║ 2) Print PFREVIEW.DOC, Port Finder Reviews ║
echo ║ ║
echo ║ Q) Quit, Return to Main Menu ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
bh 12q
if errorlevel 3 goto start
if errorlevel 2 goto 2prt
if errorlevel 1 bh # PFREVIEW.DOC
goto start
:2prt
cls
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ Printing PFREVIEW.DOC, Port Finder Reviews ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
type pfreview.doc >prn
echo + +
echo ++++++++++++++++++++++++++ PRINTING COMPLETE! +++++++++++++++++++++++++
echo + +
pause
goto start
:3prtred
if not exist problem.doc echo PROBLEM.DOC file NOT found!
if not exist problem.doc pause
if not exist problem.doc goto start
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ 1) Display PROBLEM.DOC, Port Finder Problem Report ║
echo ║ 2) Print PROBLEM.DOC, Port Finder Problem Report ║
echo ║ ║
echo ║ Q) Quit, Return to Main Menu ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
bh 12q
if errorlevel 3 goto start
if errorlevel 2 goto 3prt
if errorlevel 1 bh # PROBLEM.DOC
goto start
:3prt
cls
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ Printing PROBLEM.DOC, Port Finder Problem Report ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
type problem.doc >prn
echo + +
echo ++++++++++++++++++++++++++ PRINTING COMPLETE! +++++++++++++++++++++++++
echo + +
pause
goto start
:4prtred
if not exist register.doc echo REGISTER.DOC file NOT found!
if not exist register.doc pause
if not exist register.doc goto start
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ 1) Display REGISTER.DOC, PF Registration Form ║
echo ║ 2) Print REGISTER.DOC, PF Registration Form ║
echo ║ ║
echo ║ Q) Quit, Return to Main Menu ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
bh 12q
if errorlevel 3 goto start
if errorlevel 2 goto 4prt
if errorlevel 1 bh # REGISTER.DOC
goto start
:4prt
cls
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ Printing REGISTER.DOC, Port Finder Registration Form ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
type register.doc >prn
echo + +
echo ++++++++++++++++++++++++++ PRINTING COMPLETE! +++++++++++++++++++++++++
echo + +
pause
goto start
:5prtred
if not exist MTSR.DOC echo MTSR.DOC file NOT found!
if not exist MTSR.DOC pause
if not exist MTSR.doc goto start
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ 1) Display MTSR.DOC, MTSR Documentation (Mem Usage Display)║
echo ║ 2) Print MTSR.DOC, MTSR Documentation (Mem Usage Display) ║
echo ║ ║
echo ║ Q) Quit, Return to Main Menu ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
bh 12q
if errorlevel 3 goto start
if errorlevel 2 goto 5prt
if errorlevel 1 bh # MTSR.DOC
goto start
:5prt
cls
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ Printing MTSR.DOC, MTSR Documentation (Memory Usage Display) ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
type MTSR.DOC >prn
echo + +
echo ++++++++++++++++++++++++++ PRINTING COMPLETE! +++++++++++++++++++++++++
echo + +
pause
goto start
:6prtred
if not exist MUMB.DOC echo MUMB.DOC file NOT found!
if not exist MUMB.DOC pause
if not exist MUMB.doc goto start
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ 1) Display MUMB.DOC, MUMB Documentation (DOS 5 UMB Utility)║
echo ║ 2) Print MUMB.DOC, MUMB Documentation ║
echo ║ ║
echo ║ Q) Quit, Return to Main Menu ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
bh 12q
if errorlevel 3 goto start
if errorlevel 2 goto 6prt
if errorlevel 1 bh # MUMB.DOC
goto start
:6prt
cls
echo ╔═══════════════════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ Printing MUMB.DOC, MUMB Documentation (DOS 5 UMB Utility) ║
echo ║ ║
echo ╚═══════════════════════════════════════════════════════════════════════╝
type MUMB.DOC >prn
echo + +
echo ++++++++++++++++++++++++++ PRINTING COMPLETE! +++++++++++++++++++++++++
echo + +
pause
goto start
:error
cls
echo ╔═════════════════════════════════════════════════════════╗
echo ║ ║
echo ║ The file BH.COM must be in the same default directory ║
echo ║ as PRINTDOC.BAT. Please have these two files in the ║
echo ║ same default directory before running PRINTDOC.BAT. ║
echo ║ Port Finder requires DOS 3.3, 4.0, or higher to run. ║
echo ║ ║
echo ╚═════════════════════════════════════════════════════════╝
pause
:end
cls