home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / games / vmsnet / monhl104 / part04 < prev    next >
Encoding:
Internet Message Format  |  1992-08-02  |  41.4 KB
  1. Path: uunet!mcsun!news.funet.fi!hydra!klaava!hurtta
  2. From: Kari.Hurtta@Helsinki.FI (Kari E. Hurtta)
  3. Newsgroups: vmsnet.sources.games
  4. Subject: Monster Helsinki V 1.04 - part 04/32
  5. Keywords: Monster, a multiplayer adventure game
  6. Message-ID: <1992Jun13.214810.2197@klaava.Helsinki.FI>
  7. Date: 13 Jun 92 21:48:10 GMT
  8. Sender: hurtta@klaava.Helsinki.FI (Kari Hurtta)
  9. Followup-To: vmsnet.sources.d
  10. Organization: University of Helsinki
  11. Lines: 2132
  12.  
  13. Archieve-name: monster_helsinki_104/part04
  14. Author: Kari.Hurtta@Helsinki.FI
  15. Product: Monster Helsinki V 1.04
  16. Environment: VMS, Pascal
  17. Part: 04/32
  18.  
  19. -+-+-+-+-+-+-+-+ START OF PART 4 -+-+-+-+-+-+-+-+
  20. XSTART*BLOCK!
  21. XBLOCK%# comes out to the yard, still sweaping the swet from his
  22. XBLOCK%face.
  23. XNULL*BLOCK!
  24. XOBJREQ%%%NULL%%
  25. XALIAS%
  26. XREQVERB%F
  27. XREQALIAS%F
  28. XAUTOLOOK%T
  29. XEXITFROM%yard2
  30. XSLOT%2
  31. XTO%yard4
  32. XKIND%1
  33. XTOSLOT%1
  34. XNULL*DESCLINE!
  35. XDEFAULT*BLOCK!
  36. XSTART*BLOCK!
  37. XBLOCK%You open that dirty wooden door, which open quite easily.
  38. XBLOCK%You don't like the room, which seems to be on the other side of door,
  39. XBLOCK%but you don't want to make a fool of yourself, so you step into`032
  40. XBLOCK%that little room and close door behind you.
  41. XBLOCK%
  42. XSTART*BLOCK!
  43. XBLOCK%# is trying to find new adventures behind
  44. XBLOCK%that dirty wooden door to the south.
  45. XDESCLINE%# came from the direction of dirty wooden door.
  46. XNULL*BLOCK!
  47. XOBJREQ%%%NULL%%
  48. XALIAS%
  49. XREQVERB%F
  50. XREQALIAS%F
  51. XAUTOLOOK%T
  52. XEXITFROM%yard2
  53. XSLOT%3
  54. XTO%yard3
  55. XKIND%1
  56. XTOSLOT%4
  57. XNULL*DESCLINE!
  58. XDEFAULT*BLOCK!
  59. XNULL*BLOCK!
  60. XDESCLINE%# went to the east.
  61. XDESCLINE%# arrived.
  62. XNULL*BLOCK!
  63. XOBJREQ%%%NULL%%
  64. XALIAS%
  65. XREQVERB%F
  66. XREQALIAS%F
  67. XAUTOLOOK%T
  68. XEXITFROM%yard2
  69. XSLOT%4
  70. XTO%yard1
  71. XKIND%1
  72. XTOSLOT%3
  73. XNULL*DESCLINE!
  74. XDEFAULT*BLOCK!
  75. XNULL*BLOCK!
  76. XDESCLINE%# went to the west.
  77. XDESCLINE%# arrived.
  78. XNULL*BLOCK!
  79. XOBJREQ%%%NULL%%
  80. XALIAS%
  81. XREQVERB%F
  82. XREQALIAS%F
  83. XAUTOLOOK%T
  84. XEXITFROM%yard2
  85. XSLOT%5
  86. XTO%%%NULL%%
  87. XKIND%0
  88. XTOSLOT%0
  89. XDEFAULT*DESCLINE!
  90. XDEFAULT*BLOCK!
  91. XNULL*BLOCK!
  92. XDEFAULT*BLOCK!
  93. XDEFAULT*BLOCK!
  94. XNULL*BLOCK!
  95. XOBJREQ%%%NULL%%
  96. XALIAS%
  97. XREQVERB%F
  98. XREQALIAS%F
  99. XAUTOLOOK%T
  100. XEXITFROM%yard2
  101. XSLOT%6
  102. XTO%home
  103. XKIND%1
  104. XTOSLOT%5
  105. XDESCLINE%There are ladders leading down nearby the tree.
  106. XDEFAULT*BLOCK!
  107. XNULL*BLOCK!
  108. XDEFAULT*BLOCK!
  109. XDEFAULT*BLOCK!
  110. XNULL*BLOCK!
  111. XOBJREQ%%%NULL%%
  112. XALIAS%
  113. XREQVERB%F
  114. XREQALIAS%F
  115. XAUTOLOOK%T
  116. XOBJDROP%%%NULL%%
  117. XGRPLOC1%yard1
  118. XGRPLOC2%yard3
  119. XMONSTERKIND%2
  120. XSTART*MDL!
  121. XSHORTMEGA%1:0:0:0:! For Old Monk
  122. XSHORTMEGA%-2:0:0:0:36
  123. XSHORTMEGA%3:0:0:0:_player name
  124. XSHORTMEGA%-4:3:0:0:65
  125. XSHORTMEGA%-5:2:4:0:12
  126. XSHORTMEGA%-6:5:0:0:37
  127. XSHORTMEGA%7:0:0:0:"You better hope that you won't need my help in your futur
  128. Ve."
  129. XSHORTMEGA%-8:7:0:0:15
  130. XSHORTMEGA%9:0:0:0:_monster name
  131. XSHORTMEGA%10:0:0:0:"20"
  132. XSHORTMEGA%-11:9:10:0:68
  133. XSHORTMEGA%-12:6:8:11:24
  134. XSHORTMEGA%H6:1:12:attack
  135. XSHORTMEGA%14:13:0:0:-
  136. XSHORTMEGA%15:0:0:0:" whispers something to an old monk."
  137. XSHORTMEGA%-16:3:15:0:1
  138. XSHORTMEGA%-17:16:0:0:17
  139. XSTART*MEGA!
  140. XMEGA%18:0:0:0:"Monk is very pleasied that there are still adventures, who b
  141. XMEGA%elieves in gods."
  142. XSHORTMEGA%-19:18:0:0:15
  143. XSHORTMEGA%-20:17:19:0:24
  144. XSHORTMEGA%H6:1:20:TEKSTIT
  145. XSHORTMEGA%22:21:0:0:-
  146. XSHORTMEGA%23:0:0:0:"Demon"
  147. XSHORTMEGA%24:0:0:0:_p1
  148. XSHORTMEGA%-25:24:4:0:45
  149. XSHORTMEGA%-26:23:25:0:47
  150. XSHORTMEGA%27:0:0:0:"brand of succubus"
  151. XSHORTMEGA%-28:27:0:0:53
  152. XSHORTMEGA%29:0:0:0:"You notice as your brand disappears."
  153. XSHORTMEGA%-30:29:0:0:15
  154. XSHORTMEGA%-31:26:28:30:24
  155. XSHORTMEGA%H6:1:31:POISTA
  156. XSHORTMEGA%33:32:0:0:-
  157. XSHORTMEGA%J21:0
  158. XSHORTMEGA%-35:0:0:0:4
  159. XSHORTMEGA%-36:35:27:0:11
  160. XSHORTMEGA%-37:23:0:0:46
  161. XSHORTMEGA%J32:1:37
  162. XSHORTMEGA%-39:36:38:0:22
  163. XSHORTMEGA%-40:34:39:0:24
  164. XSHORTMEGA%H6:1:40:AUTA
  165. XSHORTMEGA%42:41:0:0:-
  166. XSHORTMEGA%-43:2:4:0:11
  167. XSHORTMEGA%-44:43:0:0:27
  168. XSHORTMEGA%45:0:0:0:"confess"
  169. XSHORTMEGA%-46:24:45:0:69
  170. XSHORTMEGA%J41:0
  171. XSHORTMEGA%48:0:0:0:"pray"
  172. XSHORTMEGA%-49:24:48:0:69
  173. XSHORTMEGA%-50:49:47:0:22
  174. XSHORTMEGA%-51:46:47:50:22
  175. XSHORTMEGA%-52:44:51:0:22
  176. XSHORTMEGA%H6:1:52:TARKISTA
  177. XSHORTMEGA%54:53:0:0:-
  178. XSHORTMEGA%55:0:0:0:"list"
  179. XSHORTMEGA%-56:24:55:0:2
  180. XSHORTMEGA%-57:37:0:0:15
  181. XSHORTMEGA%-58:56:57:0:22
  182. XSHORTMEGA%H6:1:58:ISANTA
  183. XSHORTMEGA%60:59:0:0:-
  184. XSHORTMEGA%61:0:0:0:_command
  185. XSHORTMEGA%-62:61:0:0:29
  186. XSHORTMEGA%J53:1:62
  187. XSHORTMEGA%H6:1:63:command
  188. XSHORTMEGA%65:64:0:0:-
  189. XSHORTMEGA%66:0:0:0:!LABEL say(null(GOSUB TARKISTA(strip(speech)),
  190. XSTART*MEGA!
  191. XMEGA%67:0:0:0:!               if(and(get remote state("R2D2"), player name)
  192. XMEGA%,
  193. XSTART*MEGA!
  194. XMEGA%68:0:0:0:!                                      GOSUB ISANTA(strip(spe
  195. XMEGA%ech))
  196. XSHORTMEGA%69:0:0:0:!         )    )  )            `032
  197. XSHORTMEGA%70:0:0:0:_speech
  198. XSHORTMEGA%-71:70:0:0:29
  199. XSHORTMEGA%J53:1:71
  200. XSHORTMEGA%73:0:0:0:"wizard, manager"
  201. XSHORTMEGA%-74:3:73:0:61
  202. XSHORTMEGA%J59:1:71
  203. XSHORTMEGA%-76:74:75:0:22
  204. XSHORTMEGA%-77:72:76:0:24
  205. XSHORTMEGA%H6:1:77:say
  206. XSHORTMEGA%79:78:0:0:-
  207. XRUNNABLE%T
  208. XPRIV%F
  209. XOWNER%#
  210. XCTIME% 7-SEP-1989  2:14am
  211. XSTATLAB%enter
  212. XRCOUNT%1
  213. XECOUNT%1
  214. XLASTRUN%10-JUN-1992  9:38pm
  215. XSTATLAB%look
  216. XRCOUNT%1
  217. XECOUNT%1
  218. XLASTRUN%10-JUN-1992  9:38pm
  219. XSTATLAB%leave
  220. XRCOUNT%2
  221. XECOUNT%2
  222. XLASTRUN%10-JUN-1992  9:39pm
  223. XAUTHOR%hurtta
  224. XWTIME% 4-JUN-1992 10:02pm
  225. XNULL*MEGA!
  226. XFLAGS%0
  227. XNAME%Old Monk
  228. XHIDING%0
  229. XWEAR%%%NULL%%
  230. XWIELD%%%NULL%%
  231. XROOM2%kitchen stairs
  232. XEXITFROM%kitchen stairs
  233. XSLOT%1
  234. XTO%%%NULL%%
  235. XKIND%0
  236. XTOSLOT%0
  237. XDEFAULT*DESCLINE!
  238. XDEFAULT*BLOCK!
  239. XNULL*BLOCK!
  240. XDEFAULT*BLOCK!
  241. XDEFAULT*BLOCK!
  242. XNULL*BLOCK!
  243. XOBJREQ%%%NULL%%
  244. XALIAS%
  245. XREQVERB%F
  246. XREQALIAS%F
  247. XAUTOLOOK%T
  248. XEXITFROM%kitchen stairs
  249. XSLOT%2
  250. XTO%%%NULL%%
  251. XKIND%0
  252. XTOSLOT%0
  253. XDEFAULT*DESCLINE!
  254. XDEFAULT*BLOCK!
  255. XNULL*BLOCK!
  256. XDEFAULT*BLOCK!
  257. XDEFAULT*BLOCK!
  258. XNULL*BLOCK!
  259. XOBJREQ%%%NULL%%
  260. XALIAS%
  261. XREQVERB%F
  262. XREQALIAS%F
  263. XAUTOLOOK%T
  264. XEXITFROM%kitchen stairs
  265. XSLOT%3
  266. XTO%%%NULL%%
  267. XKIND%0
  268. XTOSLOT%0
  269. XDEFAULT*DESCLINE!
  270. XDEFAULT*BLOCK!
  271. XNULL*BLOCK!
  272. XDEFAULT*BLOCK!
  273. XDEFAULT*BLOCK!
  274. XNULL*BLOCK!
  275. XOBJREQ%%%NULL%%
  276. XALIAS%
  277. XREQVERB%F
  278. XREQALIAS%F
  279. XAUTOLOOK%T
  280. XEXITFROM%kitchen stairs
  281. XSLOT%4
  282. XTO%%%NULL%%
  283. XKIND%0
  284. XTOSLOT%3
  285. XDEFAULT*DESCLINE!
  286. XDEFAULT*BLOCK!
  287. XNULL*BLOCK!
  288. XDEFAULT*BLOCK!
  289. XDEFAULT*BLOCK!
  290. XNULL*BLOCK!
  291. XOBJREQ%%%NULL%%
  292. XALIAS%
  293. XREQVERB%F
  294. XREQALIAS%F
  295. XAUTOLOOK%T
  296. XEXITFROM%kitchen stairs
  297. XSLOT%5
  298. XTO%great hall
  299. XKIND%1
  300. XTOSLOT%3
  301. XNULL*DESCLINE!
  302. XDEFAULT*BLOCK!
  303. XNULL*BLOCK!
  304. XDEFAULT*BLOCK!
  305. XDEFAULT*BLOCK!
  306. XNULL*BLOCK!
  307. XOBJREQ%%%NULL%%
  308. XALIAS%
  309. XREQVERB%F
  310. XREQALIAS%F
  311. XAUTOLOOK%T
  312. XEXITFROM%kitchen stairs
  313. XSLOT%6
  314. XTO%kitchen
  315. XKIND%1
  316. XTOSLOT%4
  317. XNULL*DESCLINE!
  318. XDEFAULT*BLOCK!
  319. XNULL*BLOCK!
  320. XDEFAULT*BLOCK!
  321. XDEFAULT*BLOCK!
  322. XNULL*BLOCK!
  323. XOBJREQ%%%NULL%%
  324. XALIAS%
  325. XREQVERB%F
  326. XREQALIAS%F
  327. XAUTOLOOK%T
  328. XOBJDROP%kitchen
  329. XGRPLOC1%%%NULL%%
  330. XGRPLOC2%%%NULL%%
  331. XROOM2%kitchen
  332. XEXITFROM%kitchen
  333. XSLOT%1
  334. XTO%%%NULL%%
  335. XKIND%0
  336. XTOSLOT%0
  337. XDEFAULT*DESCLINE!
  338. XDEFAULT*BLOCK!
  339. XNULL*BLOCK!
  340. XDEFAULT*BLOCK!
  341. XDEFAULT*BLOCK!
  342. XNULL*BLOCK!
  343. XOBJREQ%%%NULL%%
  344. XALIAS%
  345. XREQVERB%F
  346. XREQALIAS%F
  347. XAUTOLOOK%T
  348. XEXITFROM%kitchen
  349. XSLOT%2
  350. XTO%%%NULL%%
  351. XKIND%0
  352. XTOSLOT%6
  353. XDEFAULT*DESCLINE!
  354. XDEFAULT*BLOCK!
  355. XNULL*BLOCK!
  356. XDEFAULT*BLOCK!
  357. XDEFAULT*BLOCK!
  358. XNULL*BLOCK!
  359. XOBJREQ%%%NULL%%
  360. XALIAS%
  361. XREQVERB%F
  362. XREQALIAS%F
  363. XAUTOLOOK%T
  364. XEXITFROM%kitchen
  365. XSLOT%3
  366. XTO%%%NULL%%
  367. XKIND%0
  368. XTOSLOT%6
  369. XDEFAULT*DESCLINE!
  370. XDEFAULT*BLOCK!
  371. XNULL*BLOCK!
  372. XDEFAULT*BLOCK!
  373. XDEFAULT*BLOCK!
  374. XNULL*BLOCK!
  375. XOBJREQ%%%NULL%%
  376. XALIAS%
  377. XREQVERB%F
  378. XREQALIAS%F
  379. XAUTOLOOK%T
  380. XEXITFROM%kitchen
  381. XSLOT%4
  382. XTO%kitchen stairs
  383. XKIND%1
  384. XTOSLOT%6
  385. XNULL*DESCLINE!
  386. XDEFAULT*BLOCK!
  387. XNULL*BLOCK!
  388. XDEFAULT*BLOCK!
  389. XDEFAULT*BLOCK!
  390. XNULL*BLOCK!
  391. XOBJREQ%%%NULL%%
  392. XALIAS%
  393. XREQVERB%F
  394. XREQALIAS%F
  395. XAUTOLOOK%T
  396. XEXITFROM%kitchen
  397. XSLOT%5
  398. XTO%%%NULL%%
  399. XKIND%0
  400. XTOSLOT%0
  401. XDEFAULT*DESCLINE!
  402. XDEFAULT*BLOCK!
  403. XNULL*BLOCK!
  404. XDEFAULT*BLOCK!
  405. XDEFAULT*BLOCK!
  406. XNULL*BLOCK!
  407. XOBJREQ%%%NULL%%
  408. XALIAS%
  409. XREQVERB%F
  410. XREQALIAS%F
  411. XAUTOLOOK%T
  412. XEXITFROM%kitchen
  413. XSLOT%6
  414. XTO%well
  415. XKIND%1
  416. XTOSLOT%5
  417. XNULL*DESCLINE!
  418. XDEFAULT*BLOCK!
  419. XNULL*BLOCK!
  420. XDEFAULT*BLOCK!
  421. XDEFAULT*BLOCK!
  422. XNULL*BLOCK!
  423. XOBJREQ%%%NULL%%
  424. XALIAS%
  425. XREQVERB%F
  426. XREQALIAS%F
  427. XAUTOLOOK%T
  428. XOBJDROP%%%NULL%%
  429. XGRPLOC1%%%NULL%%
  430. XGRPLOC2%%%NULL%%
  431. XMONSTERKIND%2
  432. XSTART*MDL!
  433. XSHORTMEGA%1:0:0:0:! DOG.MDL by Kari Hurtta
  434. XSHORTMEGA%-2:0:0:0:36
  435. XSHORTMEGA%-3:2:0:0:55
  436. XSHORTMEGA%H6:1:3:state tail
  437. XSHORTMEGA%5:4:0:0:-
  438. XSHORTMEGA%-6:2:0:0:54
  439. XSHORTMEGA%H6:1:6:state head
  440. XSHORTMEGA%8:7:0:0:-
  441. XSHORTMEGA%9:0:0:0:_player name
  442. XSHORTMEGA%J4:0
  443. XSHORTMEGA%-11:9:10:0:2
  444. XSHORTMEGA%12:0:0:0:"follow"
  445. XSHORTMEGA%J7:0
  446. XSHORTMEGA%-14:12:13:0:2
  447. XSHORTMEGA%J131:1:10
  448. XSHORTMEGA%16:0:0:0:"keep"
  449. XSHORTMEGA%-17:16:13:0:2
  450. XSHORTMEGA%J139:1:10
  451. XSHORTMEGA%-19:17:18:0:22
  452. XSHORTMEGA%-20:14:15:19:22
  453. XSHORTMEGA%-21:11:20:0:22
  454. XSHORTMEGA%H6:1:21:leave
  455. XSHORTMEGA%23:22:0:0:-
  456. XSHORTMEGA%24:0:0:0:"wizard, manager"
  457. XSHORTMEGA%-25:9:24:0:61
  458. XSHORTMEGA%26:0:0:0:_speech
  459. XSHORTMEGA%-27:26:0:0:29
  460. XSHORTMEGA%J39:1:27
  461. XSHORTMEGA%-29:25:28:0:22
  462. XSHORTMEGA%H6:1:29:say
  463. XSHORTMEGA%31:30:0:0:-
  464. XSHORTMEGA%32:0:0:0:_p1
  465. XSHORTMEGA%-33:32:0:0:54
  466. XSHORTMEGA%34:0:0:0:"dog"
  467. XSHORTMEGA%-35:33:34:0:2
  468. XSHORTMEGA%-36:32:0:0:55
  469. XSHORTMEGA%J42:1:36
  470. XSHORTMEGA%-38:35:37:0:22
  471. XSHORTMEGA%H6:1:38:check
  472. XSHORTMEGA%40:39:0:0:-
  473. XSHORTMEGA%J53:2:33:36
  474. XSHORTMEGA%H6:1:41:check2
  475. XSHORTMEGA%43:42:0:0:-
  476. XSHORTMEGA%44:0:0:0:"bite"
  477. XSHORTMEGA%-45:32:44:0:2
  478. XSHORTMEGA%46:0:0:0:_p2
  479. XSHORTMEGA%J79:1:46
  480. XSHORTMEGA%-48:32:12:0:2
  481. XSHORTMEGA%J191:1:46
  482. XSHORTMEGA%J64:2:32:46
  483. XSHORTMEGA%-51:48:49:50:22
  484. XSHORTMEGA%-52:45:47:51:22
  485. XSHORTMEGA%H6:1:52:case
  486. XSHORTMEGA%54:53:0:0:-
  487. XSHORTMEGA%55:0:0:0:"go"
  488. XSHORTMEGA%-56:32:55:0:2
  489. XSHORTMEGA%J212:1:46
  490. XSHORTMEGA%58:0:0:0:"home"
  491. XSHORTMEGA%-59:32:58:0:2
  492. XSHORTMEGA%J176:0
  493. XSHORTMEGA%J73:2:32:46
  494. XSHORTMEGA%-62:59:60:61:22
  495. XSHORTMEGA%-63:56:57:62:22
  496. XSHORTMEGA%H6:1:63:case2
  497. XSHORTMEGA%65:64:0:0:-
  498. XSHORTMEGA%66:0:0:0:"stay"
  499. XSHORTMEGA%-67:32:66:0:2
  500. XSHORTMEGA%J238:1:46
  501. XSHORTMEGA%-69:32:16:0:2
  502. XSHORTMEGA%J197:1:46
  503. XSHORTMEGA%-71:69:70:0:22
  504. XSHORTMEGA%-72:67:68:71:22
  505. XSHORTMEGA%H6:1:72:case3
  506. XSHORTMEGA%74:73:0:0:-
  507. XSHORTMEGA%-75:32:0:0:59
  508. XSHORTMEGA%76:0:0:0:"0"
  509. XSHORTMEGA%H1:2:76:75:attack
  510. XSHORTMEGA%-78:75:77:0:22
  511. XSHORTMEGA%H6:1:78:bite
  512. XSHORTMEGA%80:79:0:0:-
  513. XSHORTMEGA%81:0:0:0:"7"
  514. XSHORTMEGA%J111:1:81
  515. XSHORTMEGA%H6:1:82:attack
  516. XSHORTMEGA%84:83:0:0:-
  517. XSHORTMEGA%-85:9:0:0:23
  518. XSHORTMEGA%86:0:0:0:_monster name
  519. XSHORTMEGA%-87:86:0:0:23
  520. XSHORTMEGA%-88:85:87:0:2
  521. XSHORTMEGA%-89:32:0:0:25
  522. XSHORTMEGA%90:0:0:0:"Dog bites you."
  523. XSHORTMEGA%-91:90:0:0:15
  524. XSHORTMEGA%92:0:0:0:"Dog bites "
  525. XSHORTMEGA%-93:92:9:0:1
  526. XSHORTMEGA%-94:93:0:0:17
  527. XSHORTMEGA%95:0:0:0:"void"
  528. XSHORTMEGA%-96:85:95:0:2
  529. XSHORTMEGA%97:0:0:0:"Dog eats "
  530. XSHORTMEGA%-98:97:9:0:1
  531. XSHORTMEGA%-99:98:0:0:17
  532. XSHORTMEGA%-100:10:0:0:23
  533. XSHORTMEGA%J233:1:100
  534. XSHORTMEGA%-102:99:101:0:24
  535. XSHORTMEGA%-103:96:102:0:22
  536. XSHORTMEGA%-104:91:94:103:24
  537. XSHORTMEGA%-105:89:104:101:22
  538. XSHORTMEGA%J233:1:85
  539. XSHORTMEGA%107:0:0:0:"5"
  540. XSHORTMEGA%H1:2:107:9:attack
  541. XSHORTMEGA%-109:106:108:0:24
  542. XSHORTMEGA%-110:88:105:109:22
  543. XSHORTMEGA%H6:1:110:bite it
  544. XSHORTMEGA%112:111:0:0:-
  545. XSHORTMEGA%113:0:0:0:_target
  546. XSHORTMEGA%114:0:0:0:"Dog follows you."
  547. XSHORTMEGA%-115:114:0:0:15
  548. XSHORTMEGA%116:0:0:0:"Dog follows "
  549. XSHORTMEGA%-117:116:32:0:1
  550. XSHORTMEGA%-118:117:0:0:17
  551. XSHORTMEGA%-119:113:0:0:13
  552. XSHORTMEGA%120:0:0:0:"Dog comes to here."
  553. XSHORTMEGA%-121:120:0:0:16
  554. XSHORTMEGA%-122:119:121:0:22
  555. XSHORTMEGA%-123:115:118:122:24
  556. XSHORTMEGA%124:0:0:0:"a, b"
  557. XSHORTMEGA%-125:124:0:0:28
  558. XSHORTMEGA%126:0:0:0:"a"
  559. XSHORTMEGA%-127:125:126:0:2
  560. XSHORTMEGA%J173:0
  561. XSHORTMEGA%-129:127:128:0:22
  562. XSHORTMEGA%-130:113:123:129:22
  563. XSHORTMEGA%H6:1:130:follow
  564. XSHORTMEGA%132:131:0:0:-
  565. XSHORTMEGA%133:0:0:0:"back "
  566. XSHORTMEGA%-134:133:85:0:1
  567. XSHORTMEGA%-135:134:0:0:37
  568. XSHORTMEGA%J233:1:113
  569. XSHORTMEGA%-137:135:136:0:24
  570. XSHORTMEGA%-138:113:137:0:22
  571. XSHORTMEGA%H6:1:138:keep it
  572. XSHORTMEGA%140:139:0:0:-
  573. XSHORTMEGA%141:0:0:0:"back"
  574. XSHORTMEGA%-142:13:141:0:2
  575. XSHORTMEGA%J167:1:10
  576. XSHORTMEGA%144:0:0:0:"keep "
  577. XSHORTMEGA%-145:144:9:0:1
  578. XSHORTMEGA%-146:145:0:0:37
  579. XSHORTMEGA%-147:143:146:0:24
  580. XSHORTMEGA%-148:142:147:0:22
  581. XSHORTMEGA%H6:1:148:enter
  582. XSHORTMEGA%150:149:0:0:-
  583. XSHORTMEGA%-151:32:85:0:2
  584. XSHORTMEGA%152:0:0:0:""
  585. XSHORTMEGA%153:0:0:0:"Dog forces you back to "
  586. XSHORTMEGA%-154:153:32:0:15
  587. XSHORTMEGA%155:0:0:0:"Dog forces "
  588. XSHORTMEGA%-156:155:9:0:1
  589. XSHORTMEGA%157:0:0:0:" back to "
  590. XSHORTMEGA%-158:156:157:46:17
  591. XSHORTMEGA%J233:1:32
  592. XSHORTMEGA%-160:32:0:0:14
  593. XSHORTMEGA%161:0:0:0:" back to here."
  594. XSHORTMEGA%-162:155:9:161:17
  595. XSHORTMEGA%-163:160:162:0:22
  596. XSHORTMEGA%-164:159:163:0:24
  597. XSHORTMEGA%-165:154:158:164:24
  598. XSHORTMEGA%-166:151:152:165:22
  599. XSHORTMEGA%H6:1:166:get back2
  600. XSHORTMEGA%168:167:0:0:-
  601. XSHORTMEGA%169:0:0:0:"kitchen"
  602. XSHORTMEGA%J233:1:169
  603. XSHORTMEGA%-171:152:0:0:37
  604. XSHORTMEGA%-172:170:171:0:24
  605. XSHORTMEGA%H6:1:172:home2
  606. XSHORTMEGA%174:173:0:0:-
  607. XSHORTMEGA%J173:1:171
  608. XSHORTMEGA%H6:1:175:home
  609. XSHORTMEGA%177:176:0:0:-
  610. XSHORTMEGA%-178:12:75:0:1
  611. XSHORTMEGA%-179:178:0:0:37
  612. XSHORTMEGA%180:0:0:0:"Dog: vuf !"
  613. XSHORTMEGA%-181:180:0:0:16
  614. XSHORTMEGA%-182:75:0:0:23
  615. XSHORTMEGA%J233:1:182
  616. XSHORTMEGA%-184:179:181:183:24
  617. XSHORTMEGA%-185:32:0:0:27
  618. XSHORTMEGA%-186:12:9:0:1
  619. XSHORTMEGA%-187:186:0:0:37
  620. XSHORTMEGA%-188:187:181:0:24
  621. XSHORTMEGA%-189:185:188:0:22
  622. XSHORTMEGA%-190:75:184:189:22
  623. XSHORTMEGA%H6:1:190:set
  624. XSHORTMEGA%192:191:0:0:-
  625. XSHORTMEGA%-193:16:75:0:1
  626. XSHORTMEGA%-194:193:0:0:37
  627. XSHORTMEGA%-195:194:181:183:24
  628. XSHORTMEGA%-196:75:195:0:22
  629. XSHORTMEGA%H6:1:196:keep
  630. XSHORTMEGA%198:197:0:0:-
  631. XSHORTMEGA%199:0:0:0:_command
  632. XSHORTMEGA%200:0:0:0:"state"
  633. XSHORTMEGA%-201:199:200:0:2
  634. XSHORTMEGA%202:0:0:0:"State: "
  635. XSHORTMEGA%-203:202:2:0:15
  636. XSHORTMEGA%204:0:0:0:"You can't"
  637. XSHORTMEGA%205:0:0:0:"Dog."
  638. XSHORTMEGA%-206:204:199:205:15
  639. XSHORTMEGA%-207:201:203:206:22
  640. XSHORTMEGA%H6:1:207:command
  641. XSHORTMEGA%209:208:0:0:-
  642. XSHORTMEGA%-210:32:0:0:60
  643. XSHORTMEGA%J216:1:210
  644. XSHORTMEGA%H6:1:211:go to
  645. XSHORTMEGA%213:212:0:0:-
  646. XSHORTMEGA%-214:159:171:0:24
  647. XSHORTMEGA%-215:32:214:0:22
  648. XSHORTMEGA%H6:1:215:go2
  649. XSHORTMEGA%217:216:0:0:-
  650. XSHORTMEGA%-218:87:32:0:2
  651. XSHORTMEGA%219:0:0:0:"Dog goes "
  652. XSHORTMEGA%-220:219:32:0:1
  653. XSHORTMEGA%-221:220:0:0:16
  654. XSHORTMEGA%-222:32:0:0:13
  655. XSHORTMEGA%223:0:0:0:"Dog comes here."
  656. XSHORTMEGA%-224:223:0:0:16
  657. XSHORTMEGA%-225:222:224:0:22
  658. XSHORTMEGA%-226:221:225:0:24
  659. XSHORTMEGA%-227:218:152:226:22
  660. XSHORTMEGA%H6:1:227:jump2
  661. XSHORTMEGA%229:228:0:0:-
  662. XSHORTMEGA%J228:1:32
  663. XSHORTMEGA%J228:1:169
  664. XSHORTMEGA%-232:32:230:231:22
  665. XSHORTMEGA%H6:1:232:jump
  666. XSHORTMEGA%234:233:0:0:-
  667. XSHORTMEGA%235:0:0:0:"Dog: Vuf !"
  668. XSHORTMEGA%-236:235:0:0:16
  669. XSHORTMEGA%-237:171:236:0:24
  670. XSHORTMEGA%H6:1:237:stay
  671. XSHORTMEGA%239:238:0:0:-
  672. XSHORTMEGA%-240:13:16:0:2
  673. XSHORTMEGA%241:0:0:0:"a, b, c, d"
  674. XSHORTMEGA%-242:241:0:0:28
  675. XSHORTMEGA%-243:242:126:0:2
  676. XSHORTMEGA%J191:0
  677. XSHORTMEGA%-245:243:244:0:22
  678. XSHORTMEGA%-246:240:152:245:22
  679. XSHORTMEGA%H6:1:246:look you
  680. XSHORTMEGA%248:247:0:0:-
  681. XSHORTMEGA%H6:0:look
  682. XSHORTMEGA%250:249:0:0:-
  683. XRUNNABLE%T
  684. XPRIV%F
  685. XOWNER%#
  686. XCTIME%24-AUG-1989 12:52pm
  687. XSTATLAB%enter
  688. XRCOUNT%3
  689. XECOUNT%0
  690. XLASTRUN%13-JUN-1992  4:46pm
  691. XSTATLAB%look
  692. XRCOUNT%3
  693. XECOUNT%0
  694. XLASTRUN%13-JUN-1992  4:46pm
  695. XSTATLAB%leave
  696. XRCOUNT%4
  697. XECOUNT%0
  698. XLASTRUN%13-JUN-1992  4:47pm
  699. XAUTHOR%hurtta
  700. XWTIME% 4-JUN-1992  9:25pm
  701. XNULL*MEGA!
  702. XFLAGS%0
  703. XNAME%Dog
  704. XHIDING%0
  705. XWEAR%%%NULL%%
  706. XWIELD%%%NULL%%
  707. XROOM2%office
  708. XEXITFROM%office
  709. XSLOT%1
  710. XTO%%%NULL%%
  711. XKIND%0
  712. XTOSLOT%0
  713. XDEFAULT*DESCLINE!
  714. XDEFAULT*BLOCK!
  715. XNULL*BLOCK!
  716. XDEFAULT*BLOCK!
  717. XDEFAULT*BLOCK!
  718. XNULL*BLOCK!
  719. XOBJREQ%%%NULL%%
  720. XALIAS%
  721. XREQVERB%F
  722. XREQALIAS%F
  723. XAUTOLOOK%T
  724. XEXITFROM%office
  725. XSLOT%2
  726. XTO%%%NULL%%
  727. XKIND%0
  728. XTOSLOT%1
  729. XDEFAULT*DESCLINE!
  730. XDEFAULT*BLOCK!
  731. XNULL*BLOCK!
  732. XDEFAULT*BLOCK!
  733. XDEFAULT*BLOCK!
  734. XNULL*BLOCK!
  735. XOBJREQ%excalibur
  736. XALIAS%
  737. XREQVERB%F
  738. XREQALIAS%F
  739. XAUTOLOOK%T
  740. XEXITFROM%office
  741. XSLOT%3
  742. XTO%%%NULL%%
  743. XKIND%0
  744. XTOSLOT%0
  745. XDEFAULT*DESCLINE!
  746. XDEFAULT*BLOCK!
  747. XNULL*BLOCK!
  748. XDEFAULT*BLOCK!
  749. XDEFAULT*BLOCK!
  750. XNULL*BLOCK!
  751. XOBJREQ%%%NULL%%
  752. XALIAS%
  753. XREQVERB%F
  754. XREQALIAS%F
  755. XAUTOLOOK%T
  756. XEXITFROM%office
  757. XSLOT%4
  758. XTO%%%NULL%%
  759. XKIND%0
  760. XTOSLOT%0
  761. XDEFAULT*DESCLINE!
  762. XDEFAULT*BLOCK!
  763. XNULL*BLOCK!
  764. XDEFAULT*BLOCK!
  765. XDEFAULT*BLOCK!
  766. XNULL*BLOCK!
  767. XOBJREQ%%%NULL%%
  768. XALIAS%
  769. XREQVERB%F
  770. XREQALIAS%F
  771. XAUTOLOOK%T
  772. XEXITFROM%office
  773. XSLOT%5
  774. XTO%%%NULL%%
  775. XKIND%0
  776. XTOSLOT%4
  777. XDEFAULT*DESCLINE!
  778. XDEFAULT*BLOCK!
  779. XNULL*BLOCK!
  780. XDEFAULT*BLOCK!
  781. XDEFAULT*BLOCK!
  782. XNULL*BLOCK!
  783. XOBJREQ%%%NULL%%
  784. XALIAS%
  785. XREQVERB%F
  786. XREQALIAS%F
  787. XAUTOLOOK%T
  788. XEXITFROM%office
  789. XSLOT%6
  790. XTO%%%NULL%%
  791. XKIND%0
  792. XTOSLOT%0
  793. XDEFAULT*DESCLINE!
  794. XDEFAULT*BLOCK!
  795. XNULL*BLOCK!
  796. XDEFAULT*BLOCK!
  797. XDEFAULT*BLOCK!
  798. XNULL*BLOCK!
  799. XOBJREQ%%%NULL%%
  800. XALIAS%
  801. XREQVERB%F
  802. XREQALIAS%F
  803. XAUTOLOOK%T
  804. XOBJDROP%%%NULL%%
  805. XGRPLOC1%great hall
  806. XGRPLOC2%control center
  807. XMONSTERKIND%2
  808. XSTART*MDL!
  809. XSHORTMEGA%    1:    0:    0:    0:"Dragon says, Graah!"
  810. XSHORTMEGA%    2:    1:    0:    0:pprint
  811. XSHORTMEGA%    3:    0:    0:    0:"Dragon greeds"
  812. XSHORTMEGA%    4:    0:    0:    0:_player name
  813. XSHORTMEGA%    5:    3:    4:    0:+
  814. XSHORTMEGA%    6:    5:    0:    0:oprint
  815. XSHORTMEGA%    7:    2:    6:    0:null
  816. XSHORTMEGA%    8:    7:    0:    0:LABEL greed
  817. XSHORTMEGA%    9:    8:    0:    0:-
  818. XSHORTMEGA%   10:    0:    0:    0:GOSUB check
  819. XSHORTMEGA%   11:   10:    0:    0:null
  820. XSHORTMEGA%   12:   11:    0:    0:LABEL enter
  821. XSHORTMEGA%   13:   12:    0:    0:-
  822. XSHORTMEGA%   14:    0:    0:    0:_player name
  823. XSHORTMEGA%   15:    0:    0:    0:"Goodgulf"
  824. XSHORTMEGA%   16:   14:   15:    0:=
  825. XSHORTMEGA%   17:    0:    0:    0:GOSUB follow me
  826. XSHORTMEGA%   18:   16:   17:    0:if
  827. XSHORTMEGA%   19:   18:    0:    0:null
  828. XSHORTMEGA%   20:   19:    0:    0:LABEL leave
  829. XSHORTMEGA%   21:   20:    0:    0:-
  830. XSHORTMEGA%   22:    0:    0:    0:_player name
  831. XSHORTMEGA%   23:    0:    0:    0:"R2D2"
  832. XSHORTMEGA%   24:   23:    0:    0:get remote state
  833. XSHORTMEGA%   25:   22:   24:    0:and
  834. XSHORTMEGA%   26:    0:    0:    0:"Dragon greed you."
  835. XSHORTMEGA%   27:   26:    0:    0:pprint
  836. XSHORTMEGA%   28:    0:    0:    0:GOSUB pissoff
  837. XSHORTMEGA%   29:   25:   27:   28:if
  838. XSHORTMEGA%   30:   29:    0:    0:null
  839. XSHORTMEGA%   31:   30:    0:    0:LABEL look you
  840. XSHORTMEGA%   32:   31:    0:    0:-
  841. XSHORTMEGA%   33:    0:    0:    0:"HIT!"
  842. XSHORTMEGA%   34:   33:    0:    0:pprint
  843. XSHORTMEGA%   35:   34:    0:    0:null
  844. XSHORTMEGA%   36:   35:    0:    0:LABEL attack
  845. XSHORTMEGA%   37:   36:    0:    0:-
  846. XSHORTMEGA%   38:    0:    0:    0:_player name
  847. XSHORTMEGA%   39:    0:    0:    0:"Goodgulf"
  848. XSHORTMEGA%   40:   38:   39:    0:=
  849. XSHORTMEGA%   41:    0:    0:    0:"Yes master?"
  850. XSHORTMEGA%   42:   41:    0:    0:pprint
  851. XSHORTMEGA%   43:    0:    0:    0:"Dragon says, Graah?"
  852. XSHORTMEGA%   44:   43:    0:    0:pprint
  853. XSHORTMEGA%   45:   40:   42:   44:if
  854. XSHORTMEGA%   46:   45:    0:    0:null
  855. XSHORTMEGA%   47:   46:    0:    0:LABEL say
  856. XSHORTMEGA%   48:   47:    0:    0:-
  857. XSHORTMEGA%   49:    0:    0:    0:null
  858. XSHORTMEGA%   50:   49:    0:    0:LABEL look
  859. XSHORTMEGA%   51:   50:    0:    0:-
  860. XSHORTMEGA%   52:    0:    0:    0:null
  861. XSHORTMEGA%   53:   52:    0:    0:LABEL command
  862. XSHORTMEGA%   54:   53:    0:    0:-
  863. XSHORTMEGA%   55:    0:    0:    0:"Dragon"
  864. XSHORTMEGA%   56:   55:    0:    0:where
  865. XSHORTMEGA%   57:    0:    0:    0:"office"
  866. XSHORTMEGA%   58:   56:   57:    0:=
  867. XSHORTMEGA%   59:    0:    0:    0:players
  868. XSHORTMEGA%   60:    0:    0:    0:"Goodgulf"
  869. XSHORTMEGA%   61:   59:   60:    0:and
  870. XSHORTMEGA%   62:    0:    0:    0:GOSUB greed
  871. XSHORTMEGA%   63:    0:    0:    0:GOSUB pissoff
  872. XSHORTMEGA%   64:   61:   62:   63:if
  873. XSHORTMEGA%   65:   58:   64:    0:if
  874. XSHORTMEGA%   66:   65:    0:    0:null
  875. XSHORTMEGA%   67:   66:    0:    0:LABEL check
  876. XSHORTMEGA%   68:   67:    0:    0:-
  877. XSHORTMEGA%   69:    0:    0:    0:"Dragon gazes at"
  878. XSHORTMEGA%   70:    0:    0:    0:_player name
  879. XSHORTMEGA%   71:   69:   70:    0:+
  880. XSHORTMEGA%   72:   71:    0:    0:oprint
  881. XSHORTMEGA%   73:    0:    0:    0:"Dragon gazes at you! You pass out..."
  882. XSHORTMEGA%   74:   73:    0:    0:pprint
  883. XSHORTMEGA%   75:    0:    0:    0:"Great Hall"
  884. XSHORTMEGA%   76:   75:    0:    0:pmove
  885. XSHORTMEGA%   77:   72:   74:   76:null
  886. XSHORTMEGA%   78:   77:    0:    0:LABEL pissoff
  887. XSHORTMEGA%   79:   78:    0:    0:-
  888. XSHORTMEGA%   80:    0:    0:    0:"Dragon flies away..."
  889. XSHORTMEGA%   81:   80:    0:    0:print
  890. XSHORTMEGA%   82:    0:    0:    0:_target
  891. XSHORTMEGA%   83:   82:    0:    0:move
  892. XSHORTMEGA%   84:    0:    0:    0:"Dragon flies into room."
  893. XSHORTMEGA%   85:   84:    0:    0:print
  894. XSHORTMEGA%   86:   81:   83:   85:null
  895. XSHORTMEGA%   87:   86:    0:    0:LABEL follow
  896. XSHORTMEGA%   88:   87:    0:    0:-
  897. XSHORTMEGA%   89:    0:    0:    0:"Dragon flies away..."
  898. XSHORTMEGA%   90:   89:    0:    0:print
  899. XSHORTMEGA%   91:    0:    0:    0:_target
  900. XSHORTMEGA%   92:   91:    0:    0:move
  901. XSHORTMEGA%   93:    0:    0:    0:"Dragon flies into room"
  902. XSHORTMEGA%   94:   93:    0:    0:print
  903. XSHORTMEGA%   95:   90:   92:   94:null
  904. XSHORTMEGA%   96:   95:    0:    0:LABEL follow me
  905. XSHORTMEGA%   97:   96:    0:    0:-
  906. XSHORTMEGA%   98:    0:    0:    0:_player name
  907. XSHORTMEGA%   99:   98:    0:    0:where
  908. XSHORTMEGA%  100:   99:    0:    0:move
  909. XSHORTMEGA%  101:    0:    0:    0:_player name
  910. XSHORTMEGA%  102:    0:    0:    0:"Goodgulf"
  911. XSHORTMEGA%  103:  101:  102:    0:=
  912. XSHORTMEGA%  104:    0:    0:    0:null
  913. XSHORTMEGA%  105:    0:    0:    0:GOSUB attack
  914. XSHORTMEGA%  106:  103:  104:  105:if
  915. XSHORTMEGA%  107:  100:  106:    0:null
  916. XSHORTMEGA%  108:  107:    0:    0:LABEL here
  917. XSHORTMEGA%  109:  108:    0:    0:-
  918. XRUNNABLE%F
  919. XPRIV%T
  920. XOWNER%#
  921. XCTIME% 8-AUG-1989  3:08pm
  922. XSTATLAB%say
  923. XRCOUNT%10
  924. XECOUNT%0
  925. XLASTRUN%22-SEP-1990 12:19am
  926. XSTATLAB%leave
  927. XRCOUNT%61
  928. XECOUNT%0
  929. XLASTRUN% 6-JUN-1992 12:05pm
  930. XSTATLAB%enter
  931. XRCOUNT%70
  932. XECOUNT%0
  933. XLASTRUN%13-JUN-1992  4:47pm
  934. XSTATLAB%look you
  935. XRCOUNT%5
  936. XECOUNT%0
  937. XLASTRUN%22-MAY-1992 11:26am
  938. XSTATLAB%look
  939. XRCOUNT%80
  940. XECOUNT%0
  941. XLASTRUN%13-JUN-1992  4:47pm
  942. XAUTHOR%okkola
  943. XWTIME%31-AUG-1989  7:55pm
  944. XNULL*MEGA!
  945. XFLAGS%0
  946. XNAME%Dragon
  947. XHIDING%0
  948. XHOLD%copper ring
  949. XHOLD%silver ring
  950. XHOLD%excalibur
  951. XHOLD%grey robe
  952. XHOLD%gold ring
  953. XHOLD%ruby
  954. XWEAR%%%NULL%%
  955. XWIELD%%%NULL%%
  956. XROOM2%well
  957. XEXITFROM%well
  958. XSLOT%1
  959. XTO%%%NULL%%
  960. XKIND%0
  961. XTOSLOT%0
  962. XDEFAULT*DESCLINE!
  963. XDEFAULT*BLOCK!
  964. XNULL*BLOCK!
  965. XDEFAULT*BLOCK!
  966. XDEFAULT*BLOCK!
  967. XNULL*BLOCK!
  968. XOBJREQ%%%NULL%%
  969. XALIAS%
  970. XREQVERB%F
  971. XREQALIAS%F
  972. XAUTOLOOK%T
  973. XEXITFROM%well
  974. XSLOT%2
  975. XTO%%%NULL%%
  976. XKIND%0
  977. XTOSLOT%0
  978. XDEFAULT*DESCLINE!
  979. XDEFAULT*BLOCK!
  980. XNULL*BLOCK!
  981. XDEFAULT*BLOCK!
  982. XDEFAULT*BLOCK!
  983. XNULL*BLOCK!
  984. XOBJREQ%%%NULL%%
  985. XALIAS%
  986. XREQVERB%F
  987. XREQALIAS%F
  988. XAUTOLOOK%T
  989. XEXITFROM%well
  990. XSLOT%3
  991. XTO%%%NULL%%
  992. XKIND%0
  993. XTOSLOT%0
  994. XDEFAULT*DESCLINE!
  995. XDEFAULT*BLOCK!
  996. XNULL*BLOCK!
  997. XDEFAULT*BLOCK!
  998. XDEFAULT*BLOCK!
  999. XNULL*BLOCK!
  1000. XOBJREQ%%%NULL%%
  1001. XALIAS%
  1002. XREQVERB%F
  1003. XREQALIAS%F
  1004. XAUTOLOOK%T
  1005. XEXITFROM%well
  1006. XSLOT%4
  1007. XTO%%%NULL%%
  1008. XKIND%0
  1009. XTOSLOT%0
  1010. XDEFAULT*DESCLINE!
  1011. XDEFAULT*BLOCK!
  1012. XNULL*BLOCK!
  1013. XDEFAULT*BLOCK!
  1014. XDEFAULT*BLOCK!
  1015. XNULL*BLOCK!
  1016. XOBJREQ%%%NULL%%
  1017. XALIAS%
  1018. XREQVERB%F
  1019. XREQALIAS%F
  1020. XAUTOLOOK%T
  1021. XEXITFROM%well
  1022. XSLOT%5
  1023. XTO%kitchen
  1024. XKIND%1
  1025. XTOSLOT%6
  1026. XNULL*DESCLINE!
  1027. XDEFAULT*BLOCK!
  1028. XNULL*BLOCK!
  1029. XDEFAULT*BLOCK!
  1030. XDEFAULT*BLOCK!
  1031. XNULL*BLOCK!
  1032. XOBJREQ%%%NULL%%
  1033. XALIAS%
  1034. XREQVERB%F
  1035. XREQALIAS%F
  1036. XAUTOLOOK%T
  1037. XEXITFROM%well
  1038. XSLOT%6
  1039. XTO%bottom of well
  1040. XKIND%1
  1041. XTOSLOT%5
  1042. XNULL*DESCLINE!
  1043. XDEFAULT*BLOCK!
  1044. XNULL*BLOCK!
  1045. XDEFAULT*BLOCK!
  1046. XDEFAULT*BLOCK!
  1047. XNULL*BLOCK!
  1048. XOBJREQ%%%NULL%%
  1049. XALIAS%
  1050. XREQVERB%F
  1051. XREQALIAS%F
  1052. XAUTOLOOK%T
  1053. XOBJDROP%%%NULL%%
  1054. XGRPLOC1%%%NULL%%
  1055. XGRPLOC2%%%NULL%%
  1056. XROOM2%bottom of well
  1057. XEXITFROM%bottom of well
  1058. XSLOT%1
  1059. XTO%%%NULL%%
  1060. XKIND%0
  1061. XTOSLOT%0
  1062. XDEFAULT*DESCLINE!
  1063. XDEFAULT*BLOCK!
  1064. XNULL*BLOCK!
  1065. XDEFAULT*BLOCK!
  1066. XDEFAULT*BLOCK!
  1067. XNULL*BLOCK!
  1068. XOBJREQ%%%NULL%%
  1069. XALIAS%
  1070. XREQVERB%F
  1071. XREQALIAS%F
  1072. XAUTOLOOK%T
  1073. XEXITFROM%bottom of well
  1074. XSLOT%2
  1075. XTO%%%NULL%%
  1076. XKIND%0
  1077. XTOSLOT%0
  1078. XDEFAULT*DESCLINE!
  1079. XDEFAULT*BLOCK!
  1080. XNULL*BLOCK!
  1081. XDEFAULT*BLOCK!
  1082. XDEFAULT*BLOCK!
  1083. XNULL*BLOCK!
  1084. XOBJREQ%%%NULL%%
  1085. XALIAS%
  1086. XREQVERB%F
  1087. XREQALIAS%F
  1088. XAUTOLOOK%T
  1089. XEXITFROM%bottom of well
  1090. XSLOT%3
  1091. XTO%%%NULL%%
  1092. XKIND%0
  1093. XTOSLOT%0
  1094. XDEFAULT*DESCLINE!
  1095. XDEFAULT*BLOCK!
  1096. XNULL*BLOCK!
  1097. XDEFAULT*BLOCK!
  1098. XDEFAULT*BLOCK!
  1099. XNULL*BLOCK!
  1100. XOBJREQ%%%NULL%%
  1101. XALIAS%
  1102. XREQVERB%F
  1103. XREQALIAS%F
  1104. XAUTOLOOK%T
  1105. XEXITFROM%bottom of well
  1106. XSLOT%4
  1107. XTO%%%NULL%%
  1108. XKIND%0
  1109. XTOSLOT%0
  1110. XDEFAULT*DESCLINE!
  1111. XDEFAULT*BLOCK!
  1112. XNULL*BLOCK!
  1113. XDEFAULT*BLOCK!
  1114. XDEFAULT*BLOCK!
  1115. XNULL*BLOCK!
  1116. XOBJREQ%%%NULL%%
  1117. XALIAS%
  1118. XREQVERB%F
  1119. XREQALIAS%F
  1120. XAUTOLOOK%T
  1121. XEXITFROM%bottom of well
  1122. XSLOT%5
  1123. XTO%well
  1124. XKIND%1
  1125. XTOSLOT%6
  1126. XNULL*DESCLINE!
  1127. XDEFAULT*BLOCK!
  1128. XNULL*BLOCK!
  1129. XDEFAULT*BLOCK!
  1130. XDEFAULT*BLOCK!
  1131. XNULL*BLOCK!
  1132. XOBJREQ%%%NULL%%
  1133. XALIAS%
  1134. XREQVERB%F
  1135. XREQALIAS%F
  1136. XAUTOLOOK%T
  1137. XEXITFROM%bottom of well
  1138. XSLOT%6
  1139. XTO%under water 3
  1140. XKIND%1
  1141. XTOSLOT%5
  1142. XNULL*DESCLINE!
  1143. XDEFAULT*BLOCK!
  1144. XNULL*BLOCK!
  1145. XDESCLINE%# dived down.
  1146. XDESCLINE%# arrived.
  1147. XNULL*BLOCK!
  1148. XOBJREQ%%%NULL%%
  1149. XALIAS%
  1150. XREQVERB%F
  1151. XREQALIAS%F
  1152. XAUTOLOOK%T
  1153. XOBJDROP%%%NULL%%
  1154. XGRPLOC1%%%NULL%%
  1155. XGRPLOC2%%%NULL%%
  1156. XMONSTERKIND%2
  1157. XSTART*MDL!
  1158. XRUNNABLE%F
  1159. XPRIV%T
  1160. XOWNER%#
  1161. XCTIME%20-AUG-1989  2:47pm
  1162. XAUTHOR%
  1163. XWTIME%
  1164. XSHORTMEGA%filled
  1165. XFLAGS%0
  1166. XNAME%frog
  1167. XHIDING%0
  1168. XWEAR%%%NULL%%
  1169. XWIELD%%%NULL%%
  1170. XROOM2%yard3
  1171. XEXITFROM%yard3
  1172. XSLOT%1
  1173. XTO%stable
  1174. XKIND%1
  1175. XTOSLOT%2
  1176. XDESCLINE%You can see a pair of large doors in the north.
  1177. XDEFAULT*BLOCK!
  1178. XNULL*BLOCK!
  1179. XDESCLINE%# decided to visit the horses in the stable.
  1180. XSTART*BLOCK!
  1181. XBLOCK%# comes out from the stable, still cleaning up
  1182. XBLOCK%the dirt from the suit.
  1183. XNULL*BLOCK!
  1184. XOBJREQ%%%NULL%%
  1185. XALIAS%
  1186. XREQVERB%F
  1187. XREQALIAS%F
  1188. XAUTOLOOK%T
  1189. XEXITFROM%yard3
  1190. XSLOT%2
  1191. XTO%%%NULL%%
  1192. XKIND%0
  1193. XTOSLOT%0
  1194. XDEFAULT*DESCLINE!
  1195. XSTART*BLOCK!
  1196. XBLOCK%  Instead of hitting your head against the wall, why don't you just
  1197. XBLOCK%go to somewhere?
  1198. XNULL*BLOCK!
  1199. XDEFAULT*BLOCK!
  1200. XDEFAULT*BLOCK!
  1201. XNULL*BLOCK!
  1202. XOBJREQ%%%NULL%%
  1203. XALIAS%
  1204. XREQVERB%F
  1205. XREQALIAS%F
  1206. XAUTOLOOK%T
  1207. XEXITFROM%yard3
  1208. XSLOT%3
  1209. XTO%%%NULL%%
  1210. XKIND%0
  1211. XTOSLOT%4
  1212. XDESCLINE%Kitchen door is leading to east.
  1213. XSTART*BLOCK!
  1214. XBLOCK%Bump!  Auch!
  1215. XBLOCK%
  1216. XBLOCK%Leave that wall alone, my head is starting to ache!
  1217. XNULL*BLOCK!
  1218. XDEFAULT*BLOCK!
  1219. XDEFAULT*BLOCK!
  1220. XNULL*BLOCK!
  1221. XOBJREQ%%%NULL%%
  1222. XALIAS%
  1223. XREQVERB%F
  1224. XREQALIAS%F
  1225. XAUTOLOOK%T
  1226. XEXITFROM%yard3
  1227. XSLOT%4
  1228. XTO%yard2
  1229. XKIND%1
  1230. XTOSLOT%3
  1231. XDESCLINE%The yard continues to the west.
  1232. XDEFAULT*BLOCK!
  1233. XNULL*BLOCK!
  1234. XDESCLINE%# went to the west.
  1235. XDESCLINE%# arrived.
  1236. XNULL*BLOCK!
  1237. XOBJREQ%%%NULL%%
  1238. XALIAS%
  1239. XREQVERB%F
  1240. XREQALIAS%F
  1241. XAUTOLOOK%T
  1242. XEXITFROM%yard3
  1243. XSLOT%5
  1244. XTO%balcony1
  1245. XKIND%0
  1246. XTOSLOT%1
  1247. XNULL*DESCLINE!
  1248. XDEFAULT*BLOCK!
  1249. XNULL*BLOCK!
  1250. XDEFAULT*BLOCK!
  1251. XSTART*BLOCK!
  1252. XBLOCK%Bump!
  1253. XBLOCK%
  1254. XBLOCK%# bounced back to the sky where he came from.
  1255. XNULL*BLOCK!
  1256. XOBJREQ%%%NULL%%
  1257. XALIAS%
  1258. XREQVERB%F
  1259. XREQALIAS%F
  1260. XAUTOLOOK%T
  1261. XEXITFROM%yard3
  1262. XSLOT%6
  1263. XTO%%%NULL%%
  1264. XKIND%0
  1265. XTOSLOT%0
  1266. XDEFAULT*DESCLINE!
  1267. XDEFAULT*BLOCK!
  1268. XNULL*BLOCK!
  1269. XDEFAULT*BLOCK!
  1270. XDEFAULT*BLOCK!
  1271. XNULL*BLOCK!
  1272. XOBJREQ%%%NULL%%
  1273. XALIAS%
  1274. XREQVERB%F
  1275. XREQALIAS%F
  1276. XAUTOLOOK%T
  1277. XOBJDROP%%%NULL%%
  1278. XGRPLOC1%yard1
  1279. XGRPLOC2%yard2
  1280. XROOM2%etower1
  1281. XEXITFROM%etower1
  1282. XSLOT%1
  1283. XTO%%%NULL%%
  1284. XKIND%0
  1285. XTOSLOT%0
  1286. XDEFAULT*DESCLINE!
  1287. XDESCLINE%Why don't you just go out instead of hitting your head against the
  1288. V walls?
  1289. XNULL*BLOCK!
  1290. XDEFAULT*BLOCK!
  1291. XDEFAULT*BLOCK!
  1292. XNULL*BLOCK!
  1293. XOBJREQ%%%NULL%%
  1294. XALIAS%
  1295. XREQVERB%F
  1296. XREQALIAS%F
  1297. XAUTOLOOK%T
  1298. XEXITFROM%etower1
  1299. XSLOT%2
  1300. XTO%%%NULL%%
  1301. XKIND%0
  1302. XTOSLOT%0
  1303. XDEFAULT*DESCLINE!
  1304. XDESCLINE%Why don't you just go out instead of hitting your head against the
  1305. V walls?
  1306. XNULL*BLOCK!
  1307. XDEFAULT*BLOCK!
  1308. XDEFAULT*BLOCK!
  1309. XNULL*BLOCK!
  1310. XOBJREQ%%%NULL%%
  1311. XALIAS%
  1312. XREQVERB%F
  1313. XREQALIAS%F
  1314. XAUTOLOOK%T
  1315. XEXITFROM%etower1
  1316. XSLOT%3
  1317. XTO%%%NULL%%
  1318. XKIND%0
  1319. XTOSLOT%0
  1320. XDEFAULT*DESCLINE!
  1321. XDESCLINE%Why don't you just go out instead of hitting your head against the
  1322. V walls?
  1323. XNULL*BLOCK!
  1324. XDEFAULT*BLOCK!
  1325. XDEFAULT*BLOCK!
  1326. XNULL*BLOCK!
  1327. XOBJREQ%%%NULL%%
  1328. XALIAS%
  1329. XREQVERB%F
  1330. XREQALIAS%F
  1331. XAUTOLOOK%T
  1332. XEXITFROM%etower1
  1333. XSLOT%4
  1334. XTO%%%NULL%%
  1335. XKIND%0
  1336. XTOSLOT%0
  1337. XDEFAULT*DESCLINE!
  1338. XDESCLINE%Why don't you just go out instead of hitting your head against the
  1339. V walls?
  1340. XNULL*BLOCK!
  1341. XDEFAULT*BLOCK!
  1342. XDEFAULT*BLOCK!
  1343. XNULL*BLOCK!
  1344. XOBJREQ%%%NULL%%
  1345. XALIAS%
  1346. XREQVERB%F
  1347. XREQALIAS%F
  1348. XAUTOLOOK%T
  1349. XEXITFROM%etower1
  1350. XSLOT%5
  1351. XTO%etower2
  1352. XKIND%1
  1353. XTOSLOT%6
  1354. XNULL*DESCLINE!
  1355. XDEFAULT*BLOCK!
  1356. XNULL*BLOCK!
  1357. XDESCLINE%# went up.
  1358. XDESCLINE%# arrived.
  1359. XNULL*BLOCK!
  1360. XOBJREQ%%%NULL%%
  1361. XALIAS%
  1362. XREQVERB%F
  1363. XREQALIAS%F
  1364. XAUTOLOOK%T
  1365. XEXITFROM%etower1
  1366. XSLOT%6
  1367. XTO%treasury
  1368. XKIND%1
  1369. XTOSLOT%5
  1370. XNULL*DESCLINE!
  1371. XDEFAULT*BLOCK!
  1372. XNULL*BLOCK!
  1373. XNULL*BLOCK!
  1374. XDESCLINE%# arrived.
  1375. XNULL*BLOCK!
  1376. XOBJREQ%%%NULL%%
  1377. XALIAS%
  1378. XREQVERB%F
  1379. XREQALIAS%F
  1380. XAUTOLOOK%T
  1381. XOBJDROP%%%NULL%%
  1382. XGRPLOC1%%%NULL%%
  1383. XGRPLOC2%%%NULL%%
  1384. XROOM2%etower2
  1385. XEXITFROM%etower2
  1386. XSLOT%1
  1387. XTO%ent24
  1388. XKIND%1
  1389. XTOSLOT%2
  1390. XNULL*DESCLINE!
  1391. XDEFAULT*BLOCK!
  1392. XNULL*BLOCK!
  1393. XDESCLINE%# went to the north.
  1394. XDESCLINE%# arrived.
  1395. XNULL*BLOCK!
  1396. XOBJREQ%%%NULL%%
  1397. XALIAS%
  1398. XREQVERB%F
  1399. XREQALIAS%F
  1400. XAUTOLOOK%T
  1401. XEXITFROM%etower2
  1402. XSLOT%2
  1403. XTO%%%NULL%%
  1404. XKIND%0
  1405. XTOSLOT%0
  1406. XDEFAULT*DESCLINE!
  1407. XDEFAULT*BLOCK!
  1408. XNULL*BLOCK!
  1409. XDEFAULT*BLOCK!
  1410. XDEFAULT*BLOCK!
  1411. XNULL*BLOCK!
  1412. XOBJREQ%%%NULL%%
  1413. XALIAS%
  1414. XREQVERB%F
  1415. XREQALIAS%F
  1416. XAUTOLOOK%T
  1417. XEXITFROM%etower2
  1418. XSLOT%3
  1419. XTO%%%NULL%%
  1420. XKIND%0
  1421. XTOSLOT%0
  1422. XNULL*DESCLINE!
  1423. XDEFAULT*BLOCK!
  1424. XNULL*BLOCK!
  1425. XDESCLINE%# went out.
  1426. XDESCLINE%# arrived.
  1427. XNULL*BLOCK!
  1428. XOBJREQ%%%NULL%%
  1429. XALIAS%
  1430. XREQVERB%F
  1431. XREQALIAS%F
  1432. XAUTOLOOK%T
  1433. XEXITFROM%etower2
  1434. XSLOT%4
  1435. XTO%balcony1
  1436. XKIND%1
  1437. XTOSLOT%3
  1438. XNULL*DESCLINE!
  1439. XDEFAULT*BLOCK!
  1440. XNULL*BLOCK!
  1441. XDESCLINE%# went to the west.
  1442. XDEFAULT*BLOCK!
  1443. XNULL*BLOCK!
  1444. XOBJREQ%%%NULL%%
  1445. XALIAS%
  1446. XREQVERB%F
  1447. XREQALIAS%F
  1448. XAUTOLOOK%T
  1449. XEXITFROM%etower2
  1450. XSLOT%5
  1451. XTO%etower3
  1452. XKIND%1
  1453. XTOSLOT%6
  1454. XNULL*DESCLINE!
  1455. XDEFAULT*BLOCK!
  1456. XNULL*BLOCK!
  1457. XDESCLINE%# climbed up.
  1458. XDESCLINE%# arrived.
  1459. XNULL*BLOCK!
  1460. XOBJREQ%%%NULL%%
  1461. XALIAS%
  1462. XREQVERB%F
  1463. XREQALIAS%F
  1464. XAUTOLOOK%T
  1465. XEXITFROM%etower2
  1466. XSLOT%6
  1467. XTO%etower1
  1468. XKIND%1
  1469. XTOSLOT%5
  1470. XNULL*DESCLINE!
  1471. XDEFAULT*BLOCK!
  1472. XNULL*BLOCK!
  1473. XDESCLINE%# went down.
  1474. XDESCLINE%# arrived.
  1475. XNULL*BLOCK!
  1476. XOBJREQ%%%NULL%%
  1477. XALIAS%
  1478. XREQVERB%F
  1479. XREQALIAS%F
  1480. XAUTOLOOK%T
  1481. XOBJDROP%%%NULL%%
  1482. XGRPLOC1%%%NULL%%
  1483. XGRPLOC2%%%NULL%%
  1484. XROOM2%etower3
  1485. XEXITFROM%etower3
  1486. XSLOT%1
  1487. XTO%%%NULL%%
  1488. XKIND%0
  1489. XTOSLOT%0
  1490. XDEFAULT*DESCLINE!
  1491. XDEFAULT*BLOCK!
  1492. XNULL*BLOCK!
  1493. XDEFAULT*BLOCK!
  1494. XDEFAULT*BLOCK!
  1495. XNULL*BLOCK!
  1496. XOBJREQ%%%NULL%%
  1497. XALIAS%
  1498. XREQVERB%F
  1499. XREQALIAS%F
  1500. XAUTOLOOK%T
  1501. XEXITFROM%etower3
  1502. XSLOT%2
  1503. XTO%%%NULL%%
  1504. XKIND%0
  1505. XTOSLOT%0
  1506. XDEFAULT*DESCLINE!
  1507. XDEFAULT*BLOCK!
  1508. XNULL*BLOCK!
  1509. XDEFAULT*BLOCK!
  1510. XDEFAULT*BLOCK!
  1511. XNULL*BLOCK!
  1512. XOBJREQ%%%NULL%%
  1513. XALIAS%
  1514. XREQVERB%F
  1515. XREQALIAS%F
  1516. XAUTOLOOK%T
  1517. XEXITFROM%etower3
  1518. XSLOT%3
  1519. XTO%%%NULL%%
  1520. XKIND%0
  1521. XTOSLOT%0
  1522. XDEFAULT*DESCLINE!
  1523. XDEFAULT*BLOCK!
  1524. XNULL*BLOCK!
  1525. XDEFAULT*BLOCK!
  1526. XDEFAULT*BLOCK!
  1527. XNULL*BLOCK!
  1528. XOBJREQ%%%NULL%%
  1529. XALIAS%
  1530. XREQVERB%F
  1531. XREQALIAS%F
  1532. XAUTOLOOK%T
  1533. XEXITFROM%etower3
  1534. XSLOT%4
  1535. XTO%%%NULL%%
  1536. XKIND%0
  1537. XTOSLOT%0
  1538. XDEFAULT*DESCLINE!
  1539. XDEFAULT*BLOCK!
  1540. XNULL*BLOCK!
  1541. XDEFAULT*BLOCK!
  1542. XDEFAULT*BLOCK!
  1543. XNULL*BLOCK!
  1544. XOBJREQ%%%NULL%%
  1545. XALIAS%
  1546. XREQVERB%F
  1547. XREQALIAS%F
  1548. XAUTOLOOK%T
  1549. XEXITFROM%etower3
  1550. XSLOT%5
  1551. XTO%%%NULL%%
  1552. XKIND%0
  1553. XTOSLOT%0
  1554. XDEFAULT*DESCLINE!
  1555. XDEFAULT*BLOCK!
  1556. XNULL*BLOCK!
  1557. XDEFAULT*BLOCK!
  1558. XDEFAULT*BLOCK!
  1559. XNULL*BLOCK!
  1560. XOBJREQ%%%NULL%%
  1561. XALIAS%
  1562. XREQVERB%F
  1563. XREQALIAS%F
  1564. XAUTOLOOK%T
  1565. XEXITFROM%etower3
  1566. XSLOT%6
  1567. XTO%etower2
  1568. XKIND%1
  1569. XTOSLOT%5
  1570. XDESCLINE%The ladders lead down.
  1571. XDEFAULT*BLOCK!
  1572. XNULL*BLOCK!
  1573. XDESCLINE%# went down.
  1574. XDESCLINE%# arrived.
  1575. XNULL*BLOCK!
  1576. XOBJREQ%%%NULL%%
  1577. XALIAS%
  1578. XREQVERB%F
  1579. XREQALIAS%F
  1580. XAUTOLOOK%T
  1581. XOBJDROP%%%NULL%%
  1582. XGRPLOC1%%%NULL%%
  1583. XGRPLOC2%%%NULL%%
  1584. XROOM2%wtower3
  1585. XEXITFROM%wtower3
  1586. XSLOT%1
  1587. XTO%%%NULL%%
  1588. XKIND%0
  1589. XTOSLOT%0
  1590. XDEFAULT*DESCLINE!
  1591. XDEFAULT*BLOCK!
  1592. XNULL*BLOCK!
  1593. XDEFAULT*BLOCK!
  1594. XDEFAULT*BLOCK!
  1595. XNULL*BLOCK!
  1596. XOBJREQ%%%NULL%%
  1597. XALIAS%
  1598. XREQVERB%F
  1599. XREQALIAS%F
  1600. XAUTOLOOK%T
  1601. XEXITFROM%wtower3
  1602. XSLOT%2
  1603. XTO%%%NULL%%
  1604. XKIND%0
  1605. XTOSLOT%0
  1606. XDEFAULT*DESCLINE!
  1607. XDEFAULT*BLOCK!
  1608. XNULL*BLOCK!
  1609. XDEFAULT*BLOCK!
  1610. XDEFAULT*BLOCK!
  1611. XNULL*BLOCK!
  1612. XOBJREQ%%%NULL%%
  1613. XALIAS%
  1614. XREQVERB%F
  1615. XREQALIAS%F
  1616. XAUTOLOOK%T
  1617. XEXITFROM%wtower3
  1618. XSLOT%3
  1619. XTO%%%NULL%%
  1620. XKIND%0
  1621. XTOSLOT%0
  1622. XDEFAULT*DESCLINE!
  1623. XDEFAULT*BLOCK!
  1624. XNULL*BLOCK!
  1625. XDEFAULT*BLOCK!
  1626. XDEFAULT*BLOCK!
  1627. XNULL*BLOCK!
  1628. XOBJREQ%%%NULL%%
  1629. XALIAS%
  1630. XREQVERB%F
  1631. XREQALIAS%F
  1632. XAUTOLOOK%T
  1633. XEXITFROM%wtower3
  1634. XSLOT%4
  1635. XTO%%%NULL%%
  1636. XKIND%0
  1637. XTOSLOT%0
  1638. XDEFAULT*DESCLINE!
  1639. XDEFAULT*BLOCK!
  1640. XNULL*BLOCK!
  1641. XDEFAULT*BLOCK!
  1642. XDEFAULT*BLOCK!
  1643. XNULL*BLOCK!
  1644. XOBJREQ%%%NULL%%
  1645. XALIAS%
  1646. XREQVERB%F
  1647. XREQALIAS%F
  1648. XAUTOLOOK%T
  1649. XEXITFROM%wtower3
  1650. XSLOT%5
  1651. XTO%%%NULL%%
  1652. XKIND%0
  1653. XTOSLOT%0
  1654. XDEFAULT*DESCLINE!
  1655. XDEFAULT*BLOCK!
  1656. XNULL*BLOCK!
  1657. XDEFAULT*BLOCK!
  1658. XDEFAULT*BLOCK!
  1659. XNULL*BLOCK!
  1660. XOBJREQ%%%NULL%%
  1661. XALIAS%
  1662. XREQVERB%F
  1663. XREQALIAS%F
  1664. XAUTOLOOK%T
  1665. XEXITFROM%wtower3
  1666. XSLOT%6
  1667. XTO%wtower2
  1668. XKIND%1
  1669. XTOSLOT%5
  1670. XDESCLINE%There are ladders leading down.
  1671. XDEFAULT*BLOCK!
  1672. XNULL*BLOCK!
  1673. XDESCLINE%# went down.
  1674. XDEFAULT*BLOCK!
  1675. XNULL*BLOCK!
  1676. XOBJREQ%%%NULL%%
  1677. XALIAS%
  1678. XREQVERB%F
  1679. XREQALIAS%F
  1680. XAUTOLOOK%T
  1681. XOBJDROP%%%NULL%%
  1682. XGRPLOC1%%%NULL%%
  1683. XGRPLOC2%%%NULL%%
  1684. XROOM2%wtower2
  1685. XEXITFROM%wtower2
  1686. XSLOT%1
  1687. XTO%%%NULL%%
  1688. XKIND%0
  1689. XTOSLOT%0
  1690. XDEFAULT*DESCLINE!
  1691. XDEFAULT*BLOCK!
  1692. XNULL*BLOCK!
  1693. XDEFAULT*BLOCK!
  1694. XDEFAULT*BLOCK!
  1695. XNULL*BLOCK!
  1696. XOBJREQ%%%NULL%%
  1697. XALIAS%
  1698. XREQVERB%F
  1699. XREQALIAS%F
  1700. XAUTOLOOK%T
  1701. XEXITFROM%wtower2
  1702. XSLOT%2
  1703. XTO%over gate
  1704. XKIND%1
  1705. XTOSLOT%1
  1706. XNULL*DESCLINE!
  1707. XDEFAULT*BLOCK!
  1708. XSTART*BLOCK!
  1709. XBLOCK%  Hey, look at THAT!  Yap, the machinery you see in front of you contr
  1710. Vols
  1711. XBLOCK%the gate.
  1712. XBLOCK%
  1713. XDESCLINE%# went to the south.
  1714. XDESCLINE%# arrived.
  1715. XNULL*BLOCK!
  1716. XOBJREQ%%%NULL%%
  1717. XALIAS%
  1718. XREQVERB%F
  1719. XREQALIAS%F
  1720. XAUTOLOOK%T
  1721. XEXITFROM%wtower2
  1722. XSLOT%3
  1723. XTO%ent21
  1724. XKIND%1
  1725. XTOSLOT%4
  1726. XNULL*DESCLINE!
  1727. XDEFAULT*BLOCK!
  1728. XDESCLINE%  It was really a good idea to get out of that disgusting tower!
  1729. XDESCLINE%# went to the east.
  1730. XDESCLINE%# arrived.
  1731. XNULL*BLOCK!
  1732. XOBJREQ%%%NULL%%
  1733. XALIAS%
  1734. XREQVERB%F
  1735. XREQALIAS%F
  1736. XAUTOLOOK%T
  1737. XEXITFROM%wtower2
  1738. XSLOT%4
  1739. XTO%%%NULL%%
  1740. XKIND%0
  1741. XTOSLOT%0
  1742. XDEFAULT*DESCLINE!
  1743. XDEFAULT*BLOCK!
  1744. XNULL*BLOCK!
  1745. XDEFAULT*BLOCK!
  1746. XDEFAULT*BLOCK!
  1747. XNULL*BLOCK!
  1748. XOBJREQ%%%NULL%%
  1749. XALIAS%
  1750. XREQVERB%F
  1751. XREQALIAS%F
  1752. XAUTOLOOK%T
  1753. XEXITFROM%wtower2
  1754. XSLOT%5
  1755. XTO%wtower3
  1756. XKIND%1
  1757. XTOSLOT%6
  1758. XNULL*DESCLINE!
  1759. XDEFAULT*BLOCK!
  1760. XNULL*BLOCK!
  1761. XDESCLINE%# went up.
  1762. XDESCLINE%# arrived.
  1763. XNULL*BLOCK!
  1764. XOBJREQ%%%NULL%%
  1765. XALIAS%
  1766. XREQVERB%F
  1767. XREQALIAS%F
  1768. XAUTOLOOK%T
  1769. XEXITFROM%wtower2
  1770. XSLOT%6
  1771. XTO%wtower1
  1772. XKIND%1
  1773. XTOSLOT%5
  1774. XNULL*DESCLINE!
  1775. XDEFAULT*BLOCK!
  1776. XNULL*BLOCK!
  1777. XDESCLINE%# went down.
  1778. XDESCLINE%# arrived.
  1779. XNULL*BLOCK!
  1780. XOBJREQ%%%NULL%%
  1781. XALIAS%
  1782. XREQVERB%F
  1783. XREQALIAS%F
  1784. XAUTOLOOK%T
  1785. XOBJDROP%%%NULL%%
  1786. XGRPLOC1%%%NULL%%
  1787. XGRPLOC2%%%NULL%%
  1788. XROOM2%wtower1
  1789. XEXITFROM%wtower1
  1790. XSLOT%1
  1791. XTO%%%NULL%%
  1792. XKIND%0
  1793. XTOSLOT%0
  1794. XDEFAULT*DESCLINE!
  1795. XDEFAULT*BLOCK!
  1796. XNULL*BLOCK!
  1797. XDEFAULT*BLOCK!
  1798. XDEFAULT*BLOCK!
  1799. XNULL*BLOCK!
  1800. XOBJREQ%%%NULL%%
  1801. XALIAS%
  1802. XREQVERB%F
  1803. XREQALIAS%F
  1804. XAUTOLOOK%T
  1805. XEXITFROM%wtower1
  1806. XSLOT%2
  1807. XTO%yard1
  1808. XKIND%1
  1809. XTOSLOT%1
  1810. XNULL*DESCLINE!
  1811. XDEFAULT*BLOCK!
  1812. XNULL*BLOCK!
  1813. XDESCLINE%# went out.
  1814. XDESCLINE%# arrived.
  1815. XNULL*BLOCK!
  1816. XOBJREQ%%%NULL%%
  1817. XALIAS%
  1818. XREQVERB%F
  1819. XREQALIAS%F
  1820. XAUTOLOOK%T
  1821. XEXITFROM%wtower1
  1822. XSLOT%3
  1823. XTO%%%NULL%%
  1824. XKIND%0
  1825. XTOSLOT%0
  1826. XDEFAULT*DESCLINE!
  1827. XDEFAULT*BLOCK!
  1828. XNULL*BLOCK!
  1829. XDEFAULT*BLOCK!
  1830. XDEFAULT*BLOCK!
  1831. XNULL*BLOCK!
  1832. XOBJREQ%%%NULL%%
  1833. XALIAS%
  1834. XREQVERB%F
  1835. XREQALIAS%F
  1836. XAUTOLOOK%T
  1837. XEXITFROM%wtower1
  1838. XSLOT%4
  1839. XTO%%%NULL%%
  1840. XKIND%0
  1841. XTOSLOT%0
  1842. XDEFAULT*DESCLINE!
  1843. XDEFAULT*BLOCK!
  1844. XNULL*BLOCK!
  1845. XDEFAULT*BLOCK!
  1846. XDEFAULT*BLOCK!
  1847. XNULL*BLOCK!
  1848. XOBJREQ%%%NULL%%
  1849. XALIAS%
  1850. XREQVERB%F
  1851. XREQALIAS%F
  1852. XAUTOLOOK%T
  1853. XEXITFROM%wtower1
  1854. XSLOT%5
  1855. XTO%wtower2
  1856. XKIND%1
  1857. XTOSLOT%6
  1858. XDESCLINE%The ladders lead to the second floor.
  1859. XDEFAULT*BLOCK!
  1860. XNULL*BLOCK!
  1861. XDESCLINE%# went up.
  1862. XDESCLINE%# arrived.
  1863. XNULL*BLOCK!
  1864. XOBJREQ%%%NULL%%
  1865. XALIAS%
  1866. XREQVERB%F
  1867. XREQALIAS%F
  1868. XAUTOLOOK%T
  1869. XEXITFROM%wtower1
  1870. XSLOT%6
  1871. XTO%dungeon
  1872. XKIND%1
  1873. XTOSLOT%5
  1874. XDESCLINE%The grating on the floor leads down to the dungeon.
  1875. XDEFAULT*BLOCK!
  1876. XNULL*BLOCK!
  1877. XDESCLINE%# went down.
  1878. XDEFAULT*BLOCK!
  1879. XNULL*BLOCK!
  1880. XOBJREQ%%%NULL%%
  1881. XALIAS%
  1882. XREQVERB%F
  1883. XREQALIAS%F
  1884. XAUTOLOOK%T
  1885. XOBJDROP%%%NULL%%
  1886. XGRPLOC1%%%NULL%%
  1887. XGRPLOC2%%%NULL%%
  1888. XROOM2%stable
  1889. XEXITFROM%stable
  1890. XSLOT%1
  1891. XTO%%%NULL%%
  1892. XKIND%0
  1893. XTOSLOT%0
  1894. XDEFAULT*DESCLINE!
  1895. XDEFAULT*BLOCK!
  1896. XNULL*BLOCK!
  1897. XDEFAULT*BLOCK!
  1898. XDEFAULT*BLOCK!
  1899. XNULL*BLOCK!
  1900. XOBJREQ%%%NULL%%
  1901. XALIAS%
  1902. XREQVERB%F
  1903. XREQALIAS%F
  1904. XAUTOLOOK%T
  1905. XEXITFROM%stable
  1906. XSLOT%2
  1907. XTO%yard3
  1908. XKIND%2
  1909. XTOSLOT%1
  1910. XDESCLINE%The large doors open to the south.
  1911. XSTART*BLOCK!
  1912. XBLOCK%Auch!  The groom's hairy, thick hand grabs your to your hair as you
  1913. XBLOCK%are leaving.  In a single twist of his hand he throws you onto a pile
  1914. V of
  1915. XBLOCK%...Yach!  This stuff really stinks!
  1916. XNULL*BLOCK!
  1917. XDESCLINE%# didn't want to clean the floor of the stable any more.
  1918. XDESCLINE%#: "Hello, folks!"
  1919. XNULL*BLOCK!
  1920. XOBJREQ%leave permission
  1921. XALIAS%
  1922. XREQVERB%F
  1923. XREQALIAS%F
  1924. XAUTOLOOK%T
  1925. XEXITFROM%stable
  1926. XSLOT%3
  1927. XTO%%%NULL%%
  1928. XKIND%0
  1929. XTOSLOT%0
  1930. XDEFAULT*DESCLINE!
  1931. XDEFAULT*BLOCK!
  1932. XNULL*BLOCK!
  1933. XDEFAULT*BLOCK!
  1934. XDEFAULT*BLOCK!
  1935. XNULL*BLOCK!
  1936. XOBJREQ%%%NULL%%
  1937. XALIAS%
  1938. XREQVERB%F
  1939. XREQALIAS%F
  1940. XAUTOLOOK%T
  1941. XEXITFROM%stable
  1942. XSLOT%4
  1943. XTO%%%NULL%%
  1944. XKIND%0
  1945. XTOSLOT%0
  1946. XDEFAULT*DESCLINE!
  1947. XDEFAULT*BLOCK!
  1948. XNULL*BLOCK!
  1949. XDEFAULT*BLOCK!
  1950. XDEFAULT*BLOCK!
  1951. XNULL*BLOCK!
  1952. XOBJREQ%%%NULL%%
  1953. XALIAS%
  1954. XREQVERB%F
  1955. XREQALIAS%F
  1956. XAUTOLOOK%T
  1957. XEXITFROM%stable
  1958. XSLOT%5
  1959. XTO%%%NULL%%
  1960. XKIND%0
  1961. XTOSLOT%0
  1962. XDEFAULT*DESCLINE!
  1963. XDEFAULT*BLOCK!
  1964. XNULL*BLOCK!
  1965. XDEFAULT*BLOCK!
  1966. XDEFAULT*BLOCK!
  1967. XNULL*BLOCK!
  1968. XOBJREQ%%%NULL%%
  1969. XALIAS%
  1970. XREQVERB%F
  1971. XREQALIAS%F
  1972. XAUTOLOOK%T
  1973. XEXITFROM%stable
  1974. XSLOT%6
  1975. XTO%%%NULL%%
  1976. XKIND%0
  1977. XTOSLOT%0
  1978. XDEFAULT*DESCLINE!
  1979. XDEFAULT*BLOCK!
  1980. XNULL*BLOCK!
  1981. XDEFAULT*BLOCK!
  1982. XDEFAULT*BLOCK!
  1983. XNULL*BLOCK!
  1984. XOBJREQ%%%NULL%%
  1985. XALIAS%
  1986. XREQVERB%F
  1987. XREQALIAS%F
  1988. XAUTOLOOK%T
  1989. XOBJDROP%%%NULL%%
  1990. XGRPLOC1%%%NULL%%
  1991. XGRPLOC2%%%NULL%%
  1992. XMONSTERKIND%2
  1993. XSTART*MDL!
  1994. XSHORTMEGA%J13:0
  1995. XSHORTMEGA%H6:1:1:enter
  1996. XSHORTMEGA%3:2:0:0:-
  1997. XSHORTMEGA%H6:1:1:poof in
  1998. XSHORTMEGA%5:4:0:0:-
  1999. XSHORTMEGA%-6:0:0:0:36
  2000. XSHORTMEGA%7:0:0:0:_player name
  2001. XSHORTMEGA%-8:7:0:0:65
  2002. XSHORTMEGA%-9:6:8:0:11
  2003. XSHORTMEGA%J58:0
  2004. XSHORTMEGA%J65:0
  2005. XSHORTMEGA%-12:9:10:11:22
  2006. XSHORTMEGA%H6:1:12:greet
  2007. XSHORTMEGA%14:13:0:0:-
  2008. XSHORTMEGA%15:0:0:0:!- LABEL throw out(
  2009. XSHORTMEGA%16:0:0:0:!   if(not(and(get remote state("R2D2"), player name)),
  2010. XSHORTMEGA%17:0:0:0:!      null(
  2011. XSHORTMEGA%18:0:0:0:!         null(
  2012. XSTART*MEGA!
  2013. XMEGA%19:0:0:0:!            oprint("The groom throws ", player name, "out an
  2014. XMEGA%d yells:"),
  2015. XSTART*MEGA!
  2016. XMEGA%20:0:0:0:!            oprint("You dog!  The last time you visited here
  2017. XMEGA% you just "&
  2018. XSTART*MEGA!
  2019. XMEGA%21:0:0:0:!                   "annoyed Gandalf's horse and I was the on
  2020. XMEGA%e to be punished!"),
  2021. XSHORTMEGA%22:0:0:0:!            pprint("The groom throws you out, yelling:")
  2022. XSHORTMEGA%23:0:0:0:!         ),
  2023. XSTART*MEGA!
  2024. XMEGA%24:0:0:0:!            pprint("You dog!  Because of you Gandalf let me`0
  2025. V32
  2026. XMEGA%live like "&
  2027. XSHORTMEGA%25:0:0:0:!                   "a frog for a month!"),
  2028. XSHORTMEGA%26:0:0:0:!            pprint(" "),
  2029. XSHORTMEGA%27:0:0:0:!            pmove("yard3")
  2030. XSHORTMEGA%28:0:0:0:!         )
  2031. XSHORTMEGA%29:0:0:0:!      ),
  2032. XSTART*MEGA!
  2033. XMEGA%30:0:0:0:!      if(not(get remote state("R2D2")), print("***  Problems
  2034. XMEGA%  -  contact "&
  2035. XSTART*MEGA!
  2036. XMEGA%31:0:0:0:!         "Gandalf ASAP!"), pprint("The groom gives you a gli
  2037. XMEGA%mpse and turns "&
  2038. XSTART*MEGA!
  2039. XMEGA%32:0:0:0:!         "back to his work again.  You can still hear him mu
  2040. XMEGA%mbling:  That old"&
  2041. XSTART*MEGA!
  2042. XMEGA%33:0:0:0:!         " charlatan again...  If I ever get Gandalf without
  2043. XMEGA% his fucking wand"&
  2044. XSHORTMEGA%34:0:0:0:!         " into my hands...")
  2045. XSHORTMEGA%35:0:0:0:!      )
  2046. XSHORTMEGA%36:0:0:0:!   )
  2047. XSHORTMEGA%37:0:0:0:!)
  2048. XSHORTMEGA%38:0:0:0:"wizard, manager"
  2049. XSHORTMEGA%-39:7:38:0:61
  2050. XSHORTMEGA%-40:39:0:0:27
  2051. XSHORTMEGA%41:0:0:0:"The groom throws "
  2052. XSHORTMEGA%42:0:0:0:"out and yells:"
  2053. XSHORTMEGA%-43:41:7:42:17
  2054. XSTART*MEGA!
  2055. XMEGA%44:0:0:0:"You dog! The last time you visited here you just annoyed Gan
  2056. XMEGA%dalf's horse and I was the one to be punished!"
  2057. XSHORTMEGA%-45:44:0:0:17
  2058. XSHORTMEGA%46:0:0:0:"The groom throws you out, yelling:"
  2059. XSHORTMEGA%-47:46:0:0:15
  2060. XSHORTMEGA%-48:43:45:47:24
  2061. XSTART*MEGA!
  2062. XMEGA%49:0:0:0:"You dog! Because of you Gandalf let me live like a frog for`0
  2063. V32
  2064. XMEGA%a month!"
  2065. XSHORTMEGA%-50:49:0:0:15
  2066. XSHORTMEGA%51:0:0:0:" "
  2067. XSHORTMEGA%-52:51:0:0:15
  2068. XSHORTMEGA%53:0:0:0:"yard3"
  2069. XSHORTMEGA%-54:53:0:0:14
  2070. XSHORTMEGA%-55:50:52:54:24
  2071. XSHORTMEGA%-56:48:55:0:24
  2072. XSHORTMEGA%-57:40:56:0:22
  2073. XSHORTMEGA%H6:1:57:throw out
  2074. XSHORTMEGA%59:58:0:0:-
  2075. XSTART*MEGA!
  2076. XMEGA%60:0:0:0:"Groom looks at you, trying to believe his eyes. After that h
  2077. XMEGA%e bursts to laugh and says:"
  2078. XSHORTMEGA%-61:60:0:0:15
  2079. XSTART*MEGA!
  2080. XMEGA%62:0:0:0:"Aw shit! Well, nothing is better than no thing! Harharhar! G
  2081. XMEGA%o on, dog, get on working!"
  2082. XSHORTMEGA%-63:62:0:0:15
  2083. XSHORTMEGA%-64:61:63:0:24
  2084. XSHORTMEGA%H6:1:64:slave
  2085. XSHORTMEGA%66:65:0:0:-
  2086. XSHORTMEGA%67:0:0:0:"Groom looks back at you, seemingly amused."
  2087. XSHORTMEGA%-68:67:0:0:15
  2088. XSHORTMEGA%H6:1:68:look you
  2089. XSHORTMEGA%70:69:0:0:-
  2090. XSHORTMEGA%71:0:0:0:!- LABEL command(
  2091. XSHORTMEGA%72:0:0:0:!   if(and(get remote state("R2D2"), player name),
  2092. XSHORTMEGA%73:0:0:0:!      set state(exclude(get state(), userid(player name)
  2093. V))
  2094. XSHORTMEGA%-74:6:8:0:45
  2095. XSHORTMEGA%-75:74:0:0:37
  2096. XSHORTMEGA%-76:39:75:0:22
  2097. XSHORTMEGA%H6:1:76:command
  2098. XSHORTMEGA%78:77:0:0:-
  2099. XSHORTMEGA%79:0:0:0:!- LABEL say(
  2100. XSHORTMEGA%80:0:0:0:!   null(
  2101. XSHORTMEGA%81:0:0:0:!      SET speech(strip(speech)),
  2102. XSHORTMEGA%82:0:0:0:!      if(=(string head(speech), "groom"),
  2103. XSHORTMEGA%83:0:0:0:!         if(and(get remote state("R2D2"), player name),
  2104. XSHORTMEGA%84:0:0:0:!            DEFINE what(
  2105. XSHORTMEGA%85:0:0:0:!               null(     `032
  2106. XSHORTMEGA%86:0:0:0:!                  null(
  2107. XSHORTMEGA%87:0:0:0:!                     SET speech(string tail(speech)),
  2108. XSHORTMEGA%88:0:0:0:!                     SET what(string head(speech)),
  2109. XSHORTMEGA%89:0:0:0:!                     SET speech(string tail(speech))
  2110. XSHORTMEGA%90:0:0:0:!                  ),
  2111. XSHORTMEGA%91:0:0:0:!                  if(and(what, "add, rem"),`032
  2112. XSTART*MEGA!
  2113. XMEGA%92:0:0:0:!                    SET speech(userid(lookup player(speech))
  2114. XMEGA%)
  2115. XSHORTMEGA%93:0:0:0:!                 ),
  2116. XSHORTMEGA%94:0:0:0:!                 if(=("add", what),
  2117. XSHORTMEGA%95:0:0:0:!                    null(
  2118. XSHORTMEGA%96:0:0:0:!                       pprint(+("Was:", get state())),
  2119. XSHORTMEGA%97:0:0:0:!                       set state(or(get state(), speech)
  2120. V),
  2121. XSHORTMEGA%98:0:0:0:!                       pprint(+("Is:", get state()))
  2122. XSHORTMEGA%99:0:0:0:!                    ),
  2123. XSHORTMEGA%100:0:0:0:!                    if(=("rem", what),
  2124. XSHORTMEGA%101:0:0:0:!                       null(
  2125. XSHORTMEGA%102:0:0:0:!                          pprint(+("Was:",get state()))
  2126. V,
  2127. XSTART*MEGA!
  2128. XMEGA%103:0:0:0:!                           set state(exclude(get state(), s
  2129. XMEGA%peech)),
  2130. XSHORTMEGA%104:0:0:0:!                           pprint(+("Is:", get state())
  2131. V)
  2132. XSHORTMEGA%105:0:0:0:!                        ),
  2133. XSTART*MEGA!
  2134. XMEGA%106:0:0:0:!                        if(=("list", what), pprint(get stat
  2135. XMEGA%e()),
  2136. XSHORTMEGA%107:0:0:0:!                           if(=("empty", what),
  2137. XSTART*MEGA!
  2138. XMEGA%108:0:0:0:!                              null( set state(" "), pprint(
  2139. XMEGA%"OK.")),
  2140. XSHORTMEGA%109:0:0:0:!                              pprint("add/rem/list/empt
  2141. Vy")
  2142. XSHORTMEGA%110:0:0:0:!                           )
  2143. XSHORTMEGA%111:0:0:0:!                        )
  2144. +-+-+-+-+-+-+-+-  END  OF PART 4 +-+-+-+-+-+-+-+-
  2145.