home *** CD-ROM | disk | FTP | other *** search
- Echo Off
- Cls
- echo
- echo ▄▄ ▄▄▄▄ ▄▄▄▄
- echo █ █ ▄▄▄█ ▄▄▀ INSTALL
- echo █▀▀█ █▄▄▄ █▄▄▄
- echo
- echo
- If %1Z==Z Goto Noargs
- Goto Ckflop
- :Noargs
- Echo Enter Install (Floppy) To (Hard Disk) Ie. install a to c
- Goto Exit
- :Ckflop
- If %1Z==aZ Goto Goflop
- If %1Z==AZ Goto Goflop
- If %1Z==bZ Goto Goflop
- If %1Z==BZ Goto Goflop
- Echo Floppy Drive %1 Invalid... MUST be A or B Install Cancelled
- Goto Exit
- :Goflop
- If %3Z==Z Goto NoArgs
- If %3Z==Z Goto Exit
- If %3Z==cZ Goto Gohard
- If %3Z==CZ Goto Gohard
- If %3Z==dZ Goto Gohard
- If %3Z==DZ Goto Gohard
- If %3Z==eZ Goto Gohard
- If %3Z==EZ Goto Gohard
- If %3Z==fZ Goto Gohard
- If %3Z==FZ Goto Gohard
- If %3Z==gZ Goto Gohard
- If %3Z==GZ Goto Gohard
- Echo Hard Drive %3 Invalid... MUST be C thru G Install Cancelled
- Goto Exit
- :Gohard
- Echo Install A2Z From %1 To %3? Hit Enter To Continue Or Hit Ctrl-C To Abort
- Pause
- %3:
- Cd\
- Md\A2Z
- Cd\A2Z
- If Exist %3:\DOS\Sort.Exe Copy %3:\DOS\Sort.Exe %3:Xsort.Exe
- :Vol1
- If Not Exist %1:A2Zbase.Com Echo Insert Disk 1
- If Not Exist %1:A2Zbase.Com Pause
- If Not Exist %1:A2Zbase.Com Goto Vol1
- Copy %1:*.* \A2Z
- :Vol2
- If Not Exist %1:A2Zbild.Chn Echo Insert Disk2
- If Not Exist %1:A2Zbild.Chn Pause
- If Not Exist %1:A2Zbild.Chn Goto Vol2
- Copy %1:*.* \A2Z
- A2Zcnf
- Cls
- Echo A2Z Installed!
- Echo Print 15 Page Demo Guide?
- Echo Enter 'N' To Bypass
- Echo Hit Enter To Print
- Query Ask > Answer.Bat
- Call Answer
- Del Answer.Bat
- If "%Ask%" == "n" Goto Dir
- If "%Ask%" == "N" Goto Dir
- :PrtDemo
- Copy A2Zdemo.Doc Prn
- Echo Got A2Z Demo Guide? Hit Any Key When Printed...
- Pause
- :Dir
- Dir > A2ZDIU.$$$
- If Exist A2ZDIR.$$$ Del A2ZDIR.$$$
- If Exist Xsort.Exe Goto Sort
- Rename A2ZDIU.$$$ A2ZDIR.$$$
- Goto Load
- :Sort
- Xsort < A2ZDIU.$$$ > A2ZDIR.$$$
- Del A2ZDIU.$$$
- :Load
- NoNum
- A2Zdir
- A2Zbase
- :Exit