home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / health / burger1.arj / GO.BAT < prev    next >
DOS Batch File  |  1992-04-25  |  9KB  |  508 lines

  1. echo off
  2. cls
  3. cat
  4. pause
  5. order
  6. pause
  7. type enjoy
  8. pause
  9. hamburg
  10. pause
  11. hintro
  12. pause
  13. :reask
  14. hmenu
  15. answer Enter your choice
  16. if %answer%==1 goto b1
  17. if %answer%==2 goto b4
  18. if %answer%==3 goto b7
  19. if %answer%==4 goto b10
  20. if %answer%==5 goto b14
  21. if %answer%==6 goto b17
  22. if %answer%==7 goto b20
  23. if %answer%==8 goto b23
  24. if %answer%== 9 goto b26
  25. if %answer%== 10 goto gloss
  26. if %answer%==11 goto end
  27. IF %ANSWER%== order goto order
  28. IF %ANSWER%== ORDER GOTO ORDER
  29. IF %ANSWER%== INFO GOTO INFO
  30. IF %ANSWER%== info GOTO INFO
  31. goto reask
  32. :b1
  33. h1a
  34. pause
  35. :b2
  36. h1b
  37. answer (F)orward or (B)ackup?
  38. if %answer%==f goto b3
  39. if %answer%==b goto b1
  40. IF %ANSWER%==F GOTO b3
  41. IF %ANSWER%==B GOTO b1
  42. goto b2
  43. :b3
  44. h1c
  45. answer (M)enu or (B)ackup?
  46. if %answer%== m goto reask
  47. if %answer%== b goto b2
  48. if %answer%== M goto reask
  49. if %answer%== F goto b2
  50. goto b3
  51. :b4
  52. h2a
  53. pause
  54. :b5
  55. h2b
  56. answer (F)orward or (B)ackup?
  57. if %answer%== f goto b6
  58. if %answer%== b goto b4
  59. if %answer%== F goto reask
  60. if %answer%== B goto b4
  61. goto b5
  62. :b6
  63. h2c
  64. answer (M)menu or (B)ackup?
  65. if %answer%== m goto reask
  66. if %answer%== b goto b5
  67. if %answer%== M goto reask
  68. if %answer%== B goto b5
  69. goto b6
  70. :b7
  71. h3a
  72. pause
  73. :b8
  74. h3b
  75. answer (F)orward or (B)ackup?
  76. if %answer%== f goto b9
  77. if %answer%== b goto b7
  78. if %answer%== F goto b9
  79. if %answer%== B goto b7
  80. goto b8
  81. :b9
  82. h3c
  83. answer (M)enu or (B)ackup?
  84. if %answer%== m goto reask
  85. if %answer%== b goto b8
  86. if %answer%== M goto reask
  87. if %answer%== B goto b8
  88. goto b9
  89. :b10
  90. h4a
  91. pause
  92. :b11
  93. h4b
  94. answer (F)ordward or (B)ackup?
  95. if %answer%==f goto b12
  96. if %answer%==F goto b12
  97. if %answer%== b goto b10
  98. if %answer%== B goto b10
  99. goto b11
  100. :b12
  101. h4c
  102. answer (F)ordward or (B)ackup?
  103. if %answer%==f goto b13
  104. if %answer%==F goto b13
  105. if %answer%== b goto b11
  106. if %answer%== B goto b11
  107. goto b12
  108. :b13
  109. h4d
  110. answer    (M)enu or (B)ackup?
  111. if %answer%== m goto reask
  112. if %answer%== b goto b12
  113. if %answer%== M goto reask
  114. if %answer%== B goto b12
  115. goto b13
  116. :b14
  117. h5a
  118. pause
  119. :b15
  120. h5b
  121. answer (F)orward or (B)ackup?
  122. if %answer%== f goto b16
  123. if %answer%== b goto b14
  124. if %answer%== F goto b16
  125. if %answer%== B goto b14
  126. goto b15
  127. :b16
  128. h5c
  129. answer    (M)enu or (B)ackup?
  130. if %answer%== m goto reask
  131. if %answer%== b goto b15
  132. if %answer%== M goto reask
  133. if %answer%== B goto b15
  134. goto b16
  135. :b17
  136. h6a
  137. pause
  138. :b18
  139. h6b
  140. answer (F)orward or (B)ackup?
  141. if %answer%== F goto b19
  142. if %answer%== f goto b19
  143. if %answer%== b goto b17
  144. if %answer%== B goto b17
  145. goto b18
  146. :b19
  147. h6c
  148. answer (M)enu or (B)ackup?
  149. if %answer%== m goto reask
  150. if %answer%== b goto b18
  151. if %answer%== M goto reask
  152. if %answer%== B goto b18
  153. goto b19
  154. :b20
  155. h7a
  156. pause
  157. :b21
  158. h7b
  159. answer (F)orward or (B)ackup?
  160. if %answer%== F goto b22
  161. if %answer%== f goto b22
  162. if %answer%== b goto b20
  163. if %answer%== B goto b20
  164. goto b21
  165. :b22
  166. h7c
  167. answer (M)enu or (B)ackup?
  168. if %answer%== M goto reask
  169. if %answer%== m goto reask
  170. if %answer%== b goto b21
  171. if %answer%== B goto b21
  172. goto b22
  173. :b23
  174. h8a
  175. pause
  176. :b24
  177. h8b
  178. answer (F)orward or (B)ackup?
  179. if %answer%== F goto b25
  180. if %answer%== f goto b25
  181. if %answer%== b goto b23
  182. if %answer%== B goto b23
  183. goto b24
  184. :b25
  185. h8c
  186. answer (M)enu or (B)ackup?
  187. if %answer%== M goto reask
  188. if %answer%== m goto reask
  189. if %answer%== b goto b24
  190. if %answer%== B goto b24
  191. goto b25
  192. :b26
  193. h9a
  194. pause
  195. :b27
  196. h9b
  197. answer (F)orward or (B)ackup?
  198. if %answer%== F goto b28
  199. if %answer%== f goto b28
  200. if %answer%== b goto b26
  201. if %answer%== B goto b26
  202. goto b27
  203. :b28
  204. h9c
  205. answer (M)enu or (B)ackup?
  206. if %answer%== M goto reask
  207. if %answer%== m goto reask
  208. if %answer%== b goto b27
  209. if %answer%== B goto b27
  210. goto b28
  211. :gloss
  212. gloss
  213. answer    (M)enu (F)orward or choose #?
  214. if %answer%== f goto gloss2
  215. if %answer%== F goto gloss2
  216. if %answer%== m goto reask
  217. if %answer%== M goto reask
  218. if %answer%== 1 goto g1
  219. if %answer%== 2 goto g1
  220. if %answer%== 3 goto g1
  221. if %answer%== 4 goto g1
  222. if %answer%== 5 goto g2
  223. if %answer%== 6 goto g2
  224. if %answer%== 7 goto g2
  225. if %answer%== 8 goto g2
  226. if %answer%== 9 goto g3
  227. if %answer%== 10 goto g3
  228. if %answer%== 11 goto g3
  229. if %answer%== 12 goto g3
  230. if %answer%== 13 goto g4
  231. if %answer%== 14 goto g4
  232. if %answer%== 15 goto g5
  233. if %answer%== 16 goto g5
  234. if %answer%== 17 goto g5
  235. if %answer%== 18 goto g6
  236. if %answer%== 19 goto g6
  237. if %answer%== 20 goto g6
  238. if %answer%== 21 goto g6
  239. if %answer%== 22 goto g6
  240. if %answer%== 23 goto g7
  241. if %answer%== 24 goto g7
  242. if %answer%== 25 goto g7
  243. if %answer%== 26 goto g7
  244. if %answer%== 27 goto g8
  245. if %answer%== 28 goto g8
  246. if %answer%== 29 goto g8
  247. if %answer%== 30 goto g8
  248. if %answer%== 31 goto g9
  249. if %answer%== 32 goto g9
  250. if %answer%== 33 goto g9
  251. if %answer%== 34 goto g9
  252. if %answer%== 35 goto g10
  253. if %answer%== 36 goto g10
  254. if %answer%== 37 goto g10
  255. if %answer%== 38 goto g10
  256. if %answer%== 39 goto g11
  257. if %answer%== 40 goto g11
  258. if %answer%== 41 goto g11
  259. if %answer%== 42 goto g11
  260. if %answer%== 43 goto g12
  261. if %answer%== 44 goto g12
  262. if %answer%== 45 goto g12
  263. if %answer%== 46 goto g12
  264. if %answer%== 47 goto g12
  265. if %answer%== 48 goto g13
  266. if %answer%== 49 goto g13
  267. if %answer%== 50 goto g13
  268. if %answer%== 51 goto g14
  269. if %answer%== 52 goto g14
  270. if %answer%== 53 goto g14
  271. if %answer%== 54 goto g14
  272. if %answer%== 55 goto g14
  273. if %answer%== 56 goto g15
  274. if %answer%== 57 goto g15
  275. if %answer%== 58 goto g15
  276. if %answer%== 59 goto g15
  277. if %answer%== 60 goto g15
  278. if %answer%== 61 goto g16
  279. if %answer%== 62 goto g16
  280. if %answer%== 63 goto g16
  281. if %answer%== 64 goto g16
  282. if %answer%== 65 goto g16
  283. if %answer%== 66 goto g17
  284. if %answer%== 67 goto g17
  285. if %answer%== 68 goto g17
  286. if %answer%== 69 goto g17
  287. if %answer%== 70 goto g17
  288. if %answer%== 71 goto g18
  289. if %answer%== 72 goto g18
  290. goto gloss
  291. :GLOSS2
  292. gloss2
  293. ANSWER    (M)enu or (B)ackup, choose #?
  294. if %answer%== m goto reask
  295. if %answer%== b goto gloss
  296. if %answer%== M goto reask
  297. if %answer%== B goto gloss
  298. if %answer%== 73 goto g18
  299. if %answer%== 74 goto g18
  300. if %answer%== 75 goto g19
  301. if %answer%== 76 goto g19
  302. if %answer%== 77 goto g19
  303. if %answer%== 78 goto g20
  304. if %answer%== 79 goto g20
  305. if %answer%== 80 goto g20
  306. if %answer%== 81 goto g20
  307. if %answer%== 82 goto g20
  308. if %answer%== 83 goto g21
  309. if %answer%== 84 goto g21
  310. if %answer%== 85 goto g21
  311. if %answer%== 86 goto g21
  312. if %answer%== 87 goto g21
  313. if %answer%== 88 goto g21
  314. if %answer%== 89 goto g22
  315. if %answer%== 90 goto g22
  316. if %answer%== 91 goto g22
  317. if %answer%== 92 goto g22
  318. if %answer%== 93 goto g22
  319. if %answer%== 94 goto g23
  320. if %answer%== 95 goto g23
  321. if %answer%== 96 goto g23
  322. if %answer%== 97 goto g23
  323. if %answer%== 98 goto g23
  324. if %answer%== 99 goto joke
  325. if %answer%== 100 goto g24
  326. if %answer%== 101 goto g24
  327. if %answer%== 102 goto g24
  328. if %answer%== 103 goto g24
  329. if %answer%== 104 goto g24
  330. if %answer%== 105 goto g24
  331. if %answer%== 106 goto g25
  332. if %answer%== 107 goto g25
  333. if %answer%== 108 goto g25
  334. if %answer%== 109 goto g25
  335. if %answer%== 110 goto g25
  336. if %answer%== 111 goto g26
  337. if %answer%== 112 goto g26
  338. if %answer%== 113 goto g26
  339. if %answer%== 114 goto g26
  340. if %answer%== 115 goto g26
  341. if %answer%== 116 goto g27
  342. if %answer%== 117 goto g27
  343. if %answer%== 118 goto g27
  344. if %answer%== 119 goto g27
  345. if %answer%== 120 goto g27
  346. if %answer%== 121 goto g28
  347. if %answer%== 122 goto g28
  348. if %answer%== 123 goto g28
  349. if %answer%== 124 goto g28
  350. if %answer%== 125 goto g28
  351. if %answer%== 126 goto g28
  352. if %answer%== 127 goto g29
  353. if %answer%== 128 goto g29
  354. if %answer%== 129 goto g30
  355. if %answer%== 130 goto g31
  356. if %answer%== 131 goto g32
  357. goto gloss2
  358. :g1
  359. g1
  360. pause
  361. goto gloss
  362. :g2
  363. g2
  364. pause
  365. goto gloss
  366. :g3
  367. g3
  368. pause
  369. goto gloss
  370. :g4
  371. g4
  372. pause
  373. goto gloss
  374. :g5
  375. g5
  376. pause
  377. goto gloss
  378. :g6
  379. g6
  380. pause
  381. goto gloss
  382. :g7
  383. g7
  384. pause
  385. goto gloss
  386. :g8
  387. g8
  388. pause
  389. goto gloss
  390. :g9
  391. g9
  392. pause
  393. goto gloss
  394. :g10
  395. g10
  396. pause
  397. goto gloss
  398. :g11
  399. g11
  400. pause
  401. goto gloss
  402. :g12
  403. g12
  404. pause
  405. goto gloss
  406. :g13
  407. g13
  408. pause
  409. goto gloss
  410. :g14
  411. g14
  412. pause
  413. goto gloss
  414. :g15
  415. g15
  416. pause
  417. goto gloss
  418. :g16
  419. g16
  420. pause
  421. goto gloss
  422. :g17
  423. g17
  424. pause
  425. goto gloss
  426. :g18
  427. g18
  428. pause
  429. goto gloss
  430. :g18b
  431. g18
  432. pause
  433. goto gloss2
  434. :g19
  435. g19
  436. pause
  437. goto gloss2
  438. :g20
  439. g20
  440. pause
  441. goto gloss2
  442. :g21
  443. g21
  444. pause
  445. goto gloss2
  446. :g22
  447. g22
  448. pause
  449. goto gloss2
  450. :g23
  451. g23
  452. pause
  453. goto gloss2
  454. :g24
  455. g24
  456. pause
  457. goto gloss2
  458. :g25
  459. g25
  460. pause
  461. goto gloss2
  462. :g26
  463. g26
  464. pause
  465. goto gloss2
  466. :g27
  467. g27
  468. pause
  469. goto gloss2
  470. :g28
  471. g28
  472. pause
  473. goto gloss2
  474. :g29
  475. g29
  476. pause
  477. goto gloss2
  478. :g30
  479. g30
  480. pause
  481. goto gloss2
  482. :g31
  483. g31
  484. pause
  485. goto gloss2
  486. :g32
  487. g32
  488. pause
  489. goto gloss2
  490. :ORDER
  491. ORDERME
  492. GOTO REASK
  493. :INFO
  494. info1
  495. HELPME
  496. 2GUYS
  497. OSWAD
  498. TYPE ASP.ANS
  499. PAUSE
  500. GOTO REASK
  501. :JOKE
  502. CLS
  503. TYPE 99.ANS
  504. PAUSE
  505. GOTO GLOSS2
  506. :end
  507. cls
  508.