home *** CD-ROM | disk | FTP | other *** search
- @echo off
-
- :loop
-
- ******* make sure fossil is active
-
- xu capture:on
- cls
- f:
- cd\dormagic
-
- ******* delete any old dmexit files hanging around for this task.
-
- del dmexit%1.* > nul
- del dorparm%1.dat > nul
-
- ******* Fire up Dormagic. Use the param file of DORMAGI1.PRM for task 1
-
- dormagic /P f:\dormagic\dormagi%1.prm
-
- ******* Fatal exits first..(in case a dmexit file left lying around.
-
- if exist dmexit%1.bye goto end
- if exist dmexit%1.$$2 goto end
- if exist dmexit%1.$$5 goto end
-
- ******* Check for the games flag files.
-
- if exist dmexit%1.who goto whodunit
- if exist dmexit%1.lch goto leech
- if exist dmexit%1.fsh goto fish
- if exist dmexit%1.sft goto star
- if exist dmexit%1.kob goto king
- if exist dmexit%1.yt goto game3
- if exist dmexit%1.tw goto game1
- if exist dmexit%1.trk goto trek
- if exist dmexit%1.pha goto phantasia
- if exist dmexit%1.gw goto game2
- if exist dmexit%1.bar goto barons
- if exist dmexit%1.con goto conquest
- goto end
-
-
- ******* Leech the Card Game.
-
- :leech
- g:
- cd\leech
- leech g:\leech
- f:
- cd\opus
- goto loop
-
- ******* WhoDunnit the Cluedo Game.
-
- :whodunit
- g:
- cd\whodun
- whodunit whodunit.cfg
- goto loop
-
- ******* Fresh Water Fishing
-
- :fish
- call g:\ffs\fish %1
- goto loop
-
- ******* Star Fight WARNING needs LOTS of memory. 512K min.!
-
- :star
- call g:\star\sfight %1
- goto loop
-
- ******* Land of the Barons. (Yes it DOES work)
-
- :barons
- call g:\baron\bars %1
- goto loop
-
- ******* Tradewars
-
- :Game1
- cls
- g:
- cd\twars
- call twars112.bat %1
- goto loop
-
- ******* Galactic Warzone.
-
- :game2
- cls
- f:
- cd\opus
- call g:\galwar\gal112.bat %1
- goto loop
-
- ******* Yankee Trader
-
- :game3
- cls
- g:
- cd\yt
- call trader.bat %1
- f:
- cd\opus
- goto loop
-
- ******* Phantasia
-
- :phantasia
- g:
- cd\phan
- phant %1
- f:
- cd\opus
- goto loop
-
- ******* King of the Boards.
-
- :king
- call g:\king\king.bat
- goto loop
-
- ******* Galactic Conquest.
-
- :conquest
- call g:\conquest\conq.bat %1
- goto loop
-
- ******* Head back to the BBS.
-
- :end
- capture
- del dmexit%1.* > nul
-
- r:
- cd\opus
- cls
-
-