home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Share Gallery 1
/
share_gal_1.zip
/
share_gal_1
/
GE
/
GE003C.ZIP
/
GO.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-07-10
|
2KB
|
69 lines
ECHO OFF
A:
IF %1?==? GO DISPLAY CLR INTRO COPYRITE OPTIONS
IF %1==DISPLAY GOTO DISPLAY
IF %1==OPTIONS GO DISPLAY CLR OPTIONS
IF %1==CONTENTS GO VIEW CONTENTS
IF %1==VERSIONS GO VIEW VERSIONS
IF %1==SAMPLE GO VIEW SAMPLE
IF %1==REGISTER GO VIEW REGISTER
IF %1==MANUAL GO DISPLAY CLR MANUAL
IF %1==VIEW GOTO MANUAL
IF %1==PRINT GOTO MANUAL
IF %1==INSTALL INSTALL %2 %3
ECHO Option "%1" not recognised.
PAUSE
GO DISPLAY NOCLR OPTIONS
:DISPLAY
IF %3?==? GOTO ENDIT
IF %2?==CLR? CLS
IF EXIST %3.DOC TYPE %3.DOC
IF %4?==? GOTO ENDIT
PAUSE
GO DISPLAY CLR %4 %5 %6 %7
:MANUAL
IF %2?==CONT? GOTO NOINTRO
IF %1?==PRINT? GOTO PRTINTRO
CLS
TYPE BROWSE.DOC
GOTO CONTDOC
:PRTINTRO
IF %2?==CONTENTS? GOTO CONTDOC
IF %2?==VERSIONS? GOTO CONTDOC
IF %2?==REGISTER? GOTO CONTDOC
IF %2?==REGFORM? GOTO CONTDOC
IF %2?==INSTALL? GOTO CONTDOC
IF %2?==SAMPLE? GOTO CONTDOC
TYPE PRINT.DOC
:CONTDOC
PAUSE
CLS
GO %1 CONT %2 %3 %4 %5 %6 %7 %8
:NOINTRO
IF %3?==? GO OPTIONS
IF %3?==MANUAL? GO %1 CONT SECTION1 SECTION2 SECTION3 SECTION4 SECTIONB APENDIX
IF %3?==SECTIONB? GO %1 CONT SECTION5 SECTION6 SECTION7 %4 %5 %6 %7
IF %3?==APENDIX? GO %1 CONT APENDIXA APENDIXB APENDIXC APENDIXD APENDIXE APENDIXF REGFORM
IF EXIST %3.DOC GOTO OKAY
ECHO Document "%3" not found.
GO DISPLAY NOCLR MANUAL
:OKAY
IF %1==VIEW GOTO DISPDOC
:PRINTDOC
ECHO Printing %3
COPY %3.DOC PRN:>NUL
ECHO Printing of %3 is complete
GOTO NEXTDOC
:DISPDOC
BROWSE %3.DOC
:NEXTDOC
IF NOT %4?==? GO %1 CONT %4 %5 %6 %7 %8 %9
IF %3?==SAMPLE? GO OPTIONS
IF %3?==INSTALL? GO OPTIONS
IF %3?==REGFORM? GO OPTIONS
IF %3?==REGISTER? GO OPTIONS
IF %3?==VERSIONS? GO OPTIONS
IF %3?==CONTENTS? GO OPTIONS
GO MANUAL
:ENDIT