home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / GENERAL / DESSERT1.ZIP / DESSERT1.EXE / GO.BAT < prev    next >
DOS Batch File  |  1992-04-25  |  8KB  |  492 lines

  1. echo off
  2. cls
  3. cat
  4. pause
  5. order
  6. pause
  7. type enjoy
  8. pause
  9. dessert
  10. pause
  11. dintro
  12. pause
  13. :reask
  14. dmenu
  15. answer MAKE CHOICE, PRESS ENTER 
  16. if %answer%==1 goto d1a
  17. if %answer%==2 goto d2a
  18. if %answer%==3 goto d3a
  19. if %answer%==4 goto d4a
  20. if %answer%==5 goto d5a
  21. if %answer%==6 goto d6a
  22. if %answer%==7 goto d7a
  23. if %answer%==8 goto d8a
  24. if %answer%==9 goto d9a
  25. if %answer%==10 goto gloss
  26. if %answer%==11 goto end
  27. IF %ANSWER%==ORDER GOTO ORDER
  28. IF %ANSWER%== INFO GOTO INFO
  29. if %answer%==order goto order
  30. if %answer%==info goto info
  31. goto reask
  32. :d1a
  33. d1a
  34. pause
  35. :d1b
  36. d1b
  37. answer (B)ackup or (N)ext frame ?
  38. if %answer%==N goto d1c
  39. if %answer%==n goto d1c
  40. if %answer%==b goto d1a
  41. if %answer%==B goto d1a
  42. goto d1b
  43. :d1c
  44. d1c
  45. answer (B)ackup or (M)enu?
  46. if %answer%== B goto d1b
  47. if %answer%== b goto d1b
  48. if %answer%== m goto reask
  49. if %answer%== M goto reask
  50. goto d1c
  51. :d2a
  52. d2a
  53. pause
  54. :d2b
  55. d2b
  56. answer (B)ackup or (N)ext frame?
  57. if %answer%==B goto d2a
  58. if %answer%==b goto d2a
  59. if %answer%==n goto d2c
  60. if %answer%==N goto d2c
  61. goto d2b
  62. :d2c
  63. d2c
  64. answer (B)ackup or (M)enu?
  65. if %answer%==b goto d2b
  66. if %answer%==B goto d2b
  67. if %answer%==m goto reask
  68. if %answer%==M goto reask
  69. goto d2c
  70. :d3a
  71. d3a
  72. pause
  73. :d3b
  74. d3b
  75. answer (B)ackup or (N)ext frame?
  76. if %answer%==b goto d3a
  77. if %answer%==B goto d3a
  78. if %answer%==n goto d3c
  79. if %answer%==N goto d3c
  80. goto d3b
  81. :d3c
  82. d3c
  83. answer (B)ackup or (M)enu?
  84. if %answer%==b goto d3b
  85. if %answer%==B goto d3b
  86. if %answer%==m goto reask
  87. if %answer%==M goto reask
  88. goto d3c
  89. :d4a
  90. d4a
  91. pause
  92. :d4b
  93. d4b
  94. answer (B)ackup or (N)ext frame?
  95. if %answer%==b goto d4a
  96. if %answer%==B goto d4a
  97. if %answer%==n goto d4c
  98. if %answer%==N goto d4c
  99. goto d4b
  100. :d4c
  101. d4c
  102. answer (B)ackup or (M)enu?
  103. if %answer%==b goto d4b
  104. if %answer%==B goto d4b
  105. if %answer%==m goto reask
  106. if %answer%==M goto reask
  107. goto d4c
  108. :d5a
  109. d5a
  110. pause
  111. :d5b
  112. d5b
  113. answer (B)ackup or (M)enu?
  114. if %answer%==b goto d5a
  115. if %answer%==B goto d5a
  116. if %answer%==m goto reask
  117. if %answer%==M goto reask
  118. goto d5b
  119. :d6a
  120. d6a
  121. pause
  122. :d6b
  123. d6b
  124. answer (B)ackup or (N)ext frame?
  125. if %answer%==b goto d6a
  126. if %answer%==B goto d6a
  127. if %answer%==n goto d6c
  128. if %answer%==N goto d6c
  129. goto d6b
  130. :d6c
  131. d6c
  132. answer (B)ackup or (M)enu?
  133. if %answer%==b goto d6b
  134. if %answer%==B goto d6b
  135. if %answer%==m goto reask
  136. if %answer%==M goto reask
  137. goto d6c
  138. :d7a
  139. d7a
  140. pause
  141. :d7b
  142. d7b
  143. answer (B)ackup or (N)ext frame?
  144. if %answer%==b goto d7a
  145. if %answer%==B goto d7a
  146. if %answer%==n goto d7c
  147. if %answer%==N goto d7c
  148. goto d7b
  149. :d7c
  150. d7c
  151. answer (B)ackup or (N)ext frame?
  152. if %answer%==b goto d7b
  153. if %answer%==B goto d7b
  154. if %answer%==n goto d7d
  155. if %answer%==N goto d7d
  156. goto d7c
  157. :d7d
  158. d7d
  159. answer (B)ackup or (M)enu?
  160. if %answer%== b goto d7c
  161. if %answer%== B goto d7c
  162. if %answer%== m goto reask
  163. if %answer%== M goto reask
  164. goto d7d
  165. :d8a
  166. d8a
  167. pause
  168. :d8b
  169. d8b
  170. answer (B)ackup or (N)ext frame?
  171. if %answer%== b goto d8a
  172. if %answer%== B goto d8a
  173. if %answer%== n goto d8c
  174. if %answer%== N goto d8c
  175. goto d8b
  176. :d8c
  177. d8c
  178. answer (B)ackup or (M)enu?
  179. if %answer%== b goto d8b
  180. if %answer%== B goto d8b
  181. if %answer%== m goto reask
  182. if %answer%== M goto reask
  183. goto d8c
  184. :d9a
  185. d9a
  186. pause
  187. :d9b
  188. d9b
  189. answer (B)ackup or (N)ext frame?
  190. if %answer%==b goto d9a
  191. if %answer%==B goto d9a
  192. if %answer%==n goto d9c
  193. if %answer%==N goto d9c
  194. goto d9b
  195. :d9c
  196. d9c
  197. answer (B)ackup or (M)enu?
  198. if %answer%==b goto d9b
  199. if %answer%==B goto d9b
  200. if %answer%==m goto reask
  201. if %answer%==M goto reask
  202. goto d9c
  203. goto reask
  204. :ORDER
  205. ORDERME
  206. GOTO REASK
  207. :INFO
  208. info
  209. HELPME
  210. 2GUYS
  211. OSWAD
  212. TYPE ASP.ANS
  213. PAUSE
  214. GOTO REASK
  215. :gloss
  216. gloss
  217. answer    (M)enu (F)orward or choose #?
  218. if %answer%==f goto gloss2
  219. if %answer%==F goto gloss2
  220. if %answer%==m goto reask
  221. if %answer%==M goto reask
  222. if %answer%==1 goto g1
  223. if %answer%==2 goto g1
  224. if %answer%==3 goto g1
  225. if %answer%==4 goto g1
  226. if %answer%==5 goto g2
  227. if %answer%==6 goto g2
  228. if %answer%==7 goto g2
  229. if %answer%==8 goto g2
  230. if %answer%==9 goto g3
  231. if %answer%==10 goto g3
  232. if %answer%==11 goto g3
  233. if %answer%==12 goto g3
  234. if %answer%==13 goto g4
  235. if %answer%==14 goto g4
  236. if %answer%==15 goto g5
  237. if %answer%==16 goto g5
  238. if %answer%==17 goto g5
  239. if %answer%==18 goto g6
  240. if %answer%==19 goto g6
  241. if %answer%==20 goto g6
  242. if %answer%==21 goto g6
  243. if %answer%==22 goto g6
  244. if %answer%==23 goto g7
  245. if %answer%==24 goto g7
  246. if %answer%==25 goto g7
  247. if %answer%==26 goto g7
  248. if %answer%==27 goto g8
  249. if %answer%==29 goto g8
  250. if %answer%==28 goto g8
  251. if %answer%==30 goto g8
  252. if %answer%==31 goto g9
  253. if %answer%==32 goto g9
  254. if %answer%==33 goto g9
  255. if %answer%==34 goto g9
  256. if %answer%==35 goto g10
  257. if %answer%==36 goto g10
  258. if %answer%==37 goto g10
  259. if %answer%==38 goto g10
  260. if %answer%==39 goto g11
  261. if %answer%==40 goto g11
  262. if %answer%==41 goto g11
  263. if %answer%==42 goto g11
  264. if %answer%==43 goto g12
  265. if %answer%==44 goto g12
  266. if %answer%==45 goto g12
  267. if %answer%==46 goto g12
  268. if %answer%==47 goto g12
  269. if %answer%==48 goto g13
  270. if %answer%==49 goto g13
  271. if %answer%==50 goto g13
  272. if %answer%==51 goto g14
  273. if %answer%==52 goto g14
  274. if %answer%==53 goto g14
  275. if %answer%==54 goto g14
  276. if %answer%==55 goto g14
  277. if %answer%==56 goto g15
  278. if %answer%==57 goto g15
  279. if %answer%==58 goto g15
  280. if %answer%==59 goto g15
  281. if %answer%==60 goto g15
  282. if %answer%==61 goto g16
  283. if %answer%==62 goto g16
  284. if %answer%==63 goto g16
  285. if %answer%==64 goto g16
  286. if %answer%==65 goto g16
  287. if %answer%==66 goto g17
  288. if %answer%==67 goto g17
  289. if %answer%==68 goto g17
  290. if %answer%==69 goto g17
  291. if %answer%==70 goto g17
  292. if %answer%==71 goto g18
  293. if %answer%==72 goto g18
  294. goto gloss
  295. :gloss2
  296. gloss2
  297. answer     (M)enu or (B)ackup choose #?
  298. if %answer%== m goto reask
  299. if %answer%== M goto reask
  300. if %answer%== b goto gloss
  301. if %answer%== B goto gloss
  302. if %answer%== 73 goto g18
  303. if %answer%== 74 goto g18
  304. if %answer%== 75 goto g19
  305. if %answer%== 76 goto g19
  306. if %answer%== 77 goto g19
  307. if %answer%== 78 goto g20
  308. if %answer%== 79 goto g20
  309. if %answer%== 80 goto g20
  310. if %answer%== 81 goto g20
  311. if %answer%== 82 goto g20
  312. if %answer%== 83 goto g21
  313. if %answer%== 84 goto g21
  314. if %answer%== 85 goto g21
  315. if %answer%== 86 goto g21
  316. if %answer%== 87 goto g21
  317. if %answer%== 88 goto g21
  318. if %answer%== 89 goto g22
  319. if %answer%== 90 goto g22
  320. if %answer%== 91 goto g22
  321. if %answer%== 92 goto g22
  322. if %answer%== 93 goto g22
  323. if %answer%== 94 goto g23
  324. if %answer%== 95 goto g23
  325. if %answer%== 96 goto g23
  326. if %answer%== 97 goto g23
  327. if %answer%== 98 goto g23
  328. if %answer%== 99 goto joke
  329. if %answer%== 100 goto g24
  330. if %answer%== 101 goto g24
  331. if %answer%== 102 goto g24
  332. if %answer%== 103 goto g24
  333. if %answer%== 104 goto g24
  334. if %answer%== 105 goto g24
  335. if %answer%== 106 goto g25
  336. if %answer%== 107 goto g25
  337. if %answer%== 108 goto g25
  338. if %answer%== 109 goto g25
  339. if %answer%== 110 goto g25
  340. if %answer%== 111 goto g26
  341. if %answer%== 112 goto g26
  342. if %answer%== 113 goto g26
  343. if %answer%== 114 goto g26
  344. if %answer%== 115 goto g26
  345. if %answer%== 116 goto g27
  346. if %answer%== 117 goto g27
  347. if %answer%== 118 goto g27
  348. if %answer%== 119 goto g27
  349. if %answer%== 120 goto g27
  350. if %answer%== 121 goto g28
  351. if %answer%== 122 goto g28
  352. if %answer%== 123 goto g28
  353. if %answer%== 124 goto g28
  354. if %answer%== 125 goto g28
  355. if %answer%== 126 goto g28
  356. if %answer%== 127 goto g29
  357. if %answer%== 128 goto g29
  358. if %answer%== 129 goto g30
  359. if %answer%== 130 goto g31
  360. if %answer%== 131 goto g32
  361. goto gloss2
  362. :g1
  363. g1
  364. pause
  365. goto gloss
  366. :g2
  367. g2
  368. pause
  369. goto gloss
  370. :g3
  371. g3
  372. pause
  373. goto gloss
  374. :g4
  375. g4
  376. pause
  377. goto gloss
  378. :g5
  379. g5
  380. pause
  381. goto gloss
  382. :g6
  383. g6
  384. pause
  385. goto gloss
  386. :g7
  387. g7
  388. pause
  389. goto gloss
  390. :g8
  391. g8
  392. pause
  393. goto gloss
  394. :g9
  395. g9
  396. pause
  397. goto gloss
  398. :g10
  399. g10
  400. pause
  401. goto gloss
  402. :g11
  403. g11
  404. pause
  405. goto gloss
  406. :g12
  407. g12
  408. pause
  409. goto gloss
  410. :g13
  411. g13
  412. pause
  413. goto gloss
  414. :g14
  415. g14
  416. pause
  417. goto gloss
  418. :g15
  419. g15
  420. pause
  421. goto gloss
  422. :g16
  423. g16
  424. pause
  425. goto gloss
  426. :g17
  427. g17
  428. pause
  429. goto gloss
  430. :g18
  431. g18
  432. pause
  433. goto gloss
  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. :end
  491. cls
  492.