home *** CD-ROM | disk | FTP | other *** search
- @ECHO OFF
- ECHO OFF
-
- IF (%1) == (@) GOTO %2
-
- SV S
- IF EXIST SV.IVS SV R OK SV.IVS
-
- :MAIN
- GO-MENU START.MNU 000 GO-MENU.SAV
- IF ERRORLEVEL 10 GOTO QUIT
- IF ERRORLEVEL 5 GOTO DISPLAY
- IF ERRORLEVEL 4 GOTO SHARE
- IF ERRORLEVEL 3 GOTO EXAMPLES
- IF ERRORLEVEL 2 VIEW CHANGE.LOG MAIN
- IF ERRORLEVEL 1 VIEW POM.DOC MAIN
-
- :SHARE
- GO-MENU SHARE.MNU 020 GO-MENU.SAV
- IF ERRORLEVEL 10 GOTO MAIN
- IF ERRORLEVEL 7 VIEW VENDOR.DOC SHARE
- IF ERRORLEVEL 5 VIEW AMAZE.TXT SHARE
- IF ERRORLEVEL 4 VIEW AMAZE.DOC SHARE
- IF ERRORLEVEL 2 VIEW ORDER.FRM SHARE
- IF ERRORLEVEL 1 VIEW OPTIONS.DOC SHARE
-
- :EXAMPLES
- GO-MENU EXAMPLES.MNU 010 GO-MENU.SAV
- IF ERRORLEVEL 15 GOTO MAIN
- IF ERRORLEVEL 14 EXAMPLE 14 13 TXT P
- IF ERRORLEVEL 13 EXAMPLE 13 04 TXT P
- IF ERRORLEVEL 12 EXAMPLE 12 12 TXT P
- IF ERRORLEVEL 11 EXAMPLE 11 11 TXT P
- IF ERRORLEVEL 10 EXAMPLE 10 10 TXT P
- IF ERRORLEVEL 9 EXAMPLE 09 09 DBF T
- IF ERRORLEVEL 8 EXAMPLE 08 03 TXT L
- IF ERRORLEVEL 7 EXAMPLE 07 07 TXT T
- IF ERRORLEVEL 6 EXAMPLE 06 06 TXT P
- IF ERRORLEVEL 5 EXAMPLE 05 05 TXT P
- IF ERRORLEVEL 4 EXAMPLE 04 04 TXT T
- IF ERRORLEVEL 3 EXAMPLE 03 03 TXT T
- IF ERRORLEVEL 2 EXAMPLE 02 02 TXT P
- IF ERRORLEVEL 1 EXAMPLE 01 01 TXT P
-
- :DISPLAY
- GO-MENU DISPLAY.MNU 030 GO-MENU.SAV
- IF ERRORLEVEL 10 GOTO MAIN
- IF ERRORLEVEL 3 GOTO DISPXGA
- IF ERRORLEVEL 1 GOTO DISPSTD
-
- :DISPSTD
- SV K OK
- GOTO DISPSAVE
- :DISPXGA
- SV V OK
- :DISPSAVE
- SV S OK SV.IVS
- GOTO MAIN
-
- :QUIT
- SV R
- CLS
- IF NOT EXIST SERIAL#.PAX DONE - X
-
-