home *** CD-ROM | disk | FTP | other *** search
/ Play and Learn 2 / 19941.ZIP / 19941 / EDUCAMES / GAMETOL2 / QUES-SRC.ZOO / quest.cmd next >
Encoding:
Text File  |  1988-04-24  |  40.6 KB  |  1,526 lines
  1.  
  2.  
  3. COMMAND ANY ANY
  4. Present 209 (* sphinx is present *)
  5. NOT Present 203 (* polished plate is NOT present *)
  6. PrintMessage 24 (* You suddenly realize the significance of all those ston *)
  7. PrintMessage 25 (* You have turned to stone. Therefore you are dead. Black *)
  8. EndGame (* End Game *)
  9. KillPlayer
  10. DoneWithTurn
  11. END_COMMAND
  12.  
  13. COMMAND ANY ANY
  14. Present 209 (* sphinx is present *)
  15. PrintMessage 26 (* You walk in holding the polished plate over your face. *)
  16. Destroy 209 (* Move sphinx to room Zero *)
  17. PlusScore 5 (* Add 5 to score *)
  18. PrintMessage 76 (* You get some points for cleverness! *)
  19. DoneWithTurn
  20. END_COMMAND
  21.  
  22. COMMAND UNLOCK CABINET
  23. NOT AtLocation 2 (* Player is NOT in Dismal cottage *)
  24. PrintMessage 2 (* ? I see nothing of the sort. *)
  25. DoneWithTurn
  26. END_COMMAND
  27.  
  28. COMMAND UNLOCK CABINET
  29. FlagON 1 (* Flag # 1 is ON *)
  30. PrintMessage 12 (* It already IS unlocked. *)
  31. DoneWithTurn
  32. END_COMMAND
  33.  
  34. COMMAND UNLOCK CABINET
  35. IsCarrying 207 (* Player is carrying diamond key *)
  36. PrintMessage 7 (* It is now unlocked. *)
  37. TurnFlagON 1 (* Turn Flag # 1 ON *)
  38. DoneWithTurn
  39. END_COMMAND
  40.  
  41. COMMAND UNLOCK CABINET
  42. PrintMessage 41 (* You don't have the key. *)
  43. DoneWithTurn
  44. END_COMMAND
  45.  
  46. COMMAND LOCK CABINET
  47. NOT AtLocation 2 (* Player is NOT in Dismal cottage *)
  48. PrintMessage 2 (* ? I see nothing of the sort. *)
  49. DoneWithTurn
  50. END_COMMAND
  51.  
  52. COMMAND LOCK CABINET
  53. NOT FlagON 1 (* Flag # 1 is NOT ON *)
  54. PrintMessage 11 (* It already IS locked. *)
  55. DoneWithTurn
  56. END_COMMAND
  57.  
  58. COMMAND LOCK CABINET
  59. IsCarrying 207 (* Player is carrying diamond key *)
  60. PrintMessage 8 (* It is now locked. *)
  61. TurnFlagOFF 1 (* Turn Flag # 1 OFF *)
  62. DoneWithTurn
  63. END_COMMAND
  64.  
  65. COMMAND LOCK CABINET
  66. PrintMessage 41 (* You don't have the key. *)
  67. DoneWithTurn
  68. END_COMMAND
  69.  
  70. COMMAND OPEN CABINET
  71. NOT AtLocation 2 (* Player is NOT in Dismal cottage *)
  72. PrintMessage 2 (* ? I see nothing of the sort. *)
  73. DoneWithTurn
  74. END_COMMAND
  75.  
  76. COMMAND OPEN CABINET
  77. FlagON 2 (* Flag # 2 is ON *)
  78. PrintMessage 14 (* It already IS open. *)
  79. DoneWithTurn
  80. END_COMMAND
  81.  
  82. COMMAND OPEN CABINET
  83. NOT FlagON 1 (* Flag # 1 is NOT ON *)
  84. PrintMessage 6 (* It is locked. *)
  85. DoneWithTurn
  86. END_COMMAND
  87.  
  88. COMMAND OPEN CABINET
  89. PrintMessage 9 (* It is now open. *)
  90. TurnFlagON 2 (* Turn Flag # 2 ON *)
  91. PutInCurrentRoom 208 (* Move contraption to current room *)
  92. PlusScore 5 (* Reward player for this move *)
  93. PrintMessage 76 (* You get some points for cleverness! *)
  94. DoneWithTurn
  95. END_COMMAND
  96.  
  97. COMMAND CLOSE CABINET
  98. NOT AtLocation 2 (* Player is NOT in Dismal cottage *)
  99. PrintMessage 2 (* ? I see nothing of the sort. *)
  100. DoneWithTurn
  101. END_COMMAND
  102.  
  103. COMMAND CLOSE CABINET
  104. NOT FlagON 2 (* Flag # 2 is NOT ON *)
  105. PrintMessage 13 (* It already IS closed. *)
  106. DoneWithTurn
  107. END_COMMAND
  108.  
  109. COMMAND CLOSE CABINET
  110. PrintMessage 10 (* It is now closed. *)
  111. TurnFlagOFF 2 (* Turn Flag # 2 OFF *)
  112. Destroy 208 (* Move contraption to room Zero *)
  113. DoneWithTurn
  114. END_COMMAND
  115.  
  116. COMMAND CHOP TREE
  117. AtLocation 3 (* Player is in Pleasant meadow *)
  118. Present 205 (* sharp axe is present *)
  119. NOT Present 206 (* chopped oak is NOT here *)
  120. PrintMessage 19 (* The tremendous oak sways, hovers dangerously, then topp *)
  121. PutInCurrentRoom 206 (* Move oak to current room *)
  122. DoneWithTurn
  123. END_COMMAND
  124.  
  125. COMMAND CHOP OAK
  126. NOT AtLocation 3 (* Player is NOT in Pleasant meadow *)
  127. PrintMessage 2 (* ? I see nothing of the sort. *)
  128. DoneWithTurn
  129. END_COMMAND
  130.  
  131. COMMAND CHOP OAK
  132. NOT NOUNPresent (* NOUN is NOT present *)
  133. Present 205 (* sharp axe is present *)
  134. PrintMessage 19 (* The tremendous oak sways, hovers dangerously, then topp *)
  135. PutInCurrentRoom 206 (* Move oak to current room *)
  136. DoneWithTurn
  137. END_COMMAND
  138.  
  139. COMMAND CHOP OAK
  140. NOUNPresent (* NOUN is present *)
  141. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  142. DoneWithTurn
  143. END_COMMAND
  144.  
  145. COMMAND CHOP OAK
  146. PrintMessage 43 (* You don't have what is necessary in order to *)
  147. DoneWithTurn
  148. END_COMMAND
  149.  
  150. COMMAND CHOP TREE
  151. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  152. DoneWithTurn
  153. END_COMMAND
  154.  
  155. COMMAND EXAMINE FIREPLACE
  156. AtLocation 10 (* Hallway *)
  157. PrintMessage 75 (* It is blazing brightly *)
  158. DoneWithTurn
  159. END_COMMAND
  160.  
  161. COMMAND EXAMINE PLAQUES
  162. PrintMessage 74 (* Written in Latin *)
  163. DoneWithTurn
  164. END_COMMAND
  165.  
  166. COMMAND EXAMINE SIGN
  167. AtLocation 4 (* End of Meadow *)
  168. PrintMessage 67 (* Danger - No swimming!. *)
  169. DoneWithTurn
  170. END_COMMAND
  171.  
  172. COMMAND EXAMINE SIGN
  173. NOT Present 208 (* contraption is NOT present *)
  174. PrintMessage 2 (* ? I see nothing of the sort. *)
  175. DoneWithTurn
  176. END_COMMAND
  177.  
  178. COMMAND EXAMINE SIGN
  179. PrintMessage 23 (* I'm sorry, it's written in Polish. *)
  180. DoneWithTurn
  181. END_COMMAND
  182.  
  183. COMMAND EXAMINE LABEL
  184. NOT AtLocation 6 (* Player is NOT in Statue room *)
  185. PrintMessage 2 (* ? I see nothing of the sort. *)
  186. DoneWithTurn
  187. END_COMMAND
  188.  
  189. COMMAND EXAMINE LABEL
  190. PrintMessage 37 (* ENTRY NOT RECOMMENDED -- BLACKWING *)
  191. DoneWithTurn
  192. END_COMMAND
  193.  
  194. COMMAND EXAMINE DWARF
  195. NOT NOUNPresent (* NOUN is NOT present *)
  196. PrintMessage 2 (* ? I see nothing of the sort. *)
  197. DoneWithTurn
  198. END_COMMAND
  199.  
  200. COMMAND EXAMINE DWARF
  201. PrintMessage 15 (* Huge fingers stroke a fiery red beard as he hums a gruf *)
  202. DoneWithTurn
  203. END_COMMAND
  204.  
  205. COMMAND EXAMINE HORN
  206. NOT NOUNPresent (* NOUN is NOT present *)
  207. PrintMessage 2 (* ? I see nothing of the sort. *)
  208. DoneWithTurn
  209. END_COMMAND
  210.  
  211. COMMAND EXAMINE HORN
  212. PrintMessage 58 (* The lovely black horn comes from the goat species Quati *)
  213. DoneWithTurn
  214. END_COMMAND
  215.  
  216. COMMAND EXAMINE OAK
  217. NOT NOUNPresent (* NOUN is NOT present *)
  218. NOT AtLocation 3 (* Player is NOT in Pleasant meadow *)
  219. PrintMessage 2 (* ? I see nothing of the sort. *)
  220. DoneWithTurn
  221. END_COMMAND
  222.  
  223. COMMAND EXAMINE OAK
  224. NOT NOUNPresent (* NOUN is NOT present *)
  225. PrintMessage 1 (* s don't usually have anything peculiar about them. At l *)
  226. DoneWithTurn
  227. END_COMMAND
  228.  
  229. COMMAND EXAMINE OAK
  230. IsLocated 207  0 (* diamond key is in its starting room *)
  231. PrintMessage 20 (* At the very tip of one long branch dangles a diamond ke *)
  232. DoneWithTurn
  233. END_COMMAND
  234.  
  235. COMMAND EXAMINE OAK
  236. PrintMessage 1 (* s don't usually have anything peculiar about them. At l *)
  237. DoneWithTurn
  238. END_COMMAND
  239.  
  240. COMMAND EXAMINE CONTRAPTION
  241. NOT NOUNPresent (* NOUN is NOT present *)
  242. PrintMessage 2 (* ? I see nothing of the sort. *)
  243. DoneWithTurn
  244. END_COMMAND
  245.  
  246. COMMAND EXAMINE CONTRAPTION
  247. PrintMessage 21 (* The contraption is made of stainless steel, has a slot  *)
  248. DoneWithTurn
  249. END_COMMAND
  250.  
  251. COMMAND EXAMINE TREE
  252. AtLocation 3 (* Player is in Pleasant meadow *)
  253. NOT Present 206 (* Fallen Oak is NOT present *)
  254. PrintMessage 1 (* s don't usually have anything peculiar about them. At l *)
  255. DoneWithTurn
  256. END_COMMAND
  257.  
  258. COMMAND EXAMINE TREE
  259. AtLocation 3 (* Player is in Pleasant meadow *)
  260. Present 206 (* Fallen Oak is present *)
  261. IsLocated 207  0 (* diamond key is in its starting room *)
  262. PrintMessage 20 (* At the very tip of one long branch dangles a diamond ke *)
  263. DoneWithTurn
  264. END_COMMAND
  265.  
  266. COMMAND EXAMINE TREE
  267. AtLocation 3 (* Player is in Pleasant meadow *)
  268. Present 206 (* Fallen Oak is present *)
  269. PrintMessage 1 (* s don't usually have anything peculiar about them. At l *)
  270. DoneWithTurn
  271. END_COMMAND
  272.  
  273. COMMAND EXAMINE TREE
  274. AtLocation 5 (* Player is in Greenhouse *)
  275. PrintMessage 29 (* It is bulging with banana clusters, all of which are as *)
  276. DoneWithTurn
  277. END_COMMAND
  278.  
  279. COMMAND EXAMINE TREE
  280. PrintMessage 2 (* ? I see nothing of the sort. *)
  281. DoneWithTurn
  282. END_COMMAND
  283.  
  284. COMMAND EXAMINE BEANS
  285. NOT Present 210 (* None of the beans are present *)
  286. NOT Present 211 (* None of the beans are present *)
  287. NOT Present 212 (* None of the beans are present *)
  288. PrintMessage 2 (* ? I see nothing of the sort. *)
  289. DoneWithTurn
  290. END_COMMAND
  291.  
  292. COMMAND EXAMINE BEANS
  293. PrintMessage 27 (* You recognize it as part of the magic bean family *)
  294. PrintMessage 28 (* They are cold to the touch *)
  295. DoneWithTurn
  296. END_COMMAND
  297.  
  298. COMMAND EXAMINE GORILLA
  299. NOT NOUNPresent (* NOUN is NOT present *)
  300. PrintMessage 2 (* ? I see nothing of the sort. *)
  301. DoneWithTurn
  302. END_COMMAND
  303.  
  304. COMMAND EXAMINE GORILLA
  305. PrintMessage 38 (* The gorilla is covered with black fur, skin, muscles, v *)
  306. DoneWithTurn
  307. END_COMMAND
  308.  
  309. COMMAND EXAMINE CHAIR
  310. AtLocation 14 (* Player is in Living room *)
  311. PrintMessage 65 (* It seems to be a musical chair, since it is participati *)
  312. DoneWithTurn
  313. END_COMMAND
  314.  
  315. COMMAND EXAMINE OBJECT
  316. NOUNPresent (* NOUN is present *)
  317. PrintMessage 51 (* It is about one inch long, round, one inch in diameter, *)
  318. DoneWithTurn
  319. END_COMMAND
  320.  
  321. COMMAND EXAMINE OBJECT
  322. PrintMessage 2 (* ? I see nothing of the sort. *)
  323. DoneWithTurn
  324. END_COMMAND
  325.  
  326. COMMAND EXAMINE BIRD
  327. NOUNPresent (* NOUN is present *)
  328. PrintMessage 52 (* It has a long beak, blue-green feathers, and sharp talo *)
  329. DoneWithTurn
  330. END_COMMAND
  331.  
  332. COMMAND EXAMINE BIRD
  333. PrintMessage 2 (* ? I see nothing of the sort. *)
  334. DoneWithTurn
  335. END_COMMAND
  336.  
  337. COMMAND EXAMINE SPHINX
  338. Present 209 (* sphinx is present *)
  339. NOT Present 203 (* polished plate is NOT present *)
  340. PrintMessage 5 (* Describe sphinx *)
  341. PrintMessage 24 (* You suddenly realize the significance of all those ston *)
  342. PrintMessage 25 (* You have turned to stone. Therefore you are dead. Black *)
  343. EndGame (* End Game *)
  344. DoneWithTurn
  345. END_COMMAND
  346.  
  347. COMMAND EXAMINE GIANT
  348. Present 233 (* Giant *)
  349. PrintMessage 42 (* Describe giant *)
  350. DoneWithTurn
  351. END_COMMAND
  352.  
  353. COMMAND EXAMINE PAPER
  354. QuitAllCMDS
  355. END_COMMAND
  356.  
  357. COMMAND EXAMINE ANY
  358. PrintMessage 1 (* s don't usually have anything peculiar about them. At l *)
  359. DoneWithTurn
  360. END_COMMAND
  361.  
  362. COMMAND GET ALL
  363. AtLocation 8 (* Guarded Cell *)
  364. Present 210 (* Beans *)
  365. Present 211 (* Beans *)
  366. Present 212 (* Beans *)
  367. GetIt 210
  368. GetIt 211
  369. GetIt 212
  370. PrintMessage 44 (* Done *)
  371. DoneWithTurn
  372. END_COMMAND
  373.  
  374. COMMAND GET KEY
  375. IsLocated 207  0 (* diamond key is in its starting room *)
  376. AtLocation 3 (* Player is in Pleasant meadow *)
  377. GetNOUN (* Move NOUN to Player *)
  378. PrintMessage 4 (* You now have the key *)
  379. PlusScore 5 (* Reward player for this move *)
  380. PrintMessage 76 (* You get some points for cleverness! *)
  381. DoneWithTurn
  382. END_COMMAND
  383.  
  384. COMMAND GET KEY
  385. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  386. NOUNPresent (* NOUN is present *)
  387. GetNOUN (* Move NOUN to Player *)
  388. PrintMessage 4 (* You now have the *)
  389. DoneWithTurn
  390. END_COMMAND
  391.  
  392. COMMAND GET KEY
  393. NOUNIsCarrying (* Player is carrying NOUN *)
  394. PrintMessage 45 (* You already HAVE the *)
  395. DoneWithTurn
  396. END_COMMAND
  397.  
  398. COMMAND GET KEY
  399. PrintMessage 2 (* ? I see nothing of the sort. *)
  400. DoneWithTurn
  401. END_COMMAND
  402.  
  403. COMMAND GET BANANA
  404. AtLocation 5 (* Player is in Greenhouse *)
  405. GetNOUN (* Move NOUN to Player *)
  406. PrintMessage 4 (* You now have the *)
  407. DoneWithTurn
  408. END_COMMAND
  409.  
  410. COMMAND GET BANANA
  411. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  412. NOUNPresent (* NOUN is present *)
  413. PrintMessage 4 (* You now have the *)
  414. GetNOUN (* Move NOUN to Player *)
  415. DoneWithTurn
  416. END_COMMAND
  417.  
  418. COMMAND GET BANANA
  419. NOUNPresent (* NOUN is present *)
  420. PrintMessage 45 (* You already HAVE the *)
  421. DoneWithTurn
  422. END_COMMAND
  423.  
  424. COMMAND GET BANANA
  425. PrintMessage 2 (* ? I see nothing of the sort. *)
  426. DoneWithTurn
  427. END_COMMAND
  428.  
  429. COMMAND GET HERRING
  430. Present 220 (* cool pool is present *)
  431. PrintMessage 68 (* Sorry, but it is impossible *)
  432. DoneWithTurn
  433. END_COMMAND
  434.  
  435. COMMAND GET HERRING
  436. PrintMessage 2 (* ? I see nothing of the sort. *)
  437. DoneWithTurn
  438. END_COMMAND
  439.  
  440. COMMAND GET WATER
  441. IsCarrying 222 (* Player is already carrying cup of water *)
  442. PrintMessage 33 (* Your cup is now filled with water *)
  443. DoneWithTurn
  444. END_COMMAND
  445.  
  446. COMMAND GET WATER
  447. NOT IsCarrying 221 (* Player is NOT carrying cup *)
  448. PrintMessage 43 (* You don't have the needed resources *)
  449. DoneWithTurn
  450. END_COMMAND
  451.  
  452. COMMAND GET WATER
  453. NOT AtLocation 4 (* Player is NOT in End of meadow *)
  454. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  455. DoneWithTurn
  456. END_COMMAND
  457.  
  458. COMMAND GET WATER
  459. NOT Present 220 (* pool is NOT present *)
  460. PrintMessage 32 (* Youch!! The water is boiling hot!! *)
  461. DoneWithTurn
  462. END_COMMAND
  463.  
  464. COMMAND GET WATER
  465. SwapLocations 221 222 (* Swap cup for mug of water *)
  466. PrintMessage 33 (* The cup is now filled with water. *)
  467. DoneWithTurn
  468. END_COMMAND
  469.  
  470. COMMAND THROW AXE
  471. NOT NOUNPresent (* NOUN is present *)
  472. PrintMessage 2 (* What Axe? *)
  473. DoneWithTurn
  474. END_COMMAND
  475.  
  476. COMMAND THROW AXE
  477. NOUNPresent (* NOUN is present *)
  478. PrintMessage 77 (* The axe slips out of your hands *)
  479. DropNOUN (* Drop axe in room *)
  480. DoneWithTurn
  481. END_COMMAND
  482.  
  483. COMMAND THROW BEANS
  484. NOT Present 210 (* None of the beans are present *)
  485. NOT Present 211 (* None of the beans are present *)
  486. NOT Present 212 (* None of the beans are present *)
  487. PrintMessage 3 (* You don't have any *)
  488. DoneWithTurn
  489. END_COMMAND
  490.  
  491. COMMAND THROW BEANS
  492. NOT AtLocation 4 (* Player is NOT in End of meadow *)
  493. PutNOUNInCurrentRoom (* Move NOUN to Current Room *)
  494. PrintMessage 44 (* Done. *)
  495. DoneWithTurn
  496. END_COMMAND
  497.  
  498. COMMAND THROW BEANS
  499. AtLocation 4 (* End of Meadow *)
  500. NOT Present 220 (* Cool pool is not here, yet *)
  501. PrintMessage 31 (* The bean sinks slowly to the bottom. The bubbling reced *)
  502. PutInCurrentRoom 220 (* Move pool to current room *)
  503. DestroyNOUN (* Move NOUN to Room Zero *)
  504. Destroy 252 (* Hot Springs *)
  505. PlusScore 10 (* Reward player for move *)
  506. PrintMessage 76 (* You get some points for cleverness! *)
  507. DoneWithTurn
  508. END_COMMAND
  509.  
  510. COMMAND INSERT PLATE
  511. Present 208 (* contraption is present *)
  512. DestroyNOUN (* Move NOUN to Room Zero*)
  513. PrintMessage 44 (* Done. *)
  514. DoneWithTurn
  515. END_COMMAND
  516.  
  517. COMMAND INSERT PLATE
  518. PutNOUNInCurrentRoom (* Move NOUN to Current Room *)
  519. PrintMessage 44 (* Done. *)
  520. DoneWithTurn
  521. END_COMMAND
  522.  
  523. COMMAND INSERT REED
  524. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  525. PrintMessage 2 (* ? I see nothing of the sort. *)
  526. DoneWithTurn
  527. END_COMMAND
  528.  
  529. COMMAND INSERT REED
  530. Present 231 (* horn is present *)
  531. DestroyNOUN (* Move NOUN to Room Zero*)
  532. PrintMessage 44 (* Done. *)
  533. DoneWithTurn
  534. END_COMMAND
  535.  
  536. COMMAND INSERT REED
  537. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  538. DoneWithTurn
  539. END_COMMAND
  540.  
  541. COMMAND INSERT BANANA
  542. IsCarrying 213 (* Player is carrying green banana *)
  543. AtLocation 20 (* Player is in Staircase *)
  544. PrintMessage 69 (* The bananas in the holes cause secret staircase to appear *)
  545. Destroy 213 (* Move green banana to Room Zero*)
  546. PutInCurrentRoom 232 (* Secret staircase *)
  547. PlusScore 10 (* Reward player for move *)
  548. PrintMessage 76 (* You get some points for cleverness! *)
  549. DoneWithTurn
  550. END_COMMAND
  551.  
  552. COMMAND INSERT BANANA
  553. NOUNPresent (* NOUN is present *)
  554. PutNOUNInCurrentRoom (* Move NOUN to Current Room *)
  555. DoneWithTurn
  556. END_COMMAND
  557.  
  558. COMMAND INSERT BANANA
  559. PrintMessage 2 (* ? I see nothing of the sort. *)
  560. DoneWithTurn
  561. END_COMMAND
  562.  
  563. COMMAND SCREW OBJECT
  564. NOUNPresent (* NOUN is present *)
  565. AtLocation 15 (* Player is in Power room *)
  566. PrintMessage 44 (* Done. *)
  567. DestroyNOUN (* Move NOUN to Room Zero*)
  568. DoneWithTurn
  569. END_COMMAND
  570.  
  571. COMMAND SCREW OBJECT
  572. NOUNPresent (* NOUN is present *)
  573. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  574. DoneWithTurn
  575. END_COMMAND
  576.  
  577. COMMAND SCREW OBJECT
  578. PrintMessage 2 (* ? I see nothing of the sort. *)
  579. DoneWithTurn
  580. END_COMMAND
  581.  
  582. COMMAND PUT PLATE
  583. Present 208 (* contraption is present *)
  584. DestroyNOUN (* Move NOUN to Room Zero*)
  585. PrintMessage 44 (* Done. *)
  586. DoneWithTurn
  587. END_COMMAND
  588.  
  589. COMMAND PUT PLATE
  590. PutNOUNInCurrentRoom (* Move NOUN to Current Room *)
  591. PrintMessage 44 (* Done. *)
  592. DoneWithTurn
  593. END_COMMAND
  594.  
  595. COMMAND PUT BEANS
  596. NOT Present 210 (* None of the beans are present *)
  597. NOT Present 211 (* None of the beans are present *)
  598. NOT Present 212 (* None of the beans are present *)
  599. PrintMessage 3 (* You don't have any *)
  600. DoneWithTurn
  601. END_COMMAND
  602.  
  603. COMMAND PUT BEANS
  604. NOT AtLocation 4 (* Player is NOT in End of meadow *)
  605. PutNOUNInCurrentRoom (* Move NOUN to Current Room *)
  606. PrintMessage 44 (* Done. *)
  607. DoneWithTurn
  608. END_COMMAND
  609.  
  610. COMMAND PUT BEANS
  611. AtLocation 4 (* End of Meadow *)
  612. NOT Present 220 (* Cool pool is not here, yet *)
  613. PrintMessage 31 (* The bean sinks slowly to the bottom. The bubbling reced *)
  614. PutInCurrentRoom 220 (* Move pool to current room *)
  615. DestroyNOUN (* Move NOUN to Room Zero *)
  616. Destroy 252 (* Hot Springs *)
  617. PlusScore 10 (* Reward player for move *)
  618. PrintMessage 76 (* You get some points for cleverness! *)
  619. DoneWithTurn
  620. END_COMMAND
  621.  
  622. COMMAND PUT REED
  623. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  624. PrintMessage 2 (* ? I see nothing of the sort. *)
  625. DoneWithTurn
  626. END_COMMAND
  627.  
  628. COMMAND PUT REED
  629. Present 231 (* horn is present *)
  630. DestroyNOUN (* Move NOUN to Room Zero*)
  631. PrintMessage 44 (* Done. *)
  632. DoneWithTurn
  633. END_COMMAND
  634.  
  635. COMMAND PUT REED
  636. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  637. DoneWithTurn
  638. END_COMMAND
  639.  
  640. COMMAND PUT BANANA
  641. IsCarrying 213 (* Player is carrying green banana *)
  642. AtLocation 20 (* Player is in Staircase *)
  643. PrintMessage 69 (* The bananas in the holes cause secret staircase to appear *)
  644. Destroy 213 (* Move green banana to Room Zero*)
  645. PutInCurrentRoom 232 (* Secret staircase *)
  646. PlusScore 10 (* Reward player for move *)
  647. PrintMessage 76 (* You get some points for cleverness! *)
  648. DoneWithTurn
  649. END_COMMAND
  650.  
  651. COMMAND PUT BANANA
  652. NOUNPresent (* NOUN is present *)
  653. PutNOUNInCurrentRoom (* Move NOUN to Current Room *)
  654. DoneWithTurn
  655. END_COMMAND
  656.  
  657. COMMAND PUT BANANA
  658. PrintMessage 2 (* ? I see nothing of the sort. *)
  659. DoneWithTurn
  660. END_COMMAND
  661.  
  662. COMMAND PUT ANY
  663. PrintMessage 44 (* Done. *)
  664. AtLocation 4 (* Player is in End of meadow *)
  665. DestroyNOUN (* Move NOUN to Room Zero*)
  666. DoneWithTurn
  667. END_COMMAND
  668.  
  669. COMMAND PUT ANY
  670. PutNOUNInCurrentRoom (* Move NOUN to Current Room *)
  671. DoneWithTurn
  672. END_COMMAND
  673.  
  674. COMMAND PULL RING
  675. AtLocation 12 (* Player is in Dining room *)
  676. PrintMessage 79 (* Maybe you should twist it *)
  677. DoneWithTurn
  678. END_COMMAND
  679.  
  680. COMMAND PULL LEVER
  681. NOT Present 208 (* contraption is NOT present *)
  682. PrintMessage 2 (* ? I see nothing of the sort. *)
  683. DoneWithTurn
  684. END_COMMAND
  685.  
  686. COMMAND PULL LEVER
  687. PrintMessage 22 (* That started the machine humming. A few moments later i *)
  688. IsNoWhere 202 (* dusty plate is in room Zero -- NoWhere *)
  689. PutInCurrentRoom 203 (* Move polished plate to current room *)
  690. PlusScore 5 (* Reward player for this move *)
  691. PrintMessage 76 (* You get some points for cleverness! *)
  692. DoneWithTurn
  693. END_COMMAND
  694.  
  695. COMMAND PULL HANDLE
  696. NOT Present 208 (* contraption is NOT present *)
  697. PrintMessage 2 (* ? I see nothing of the sort. *)
  698. DoneWithTurn
  699. END_COMMAND
  700.  
  701. COMMAND PULL HANDLE
  702. PrintMessage 22 (* That started the machine humming. A few moments later i *)
  703. IsNoWhere 202 (* dusty plate is in room Zero -- NoWhere *)
  704. PutInCurrentRoom 203 (* Move polished plate to current room *)
  705. PlusScore 5 (* Reward player for this move *)
  706. PrintMessage 76 (* You get some points for cleverness! *)
  707. DoneWithTurn
  708. END_COMMAND
  709.  
  710. COMMAND PULL ANY
  711. PrintMessage 43 (* You don't have what is necessary in order to *)
  712. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  713. DoneWithTurn
  714. END_COMMAND
  715.  
  716. COMMAND READ PAPER
  717. QuitAllCMDS
  718. END_COMMAND
  719.  
  720. COMMAND READ PLAQUES
  721. PrintMessage 74 (* Written in Latin *)
  722. DoneWithTurn
  723. END_COMMAND
  724.  
  725. COMMAND READ SIGN
  726. AtLocation 4 (* End of Meadow *)
  727. PrintMessage 67 (* Danger - No swimming!. *)
  728. DoneWithTurn
  729. END_COMMAND
  730.  
  731. COMMAND READ SIGN
  732. NOT Present 208 (* contraption is NOT present *)
  733. PrintMessage 2 (* ? I see nothing of the sort. *)
  734. DoneWithTurn
  735. END_COMMAND
  736.  
  737. COMMAND READ SIGN
  738. PrintMessage 23 (* I'm sorry, it's written in Polish. *)
  739. DoneWithTurn
  740. END_COMMAND
  741.  
  742. COMMAND READ LABEL
  743. NOT AtLocation 6 (* Player is NOT in Statue room *)
  744. PrintMessage 2 (* ? I see nothing of the sort. *)
  745. DoneWithTurn
  746. END_COMMAND
  747.  
  748. COMMAND READ LABEL
  749. PrintMessage 37 (* ENTRY NOT RECOMMENDED -- BLACKWING *)
  750. DoneWithTurn
  751. END_COMMAND
  752.  
  753. COMMAND PLANT BEANS
  754. AtLocation 4 (* End of Meadow *)
  755. PrintMessage 31 (* The bean sinks slowly to the bottom. The bubbling reced *)
  756. PutInCurrentRoom 220 (* Move pool to current room *)
  757. DestroyNOUN (* Move NOUN to Room Zero*)
  758. PlusScore 10 (* Reward player for move *)
  759. PrintMessage 76 (* You get some points for cleverness! *)
  760. Destroy 252 (* Hot Springs *)
  761. DoneWithTurn
  762. END_COMMAND
  763.  
  764. COMMAND PLANT BEANS
  765. AtLocation 5 (* Player is in Greenhouse *)
  766. PrintMessage 30 (* A few seconds after planting the bean, a greenish plant *)
  767. PutInCurrentRoom 214 (* Move small beanstalk to current room *)
  768. DestroyNOUN (* Move NOUN to Room Zero*)
  769. PlusScore 10 (* Reward player for move *)
  770. PrintMessage 76 (* You get some points for cleverness! *)
  771. DoneWithTurn
  772. END_COMMAND
  773.  
  774. COMMAND PLANT ANY
  775. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  776. DoneWithTurn
  777. END_COMMAND
  778.  
  779. COMMAND FILL CUP
  780. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  781. PrintMessage 3 (* You don't have any *)
  782. DoneWithTurn
  783. END_COMMAND
  784.  
  785. COMMAND FILL CUP
  786. NOT AtLocation 4 (* Player is NOT in End of meadow *)
  787. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  788. DoneWithTurn
  789. END_COMMAND
  790.  
  791. COMMAND FILL CUP
  792. NOT Present 220 (* pool is NOT present *)
  793. PrintMessage 32 (* Youch!! The water is boiling hot!! *)
  794. DoneWithTurn
  795. END_COMMAND
  796.  
  797. COMMAND FILL CUP
  798. SwapLocations 221 222 (* Swap cup for mug of water *)
  799. PrintMessage 33 (* The cup is now filled with water. *)
  800. DoneWithTurn
  801. END_COMMAND
  802.  
  803. COMMAND WATER PLANT
  804. NOT IsCarrying 222 (* Player is NOT carrying mug of water *)
  805. PrintMessage 43 (* You don't have the needed resources. *)
  806. DoneWithTurn
  807. END_COMMAND
  808.  
  809. COMMAND WATER PLANT
  810. NOT Present 214 (* small beanstalk is NOT present *)
  811. PrintMessage 44 (* Done. *)
  812. SwapLocations 221  222 (* Swap locations of cup and mug of water *)
  813. DoneWithTurn
  814. END_COMMAND
  815.  
  816. COMMAND WATER PLANT
  817. SwapLocations 221  222 (* Swap locations of cup and mug of water *)
  818. PrintMessage 34 (* The plant shudders visibly, then grows *)
  819. SwapLocations 214  215 (* Swap locations of small and tall beanstalks *)
  820. DoneWithTurn
  821. END_COMMAND
  822.  
  823. COMMAND POUR WATER
  824. NOT IsCarrying 222 (* Player is NOT carrying mug of water *)
  825. PrintMessage 2 (* ? I see nothing of the sort. *)
  826. DoneWithTurn
  827. END_COMMAND
  828.  
  829. COMMAND POUR WATER
  830. NOT Present 214 (* small beanstalk is NOT present *)
  831. PrintMessage 44 (* Done. *)
  832. SwapLocations 221  222 (* Swap locations of cup and mug of water *)
  833. DoneWithTurn
  834. END_COMMAND
  835.  
  836. COMMAND POUR WATER
  837. SwapLocations 221  222 (* Swap locations of cup and mug of water *)
  838. PrintMessage 34 (* The plant shudders visibly, then grows *)
  839. SwapLocations 214  215 (* Swap locations of small and tall beanstalks *)
  840. DoneWithTurn
  841. END_COMMAND
  842.  
  843. COMMAND NORTH
  844. AtLocation 14 (* Player is in Living room *)
  845. Present 235 (* door is present *)
  846. GoToRoom 15 (* Move Player to Power room *)
  847. DoneWithTurn
  848. END_COMMAND
  849.  
  850. COMMAND NORTH
  851. AtLocation 14 (* Player is in Living room *)
  852. PrintMessage 57 (* You interrupted a conversation going on between the doo *)
  853. DoneWithTurn
  854. END_COMMAND
  855.  
  856. COMMAND NORTH
  857. AtLocation 10 (* Player is in Grand hallway *)
  858. NOT IsCarrying 224 (* Player is NOT carrying torch *)
  859. PrintMessage 47 (* You can't see a thing, so you return to the hallway. *)
  860. DoneWithTurn
  861. END_COMMAND
  862.  
  863. COMMAND NORTH
  864. AtLocation 18 (* Player is in Downstairs in elevator *)
  865. NOT IsNoWhere 225 (* threaded object is NOT in room Zero -- NoWhere *)
  866. PrintMessage 62 (* The torch is blown out by a powerful draft. You return  *)
  867. DoneWithTurn
  868. END_COMMAND
  869.  
  870. COMMAND NORTH
  871. AtLocation 13 (* Player is in Den *)
  872. Present 229 (* lions is present *)
  873. GoToRoom 16 (* Move Player to Behind den *)
  874. DoneWithTurn
  875. END_COMMAND
  876.  
  877. COMMAND NORTH
  878. AtLocation 13 (* Player is in Den *)
  879. PrintMessage 56 (* I don't recommend you do that. *)
  880. DoneWithTurn
  881. END_COMMAND
  882.  
  883. COMMAND NORTH
  884. AtLocation 12 (* Player is in Dining room *)
  885. NOT Present 236 (* twisted ring is NOT present *)
  886. PrintMessage 68 (* Sorry, but that is impossible just now. *)
  887. DoneWithTurn
  888. END_COMMAND
  889.  
  890. COMMAND NORTH
  891. AtLocation 12 (* Player is in Dining room *)
  892. Present 236 (* twisted ring is present *)
  893. GoToRoom 17 (* Move Player to Elevator *)
  894. DoneWithTurn
  895. END_COMMAND
  896.  
  897. COMMAND NORTH
  898. AtLocation 9 (* Player is in Front of Pit *)
  899. NOT Present 219 (* happy gorilla is NOT present *)
  900. NOT Present 218 (* stout gorilla is NOT present *)
  901. PrintMessage 35 (* A portly gorilla emerges from it's depths and bars your *)
  902. PrintMessage 36 (* "Comin' to see the old boy, eh?" the gorilla chuckles,  *)
  903. PutInCurrentRoom 218 (* Move gorilla to current room *)
  904. DoneWithTurn
  905. END_COMMAND
  906.  
  907. COMMAND NORTH
  908. Present 219 (* happy gorilla is present *)
  909. AtLocation 9 (* Player is in Front of Pit *)
  910. GoToRoom 10 (* Move Player to Grand hallway *)
  911. DoneWithTurn
  912. END_COMMAND
  913.  
  914. COMMAND EAST
  915. AtLocation 10 (* Player is in Grand hallway *)
  916. NOT IsCarrying 224 (* Player is NOT carrying torch *)
  917. PrintMessage 47 (* You can't see a thing, so you return to the hallway. *)
  918. DoneWithTurn
  919. END_COMMAND
  920.  
  921. COMMAND WEST
  922. AtLocation 10 (* Player is in Grand hallway *)
  923. NOT IsCarrying 224 (* Player is NOT carrying torch *)
  924. PrintMessage 47 (* You can't see a thing, so you return to the hallway. *)
  925. DoneWithTurn
  926. END_COMMAND
  927.  
  928. COMMAND UP
  929. AtLocation 5 (* Player is in Greenhouse *)
  930. Present 215 (* Beanstalk is present *)
  931. GoToRoom 23 (* Move Player to Over greenhouse *)
  932. DoneWithTurn
  933. END_COMMAND
  934.  
  935. COMMAND UP
  936. AtLocation 23 (* Player is in Over greenhouse *)
  937. GoToRoom 24 (* Move Player to Cloud *)
  938. DoneWithTurn
  939. END_COMMAND
  940.  
  941. COMMAND UP
  942. AtLocation 20 (* In staircase *)
  943. GoToRoom 19 (* Move Player to Cavern *)
  944. DoneWithTurn
  945. END_COMMAND
  946.  
  947. COMMAND DOWN
  948. AtLocation 19 (* In Carven *)
  949. Present 232 (* Secret staircase is present *)
  950. GoToRoom 20 (* Move Player to bottom of staircase *)
  951. DoneWithTurn
  952. END_COMMAND
  953.  
  954. COMMAND DOWN
  955. AtLocation 20 (* In Staircase *)
  956. Present 232 (* Secret staircase is present *)
  957. GoToRoom 21 (* Move Player to Safehold *)
  958. DoneWithTurn
  959. END_COMMAND
  960.  
  961. COMMAND DOWN
  962. AtLocation 9 (* Player is in Front of Pit *)
  963. NOT Present 219 (* happy gorilla is NOT present *)
  964. NOT Present 218 (* portly gorilla is NOT present *)
  965. PrintMessage 35 (* A portly gorilla emerges from it's depths and bars your *)
  966. PrintMessage 36 (* "Comin' to see the old boy, eh?" the gorilla chuckles,  *)
  967. PutInCurrentRoom 218 (* Move gorilla to current room *)
  968. DoneWithTurn
  969. END_COMMAND
  970.  
  971. COMMAND DOWN
  972. Present 219 (* happy gorilla is present *)
  973. AtLocation 9 (* Player is in Front of Pit *)
  974. GoToRoom 10 (* Move Player to Grand hallway *)
  975. DoneWithTurn
  976. END_COMMAND
  977.  
  978. COMMAND DOWN
  979. AtLocation 9 (* Player is in Front of Pit *)
  980. PrintMessage 68 (* Sorry, it is impossible. *)
  981. DoneWithTurn
  982. END_COMMAND
  983.  
  984. COMMAND GO PIT
  985. NOT AtLocation 9 (* Player is NOT in Front of Pit *)
  986. PrintMessage 2 (* ? I see nothing of the sort. *)
  987. DoneWithTurn
  988. END_COMMAND
  989.  
  990. COMMAND GO PIT
  991. NOT Present 219 (* happy gorilla is NOT present *)
  992. PrintMessage 35 (* A portly gorilla emerges from it's depths and bars your *)
  993. PrintMessage 36 (* "Comin' to see the old boy, eh?" the gorilla chuckles,  *)
  994. PutInCurrentRoom 218 (* Move gorilla to current room *)
  995. DoneWithTurn
  996. END_COMMAND
  997.  
  998. COMMAND GO PIT
  999. GoToRoom 10 (* Move Player to Grand hallway *)
  1000. DoneWithTurn
  1001. END_COMMAND
  1002.  
  1003. COMMAND GO DOOR
  1004. AtLocation 13 (* Player is in Den *)
  1005. Present 229 (* lions is present *)
  1006. GoToRoom 16 (* Move Player to Behind den *)
  1007. DoneWithTurn
  1008. END_COMMAND
  1009.  
  1010. COMMAND GO DOOR
  1011. AtLocation 13 (* Player is in Den *)
  1012. PrintMessage 56 (* I don't recommend you do that. *)
  1013. DoneWithTurn
  1014. END_COMMAND
  1015.  
  1016. COMMAND GO DOOR
  1017. AtLocation 14 (* Player is in Living room *)
  1018. Present 235 (* door is present *)
  1019. GoToRoom 15 (* Move Player to Power room *)
  1020. DoneWithTurn
  1021. END_COMMAND
  1022.  
  1023. COMMAND GO DOOR
  1024. AtLocation 14 (* Player is in Living room *)
  1025. PrintMessage 57 (* You interrupted a conversation going on between the doo *)
  1026. DoneWithTurn
  1027. END_COMMAND
  1028.  
  1029. COMMAND GO DOOR
  1030. AtLocation 12 (* Player is in Dining room *)
  1031. Present 236 (* twisted ring is present *)
  1032. GoToRoom 17 (* Move Player to Elevator *)
  1033. DoneWithTurn
  1034. END_COMMAND
  1035.  
  1036. COMMAND GO STAIRS
  1037. AtLocation 19 (* Cavern *)
  1038. Present 232 (* Secret staircase is present *)
  1039. GoToRoom 20 (* Move Player to bottom of stairs *)
  1040. DoneWithTurn
  1041. END_COMMAND
  1042.  
  1043. COMMAND DOWN
  1044. AtLocation 20 (* In Staircase *)
  1045. Present 232 (* Secret staircase is present *)
  1046. GoToRoom 21 (* Move Player to Safehold *)
  1047. DoneWithTurn
  1048. END_COMMAND
  1049.  
  1050. COMMAND GO STAIRS
  1051. PrintMessage 2 (* ? I see nothing of the sort. *)
  1052. DoneWithTurn
  1053. END_COMMAND
  1054.  
  1055. COMMAND GO ANY
  1056. AtLocation 10 (* Player is in Grand hallway *)
  1057. NOT IsCarrying 224 (* Player is NOT carrying torch *)
  1058. PrintMessage 47 (* You can't see a thing, so you return to the hallway. *)
  1059. DoneWithTurn
  1060. END_COMMAND
  1061.  
  1062. COMMAND GO ANY
  1063. AtLocation 18 (* Player is in Downstairs in elevator *)
  1064. NOT IsNoWhere 225 (* threaded object is NOT in room Zero -- NoWhere *)
  1065. PrintMessage 62 (* The torch is blown out by a powerful draft. You return  *)
  1066. DoneWithTurn
  1067. END_COMMAND
  1068.  
  1069. COMMAND GIVE SILVERWARE
  1070. NOT Present 204 (* dwarf is NOT present *)
  1071. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  1072. DoneWithTurn
  1073. END_COMMAND
  1074.  
  1075. COMMAND GIVE SILVERWARE
  1076. NOUNPresent (* NOUN is present *)
  1077. PrintMessage 18 (* Giving the silverware to the dwarf must have caught his *)
  1078. Destroy 204 (* Move dwarf to room Zero *)
  1079. PutInCurrentRoom 205 (* Move sharp axe to current room *)
  1080. DestroyNOUN (* Move NOUN to Room Zero*)
  1081. PlusScore 5 (* Reward player for this move *)
  1082. PrintMessage 76 (* You get some points for cleverness! *)
  1083. DoneWithTurn
  1084. END_COMMAND
  1085.  
  1086. COMMAND GIVE SILVERWARE
  1087. PrintMessage 2 (* ? I see nothing of the sort. *)
  1088. DoneWithTurn
  1089. END_COMMAND
  1090.  
  1091. COMMAND GIVE BANANA
  1092. NOT IsCarrying 217 (* Player is NOT carrying golden banana *)
  1093. NOT IsCarrying 213 (* Player is NOT carrying green banana *)
  1094. PrintMessage 3 (* You don't have any *)
  1095. DoneWithTurn
  1096. END_COMMAND
  1097.  
  1098. COMMAND GIVE ANY
  1099. InRoom 218 (* gorilla is in current Room *)
  1100. NOT Present 217 (* Golden Banana *)
  1101. PrintMessage 40 (* The gorilla looks at your offering disdainfully. *)
  1102. DoneWithTurn
  1103. END_COMMAND
  1104.  
  1105. COMMAND GIVE BANANA
  1106. InRoom 218 (* gorilla is in current Room *)
  1107. Present 217 (* Golden Banana *)
  1108. PrintMessage 39 (* The gorilla's nostrils open wide. "Umm...er...that'll d *)
  1109. SwapLocations 218  219 (* Swap locations of gorilla and happy gorilla *)
  1110. Destroy 217 (* Move golden banana to Room Zero*)
  1111. PlusScore 5 (* Reward player for move *)
  1112. PrintMessage 76 (* You get some points for cleverness! *)
  1113. DoneWithTurn
  1114. END_COMMAND
  1115.  
  1116. COMMAND GIVE BANANA
  1117. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  1118. DoneWithTurn
  1119. END_COMMAND
  1120.  
  1121. COMMAND GIVE ANY
  1122. PrintMessage 46 (* is not interested in your generous donation. *)
  1123. DoneWithTurn
  1124. END_COMMAND
  1125.  
  1126. COMMAND CLIMB BEANSTALK
  1127. AtLocation 5 (* Player is in Greenhouse *)
  1128. Present 215 (* Tall beanstalk is present *)
  1129. GoToRoom 23 (* Move Player to Over greenhouse *)
  1130. DoneWithTurn
  1131. END_COMMAND
  1132.  
  1133. COMMAND CLIMB BEANSTALK
  1134. AtLocation 5 (* Player is in Greenhouse *)
  1135. Present 214 (* Small beanstalk is present *)
  1136. PrintMessage 78 (* It is too small to climb *)
  1137. DoneWithTurn
  1138. END_COMMAND
  1139.  
  1140. COMMAND CLIMB BEANSTALK
  1141. AtLocation 23 (* Player is in Over greenhouse *)
  1142. GoToRoom 24 (* Move Player to Cloud *)
  1143. DoneWithTurn
  1144. END_COMMAND
  1145.  
  1146. COMMAND CLIMB BEANSTALK
  1147. PrintMessage 2 (* ? I see nothing of the sort. *)
  1148. DoneWithTurn
  1149. END_COMMAND
  1150.  
  1151. COMMAND CLIMB PLANT
  1152. AtLocation 5 (* Player is in Greenhouse *)
  1153. Present 215 (* Tall beanstalk is present *)
  1154. GoToRoom 23 (* Move Player to Over greenhouse *)
  1155. DoneWithTurn
  1156. END_COMMAND
  1157.  
  1158. COMMAND CLIMB PLANT
  1159. AtLocation 5 (* Player is in Greenhouse *)
  1160. Present 214 (* Small beanstalk is present *)
  1161. PrintMessage 78 (* It is too small to climb *)
  1162. DoneWithTurn
  1163. END_COMMAND
  1164.  
  1165. COMMAND CLIMB PLANT
  1166. AtLocation 23 (* Player is in Over greenhouse *)
  1167. GoToRoom 24 (* Move Player to Cloud *)
  1168. DoneWithTurn
  1169. END_COMMAND
  1170.  
  1171. COMMAND CLIMB BANANA
  1172. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  1173. DoneWithTurn
  1174. END_COMMAND
  1175.  
  1176. COMMAND CLIMB STAIRS
  1177. NOUNPresent (* NOUN is present *)
  1178. GoToRoom 20 (* Move Player to bottom of stairs *)
  1179. DoneWithTurn
  1180. END_COMMAND
  1181.  
  1182. COMMAND CLIMB STAIRS
  1183. AtLocation 20 (* In staircase *)
  1184. GoToRoom 19 (* Move Player to Cavern *)
  1185. DoneWithTurn
  1186. END_COMMAND
  1187.  
  1188. COMMAND CLIMB STAIRS
  1189. PrintMessage 2 (* ? I see nothing of the sort. *)
  1190. DoneWithTurn
  1191. END_COMMAND
  1192.  
  1193. COMMAND CLIMB ANY
  1194. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  1195. DoneWithTurn
  1196. END_COMMAND
  1197.  
  1198. COMMAND ROLL LEAF
  1199. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  1200. PrintMessage 2 (* ? I see nothing of the sort. *)
  1201. DoneWithTurn
  1202. END_COMMAND
  1203.  
  1204. COMMAND ROLL LEAF
  1205. PrintMessage 50 (* You now have a tough green stick in your hands. *)
  1206. SwapLocations 216 223 (* Swap rolled-up leaf for stick *)
  1207. PlusScore 5 (* Reward player for this move *)
  1208. PrintMessage 76 (* You get some points for cleverness! *)
  1209. DoneWithTurn
  1210. END_COMMAND
  1211.  
  1212. COMMAND LIGHT LEAF
  1213. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  1214. PrintMessage 2 (* ? I see nothing of the sort. *)
  1215. DoneWithTurn
  1216. END_COMMAND
  1217.  
  1218. COMMAND LIGHT LEAF
  1219. NOT AtLocation 10 (* Player is NOT in Grand hallway *)
  1220. PrintMessage 43 (* You don't have what is necessary in order to *)
  1221. DoneWithTurn
  1222. END_COMMAND
  1223.  
  1224. COMMAND LIGHT LEAF
  1225. PrintMessage 48 (* You try putting the leaf in the flame, but it's too big *)
  1226. DoneWithTurn
  1227. END_COMMAND
  1228.  
  1229. COMMAND LIGHT STICK
  1230. NOT NOUNIsCarrying (* Player is NOT carrying NOUN *)
  1231. PrintMessage 2 (* ? I see nothing of the sort. *)
  1232. DoneWithTurn
  1233. END_COMMAND
  1234.  
  1235. COMMAND LIGHT STICK
  1236. NOT AtLocation 10 (* Player is NOT in Grand hallway *)
  1237. PrintMessage 43 (* You don't have what is necessary in order to *)
  1238. DoneWithTurn
  1239. END_COMMAND
  1240.  
  1241. COMMAND LIGHT STICK
  1242. PrintMessage 49 (* It catches flame and starts burning steadily. *)
  1243. SwapLocations 223 224 (* Swap stick and torch *)
  1244. PlusScore 5 (* Reward player for this move *)
  1245. PrintMessage 76 (* You get some points for cleverness! *)
  1246. DoneWithTurn
  1247. END_COMMAND
  1248.  
  1249. COMMAND DROP BIRD
  1250. NOT NOUNPresent (* NOUN is NOT present *)
  1251. PrintMessage 2 (* ? I see nothing of the sort. *)
  1252. DoneWithTurn
  1253. END_COMMAND
  1254.  
  1255. COMMAND DROP BIRD
  1256. PrintMessage 53 (* With a deafening SKRAKIT, the bird spreads its wings an *)
  1257. DestroyNOUN (* Move NOUN to Room Zero *)
  1258. AtLocation 19 (* Player is in Large cavern *)
  1259. Present 233 (* giant is present *)
  1260. PrintMessage 64 (* The eyes of the giant open wide. Then, upon catching si *)
  1261. Destroy 233 (* Move giant to room Zero *)
  1262. PutInCurrentRoom 232 (* Move stairs to current room *)
  1263. PlusScore 10 (* Reward player for this move *)
  1264. PrintMessage 76 (* You get some points for cleverness! *)
  1265. DoneWithTurn
  1266. END_COMMAND
  1267.  
  1268. COMMAND MAKE WHIP
  1269. NOT Present 227 (* Long handle *)
  1270. NOT Present 228 (* String *)
  1271. PrintMessage 43 (* You don't have the necessary resources. *)
  1272. DoneWithTurn
  1273. END_COMMAND
  1274.  
  1275. COMMAND MAKE WHIP
  1276. PrintMessage 54 (* Several strips of the leather are now firmly attached t *)
  1277. Destroy 228 (* Move string to Room Zero*)
  1278. Destroy 227 (* Move long handle to room Zero *)
  1279. GetIt 234  (* Move whip to Player *)
  1280. PlusScore 5 (* Reward player for this move *)
  1281. PrintMessage 76 (* You get some points for cleverness! *)
  1282. DoneWithTurn
  1283. END_COMMAND
  1284.  
  1285. COMMAND TIE STRING
  1286. NOT NOUNPresent (* NOUN is NOT present *)
  1287. PrintMessage 2 (* ? I see nothing of the sort. *)
  1288. DoneWithTurn
  1289. END_COMMAND
  1290.  
  1291. COMMAND TIE STRING
  1292. NOT Present 227 (* long handle is NOT present *)
  1293. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  1294. DoneWithTurn
  1295. END_COMMAND
  1296.  
  1297. COMMAND TIE STRING
  1298. PrintMessage 54 (* Several strips of the leather are now firmly attached t *)
  1299. Destroy 228 (* Move string to Room Zero*)
  1300. Destroy 227 (* Move long handle to room Zero *)
  1301. GetIt 234  (* Move whip to Player *)
  1302. PlusScore 5 (* Reward player for this move *)
  1303. PrintMessage 76 (* You get some points for cleverness! *)
  1304. DoneWithTurn
  1305. END_COMMAND
  1306.  
  1307. COMMAND ATTACK LIONS
  1308. Present 234 (* whip is present *)
  1309. PrintMessage 55 (* They back off in fright, leaving you clear passage to t *)
  1310. PutInCurrentRoom 229 (* Move lions to current room *)
  1311. PlusScore 5 (* Reward player for this move *)
  1312. PrintMessage 76 (* You get some points for cleverness! *)
  1313. DoneWithTurn
  1314. END_COMMAND
  1315.  
  1316. COMMAND ATTACK LIONS
  1317. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  1318. DoneWithTurn
  1319. END_COMMAND
  1320.  
  1321. COMMAND ATTACK GIANT
  1322. NOUNPresent (* NOUN is present *)
  1323. PrintMessage 63 (* I wouldn't go within ten feet of those socks if I were  *)
  1324. DoneWithTurn
  1325. END_COMMAND
  1326.  
  1327. COMMAND ATTACK GIANT
  1328. PrintMessage 2 (* ? I see nothing of the sort. *)
  1329. DoneWithTurn
  1330. END_COMMAND
  1331.  
  1332. COMMAND TAME LIONS
  1333. Present 234 (* whip is present *)
  1334. PrintMessage 55 (* They back off in fright, leaving you clear passage to t *)
  1335. PutInCurrentRoom 229 (* Move lions to current room *)
  1336. PlusScore 5 (* Reward player for this move *)
  1337. PrintMessage 76 (* You get some points for cleverness! *)
  1338. DoneWithTurn
  1339. END_COMMAND
  1340.  
  1341. COMMAND TAME LIONS
  1342. PrintMessage 17 (* isn't exactly what I'd call a brilliant strategy *)
  1343. DoneWithTurn
  1344. END_COMMAND
  1345.  
  1346. COMMAND TAME GIANT
  1347. NOUNPresent (* NOUN is present *)
  1348. PrintMessage 63 (* I wouldn't go within ten feet of those socks if I were  *)
  1349. DoneWithTurn
  1350. END_COMMAND
  1351.  
  1352. COMMAND TAME GIANT
  1353. PrintMessage 2 (* ? I see nothing of the sort. *)
  1354. DoneWithTurn
  1355. END_COMMAND
  1356.  
  1357. COMMAND BLOW HORN
  1358. NOT IsNoWhere 230 (* reed is NOT in room Zero -- NoWhere *)
  1359. PrintMessage 16 (* Nothing happens. *)
  1360. DoneWithTurn
  1361. END_COMMAND
  1362.  
  1363. COMMAND BLOW HORN
  1364. AtLocation 14 (* Player is in Living room *)
  1365. PrintMessage 59 (* The door's black mood is suddenly replaced by a cheerfu *)
  1366. PutInCurrentRoom 235 (* Move door to current room *)
  1367. PlusScore 10 (* Reward player for this move *)
  1368. PrintMessage 76 (* You get some points for cleverness! *)
  1369. DoneWithTurn
  1370. END_COMMAND
  1371.  
  1372. COMMAND BLOW HORN
  1373. AtLocation 13 (* Player is Den of Lions *)
  1374. PrintMessage 73 (* Dinner music! *)
  1375. KillPlayer
  1376. EndGame
  1377. DoneWithTurn
  1378. END_COMMAND
  1379.  
  1380. COMMAND BLOW HORN
  1381. PrintMessage 16 (* Nothing happens. *)
  1382. DoneWithTurn
  1383. END_COMMAND
  1384.  
  1385. COMMAND PLAY MUSIC
  1386. NOT IsNoWhere 230 (* reed is NOT in room Zero -- NoWhere *)
  1387. PrintMessage 16 (* Nothing happens. *)
  1388. DoneWithTurn
  1389. END_COMMAND
  1390.  
  1391. COMMAND PLAY MUSIC
  1392. AtLocation 14 (* Player is in Living room *)
  1393. PrintMessage 59 (* The door's black mood is suddenly replaced by a cheerfu *)
  1394. PutInCurrentRoom 235 (* Move door to current room *)
  1395. PlusScore 10 (* Reward player for this move *)
  1396. PrintMessage 76 (* You get some points for cleverness! *)
  1397. DoneWithTurn
  1398. END_COMMAND
  1399.  
  1400. COMMAND PLAY MUSIC
  1401. AtLocation 13 (* Player is Den of Lions *)
  1402. PrintMessage 73 (* Dinner music! *)
  1403. KillPlayer
  1404. EndGame
  1405. DoneWithTurn
  1406. END_COMMAND
  1407.  
  1408. COMMAND PLAY MUSIC
  1409. PrintMessage 16 (* Nothing happens. *)
  1410. DoneWithTurn
  1411. END_COMMAND
  1412.  
  1413. COMMAND PLAY HORN
  1414. ReDirectTo BLOW HORN
  1415. END_COMMAND
  1416.  
  1417. COMMAND PUSH BUTTON
  1418. AtLocation 17 (* Player is in Elevator *)
  1419. GoToRoom 18 (* Move Player to Downstairs in elevator *)
  1420. DoneWithTurn
  1421. END_COMMAND
  1422.  
  1423. COMMAND PUSH BUTTON
  1424. AtLocation 18 (* Player is in Downstairs in elevator *)
  1425. GoToRoom 17 (* Move Player to Elevator *)
  1426. DoneWithTurn
  1427. END_COMMAND
  1428.  
  1429. COMMAND PUSH BUTTON
  1430. PrintMessage 2 (* ? I see nothing of the sort. *)
  1431. DoneWithTurn
  1432. END_COMMAND
  1433.  
  1434. COMMAND TWIST RING
  1435. AtLocation 12 (* Player is in Dining room *)
  1436. NOT FlagON 3 (* Flag # 3 is NOT ON *)
  1437. PrintMessage 60 (* A section of the wall slides smoothly open. There is no *)
  1438. PutInCurrentRoom 236 (* Move twisted ring to current room *)
  1439. TurnFlagON 3 (* Turn Flag # 3 ON *)
  1440. DoneWithTurn
  1441. END_COMMAND
  1442.  
  1443. COMMAND TWIST RING
  1444. FlagON 3 (* Flag # 3 is ON *)
  1445. PrintMessage 66 (* It already IS twisted. *)
  1446. DoneWithTurn
  1447. END_COMMAND
  1448.  
  1449. COMMAND TWIST RING
  1450. PrintMessage 2 (* ? I see nothing of the sort. *)
  1451. DoneWithTurn
  1452. END_COMMAND
  1453.  
  1454. COMMAND WAKE BIRD
  1455. NOT NOUNPresent (* NOUN is NOT present *)
  1456. PrintMessage 2 (* ? I see nothing of the sort. *)
  1457. DoneWithTurn
  1458. END_COMMAND
  1459.  
  1460. COMMAND WAKE BIRD
  1461. PrintMessage 53 (* With a deafening SKRAKIT, the bird spreads its wings an *)
  1462. DestroyNOUN (* Move NOUN to Room Zero*)
  1463. AtLocation 19 (* Player is in Large cavern *)
  1464. Present 233 (* giant is present *)
  1465. PrintMessage 64 (* The eyes of the giant open wide. Then, upon catching si *)
  1466. Destroy 233 (* Move giant to room Zero *)
  1467. PutInCurrentRoom 232 (* Move stairs to current room *)
  1468. PlusScore 10 (* Reward player for this move *)
  1469. PrintMessage 76 (* You get some points for cleverness! *)
  1470. DoneWithTurn
  1471. END_COMMAND
  1472.  
  1473. COMMAND WAKE GIANT
  1474. NOUNPresent (* NOUN is present *)
  1475. PrintMessage 63 (* I wouldn't go within ten feet of those socks if I were  *)
  1476. DoneWithTurn
  1477. END_COMMAND
  1478.  
  1479. COMMAND WAKE GIANT
  1480. PrintMessage 2 (* ? I see nothing of the sort. *)
  1481. DoneWithTurn
  1482. END_COMMAND
  1483.  
  1484. COMMAND SWIM ANY
  1485. NOT AtLocation 4 (* End of Meadow *)
  1486. PrintMessage 68 (* Sorry, but that is impossible now. *)
  1487. DoneWithTurn
  1488. END_COMMAND
  1489.  
  1490. COMMAND SWIM ANY
  1491. Present 252 (* Hot Springs *)
  1492. PrintMessage 70 (* Didn't you read the Sign? *)
  1493. PrintMessage 32 (* Water is boiling hot! *)
  1494. KillPlayer
  1495. EndGame
  1496. DoneWithTurn
  1497. END_COMMAND
  1498.  
  1499. COMMAND SWIM ANY
  1500. PrintMessage 70 (* Didn't you read the Sign? *)
  1501. PrintMessage 71 (* Herring is really a piranha! *)
  1502. KillPlayer
  1503. EndGame
  1504. DoneWithTurn
  1505. END_COMMAND
  1506.  
  1507. COMMAND JUMP ANY
  1508. AtLocation 9 (* Front of Pit *)
  1509. OR
  1510. AtLocation 19 (* Cavern *)
  1511. OR
  1512. AtLocation 23 (* Above Greenhouset *)
  1513. OR
  1514. AtLocation 24 (* Cloud *)
  1515. PrintMessage 72 (* Splatt!! *)
  1516. KillPlayer
  1517. EndGame
  1518. DoneWithTurn
  1519. END_COMMAND
  1520.  
  1521. COMMAND JUMP ANY
  1522. PrintMessage 16 (* Nothing happens *)
  1523. DoneWithTurn
  1524. END_COMMAND
  1525.  
  1526.