home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / FURY1H.ZIP / GAME.ZIP / NANBATS.ZIP / GAMES.BAT < prev    next >
DOS Batch File  |  1995-05-18  |  9KB  |  515 lines
  1. rem :I put echo on so I can see what's going on from my end, it can be set off
  2. @echo on
  3.  
  4.  
  5. rem :the following calls fury, passes the name of the door, passes drop file
  6. rem :this logs usage and last user to the database
  7. rem :if the door name passed is "Fury" it will open the door for viewing stats
  8. cd\games\fury
  9. fury %2 w:\pb\node%1\dorinfo%1.def
  10. cd\games
  11.  
  12. rem : the following list checks the passed variable name and compares it
  13. rem : to the list to go down and activate the door
  14.  
  15. if "%2" == "fury" goto end
  16.  
  17.  
  18. if "%2" == "AnsiArt" goto ansiart
  19. if "%2" == "Arrowbridge" goto arrowbridge
  20. if "%2" == "Assassin" goto assassin
  21. if "%2" == "Baseball_Dice" goto bbdice
  22. if "%2" == "Boob_Tube" goto btube
  23. if "%2" == "BCheckers" goto bcheck
  24. if "%2" == "Betsy_Ross" goto betsy
  25. if "%2" == "Boydian_Blocks" goto boydian
  26. if "%2" == "BRE" goto bre
  27. if "%2" == "BRE2" goto bre2
  28. if "%2" == "Chat_Door" goto chat
  29. if "%2" == "Castle_Siege" goto castle
  30. if "%2" == "Cyber_Tank" goto cyber
  31. if "%2" == "Dragon_Systems" goto charge
  32. if "%2" == "Eclectic_Avenue" goto eclectic
  33. if "%2" == "EZHang" goto ezhang
  34. if "%2" == "Food_Fite" goto food
  35. if "%2" == "Galactic_Overlord" goto galactic
  36. if "%2" == "Hang_Man"  goto hang
  37. if "%2" == "Immortal" goto immortal
  38. if "%2" == "Island_Empires" goto island
  39. if "%2" == "Jewel_Thief" goto jewel
  40. if "%2" == "Knights" goto knights
  41. if "%2" == "Kaboom" goto kaboom
  42. if "%2" == "KingTrivia" goto king
  43. if "%2" == "Ladders" goto ladders
  44. if "%2" == "LOD" goto lod
  45. if "%2" == "LORD" goto lord
  46. if "%2" == "Lords_of_Irongate" goto irongate
  47. if "%2" == "Lore" goto lore
  48. if "%2" == "Mania" goto Mania
  49. if "%2" == "Master_Mind" goto master
  50. if "%2" == "Mines_of_Gorr" goto gorr
  51. if "%2" == "Mo_Mud" goto momud
  52. if "%2" == "Outpost_Trader"  goto otrade
  53. if "%2" == "PJTrivia" goto PJTrivia
  54. if "%2" == "Planets" goto planets
  55. if "%2" == "Shadow_BBS" goto shadow
  56. if "%2" == "skigame" goto skigame
  57. if "%2" == "Super_Slots"  goto superslot
  58. if "%2" == "Synabacab" goto syn
  59. if "%2" == "The_Pit"  goto thepit
  60. if "%2" == "TriBingo" goto tribingo
  61. if "%2" == "Usurper" goto usurper
  62. if "%2" == "WCSUno" goto uno
  63. if "%2" == "Wraith" goto wraith
  64.  
  65. rem : nanet's doors
  66.  
  67. if "%2" == "Dr.Dread" goto dread
  68. if "%2" == "Spiked"  goto spiked
  69. if "%2" == "Jacob's_Ladder" goto jacob
  70. if "%2" == "PunchLine!" goto punch
  71. if "%2" == "Trekkie_Tags" goto trekkie
  72. if "%2" == "Don't_Wake_Sysop" goto wake
  73.  
  74. rem : these are all doors by Danny Davis -- check em out!
  75. if "%2" == "Draw_Poker" goto draw
  76. if "%2" == "Seven_Towers" goto tower
  77. if "%2" == "Fifteen" goto fifteen
  78. if "%2" == "Four_Leaf" goto 4leaf
  79. if "%2" == "Video_Poker" goto video
  80. if "%2" == "Solitaire" goto sol
  81. if "%2" == "Conc_Solitaire" goto concen
  82. if "%2" == "Yahtzee" goto yaht
  83. if "%2" == "Word_Scramble" goto scramble
  84. if "%2" == "Phrase_Craze" goto phrase
  85. if "%2" == "Tut's_Revenge" goto tut
  86. if "%2" == "Black_Jack" goto bj
  87. if "%2" == "Thirteen" goto 13
  88.  
  89.  
  90. rem in case we call a non-existent label
  91. :start
  92. goto end
  93.  
  94. :charge
  95. CD\games\charge
  96. copy w:\pb\node%1\door.sys w:\pb\wcwork\node%1\door.sys
  97. copy w:\pb\node%1\door.sys w:\pb\wcwork\node%1
  98. WCCHARGE NODE%1.CFG
  99. IF EXIST BATCH%1.BAT CALL BATCH%1.BAT
  100. IF EXIST BATCH%1.BAT DEL BATCH%1.BAT
  101. goto end
  102.  
  103. :chat
  104. CD\games\cdoor
  105. chatdoor chatdoor.cf%1
  106. goto end
  107.  
  108. :bcheck
  109. CD\games\bcheck
  110. bcheck w:\pb\node%1\door.sys
  111. goto end
  112.  
  113. :boydian
  114. CD\games\boydian
  115. bb w:\pb\node%1\dorinfo%1.def
  116. goto end
  117.  
  118. :draw
  119. cd\games\draw
  120. draw draw0%1.cnf
  121. goto end
  122.  
  123. :irongate
  124. CD\games\loid
  125. irongate irongate.cf%1 
  126. goto end
  127.  
  128. :island
  129. CD\games\ISLAND
  130. ISLAND ^ISLAND.C0%1
  131. goto end
  132.  
  133. :kaboom
  134. CD\games\kaboom
  135. kaboom w:\pb\node%1\door.sys
  136. goto end
  137.  
  138. :lod
  139. cd\games\lod
  140. game /N%1 /CHECK /Pw:\pb\node%1
  141. goto end
  142.  
  143. :lore
  144. cd\games\lore
  145. lore /N%1 /Pw:\pb\node%1
  146. goto end
  147.  
  148. :master
  149. CD\games\master
  150. mastmind /Sw:\pb\node%1
  151. goto end
  152.  
  153. :momud
  154. cd\games\momud
  155. momud momud%1.cfg 
  156. goto end
  157.  
  158. :wraith
  159. cd\games\wraith
  160. rem wk4nodes.exe w:\pb\node%1
  161. wraith.bat w:\pb\node%1
  162. goto end
  163.  
  164. :sol
  165. cd\games\sol
  166. sol sol0%1.cnf
  167. goto end
  168.  
  169. :tut
  170. cd\games\tut
  171. tut tut0%1.cnf
  172. goto end
  173.  
  174. :video
  175. cd\games\video
  176. video video0%1.cnf
  177. goto end
  178.  
  179. :yaht
  180. cd\games\yaht
  181. yahtzee yaht0%1.cnf
  182. goto end
  183.  
  184. :tower
  185. cd\games\sevtow
  186. tower tower0%1.cnf
  187. goto end
  188.  
  189. :fifteen
  190. cd\games\fifteen
  191. fifteen match0%1.cnf
  192. goto end
  193.  
  194. :bj
  195. cd\games\bj
  196. bj bj0%1.cnf
  197. goto end
  198.  
  199. :concen
  200. cd\games\conc
  201. concent concen0%1.cnf
  202. goto end
  203.  
  204. :scramble       
  205. cd\games\scramble
  206. scramble word0%1.cnf
  207. goto end
  208.  
  209. :13
  210. cd\games\thirteen
  211. thirteen 130%1.cnf
  212. goto end
  213.  
  214. :phrase
  215. cd\games\phrase
  216. phrase phrase0%1.cnf
  217. goto end
  218.  
  219. :4leaf
  220. cd\games\fourleaf
  221. fourleaf 4leaf0%1.cnf
  222. goto end
  223.  
  224. :hang
  225. CD\games\hang
  226. hang hang0%1.cnf
  227. goto end
  228.  
  229. :syn
  230. cd\games\syn
  231. syn.exe syn%1.cfg
  232. goto end
  233.  
  234. :bre2
  235. CD\games\BRE2
  236. if exist w:\games\bre\using.flg goto inuse
  237. echo "INUSE FLAG" > using.flg
  238. copy setup.%1 setup.sr
  239. SRDOOR
  240. BRE
  241. del using.flg
  242. goto end
  243.  
  244. :bre
  245. CD\games\BRE
  246. if exist w:\games\bre\using.flg goto inuse
  247. echo "INUSE FLAG" > using.flg
  248. copy setup.%1 setup.sr
  249. BRE INBOUND
  250. BRSCORES
  251. SRDOOR
  252. BRE
  253. BRE OUTBOUND
  254. del using.flg
  255. goto end
  256.  
  257. :betsy
  258. CD\games\betsy
  259. betsy betsy.cf%1 /FD
  260. goto end
  261.  
  262. :shadow
  263. rem if %1 == 2 goto sorry
  264. CD\games\shadow
  265. shadow1 door%1.cfg
  266. goto end
  267.  
  268. :king
  269. cd\games\king
  270. KING810 KING.CF%1
  271. goto end                                                                              
  272.  
  273. :knights
  274. CD\games\knights
  275. COPY knights.CF%1 knights.CFG
  276. if %1 == 4 goto knights4
  277. if %1 == 5 goto knights4
  278. if %1 == 6 goto knights4
  279. knights knights.CFG
  280. goto end
  281. :knights4
  282. knights knights.CFG /local
  283. goto end
  284.  
  285. :PJTrivia
  286. cd\games\pjtrivia
  287. TRIVIA TRIVIA.CF%1
  288. goto end
  289.  
  290. :ezhang
  291. CD\games\EZHANG
  292. EZHANG %1
  293. goto end
  294.  
  295. :food
  296. if %1 == 2 goto sorry
  297. cd\games\food
  298. FOODFITE FOODFITE.CF%1
  299. goto end                                                                              
  300.  
  301. :superslot
  302. cd\games\sslots
  303. SUPRSLOT SUPRSLOT.CFG w:\pb\node%1\dorinfo%1.def
  304. goto end
  305.  
  306. :ansiart
  307. if %1 == 2 goto sorry
  308. cd\pb\ansiart
  309. ansiart w:\pb\node%1\dorinfo%1.def
  310. goto end
  311.  
  312. :arrowbridge
  313. cd\games\abridge
  314. abridge.exe /node%1
  315. goto end
  316.  
  317. :assassin
  318. CD\games\assassin
  319. ASNPC /DROP=w:\pb\node%1\door.sys
  320. rem dorinfo%1.def
  321. goto end
  322.  
  323. :bjack
  324. cd\games\bjack
  325. COPY bj.CF%1 bj.CFG
  326. bj bj.cfg
  327. goto end
  328.  
  329. :uno
  330. cd\games\uno
  331. COPY wcsuno.CF%1 wcsuno.CFG
  332. wcsuno wcsuno.cfg
  333. goto end
  334.  
  335. :bbdice
  336. cd\games\bbdice
  337. if %1 == 4 goto bbdice4
  338. if %1 == 5 goto bbdice4
  339. if %1 == 6 goto bbdice4
  340. bbdice bbdice.cf%1 /fd
  341. goto end
  342. :bbdice4
  343. bbdice bbdice.cf%1
  344. goto end
  345.  
  346. :btube
  347. if %1 == 2 goto sorry
  348. CD\games\btube                                           
  349. BT23 DEKMDOOR.CF%1                                           
  350. goto end
  351.  
  352. :castle
  353. CD\games\castle
  354. Castle -Node=%1 -DoorInfo=w:\pb\node%1\DORINFO%1.DEF -Fossil
  355. goto end
  356.  
  357. :cyber
  358. cd\games\cyb
  359. CYBER -Node=%1 -DropFile=w:\pb\node%1\dorinfo%1.def -Fossil
  360. goto end
  361.  
  362. :dread
  363. CD\games\dread
  364. dread w:\PB\node%1\DORINFO%1.DEF %1
  365. goto end
  366.  
  367. :punch
  368. CD\games\punch
  369. sssgame w:\PB\node%1\DORINFO%1.DEF %1
  370. goto end
  371.  
  372. :trekkie
  373. CD\games\trekkie
  374. sssgame w:\PB\node%1\DORINFO%1.DEF %1
  375. goto end
  376.  
  377. :jacob
  378. CD\games\jacob
  379. sssgame w:\PB\node%1\DORINFO%1.DEF %1
  380. goto end
  381.  
  382. :spiked
  383. CD\games\spike
  384. spike w:\PB\node%1\DORINFO%1.DEF %1
  385. goto end
  386.  
  387. :eclectic
  388. CD\games\eclectic
  389. EA.EXE node%1.CFG /D w:\pb\node%1\
  390. goto end
  391.  
  392. :gorr
  393. CD\games\GORR
  394. GORR w:\pb\node%1\dorinfo%1.def PORT:F:%1
  395. goto end
  396.  
  397. :galactic
  398. CD\games\GO
  399. GO w:\pb\node%1\dorinfo%1.def PORT:F:%1
  400. goto end
  401.  
  402. :immortal
  403. CD\games\immortal
  404. immortal /n=%1
  405. goto end
  406.  
  407. :jewel
  408. CD\games\jewel
  409. COPY JEWEL.CF%1 JEWEL.CFG
  410. if %1 == 6 goto jewel4
  411. if %1 == 5 goto jewel4
  412. if %1 == 4 goto jewel4
  413. JEWEL jewel.CFG
  414. goto end
  415. :jewel4
  416. JEWEL jewel.CFG /local
  417. goto end
  418.  
  419. :tribingo
  420. CD\games\bingo
  421. COPY tribingo.CF%1 TRIBINGO.CFG
  422. if %1 == 6 goto bingo4
  423. if %1 == 5 goto bingo4
  424. if %1 == 4 goto bingo4
  425. TRIBINGO TRIBINGO.CFG
  426. goto end
  427.  
  428. :bingo4
  429. TRIBINGO TRIBINGO.CFG local
  430. goto end
  431.  
  432. :ladders
  433. CD\games\ladders
  434. LADDERS LADDERS.CF%1
  435. goto end
  436.  
  437. :otrade
  438. cd\games\otrade
  439. otrader /Dw:\pb\node%1
  440. goto end
  441.  
  442. :lord
  443. CD\games\LORD
  444. call start.bat %1
  445. rem lord /n%1
  446. goto end
  447.  
  448. :Mania
  449. CD\games\mania
  450. mania mania.cf%1 /fd
  451. goto end
  452.  
  453. :planets
  454. cd\games\planets
  455. PLANETS.EXE /pw:\pb\node%1
  456. goto end
  457.  
  458. :skigame
  459. CD\games\skigame
  460. skigame w:\pb\node%1\dorinfo%1.def
  461. goto end
  462.  
  463. :wake
  464. CD\games\wake
  465. wake w:\pb\node%1\dorinfo%1.def %1
  466. goto end
  467.  
  468. :thepit
  469. CD\games\pit
  470. pit /node0%1
  471. goto end
  472.  
  473.  
  474. :usurper
  475. rem if exist w:\games\usurper\inuse.flg goto inuse
  476. CD\games\USURPER
  477. usurper %1 /P:w:\pb\node%1\
  478. goto end
  479.  
  480.  
  481. :tw2002
  482. cd\games\tradewar
  483. if exist inuse.FLG goto inuse
  484. echo "INUSE FLAG" > inuse.flg
  485. copy w:\pb\node%1\dorinfo%1.def dorinfo1.def
  486. TW2002 -qbbs
  487. del dorinfo1.def
  488. del inuse
  489. goto end
  490.  
  491. rem :concen
  492. rem cd\games\concen
  493. rem if %1 == 4 goto concen4
  494. rem if %1 == 5 goto concen4
  495. rem if %1 == 6 goto concen4
  496. rem concent concent.cf%1 /fd
  497. rem goto end
  498. rem :concen4
  499. rem concent concent.cf%1
  500. rem goto end
  501.  
  502.  
  503.  
  504. :inuse
  505. echo Sorry, This door's in use now. Try later.. >COM%1:
  506. goto end
  507.  
  508. :sorry
  509. echo Sorry, This door can only be used on Node 1. >COM%1:
  510. goto end
  511.  
  512. :end
  513. cd\pb\node%1
  514.  
  515.