home *** CD-ROM | disk | FTP | other *** search
- rem Set default language
- set LANG eng
- set _text inst%LANG%.txl
- err_handler %_text%\errhand.txt
- rem ----------------- select language/quit --------------------
- :pick_language
- rem textbox 1 1 80 24 blue
- color back cyan
- rem only one language, so don't show menu
- rem type %_text%\install.txt 2 2 77 6 -border
- rem textbox 1 9 80 13 blue
- menu %_text%\startup.mnu 15 11 50 7 %_text%\startup.tit %_text%\updown.leg -default 0 -lookupOnly
- set LANG %_1%
- set yes %_2%
- set no %_3%
- set shortTitle %_4%
- set title "%_5%"
- switch %_1%
- case quit:
- goto exit_unsaved
- case escape:
- goto exit_unsaved
- case default:
- endswitch
- set _text inst%LANG%.txl
- rem type %_text%\install.txt 3 2 76 6 -border
- rem color text yellow
- rem echo 5 6 70 1 -center "%title%"
- rem color text white
- rem -------------- Text vs. Graphics Install ---------
- rem Don't switch into graphics if -T is given
- getOpt -T
- switch %_err%
- case 0:
- rem -T given, no graphics
- textbox 1 1 80 25 blue
- color back cyan
- type %_text%\install.txt 3 2 76 6 -border
- color text yellow
- echo 5 6 70 1 -center "%title%"
- color text white
- rem color back blue
- case 1:
- rem -T not given, use graphics
- graphics
- if %_err% > 0
- beep
- type %_text%\novga.txt 5 17 72 8 -border
- waitkey
- endif
- endswitch
- pict iinstall.img 18 1
- rem --------- Ask user Where to install it ------------
- promptdir C:\%shortTitle% 11 17 62 8 %_text%\whichdrv.tit %_text%\whichdrv.txt -center
- textbox 1 17 80 8 blue
- if %_1% eq escape
- goto exit_unsaved
- endif
- setdestdir %_1%
- mkdirdest
- if %_err% != 0
- beep
- type %_text%\noaccess.txt 17 19 50 6 -border
- waitkey_noesc
- goto exit_unsaved
- endif
- rem textbox 1 9 80 16 blue
- getVga
- if %_err% = 1
- type %_text%\novga.txt 17 19 50 6 -border
- waitkey
- textbox 1 9 80 16 blue
- endif
- set _needDisk 2.5
- getdiskfree
- set _gotDisk %_1%
- if %_gotDisk% < %_needDisk%
- type %_text%\diskfree.txt 17 19 50 6 -border
- waitkey_noesc
- goto exit_unsaved
- endif
- set needMem 520
- getmemfree
- set _gotMem %_1%
- if %_gotMem% < %needMem%
- type %_text%\memfree.txt 17 19 50 6 -border
- waitkey
- textbox 1 9 80 16 blue
- endif
- ifcanwrite can_write
- type %_text%\noaccess.txt 17 19 50 6 -border
- waitkey_noesc
- goto exit_unsaved
- :can_write
- type %_text%\copying.txt 17 19 50 6 -border
- copy %_text%
- set _text %hdroot%\%_text%
- saveconfig
- copy nofiles.txt
- rem copy readme.bat
- copy iinstall.exe setup.exe
- copy setup.scr
- rem copy files as in Larry's C source
- copy kacdsel.exe
- copy kademo.ico
- copy kademo.pif
- copy kagroup.exe
- copy kalogo.adl kal.adl
- copy kalogo.adl kalogo.adl
- copy knowledg.voc
- copy readme.doc
- copy s.exe
- copy sbtest.com
- copy splay.exe
- copy t.exe
- copy vrsd.386
- copy am\ah.adl ah.adl
- copy am\p.adl pr.adl
- copy am\soon.adl soon.adl
- copy am\test.adl test.adl
- copy bo\b.adl b.adl
- copy bo\heart.adl heart.adl
- copy bo\kabd.ad kabd.ad
- copy bo\mhand.adl mhand.adl
- copy bo\skel.adl skel.adl
- copy di\13.snd 13.snd
- copy di\14a.snd 14a.snd
- copy di\14b.snd 14b.snd
- copy di\20.snd 20.snd
- copy di\30a.snd 30a.snd
- copy di\50.snd 50.snd
- copy di\66a.snd 66a.snd
- copy di\69.snd 69.snd
- copy di\chd.adl chd.adl
- copy di\cv.adl cv.adl
- copy di\cv3.voc cv.voc
- copy di\growl1a.snd growl1a.snd
- copy di\growl2a.snd growl2a.snd
- copy di\hali.adl hali.adl
- copy di\hall1.voc hall2.voc
- copy di\hall2.voc hall1.voc
- copy di\hamgrwl3.snd hamgrwl3.snd
- copy di\hi.a hi.a
- copy di\ka.ad ka5.ad
- copy di\p1.a p1.a
- copy di\p9.a p9.a
- copy di\step3c.snd step3c.snd
- copy di\stepsg.snd stepsg.snd
- copy in\baker.mv0 baker.mv0
- copy in\bestbuy.mv0 bestbuy.mv0
- copy in\black.im8 black.im8
- copy in\compcity.mv0 compcity.mv0
- copy in\compusam.mv0 compusam.mv0
- copy in\dh.mv0 dh.mv0
- copy in\eb.mv0 eb.mv0
- copy in\eggheadm.mv0 eggheadm.mv0
- copy in\elektek.mv0 elektek.mv0
- copy in\frys.mv0 frys.mv0
- copy in\ingram.mv0 ingram.mv0
- copy in\josha.mv0 josha.mv0
- copy in\ka.ad ka1.ad
- copy in\kalogo.adl kalogo.adl
- copy in\kalogo.im0 kalogo.im0
- copy in\merisel.mv0 merisel.mv0
- copy in\micro.mv0 micro.mv0
- copy in\none.mv0 none.mv0
- copy in\softetc.mv0 softetc.mv0
- copy ins\bug.xmi bug.xmi
- copy ins\fly.xmi fly.xmi
- copy ins\hive.xmi hive.xmi
- copy ka\ka.ad ka2.ad
- copy ka\ka.xmi ka.xmi
- copy peter\ka.ad ka4.ad
- copy peter\r.xmi r.xmi
- copy sci2\kids.adl kids.adl
- copy sci2\math.adl math.adl
- copy sci2\p.adl p.adl
- copy sci2\r.adl r.adl
- copy sci2\s.adl s.adl
- copy sci2\sk.adl sk.adl
- copy sci2\stone.voc stone.voc
- copy sea\cat.adl cat.adl
- copy sea\dol.adl dol.adl
- copy sea\lab.adl lab.adl
- copy sea\m.adl m.adl
- copy sea\seal.adl seal.adl
- copy sea\shk.adl shk.adl
- copy sea\tur.adl tur.adl
- copy sp\7.xmi 7.xmi
- copy sp\ka.ad ka3.ad
- copy z\bflymove.adl bfly.adl
- copy z\goatmove.adl goat.adl
- copy z\ka.ad ka.ad
- copy z\ka.ad ka6.ad
- copy z\lion.adl lion.adl
- copy z\psaf.adl psaf.adl
- copy z\spup.adl spup.adl
- copy z\story.adl story.adl
- copy z\whoami.adl whoami.adl
- copy z\whos.adl whos.adl
- copy z\whr.adl whr.adl
- copy zk\checkvga.exe checkvga.exe
- copy zk\setio.exe setio.exe
- copy zk\vlist.exe vlist.exe
- rem Make batch file so shell install can loop.
- copy %_text%\install.bat install.bat -expand
- rem Done copying.
- :install_done
- type %_text%\finish.txt 17 19 50 6 -border
- beep
- waitkey
- chain .\setup
- :exit_unsaved
- textbox 1 1 80 25 black
- quit