home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / games / vmsnet / monhl104 / part02 < prev    next >
Encoding:
Internet Message Format  |  1992-08-02  |  42.2 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 02/32
  5. Keywords: Monster, a multiplayer adventure game
  6. Message-ID: <1992Jun13.204806.1521@klaava.Helsinki.FI>
  7. Date: 13 Jun 92 20:48:06 GMT
  8. Sender: hurtta@klaava.Helsinki.FI (Kari Hurtta)
  9. Followup-To: vmsnet.sources.d
  10. Organization: University of Helsinki
  11. Lines: 1695
  12.  
  13. Archieve-name: monster_helsinki_104/part02
  14. Author: Kari.Hurtta@Helsinki.FI
  15. Product: Monster Helsinki V 1.04
  16. Environment: VMS, Pascal
  17. Part: 02/32
  18.  
  19. -+-+-+-+-+-+-+-+ START OF PART 2 -+-+-+-+-+-+-+-+
  20. XBLOCK%You don't have a PhD in physics. It is trivial to understand that you
  21. XBLOCK%can't use it.
  22. XDESCLINE%# is dead.
  23. XUSEALIAS%
  24. XREQALIAS%F
  25. XREQVERB%F
  26. XPARTICLE%1
  27. XNULL*BLOCK!
  28. XDESCLINE%# is dead.
  29. XPOWER%500
  30. XEXP%1000000
  31. XOBJECT%wooden wand
  32. XOWNER%#
  33. XNAME%wooden wand
  34. XKIND%0
  35. XNULL*DESCLINE!
  36. XNULL*BLOCK!
  37. XNULL*MDL!
  38. XDESCLINE%The wand at the table is an ordinary wooden wand.
  39. XVALUE%0
  40. XSTICKY%T
  41. XNULL*BLOCK!
  42. XDEFAULT*BLOCK!
  43. XDEFAULT*BLOCK!
  44. XDEFAULT*BLOCK!
  45. XUSEALIAS%
  46. XREQALIAS%F
  47. XREQVERB%F
  48. XPARTICLE%1
  49. XNULL*BLOCK!
  50. XNULL*BLOCK!
  51. XPOWER%0
  52. XEXP%0
  53. XOBJECT%sargofague
  54. XOWNER%#
  55. XNAME%sargofague
  56. XKIND%0
  57. XDESCLINE%There is the sargofague of Gandalf the White on the floor.
  58. XNULL*BLOCK!
  59. XSTART*MDL!
  60. XSHORTMEGA%1:0:0:0:"'Here lays Gandalf"
  61. XSHORTMEGA%-2:1:0:0:15
  62. XSHORTMEGA%3:0:0:0:" "
  63. XSHORTMEGA%-4:3:0:0:15
  64. XSHORTMEGA%5:0:0:0:" , also known as Gandalf the Grey and the Chief Architect
  65. V.'"
  66. XSHORTMEGA%-6:5:0:0:15
  67. XSTART*MEGA!
  68. XMEGA%7:0:0:0:"Long time ago one of the old Wizards called Gandalf was point
  69. XMEGA%ed to build a castle for the Monster Manager to live in; and so he did
  70. XMEGA%. During the work he was forced to fight with the most evil kind of mo
  71. XMEGA%nsters, via which his skills in black magic grew greater and greater.`0
  72. V32
  73. XMEGA%During the last great fight he suddenly disappeared; there are many wh
  74. XMEGA%o claimed to saw Gandalf fighting with Balrog the most Evil and droppi
  75. XMEGA%ng with it into a deep cleft. His body was never found; this sargofagu
  76. XMEGA%e and the marks of Gandalf's works seen here and there are everything`0
  77. V32
  78. XMEGA%there is left about him."
  79. XSHORTMEGA%-8:7:0:0:15
  80. XSTART*MEGA!
  81. XMEGA%9:0:0:0:"It is told he would return sometime - in the case of disaster
  82. XMEGA% or after finally winning the Balrog, the representant of the evil, as
  83. XMEGA% Gandalf the True White"
  84. XSHORTMEGA%-10:9:0:0:15
  85. XSTART*MEGA!
  86. XMEGA%11:0:0:0:"The cover of the sargofague has been lift off - and the sarg
  87. XMEGA%ofague is EMPTY!"
  88. XSHORTMEGA%-12:11:0:0:15
  89. XSHORTMEGA%-13:2:4:6:24:         6:4:8:4:10:4:12
  90. XSHORTMEGA%H6:1:13:look you
  91. XSHORTMEGA%15:14:0:0:-
  92. XRUNNABLE%T
  93. XPRIV%F
  94. XOWNER%#
  95. XCTIME%27-MAY-1990  5:23pm
  96. XSTATLAB%get fail
  97. XRCOUNT%7
  98. XECOUNT%7
  99. XLASTRUN%26-APR-1992  3:30pm
  100. XSTATLAB%leave
  101. XRCOUNT%25
  102. XECOUNT%25
  103. XLASTRUN%31-MAY-1992  8:04pm
  104. XSTATLAB%command
  105. XRCOUNT%9
  106. XECOUNT%9
  107. XLASTRUN%26-APR-1992  3:30pm
  108. XSTATLAB%start
  109. XRCOUNT%3
  110. XECOUNT%3
  111. XLASTRUN%16-SEP-1991  8:37am
  112. XSTATLAB%enter
  113. XRCOUNT%23
  114. XECOUNT%23
  115. XLASTRUN%31-MAY-1992  8:03pm
  116. XSTATLAB%look you
  117. XRCOUNT%17
  118. XECOUNT%0
  119. XLASTRUN%31-MAY-1992  8:04pm
  120. XAUTHOR%pniemi
  121. XWTIME%18-FEB-1991 12:00am
  122. XNULL*MEGA!
  123. XFLAGS%0
  124. XSTART*BLOCK!
  125. XBLOCK%There is an engraving on one side of the sargofague...
  126. XBLOCK%
  127. XVALUE%0
  128. XSTICKY%T
  129. XSTART*BLOCK!
  130. XBLOCK%  Take Gandalf's sargofaque?  Nah.  Just forget the idea  -  I just wo
  131. Vnder
  132. XBLOCK%where you got the idea?  Gandalf, within his return, would just transf
  133. Vorm
  134. XBLOCK%you to a frog of the swamp...
  135. XDEFAULT*BLOCK!
  136. XDEFAULT*BLOCK!
  137. XDEFAULT*BLOCK!
  138. XUSEALIAS%
  139. XREQALIAS%F
  140. XREQVERB%F
  141. XPARTICLE%1
  142. XNULL*BLOCK!
  143. XNULL*BLOCK!
  144. XPOWER%0
  145. XEXP%0
  146. XROOM%great hall
  147. XOWNER%
  148. XNICENAME%Great Hall
  149. XNAMEPRINT%0
  150. XSTART*BLOCK!
  151. XBLOCK%  The Great Hall is the centre of the castle  -  at least it has
  152. XBLOCK%a great importance to the stomachs of the honoured quests.  The walls
  153. XBLOCK%are filled of old armours; there is also a big coat of arms hanging
  154. XBLOCK%over the great oak doors to the north.  The massive, round table at
  155. XBLOCK%the center of the room is filled with goodies like many kind of birds,
  156. XBLOCK%meat and VERY old wine.  Your stomach agrees with you  -  so let's
  157. XBLOCK%eat!
  158. XBLOCK%
  159. XBLOCK%The great oak doors to the north lead out; there is also something
  160. XBLOCK%interesting to the east.
  161. XNULL*BLOCK!
  162. XWHICH%0
  163. XMAGICOBJ%%%NULL%%
  164. XNULL*DESCLINE!
  165. XNULL*DESCLINE!
  166. XGRPNAM1%
  167. XGRPNAM2%
  168. XTRAPTO%0
  169. XTRAPCHANCE%0
  170. XDEFAULT*DESCLINE!
  171. XNULL*BLOCK!
  172. XSTART*MDL!
  173. XSHORTMEGA%1:0:0:0:LABEL start
  174. XSHORTMEGA%2:1:0:0:-
  175. XSHORTMEGA%3:0:0:0:LABEL enter
  176. XSHORTMEGA%4:3:0:0:-
  177. XSHORTMEGA%5:0:0:0:LABEL leave
  178. XSHORTMEGA%6:5:0:0:-
  179. XSHORTMEGA%7:0:0:0:LABEL say
  180. XSHORTMEGA%8:7:0:0:-
  181. XSHORTMEGA%9:0:0:0:LABEL look around
  182. XSHORTMEGA%10:9:0:0:-
  183. XSHORTMEGA%11:0:0:0:"Unknow command: "
  184. XSHORTMEGA%12:0:0:0:_command
  185. XSHORTMEGA%-13:11:12:0:1
  186. XSHORTMEGA%-14:13:0:0:15
  187. XSHORTMEGA%15:0:0:0:"Please type ? or HELP for help."
  188. XSHORTMEGA%-16:15:0:0:15
  189. XSHORTMEGA%-17:14:16:0:24
  190. XSHORTMEGA%18:17:0:0:LABEL command
  191. XSHORTMEGA%19:18:0:0:-
  192. XRUNNABLE%T
  193. XPRIV%F
  194. XOWNER%hurtta
  195. XCTIME% 5-AUG-1989  9:32am
  196. XSTATLAB%poof out
  197. XRCOUNT%3
  198. XECOUNT%3
  199. XLASTRUN%13-JUN-1992  4:47pm
  200. XSTATLAB%poof in
  201. XRCOUNT%66
  202. XECOUNT%66
  203. XLASTRUN%13-JUN-1992  4:51pm
  204. XSTATLAB%escaped
  205. XRCOUNT%582
  206. XECOUNT%582
  207. XLASTRUN%13-JUN-1992  4:47pm
  208. XSTATLAB%leave
  209. XRCOUNT%490
  210. XECOUNT%0
  211. XLASTRUN%31-MAY-1992  8:00pm
  212. XSTATLAB%start
  213. XRCOUNT%283
  214. XECOUNT%0
  215. XLASTRUN%13-JUN-1992  4:52pm
  216. XSTATLAB%look around
  217. XRCOUNT%962
  218. XECOUNT%0
  219. XLASTRUN%13-JUN-1992  4:52pm
  220. XSTATLAB%say
  221. XRCOUNT%272
  222. XECOUNT%0
  223. XLASTRUN% 4-JUN-1992  8:03pm
  224. XSTATLAB%command
  225. XRCOUNT%208
  226. XECOUNT%0
  227. XLASTRUN%13-JUN-1992  3:23pm
  228. XAUTHOR%hurtta
  229. XWTIME% 9-OCT-1989  5:26pm
  230. XNULL*MEGA!
  231. XFLAGS%0
  232. XDEFAULT*BLOCK!
  233. XDEFAULT*BLOCK!
  234. XROOM%void
  235. XOWNER%
  236. XNICENAME%Void
  237. XNAMEPRINT%1
  238. XNULL*BLOCK!
  239. XNULL*BLOCK!
  240. XWHICH%0
  241. XMAGICOBJ%%%NULL%%
  242. XNULL*DESCLINE!
  243. XNULL*DESCLINE!
  244. XGRPNAM1%
  245. XGRPNAM2%
  246. XTRAPTO%6
  247. XTRAPCHANCE%100
  248. XDEFAULT*DESCLINE!
  249. XNULL*BLOCK!
  250. XNULL*MDL!
  251. XDEFAULT*BLOCK!
  252. XDEFAULT*BLOCK!
  253. XROOM%pit of fire
  254. XOWNER%#
  255. XNICENAME%Pit of Fire
  256. XNAMEPRINT%3
  257. XSTART*BLOCK!
  258. XBLOCK%As the name implies, the whole place is burning. However, it
  259. XBLOCK%seems to be quite normal here. On the other hand, it isn't
  260. XBLOCK%too comfortable to stand in the middle of the flames...
  261. XNULL*BLOCK!
  262. XWHICH%0
  263. XMAGICOBJ%%%NULL%%
  264. XNULL*DESCLINE!
  265. XNULL*DESCLINE!
  266. XGRPNAM1%
  267. XGRPNAM2%
  268. XTRAPTO%0
  269. XTRAPCHANCE%0
  270. XDEFAULT*DESCLINE!
  271. XNULL*BLOCK!
  272. XSTART*MDL!
  273. XSHORTMEGA%1:0:0:0:_speech
  274. XSHORTMEGA%-2:1:0:0:54
  275. XSHORTMEGA%-3:2:0:0:29
  276. XSHORTMEGA%4:0:0:0:"keep"
  277. XSHORTMEGA%-5:3:4:0:2
  278. XSHORTMEGA%-6:0:0:0:36
  279. XSHORTMEGA%7:0:0:0:_speech
  280. XSHORTMEGA%-8:7:0:0:55
  281. XSHORTMEGA%-9:8:0:0:29
  282. XSHORTMEGA%-10:9:0:0:59
  283. XSHORTMEGA%-11:10:0:0:65
  284. XSHORTMEGA%-12:6:11:0:12
  285. XSHORTMEGA%-13:12:0:0:37
  286. XSHORTMEGA%14:0:0:0:_speech
  287. XSHORTMEGA%-15:14:0:0:55
  288. XSHORTMEGA%-16:15:0:0:29
  289. XSHORTMEGA%-17:16:0:0:59
  290. XSHORTMEGA%-18:17:0:0:65
  291. XSHORTMEGA%-19:18:0:0:15
  292. XSHORTMEGA%-20:13:19:0:24
  293. XSHORTMEGA%21:0:0:0:_speech
  294. XSHORTMEGA%-22:21:0:0:54
  295. XSHORTMEGA%-23:22:0:0:29
  296. XSHORTMEGA%24:0:0:0:"release"
  297. XSHORTMEGA%-25:23:24:0:2
  298. XSHORTMEGA%-26:0:0:0:36
  299. XSHORTMEGA%27:0:0:0:_speech
  300. XSHORTMEGA%-28:27:0:0:55
  301. XSHORTMEGA%-29:28:0:0:29
  302. XSHORTMEGA%-30:29:0:0:59
  303. XSHORTMEGA%-31:30:0:0:65
  304. XSHORTMEGA%-32:26:31:0:45
  305. XSHORTMEGA%-33:32:0:0:37
  306. XSHORTMEGA%34:0:0:0:_speech
  307. XSHORTMEGA%-35:34:0:0:55
  308. XSHORTMEGA%-36:35:0:0:29
  309. XSHORTMEGA%-37:36:0:0:59
  310. XSHORTMEGA%-38:37:0:0:65
  311. XSHORTMEGA%-39:38:0:0:15
  312. XSHORTMEGA%-40:33:39:0:24
  313. XSHORTMEGA%41:0:0:0:_speech
  314. XSHORTMEGA%-42:41:0:0:54
  315. XSHORTMEGA%-43:42:0:0:29
  316. XSHORTMEGA%44:0:0:0:"list"
  317. XSHORTMEGA%-45:43:44:0:2
  318. XSHORTMEGA%-46:0:0:0:36
  319. XSHORTMEGA%-47:46:0:0:15
  320. XSHORTMEGA%-48:45:47:0:22
  321. XSHORTMEGA%-49:25:40:48:22
  322. XSHORTMEGA%-50:5:20:49:22
  323. XSHORTMEGA%51:50:0:0:LABEL check command
  324. XSHORTMEGA%52:51:0:0:-
  325. XSHORTMEGA%53:0:0:0:_player name
  326. XSHORTMEGA%54:0:0:0:"wizard"
  327. XSHORTMEGA%-55:53:54:0:61
  328. XSHORTMEGA%56:0:0:0:GOSUB check command
  329. XSHORTMEGA%-57:55:56:0:22
  330. XSHORTMEGA%58:57:0:0:LABEL say
  331. XSHORTMEGA%59:58:0:0:-
  332. XSHORTMEGA%60:0:0:0:_player name
  333. XSHORTMEGA%-61:60:0:0:59
  334. XSHORTMEGA%-62:61:0:0:65
  335. XSHORTMEGA%-63:0:0:0:36
  336. XSHORTMEGA%-64:62:63:0:11
  337. XSHORTMEGA%65:0:0:0:"pit of fire"
  338. XSHORTMEGA%-66:65:0:0:14
  339. XSHORTMEGA%67:0:0:0:"It isn't this easy to escape from the Pit of Fire."
  340. XSHORTMEGA%-68:67:0:0:15
  341. XSHORTMEGA%-69:66:68:0:24
  342. XSHORTMEGA%-70:64:69:0:22
  343. XSHORTMEGA%71:70:0:0:LABEL escaped
  344. XSHORTMEGA%72:71:0:0:-
  345. XRUNNABLE%T
  346. XPRIV%T
  347. XOWNER%#
  348. XCTIME% 1-SEP-1989  1:04am
  349. XSTATLAB%command
  350. XRCOUNT%3
  351. XECOUNT%3
  352. XLASTRUN% 3-OCT-1989  5:42pm
  353. XSTATLAB%start
  354. XRCOUNT%14
  355. XECOUNT%14
  356. XLASTRUN% 4-SEP-1990  3:03pm
  357. XSTATLAB%escaped
  358. XRCOUNT%36
  359. XECOUNT%0
  360. XLASTRUN%10-JUN-1992  9:17pm
  361. XSTATLAB%poof out
  362. XRCOUNT%36
  363. XECOUNT%36
  364. XLASTRUN%10-JUN-1992  9:17pm
  365. XSTATLAB%poof in
  366. XRCOUNT%32
  367. XECOUNT%32
  368. XLASTRUN%10-JUN-1992  9:16pm
  369. XSTATLAB%look around
  370. XRCOUNT%64
  371. XECOUNT%64
  372. XLASTRUN%10-JUN-1992  9:16pm
  373. XSTATLAB%say
  374. XRCOUNT%44
  375. XECOUNT%0
  376. XLASTRUN%24-JUL-1990 11:45pm
  377. XAUTHOR%leino
  378. XWTIME%25-SEP-1989  5:07pm
  379. XNULL*MEGA!
  380. XFLAGS%0
  381. XDEFAULT*BLOCK!
  382. XDEFAULT*BLOCK!
  383. XROOM%yard1
  384. XOWNER%#
  385. XNICENAME%yard1
  386. XNAMEPRINT%0
  387. XSTART*BLOCK!
  388. XBLOCK%You are in the western part of the yard.  To the north there is the
  389. XBLOCK%western tower of this castle.  The gates leading out of the castle
  390. XBLOCK%are to the west.  There are also doors to the rooms for the sentries,
  391. XBLOCK%from where you can hear someone playing some melody and drunk
  392. XBLOCK%singers.  Well, maybe also the sentries have to have their leisure
  393. XBLOCK%time...
  394. XSTART*BLOCK!
  395. XBLOCK%
  396. XBLOCK%The door leading to the western tower is to the north.  The room of
  397. XBLOCK%centries is in the south.  The yard continues to the east and to the
  398. XBLOCK%west.
  399. XWHICH%2
  400. XMAGICOBJ%%%NULL%%
  401. XNULL*DESCLINE!
  402. XNULL*DESCLINE!
  403. XGRPNAM1%a bit further.
  404. XGRPNAM2%
  405. XTRAPTO%0
  406. XTRAPCHANCE%0
  407. XDEFAULT*DESCLINE!
  408. XNULL*BLOCK!
  409. XNULL*MDL!
  410. XDEFAULT*BLOCK!
  411. XDEFAULT*BLOCK!
  412. XROOM%yard2
  413. XOWNER%#
  414. XNICENAME%yard2
  415. XNAMEPRINT%0
  416. XSTART*BLOCK!
  417. XBLOCK%The center part of the yard has a special meaning for the castle: in
  418. XBLOCK%this place grows a seemingly old oak that carries the fortune of the`0
  419. V32
  420. XBLOCK%castle in its acorns.  It is told that as long as the oak feels well
  421. XBLOCK%so does the castle.
  422. XSTART*BLOCK!
  423. XBLOCK%
  424. XBLOCK%There is a dirty wooden door in the south; the yard continues both to
  425. XBLOCK%the west and to the east.
  426. XBLOCK%
  427. XBLOCK%In the north there is an open door.  Can you hear the sound of anvil`0
  428. V32
  429. XBLOCK%and hammer?
  430. XWHICH%2
  431. XMAGICOBJ%%%NULL%%
  432. XOBJHERE%oak
  433. XOBJHIDE%0
  434. XNULL*DESCLINE!
  435. XNULL*DESCLINE!
  436. XGRPNAM1%near the gate.
  437. XGRPNAM2%near the tower.
  438. XTRAPTO%0
  439. XTRAPCHANCE%0
  440. XDEFAULT*DESCLINE!
  441. XNULL*BLOCK!
  442. XSTART*MDL!
  443. XSHORTMEGA%    1:    0:    0:    0:_direction
  444. XSHORTMEGA%    2:    0:    0:    0:"kitchen"
  445. XSHORTMEGA%    3:    1:    2:    0:=
  446. XSHORTMEGA%    4:    0:    0:    0:"kitchen"
  447. XSHORTMEGA%    5:    4:    0:    0:pmove
  448. XSHORTMEGA%    6:    0:    0:    0:_direction
  449. XSHORTMEGA%    7:    0:    0:    0:"tower"
  450. XSHORTMEGA%    8:    6:    7:    0:=
  451. XSHORTMEGA%    9:    0:    0:    0:"etower1"
  452. XSHORTMEGA%   10:    9:    0:    0:pmove
  453. XSHORTMEGA%   11:    0:    0:    0:"You can't go that way."
  454. XSHORTMEGA%   12:   11:    0:    0:pprint
  455. XSHORTMEGA%   13:    8:   10:   12:if
  456. XSHORTMEGA%   14:    3:    5:   13:if
  457. XSHORTMEGA%   15:   14:    0:    0:LABEL check
  458. XSHORTMEGA%   16:   15:    0:    0:-
  459. XSHORTMEGA%   17:    0:    0:    0:GOSUB check
  460. XSHORTMEGA%   18:   17:    0:    0:LABEL wrong dir
  461. XSHORTMEGA%   19:   18:    0:    0:-
  462. XRUNNABLE%T
  463. XPRIV%T
  464. XOWNER%#
  465. XCTIME%26-AUG-1989  1:35am
  466. XSTATLAB%escaped
  467. XRCOUNT%2
  468. XECOUNT%2
  469. XLASTRUN%10-JUN-1992  9:39pm
  470. XSTATLAB%leave
  471. XRCOUNT%1169
  472. XECOUNT%1169
  473. XLASTRUN%31-MAY-1992  8:15pm
  474. XSTATLAB%enter
  475. XRCOUNT%1194
  476. XECOUNT%1194
  477. XLASTRUN%31-MAY-1992  8:15pm
  478. XSTATLAB%say
  479. XRCOUNT%509
  480. XECOUNT%509
  481. XLASTRUN%20-APR-1992 10:14am
  482. XSTATLAB%command
  483. XRCOUNT%87
  484. XECOUNT%87
  485. XLASTRUN%31-MAY-1992  7:55pm
  486. XSTATLAB%poof out
  487. XRCOUNT%101
  488. XECOUNT%101
  489. XLASTRUN%10-JUN-1992  9:39pm
  490. XSTATLAB%poof in
  491. XRCOUNT%79
  492. XECOUNT%79
  493. XLASTRUN%10-JUN-1992  9:38pm
  494. XSTATLAB%look around
  495. XRCOUNT%1475
  496. XECOUNT%1475
  497. XLASTRUN%10-JUN-1992  9:38pm
  498. XAUTHOR%pniemi
  499. XWTIME%26-AUG-1989 12:41pm
  500. XNULL*MEGA!
  501. XFLAGS%0
  502. XDEFAULT*BLOCK!
  503. XDEFAULT*BLOCK!
  504. XROOM%kitchen stairs
  505. XOWNER%
  506. XNICENAME%Kitchen stairs
  507. XNAMEPRINT%1
  508. XDESCLINE%Stairs continue up and down.
  509. XDESCLINE%There is rather dim here, be careful.
  510. XWHICH%2
  511. XMAGICOBJ%%%NULL%%
  512. XDESCLINE%# bounces down the stairs and disappears out of sight.
  513. XDESCLINE%# bounces from the stairs.
  514. XGRPNAM1%
  515. XGRPNAM2%
  516. XTRAPTO%6
  517. XTRAPCHANCE%20
  518. XDESCLINE%Ahhh... The smell of food reaches you from kitchen.
  519. XNULL*BLOCK!
  520. XNULL*MDL!
  521. XDEFAULT*BLOCK!
  522. XDEFAULT*BLOCK!
  523. XROOM%kitchen
  524. XOWNER%#
  525. XNICENAME%Kitchen
  526. XNAMEPRINT%0
  527. XSTART*BLOCK!
  528. XBLOCK%"Hip, hop, get out of my way!"
  529. XBLOCK%
  530. XBLOCK%"Hey, asshole, isn't that soup ready yet?  Hurry on!"`032
  531. XBLOCK%
  532. XBLOCK%Yap, this is it.  Your stomach guessed right.  The kitchen is full of
  533. XBLOCK%different pots, plates, knives and that sort of things required when
  534. XBLOCK%cooking.  On one corner there is a well; there is a rope leading down
  535. XBLOCK%to it.
  536. XSTART*BLOCK!
  537. XBLOCK%
  538. XBLOCK%On one wall there is a door leading out to the yard.  There is also
  539. XBLOCK%a little wooden door to the west.
  540. XWHICH%2
  541. XMAGICOBJ%%%NULL%%
  542. XOBJHERE%amphora
  543. XOBJHIDE%0
  544. XNULL*DESCLINE!
  545. XNULL*DESCLINE!
  546. XGRPNAM1%
  547. XGRPNAM2%
  548. XTRAPTO%0
  549. XTRAPCHANCE%0
  550. XDEFAULT*DESCLINE!
  551. XNULL*BLOCK!
  552. XSTART*MDL!
  553. XSHORTMEGA%    1:    0:    0:    0:_direction
  554. XSHORTMEGA%    2:    0:    0:    0:"out"
  555. XSHORTMEGA%    3:    1:    2:    0:=
  556. XSHORTMEGA%    4:    0:    0:    0:GOSUB out
  557. XSHORTMEGA%    5:    0:    0:    0:GOSUB check
  558. XSHORTMEGA%    6:    3:    4:    5:if
  559. XSHORTMEGA%    7:    6:    0:    0:LABEL wrong dir
  560. XSHORTMEGA%    8:    7:    0:    0:-
  561. XSHORTMEGA%    9:    0:    0:    0:"You can't go that way."
  562. XSHORTMEGA%   10:    9:    0:    0:pprint
  563. XSHORTMEGA%   11:   10:    0:    0:LABEL check
  564. XSHORTMEGA%   12:   11:    0:    0:-
  565. XSHORTMEGA%   13:    0:    0:    0:_player name
  566. XSHORTMEGA%   14:    0:    0:    0:" went to the yard."
  567. XSHORTMEGA%   15:   13:   14:    0:+
  568. XSHORTMEGA%   16:   15:    0:    0:oprint
  569. XSHORTMEGA%   17:    0:    0:    0:"yard3"
  570. XSHORTMEGA%   18:   17:    0:    0:pmove
  571. XSHORTMEGA%   19:   16:   18:    0:null
  572. XSHORTMEGA%   20:   19:    0:    0:LABEL out
  573. XSHORTMEGA%   21:   20:    0:    0:-
  574. XRUNNABLE%T
  575. XPRIV%T
  576. XOWNER%#
  577. XCTIME% 8-AUG-1989  2:34am
  578. XSTATLAB%start
  579. XRCOUNT%1
  580. XECOUNT%1
  581. XLASTRUN%13-JUN-1992  4:46pm
  582. XSTATLAB%leave
  583. XRCOUNT%420
  584. XECOUNT%420
  585. XLASTRUN%31-MAY-1992  8:00pm
  586. XSTATLAB%enter
  587. XRCOUNT%491
  588. XECOUNT%491
  589. XLASTRUN%31-MAY-1992  8:01pm
  590. XSTATLAB%poof in
  591. XRCOUNT%25
  592. XECOUNT%25
  593. XLASTRUN%13-JUN-1992  4:34pm
  594. XSTATLAB%escaped
  595. XRCOUNT%453
  596. XECOUNT%453
  597. XLASTRUN%13-JUN-1992  4:47pm
  598. XSTATLAB%poof out
  599. XRCOUNT%32
  600. XECOUNT%32
  601. XLASTRUN%13-JUN-1992  4:46pm
  602. XSTATLAB%wrong dir
  603. XRCOUNT%358
  604. XECOUNT%0
  605. XLASTRUN%31-MAY-1992  8:01pm
  606. XSTATLAB%look around
  607. XRCOUNT%688
  608. XECOUNT%688
  609. XLASTRUN%13-JUN-1992  4:46pm
  610. XAUTHOR%pniemi
  611. XWTIME%16-SEP-1989  1:57pm
  612. XNULL*MEGA!
  613. XFLAGS%0
  614. XDEFAULT*BLOCK!
  615. XDEFAULT*BLOCK!
  616. XROOM%office
  617. XOWNER%
  618. XNICENAME%office
  619. XNAMEPRINT%1
  620. XNULL*BLOCK!
  621. XSTART*BLOCK!
  622. XBLOCK%Kaikki huoneessa olevat tavarat yms. ovat minun omaisuuttani eiv`123tk
  623. V`123 ole
  624. XBLOCK%valmiita mihink`123`123n k`123ytt`124`124n (jos koskaan ovatkaan). Jos
  625. V k`123llit jotain
  626. XBLOCK%k`123sittelen sinua ansiosi mukaan!`032
  627. XBLOCK%`032
  628. XBLOCK%            Graah! :-)
  629. XBLOCK%
  630. XWHICH%2
  631. XMAGICOBJ%%%NULL%%
  632. XOBJHERE%excalibur
  633. XOBJHIDE%0
  634. XOBJHERE%grey robe
  635. XOBJHIDE%0
  636. XNULL*DESCLINE!
  637. XNULL*DESCLINE!
  638. XGRPNAM1%in Great Hall.`032
  639. XGRPNAM2%in control center
  640. XDETAIL%diploma
  641. XSTART*BLOCK!
  642. XBLOCK%**********************************************************************
  643. V****
  644. XBLOCK%*
  645. V                                                                        *
  646. XBLOCK%*                            DIPLOMA
  647. V                                     *
  648. XBLOCK%*
  649. V                                                                        *
  650. XBLOCK%*      Goodgulf the Grey, Official Wizard of Next Level
  651. V                  *
  652. XBLOCK%*
  653. V                                                                        *
  654. XBLOCK%**********************************************************************
  655. V****
  656. XTRAPTO%0
  657. XTRAPCHANCE%0
  658. XDEFAULT*DESCLINE!
  659. XNULL*BLOCK!
  660. XSTART*MDL!
  661. XRUNNABLE%F
  662. XPRIV%F
  663. XOWNER%
  664. XCTIME%26-AUG-1990  2:23pm
  665. XAUTHOR%
  666. XWTIME%
  667. XNULL*MEGA!
  668. XFLAGS%0
  669. XDEFAULT*BLOCK!
  670. XDEFAULT*BLOCK!
  671. XROOM%well
  672. XOWNER%
  673. XNICENAME%Well
  674. XNAMEPRINT%0
  675. XSTART*BLOCK!
  676. XBLOCK%Now you have bravely jumped to the well of the castle.  Luckily the
  677. XBLOCK%water level is low today...
  678. XSTART*BLOCK!
  679. XBLOCK%
  680. XBLOCK%The rope continues up and down.
  681. XWHICH%2
  682. XMAGICOBJ%%%NULL%%
  683. XNULL*DESCLINE!
  684. XNULL*DESCLINE!
  685. XGRPNAM1%
  686. XGRPNAM2%
  687. XTRAPTO%0
  688. XTRAPCHANCE%0
  689. XDEFAULT*DESCLINE!
  690. XNULL*BLOCK!
  691. XNULL*MDL!
  692. XDEFAULT*BLOCK!
  693. XDEFAULT*BLOCK!
  694. XROOM%bottom of well
  695. XOWNER%
  696. XNICENAME%bottom of well
  697. XNAMEPRINT%0
  698. XSTART*BLOCK!
  699. XBLOCK%Bulb bulb...
  700. XBLOCK%
  701. XBLOCK%What did I say? Water is liquid and you can drow in it,
  702. XBLOCK%if you insist to stay here any bit longer.
  703. XNULL*BLOCK!
  704. XWHICH%0
  705. XMAGICOBJ%%%NULL%%
  706. XOBJHERE%ladyfrog
  707. XOBJHIDE%0
  708. XNULL*DESCLINE!
  709. XNULL*DESCLINE!
  710. XGRPNAM1%
  711. XGRPNAM2%
  712. XTRAPTO%0
  713. XTRAPCHANCE%0
  714. XDEFAULT*DESCLINE!
  715. XNULL*BLOCK!
  716. XNULL*MDL!
  717. XDEFAULT*BLOCK!
  718. XDEFAULT*BLOCK!
  719. XROOM%yard3
  720. XOWNER%#
  721. XNICENAME%yard3
  722. XNAMEPRINT%0
  723. XSTART*BLOCK!
  724. XBLOCK%Now you are in the eastern end of the castle's central yard.  The sand
  725. XBLOCK%you are stepping on seems a bit dirty as the horses have been using it
  726. XBLOCK%for their unknown purposes.  In this end of the yard there are exits t
  727. Vo
  728. XBLOCK%the kitchen, where the cooks are preparing a banquet for the lord of t
  729. Vhe
  730. XBLOCK%castle, to the eastern tower of the castle and to the stable.
  731. XNULL*BLOCK!
  732. XWHICH%0
  733. XMAGICOBJ%%%NULL%%
  734. XNULL*DESCLINE!
  735. XNULL*DESCLINE!
  736. XGRPNAM1%near the gate.
  737. XGRPNAM2%a bit further.
  738. XTRAPTO%0
  739. XTRAPCHANCE%0
  740. XDEFAULT*DESCLINE!
  741. XNULL*BLOCK!
  742. XSTART*MDL!
  743. XSHORTMEGA%    1:    0:    0:    0:_direction
  744. XSHORTMEGA%    2:    0:    0:    0:"kitchen"
  745. XSHORTMEGA%    3:    1:    2:    0:=
  746. XSHORTMEGA%    4:    0:    0:    0:GOSUB kitchen
  747. XSHORTMEGA%    5:    0:    0:    0:_direction
  748. XSHORTMEGA%    6:    0:    0:    0:"tower"
  749. XSHORTMEGA%    7:    5:    6:    0:=
  750. XSHORTMEGA%    8:    0:    0:    0:GOSUB tower
  751. XSHORTMEGA%    9:    0:    0:    0:"You can't go that way."
  752. XSHORTMEGA%   10:    9:    0:    0:pprint
  753. XSHORTMEGA%   11:    7:    8:   10:if
  754. XSHORTMEGA%   12:    3:    4:   11:if
  755. XSHORTMEGA%   13:   12:    0:    0:LABEL check
  756. XSHORTMEGA%   14:   13:    0:    0:-
  757. XSHORTMEGA%   15:    0:    0:    0:_player name
  758. XSTART*MEGA!
  759. XMEGA%   16:    0:    0:    0:" decided to see if there is any food left in`0
  760. V32
  761. XMEGA%the kitchen."
  762. XSHORTMEGA%   17:   15:   16:    0:+
  763. XSHORTMEGA%   18:   17:    0:    0:oprint
  764. XSHORTMEGA%   19:    0:    0:    0:"kitchen"
  765. XSHORTMEGA%   20:   19:    0:    0:pmove
  766. XSHORTMEGA%   21:   18:   20:    0:null
  767. XSHORTMEGA%   22:   21:    0:    0:LABEL kitchen
  768. XSHORTMEGA%   23:   22:    0:    0:-
  769. XSHORTMEGA%   24:    0:    0:    0:_player name
  770. XSHORTMEGA%   25:    0:    0:    0:" went to the eastern tower."
  771. XSHORTMEGA%   26:   24:   25:    0:+
  772. XSHORTMEGA%   27:   26:    0:    0:oprint
  773. XSHORTMEGA%   28:    0:    0:    0:"etower1"
  774. XSHORTMEGA%   29:   28:    0:    0:pmove
  775. XSHORTMEGA%   30:   27:   29:    0:null
  776. XSHORTMEGA%   31:   30:    0:    0:LABEL tower
  777. XSHORTMEGA%   32:   31:    0:    0:-
  778. XSHORTMEGA%   33:    0:    0:    0:GOSUB check
  779. XSHORTMEGA%   34:   33:    0:    0:LABEL wrong dir
  780. XSHORTMEGA%   35:   34:    0:    0:-
  781. XRUNNABLE%T
  782. XPRIV%T
  783. XOWNER%#
  784. XCTIME% 7-AUG-1989 10:51pm
  785. XSTATLAB%poof in
  786. XRCOUNT%1
  787. XECOUNT%1
  788. XLASTRUN%10-JUN-1992  9:32pm
  789. XSTATLAB%poof out
  790. XRCOUNT%27
  791. XECOUNT%27
  792. XLASTRUN%10-JUN-1992  9:33pm
  793. XSTATLAB%escaped
  794. XRCOUNT%666
  795. XECOUNT%666
  796. XLASTRUN%10-JUN-1992  9:33pm
  797. XSTATLAB%leave
  798. XRCOUNT%639
  799. XECOUNT%639
  800. XLASTRUN%31-MAY-1992  8:15pm
  801. XSTATLAB%wrong dir
  802. XRCOUNT%420
  803. XECOUNT%0
  804. XLASTRUN%31-MAY-1992  8:09pm
  805. XSTATLAB%enter
  806. XRCOUNT%411
  807. XECOUNT%411
  808. XLASTRUN%31-MAY-1992  8:05pm
  809. XSTATLAB%start
  810. XRCOUNT%26
  811. XECOUNT%26
  812. XLASTRUN% 9-JAN-1992  8:59am
  813. XSTATLAB%look around
  814. XRCOUNT%558
  815. XECOUNT%558
  816. XLASTRUN%10-JUN-1992  9:31pm
  817. XAUTHOR%pniemi
  818. XWTIME%16-SEP-1989  1:36pm
  819. XNULL*MEGA!
  820. XFLAGS%0
  821. XDEFAULT*BLOCK!
  822. XDEFAULT*BLOCK!
  823. XROOM%etower1
  824. XOWNER%#
  825. XNICENAME%etower1
  826. XNAMEPRINT%0
  827. XSTART*BLOCK!
  828. XBLOCK%This is the first floor of the eastern tower of the castle.  The room
  829. XBLOCK%itself is not too large, but there is still room for the open door
  830. XBLOCK%to the yard and for the ladders seemingly going in the vertical direct
  831. Vion.
  832. XNULL*BLOCK!
  833. XWHICH%0
  834. XMAGICOBJ%%%NULL%%
  835. XNULL*DESCLINE!
  836. XNULL*DESCLINE!
  837. XGRPNAM1%
  838. XGRPNAM2%
  839. XTRAPTO%0
  840. XTRAPCHANCE%0
  841. XDEFAULT*DESCLINE!
  842. XNULL*BLOCK!
  843. XSTART*MDL!
  844. XSHORTMEGA%    1:    0:    0:    0:_direction
  845. XSHORTMEGA%    2:    0:    0:    0:"out"
  846. XSHORTMEGA%    3:    1:    2:    0:=
  847. XSHORTMEGA%    4:    0:    0:    0:GOSUB out
  848. XSHORTMEGA%    5:    0:    0:    0:GOSUB check
  849. XSHORTMEGA%    6:    3:    4:    5:if
  850. XSHORTMEGA%    7:    6:    0:    0:LABEL wrong dir
  851. XSHORTMEGA%    8:    7:    0:    0:-
  852. XSHORTMEGA%    9:    0:    0:    0:"You can't go that way."
  853. XSHORTMEGA%   10:    9:    0:    0:pprint
  854. XSHORTMEGA%   11:   10:    0:    0:LABEL check
  855. XSHORTMEGA%   12:   11:    0:    0:-
  856. XSHORTMEGA%   13:    0:    0:    0:_player name
  857. XSHORTMEGA%   14:    0:    0:    0:" went to the yard."
  858. XSHORTMEGA%   15:   13:   14:    0:+
  859. XSHORTMEGA%   16:   15:    0:    0:oprint
  860. XSHORTMEGA%   17:    0:    0:    0:"yard3"
  861. XSHORTMEGA%   18:   17:    0:    0:pmove
  862. XSHORTMEGA%   19:   16:   18:    0:null
  863. XSHORTMEGA%   20:   19:    0:    0:LABEL out
  864. XSHORTMEGA%   21:   20:    0:    0:-
  865. XRUNNABLE%T
  866. XPRIV%T
  867. XOWNER%#
  868. XCTIME% 8-AUG-1989  6:24am
  869. XSTATLAB%poof out
  870. XRCOUNT%1
  871. XECOUNT%1
  872. XLASTRUN%10-JUN-1992  9:40pm
  873. XSTATLAB%command
  874. XRCOUNT%64
  875. XECOUNT%64
  876. XLASTRUN%26-APR-1992  3:14pm
  877. XSTATLAB%enter
  878. XRCOUNT%384
  879. XECOUNT%384
  880. XLASTRUN%31-MAY-1992  8:14pm
  881. XSTATLAB%escaped
  882. XRCOUNT%347
  883. XECOUNT%347
  884. XLASTRUN%10-JUN-1992  9:40pm
  885. XSTATLAB%leave
  886. XRCOUNT%341
  887. XECOUNT%341
  888. XLASTRUN%31-MAY-1992  8:14pm
  889. XSTATLAB%poof in
  890. XRCOUNT%7
  891. XECOUNT%7
  892. XLASTRUN%10-JUN-1992  9:39pm
  893. XSTATLAB%wrong dir
  894. XRCOUNT%354
  895. XECOUNT%0
  896. XLASTRUN%31-MAY-1992  8:15pm
  897. XSTATLAB%look around
  898. XRCOUNT%433
  899. XECOUNT%433
  900. XLASTRUN%10-JUN-1992  9:39pm
  901. XAUTHOR%pniemi
  902. XWTIME%16-SEP-1989  1:58pm
  903. XNULL*MEGA!
  904. XFLAGS%0
  905. XDEFAULT*BLOCK!
  906. XDEFAULT*BLOCK!
  907. XROOM%etower2
  908. XOWNER%#
  909. XNICENAME%etower2
  910. XNAMEPRINT%0
  911. XSTART*BLOCK!
  912. XBLOCK%The second floor of the eastern tower contains a table and some
  913. XBLOCK%chairs.  They are probably used by the sentries guarding the castle
  914. XBLOCK%at the war time, but now as it is peace there are no guards.
  915. XBLOCK%On the table there is a deck of cards.`032
  916. XBLOCK%
  917. XBLOCK%The ladders continue up and down.  There are also exits to the north t
  918. Vo
  919. XBLOCK%the entrenchment and to the west to the balcony.
  920. XBLOCK%
  921. XBLOCK%There are small windows facing the world outside of the castle as well
  922. XBLOCK%as the yard.
  923. XNULL*BLOCK!
  924. XWHICH%0
  925. XMAGICOBJ%%%NULL%%
  926. XNULL*DESCLINE!
  927. XNULL*DESCLINE!
  928. XGRPNAM1%
  929. XGRPNAM2%
  930. XDETAIL%south
  931. XDESCLINE%
  932. XDETAIL%west
  933. XDESCLINE%
  934. XDETAIL%windows
  935. XDESCLINE%
  936. XDETAIL%east
  937. XDESCLINE%
  938. XTRAPTO%0
  939. XTRAPCHANCE%0
  940. XDEFAULT*DESCLINE!
  941. XNULL*BLOCK!
  942. XSTART*MDL!
  943. XSHORTMEGA%    1:    0:    0:    0:"To the east there is a forrest."
  944. XSHORTMEGA%    2:    1:    0:    0:pprint
  945. XSHORTMEGA%    3:    2:    0:    0:LABEL lookeast
  946. XSHORTMEGA%    4:    3:    0:    0:-
  947. XSTART*MEGA!
  948. XMEGA%    5:    0:    0:    0:"You take a look at the yard; nothing interest
  949. XMEGA%ing there, except the Oak"
  950. XSHORTMEGA%    6:    5:    0:    0:pprint
  951. XSHORTMEGA%    7:    6:    0:    0:LABEL lookwest
  952. XSHORTMEGA%    8:    7:    0:    0:-
  953. XSTART*MEGA!
  954. XMEGA%    9:    0:    0:    0:"The mountains to the south are quite pretty a
  955. XMEGA%t dawn!"
  956. XSHORTMEGA%   10:    9:    0:    0:pprint
  957. XSHORTMEGA%   11:   10:    0:    0:LABEL looksouth
  958. XSHORTMEGA%   12:   11:    0:    0:-
  959. XSHORTMEGA%   13:    0:    0:    0:"Which one?  Look to east/south/west"
  960. XSHORTMEGA%   14:   13:    0:    0:pprint
  961. XSHORTMEGA%   15:   14:    0:    0:LABEL error
  962. XSHORTMEGA%   16:   15:    0:    0:-
  963. XSHORTMEGA%   17:    0:    0:    0:_detail
  964. XSHORTMEGA%   18:    0:    0:    0:"south"
  965. XSHORTMEGA%   19:   17:   18:    0:=
  966. XSHORTMEGA%   20:    0:    0:    0:GOSUB looksouth
  967. XSHORTMEGA%   21:    0:    0:    0:GOSUB error
  968. XSHORTMEGA%   22:   19:   20:   21:if
  969. XSHORTMEGA%   23:   22:    0:    0:LABEL Checks
  970. XSHORTMEGA%   24:   23:    0:    0:-
  971. XSHORTMEGA%   25:    0:    0:    0:_detail
  972. XSHORTMEGA%   26:    0:    0:    0:"west"
  973. XSHORTMEGA%   27:   25:   26:    0:=
  974. XSHORTMEGA%   28:    0:    0:    0:GOSUB lookwest
  975. XSHORTMEGA%   29:    0:    0:    0:GOSUB Checks
  976. XSHORTMEGA%   30:   27:   28:   29:if
  977. XSHORTMEGA%   31:   30:    0:    0:LABEL Checkw
  978. XSHORTMEGA%   32:   31:    0:    0:-
  979. XSHORTMEGA%   33:    0:    0:    0:_detail
  980. XSHORTMEGA%   34:    0:    0:    0:"east"
  981. XSHORTMEGA%   35:   33:   34:    0:=
  982. XSHORTMEGA%   36:    0:    0:    0:GOSUB lookeast
  983. XSHORTMEGA%   37:    0:    0:    0:GOSUB Checkw
  984. XSHORTMEGA%   38:   35:   36:   37:if
  985. XSHORTMEGA%   39:   38:    0:    0:LABEL fuck
  986. XSHORTMEGA%   40:   39:    0:    0:-
  987. XSHORTMEGA%   41:    0:    0:    0:GOSUB fuck
  988. XSHORTMEGA%   42:   41:    0:    0:LABEL look detail
  989. XSHORTMEGA%   43:   42:    0:    0:-
  990. XRUNNABLE%T
  991. XPRIV%F
  992. XOWNER%#
  993. XCTIME% 8-AUG-1989  6:18am
  994. XSTATLAB%escaped
  995. XRCOUNT%1
  996. XECOUNT%1
  997. XLASTRUN%12-JUN-1992  6:06pm
  998. XSTATLAB%poof in
  999. XRCOUNT%8
  1000. XECOUNT%8
  1001. XLASTRUN%12-JUN-1992  6:05pm
  1002. XSTATLAB%say
  1003. XRCOUNT%58
  1004. XECOUNT%58
  1005. XLASTRUN% 4-NOV-1990 11:35pm
  1006. XSTATLAB%poof out
  1007. XRCOUNT%15
  1008. XECOUNT%15
  1009. XLASTRUN%12-JUN-1992  6:06pm
  1010. XSTATLAB%enter
  1011. XRCOUNT%631
  1012. XECOUNT%631
  1013. XLASTRUN%31-MAY-1992  8:08pm
  1014. XSTATLAB%leave
  1015. XRCOUNT%624
  1016. XECOUNT%624
  1017. XLASTRUN%31-MAY-1992  8:08pm
  1018. XSTATLAB%look detail
  1019. XRCOUNT%183
  1020. XECOUNT%0
  1021. XLASTRUN%26-APR-1992  3:09pm
  1022. XSTATLAB%look around
  1023. XRCOUNT%716
  1024. XECOUNT%716
  1025. XLASTRUN%12-JUN-1992  6:05pm
  1026. XAUTHOR%pniemi
  1027. XWTIME%11-AUG-1989 10:00pm
  1028. XNULL*MEGA!
  1029. XFLAGS%0
  1030. XDEFAULT*BLOCK!
  1031. XDEFAULT*BLOCK!
  1032. XROOM%etower3
  1033. XOWNER%
  1034. XNICENAME%etower3
  1035. XNAMEPRINT%0
  1036. XSTART*BLOCK!
  1037. XBLOCK%This is the personal chamber of the lord of the castle, Peter
  1038. XBLOCK%Landgraf v. Klenz. It is sparsely but tastefully furnished: there
  1039. XBLOCK%is a table and a couple of chairs, and on one wall is a small
  1040. XBLOCK%bookshelf. There is also a bed -- it seems the Landgrave hasn't got
  1041. XBLOCK%a separate bedroom. On the wall opposite the bed is a huge
  1042. XBLOCK%fireplace, in which bright flames are dancing.
  1043. XNULL*BLOCK!
  1044. XWHICH%0
  1045. XMAGICOBJ%%%NULL%%
  1046. XOBJHERE%shield of klenz
  1047. XOBJHIDE%0
  1048. XNULL*DESCLINE!
  1049. XNULL*DESCLINE!
  1050. XGRPNAM1%is in the vault.
  1051. XGRPNAM2%
  1052. XDETAIL%table
  1053. XSTART*BLOCK!
  1054. XBLOCK%The table is a rugged thing, made of oak. There are some papers
  1055. XBLOCK%on it, and also a couple of quill pens and a bottle of ink.
  1056. XBLOCK%On one end of the table are a couple of goblets and a somewhat
  1057. XBLOCK%anachronistic bottle of Glenmorangie whisky.
  1058. XDETAIL%bookshelf
  1059. XSTART*BLOCK!
  1060. XBLOCK%As expected, you see the Great Book of Laws of the Universe of Monster
  1061. XBLOCK%on the shelf. Most of the books, however, are about magic. Maybe
  1062. XBLOCK%this is not too surprising: it is natural for the Landgrave to study
  1063. XBLOCK%magic, as there are several magicians around.
  1064. XDETAIL%fireplace
  1065. XSTART*BLOCK!
  1066. XBLOCK%As you look more closely, you see a text engraved in the wall
  1067. XBLOCK%behind the flames:
  1068. XBLOCK%      $ fire <"Pit of Fire" >chimney
  1069. XTRAPTO%0
  1070. XTRAPCHANCE%0
  1071. XDEFAULT*DESCLINE!
  1072. XNULL*BLOCK!
  1073. XNULL*MDL!
  1074. XDEFAULT*BLOCK!
  1075. XDEFAULT*BLOCK!
  1076. XROOM%wtower3
  1077. XOWNER%#
  1078. XNICENAME%wtower3
  1079. XNAMEPRINT%0
  1080. XSTART*BLOCK!
  1081. XBLOCK%You are in a dim hall at the top of wester tower. On the south wall of
  1082. V`032
  1083. XBLOCK%that hall is a little window. There is a long table at the middle of t
  1084. Vhe
  1085. XBLOCK%hall.
  1086. XNULL*BLOCK!
  1087. XWHICH%0
  1088. XMAGICOBJ%%%NULL%%
  1089. XOBJHERE%crystal ball
  1090. XOBJHIDE%0
  1091. XOBJHERE%bottle
  1092. XOBJHIDE%0
  1093. XOBJHERE%wooden wand
  1094. XOBJHIDE%0
  1095. XNULL*DESCLINE!
  1096. XNULL*DESCLINE!
  1097. XGRPNAM1%
  1098. XGRPNAM2%
  1099. XDETAIL%window
  1100. XSTART*BLOCK!
  1101. XBLOCK%The window is little hole in the wall with a wooden window frame.
  1102. XBLOCK%You look out from the window. You see a yard. There is gates to`032
  1103. XBLOCK%the west from the yard.`032
  1104. XDETAIL%table
  1105. XSTART*BLOCK!
  1106. XBLOCK%The wooden table is over five meter long. There is many instruments at
  1107. XBLOCK%the table. You see also the manuscript of the Great Book of Laws of
  1108. XBLOCK%the Universe of Monster at the table.
  1109. XDETAIL%instruments
  1110. XDESCLINE%There is one bottle, one crystal ball and one wand at the table.
  1111. XTRAPTO%0
  1112. XTRAPCHANCE%0
  1113. XDEFAULT*DESCLINE!
  1114. XNULL*BLOCK!
  1115. XNULL*MDL!
  1116. XDEFAULT*BLOCK!
  1117. XDEFAULT*BLOCK!
  1118. XROOM%wtower2
  1119. XOWNER%#
  1120. XNICENAME%wtower2
  1121. XNAMEPRINT%0
  1122. XSTART*BLOCK!
  1123. XBLOCK% As the western tower lies near the gate it is the heart of the
  1124. XBLOCK%defence of the castle.  Armory can be seen here and there  -  there
  1125. XBLOCK%are also exits to the defence entrenchment.  From this place can be`03
  1126. V2
  1127. XBLOCK%obtained the whole countryside in front of the gate. The tiny windows
  1128. XBLOCK%of this floor gives to every main point of the compass.
  1129. XBLOCK%
  1130. XBLOCK%The ladders continues up and down, and there are small doors to the
  1131. XBLOCK%entrenchment to the east and to the gate's machinery room to the
  1132. XBLOCK%south.
  1133. XNULL*BLOCK!
  1134. XWHICH%0
  1135. XMAGICOBJ%%%NULL%%
  1136. XNULL*DESCLINE!
  1137. XNULL*DESCLINE!
  1138. XGRPNAM1%
  1139. XGRPNAM2%
  1140. XTRAPTO%0
  1141. XTRAPCHANCE%0
  1142. XDEFAULT*DESCLINE!
  1143. XNULL*BLOCK!
  1144. XNULL*MDL!
  1145. XDEFAULT*BLOCK!
  1146. XDEFAULT*BLOCK!
  1147. XROOM%wtower1
  1148. XOWNER%#
  1149. XNICENAME%wtower1
  1150. XNAMEPRINT%0
  1151. XSTART*BLOCK!
  1152. XBLOCK%
  1153. XBLOCK%The western tower is not a comforting place.  There are sentries
  1154. XBLOCK%coming and going, their faces like engraved to the stone of the castle
  1155. V.
  1156. XBLOCK%The other reason for the incomfortability is the grating on the floor,
  1157. XBLOCK%leading to the dungeon.  Someone is calling "Elbereth" for his help.
  1158. XBLOCK%Someone has left the lock of the grating open  -  he should be hanged
  1159. XBLOCK%high for such disconcern! `032
  1160. XBLOCK%
  1161. XBLOCK%Wait a minute, what are you thinking about?
  1162. XNULL*BLOCK!
  1163. XWHICH%0
  1164. XMAGICOBJ%%%NULL%%
  1165. XNULL*DESCLINE!
  1166. XNULL*DESCLINE!
  1167. XGRPNAM1%
  1168. XGRPNAM2%
  1169. XTRAPTO%0
  1170. XTRAPCHANCE%0
  1171. XDEFAULT*DESCLINE!
  1172. XNULL*BLOCK!
  1173. XNULL*MDL!
  1174. XDEFAULT*BLOCK!
  1175. XDEFAULT*BLOCK!
  1176. XROOM%stable
  1177. XOWNER%#
  1178. XNICENAME%stable
  1179. XNAMEPRINT%0
  1180. XSTART*BLOCK!
  1181. XBLOCK%The horses in the stable really are worth seeing!  The lord of this
  1182. XBLOCK%castle must enjoy his ridings, as the horses are all mighty, black
  1183. XBLOCK%and strong.  All of them?  No, in the corner there is a white one,
  1184. XBLOCK%carrying his head like being something very special.  It must be
  1185. XBLOCK%Gandalf's, so treat the horse especially well or you will be`032
  1186. XBLOCK%transformed to a frog of the swamp!
  1187. XNULL*BLOCK!
  1188. XWHICH%0
  1189. XMAGICOBJ%%%NULL%%
  1190. XOBJHERE%broom
  1191. XOBJHIDE%0
  1192. XNULL*DESCLINE!
  1193. XNULL*DESCLINE!
  1194. XGRPNAM1%
  1195. XGRPNAM2%
  1196. XTRAPTO%0
  1197. XTRAPCHANCE%0
  1198. XDEFAULT*DESCLINE!
  1199. XNULL*BLOCK!
  1200. XNULL*MDL!
  1201. XDEFAULT*BLOCK!
  1202. XDEFAULT*BLOCK!
  1203. XROOM%bridge
  1204. XOWNER%#
  1205. XNICENAME%bridge
  1206. XNAMEPRINT%0
  1207. XSTART*BLOCK!
  1208. XBLOCK%Now you are stepping on a lift up bridge that leads to the gate of`032
  1209. XBLOCK%the castle.
  1210. XSTART*BLOCK!
  1211. XBLOCK%
  1212. XBLOCK%The gate is to the east.  To the west there is a way of some sort.
  1213. XWHICH%2
  1214. XMAGICOBJ%%%NULL%%
  1215. XNULL*DESCLINE!
  1216. XNULL*DESCLINE!
  1217. XGRPNAM1%
  1218. XGRPNAM2%
  1219. XTRAPTO%0
  1220. XTRAPCHANCE%0
  1221. XDEFAULT*DESCLINE!
  1222. XNULL*BLOCK!
  1223. XNULL*MDL!
  1224. XDEFAULT*BLOCK!
  1225. XDEFAULT*BLOCK!
  1226. XROOM%dungeon
  1227. XOWNER%#
  1228. XNICENAME%dungeon
  1229. XNAMEPRINT%0
  1230. XSTART*BLOCK!
  1231. XBLOCK%
  1232. XBLOCK%  Uh, where am I?
  1233. XBLOCK%
  1234. XBLOCK%  It is damned dark in here, but in the dim light you can obtain a gua
  1235. Vrd
  1236. XBLOCK%abowe you.  The bones here and there tell you their own story about th
  1237. Ve
  1238. XBLOCK%meaning of being here.  Is this the end?
  1239. XNULL*BLOCK!
  1240. XWHICH%0
  1241. XMAGICOBJ%%%NULL%%
  1242. XOBJHERE%dagger
  1243. XOBJHIDE%0
  1244. XOBJHERE%brand of succubus
  1245. XOBJHIDE%0
  1246. XOBJHERE%brand of succubus
  1247. XOBJHIDE%0
  1248. XOBJHERE%brand of succubus
  1249. XOBJHIDE%0
  1250. XNULL*DESCLINE!
  1251. XNULL*DESCLINE!
  1252. XGRPNAM1%
  1253. XGRPNAM2%
  1254. XTRAPTO%0
  1255. XTRAPCHANCE%0
  1256. XDEFAULT*DESCLINE!
  1257. XNULL*BLOCK!
  1258. XNULL*MDL!
  1259. XDEFAULT*BLOCK!
  1260. XDEFAULT*BLOCK!
  1261. XROOM%1st
  1262. XOWNER%#
  1263. XNICENAME%1st
  1264. XNAMEPRINT%0
  1265. XSTART*BLOCK!
  1266. XBLOCK%You are in the moat.  Beware, it is told there had been some kind of
  1267. XBLOCK%monster somewhere here.
  1268. XSTART*BLOCK!
  1269. XBLOCK%
  1270. XBLOCK%The moat continues to the east and to the west.  There is also some
  1271. XBLOCK%sort of tunnel leading down.
  1272. XWHICH%2
  1273. XMAGICOBJ%%%NULL%%
  1274. XNULL*DESCLINE!
  1275. XNULL*DESCLINE!
  1276. XGRPNAM1%
  1277. XGRPNAM2%
  1278. XTRAPTO%0
  1279. XTRAPCHANCE%0
  1280. XDEFAULT*DESCLINE!
  1281. XNULL*BLOCK!
  1282. XNULL*MDL!
  1283. XDEFAULT*BLOCK!
  1284. XDEFAULT*BLOCK!
  1285. XROOM%2st
  1286. XOWNER%#
  1287. XNICENAME%2st
  1288. XNAMEPRINT%0
  1289. XSTART*BLOCK!
  1290. XBLOCK%You are in the moat.  Beware, it is told there had been some kind of
  1291. XBLOCK%monster somewhere here.
  1292. XBLOCK%
  1293. XBLOCK%The moat continues to the north and to the south.
  1294. XNULL*BLOCK!
  1295. XWHICH%0
  1296. XMAGICOBJ%%%NULL%%
  1297. XNULL*DESCLINE!
  1298. XNULL*DESCLINE!
  1299. XGRPNAM1%
  1300. XGRPNAM2%
  1301. XTRAPTO%0
  1302. XTRAPCHANCE%0
  1303. XDEFAULT*DESCLINE!
  1304. XNULL*BLOCK!
  1305. XNULL*MDL!
  1306. XDEFAULT*BLOCK!
  1307. XDEFAULT*BLOCK!
  1308. XROOM%3st
  1309. XOWNER%#
  1310. XNICENAME%3st
  1311. XNAMEPRINT%0
  1312. XSTART*BLOCK!
  1313. XBLOCK%You are in the moat. Beware, it is told there had been some kind of
  1314. XBLOCK%monster somewhere here.
  1315. XBLOCK%
  1316. XBLOCK%The moat continues to the east and to the west.
  1317. XNULL*BLOCK!
  1318. XWHICH%0
  1319. XMAGICOBJ%%%NULL%%
  1320. XNULL*DESCLINE!
  1321. XNULL*DESCLINE!
  1322. XGRPNAM1%
  1323. XGRPNAM2%
  1324. XTRAPTO%0
  1325. XTRAPCHANCE%0
  1326. XDEFAULT*DESCLINE!
  1327. XNULL*BLOCK!
  1328. XNULL*MDL!
  1329. XDEFAULT*BLOCK!
  1330. XDEFAULT*BLOCK!
  1331. XROOM%4st
  1332. XOWNER%#
  1333. XNICENAME%4st
  1334. XNAMEPRINT%0
  1335. XSTART*BLOCK!
  1336. XBLOCK%You are in the moat. Beware, it is told there had been some kind of
  1337. XBLOCK%monster somewhere here.
  1338. XBLOCK%
  1339. XBLOCK%The moat continues to the north and to the south.
  1340. XNULL*BLOCK!
  1341. XWHICH%0
  1342. XMAGICOBJ%%%NULL%%
  1343. XNULL*DESCLINE!
  1344. XNULL*DESCLINE!
  1345. XGRPNAM1%
  1346. XGRPNAM2%
  1347. XTRAPTO%0
  1348. XTRAPCHANCE%0
  1349. XDEFAULT*DESCLINE!
  1350. XNULL*BLOCK!
  1351. XNULL*MDL!
  1352. XDEFAULT*BLOCK!
  1353. XDEFAULT*BLOCK!
  1354. XROOM%gate
  1355. XOWNER%#
  1356. XNICENAME%gate
  1357. XNAMEPRINT%0
  1358. XSTART*BLOCK!
  1359. XBLOCK%The great gate in front of you controls the passage in and out of the
  1360. XBLOCK%castle.  In the war time it is always kept closed, but now, as the
  1361. XBLOCK%age of peace is here, it is just merely guarded.  It is still quite
  1362. XBLOCK%hard to get out of this place, as the guard on the gate is not easy
  1363. XBLOCK%to bribe.
  1364. XSTART*BLOCK!
  1365. XBLOCK%
  1366. XBLOCK%The bridge leading out of the castle is to the west; to the east there
  1367. V is
  1368. XBLOCK%the yard of the castle.
  1369. XWHICH%2
  1370. XMAGICOBJ%%%NULL%%
  1371. XNULL*DESCLINE!
  1372. XNULL*DESCLINE!
  1373. XGRPNAM1%in the yard.
  1374. XGRPNAM2%on the bridge.
  1375. XTRAPTO%0
  1376. XTRAPCHANCE%0
  1377. XDEFAULT*DESCLINE!
  1378. XNULL*BLOCK!
  1379. XNULL*MDL!
  1380. XDEFAULT*BLOCK!
  1381. XDEFAULT*BLOCK!
  1382. XROOM%home
  1383. XOWNER%#
  1384. XNICENAME%Home
  1385. XNAMEPRINT%0
  1386. XSTART*BLOCK!
  1387. XBLOCK%This is the home of Gandalf, the old wizard.  In this very room he has
  1388. XBLOCK%made things not spoken aloud but seen in many places.  Actually, Ganda
  1389. Vlf`032
  1390. XBLOCK%made this very room to be his study and wants just a few visitors, if
  1391. V any.
  1392. XBLOCK%
  1393. XBLOCK%The walls are covered with shelves full of books of magic.  The books
  1394. XBLOCK%cover creation of monsters and evil objects, spirit of planning and
  1395. XBLOCK%almost everything beyond the knowledge of an ordinary mortal.
  1396. XBLOCK%
  1397. XBLOCK%It is told that the old Gandalf might have a delicate sense of humor,
  1398. XBLOCK%but also capability for frantic rage.  If you ever happen to meet him,
  1399. XSTART*BLOCK!
  1400. XBLOCK%think twice before arquing with him  -  you never can tell whether he
  1401. V is
  1402. XBLOCK%in a good mood or not...
  1403. XBLOCK%
  1404. XBLOCK%It is also told the old Gandalf had always some evil ideas in his mind
  1405. XBLOCK%against those who annoy him...
  1406. XBLOCK%
  1407. XBLOCK%Beware, mortal!
  1408. XWHICH%2
  1409. XMAGICOBJ%%%NULL%%
  1410. XOBJHERE%sargofague
  1411. XOBJHIDE%0
  1412. XNULL*DESCLINE!
  1413. XDESCLINE%against those who annoy him...
  1414. XGRPNAM1%
  1415. XGRPNAM2%
  1416. XTRAPTO%0
  1417. XTRAPCHANCE%0
  1418. XDEFAULT*DESCLINE!
  1419. XNULL*BLOCK!
  1420. XSTART*MDL!
  1421. XSHORTMEGA%    1:    0:    0:    0:_player name
  1422. XSHORTMEGA%    2:    0:    0:    0:"Gandalf"
  1423. XSHORTMEGA%    3:    1:    2:    0:=
  1424. XSHORTMEGA%    4:    0:    0:    0:"Welcome, master."
  1425. XSHORTMEGA%    5:    4:    0:    0:pprint
  1426. XSHORTMEGA%    6:    0:    0:    0:"Gandalf nods at you and says:"
  1427. XSHORTMEGA%    7:    6:    0:    0:pprint
  1428. XSHORTMEGA%    8:    0:    0:    0:"''Welcome, guest of Gandalf.''"
  1429. XSHORTMEGA%    9:    8:    0:    0:pprint
  1430. XSHORTMEGA%   10:    7:    9:    0:null
  1431. XSHORTMEGA%   11:    3:    5:   10:if
  1432. XSHORTMEGA%   12:   11:    0:    0:LABEL greed
  1433. XSHORTMEGA%   13:   12:    0:    0:-
  1434. XSHORTMEGA%   14:    0:    0:    0:"Gandalf: ''Intruder!''"
  1435. XSHORTMEGA%   15:   14:    0:    0:pprint
  1436. XSHORTMEGA%   16:    0:    0:    0:" "
  1437. XSHORTMEGA%   17:   16:    0:    0:pprint
  1438. XSTART*MEGA!
  1439. XMEGA%   18:    0:    0:    0:"Gandalf extends his wand and lets the power o
  1440. XMEGA%f it to grow into its rage.  You feel a burst of pure energy going str
  1441. XMEGA%aight through you.  The last thing you hear is Gandalf's evil laugh...
  1442. XMEGA%"
  1443. XSHORTMEGA%   19:   18:    0:    0:pprint
  1444. XSHORTMEGA%   20:   15:   17:   19:null
  1445. XSHORTMEGA%   21:    0:    0:    0:" "
  1446. XSHORTMEGA%   22:   21:    0:    0:pprint
  1447. XSHORTMEGA%   23:    0:    0:    0:"15"
  1448. XSHORTMEGA%   24:   23:    0:    0:attack
  1449. XSHORTMEGA%   25:    0:    0:    0:"yard1"
  1450. XSHORTMEGA%   26:   25:    0:    0:pmove
  1451. XSHORTMEGA%   27:   22:   24:   26:null
  1452. XSHORTMEGA%   28:   20:   27:    0:null
  1453. XSHORTMEGA%   29:   28:    0:    0:LABEL throw out
  1454. XSHORTMEGA%   30:   29:    0:    0:-
  1455. XSHORTMEGA%   31:    0:    0:    0:_player name
  1456. XSHORTMEGA%   32:    0:    0:    0:get state
  1457. XSHORTMEGA%   33:   31:   32:    0:and
  1458. XSHORTMEGA%   34:   33:    0:    0:not
  1459. XSHORTMEGA%   35:    0:    0:    0:get state
  1460. XSHORTMEGA%   36:    0:    0:    0:_player name
  1461. XSHORTMEGA%   37:   35:   36:    0:or
  1462. XSHORTMEGA%   38:   37:    0:    0:set state
  1463. XSHORTMEGA%   39:   34:   38:    0:if
  1464. XSHORTMEGA%   40:    0:    0:    0:_player name
  1465. XSHORTMEGA%   41:    0:    0:    0:"R2D2"
  1466. XSHORTMEGA%   42:   41:    0:    0:get remote state
  1467. XSHORTMEGA%   43:   40:   42:    0:and
  1468. XSHORTMEGA%   44:    0:    0:    0:GOSUB greed
  1469. XSHORTMEGA%   45:    0:    0:    0:GOSUB throw out
  1470. XSHORTMEGA%   46:   43:   44:   45:if
  1471. XSHORTMEGA%   47:   39:   46:    0:null
  1472. XSHORTMEGA%   48:   47:    0:    0:LABEL check
  1473. XSHORTMEGA%   49:   48:    0:    0:-
  1474. XSHORTMEGA%   50:    0:    0:    0:_player name
  1475. XSHORTMEGA%   51:    0:    0:    0:"Gandalf"
  1476. XSHORTMEGA%   52:   50:   51:    0:=
  1477. XSHORTMEGA%   53:    0:    0:    0:_command
  1478. XSHORTMEGA%   54:    0:    0:    0:"dump"
  1479. XSHORTMEGA%   55:   53:   54:    0:=
  1480. XSHORTMEGA%   56:    0:    0:    0:"Visitors:"
  1481. XSHORTMEGA%   57:    0:    0:    0:get state
  1482. XSHORTMEGA%   58:   56:   57:    0:+
  1483. XSHORTMEGA%   59:   58:    0:    0:pprint
  1484. XSHORTMEGA%   60:    0:    0:    0:_command
  1485. XSHORTMEGA%   61:    0:    0:    0:"empty"
  1486. XSHORTMEGA%   62:   60:   61:    0:=
  1487. XSHORTMEGA%   63:    0:    0:    0:" "
  1488. XSHORTMEGA%   64:   63:    0:    0:set state
  1489. XSHORTMEGA%   65:   62:   64:    0:if
  1490. XSHORTMEGA%   66:   55:   59:   65:if
  1491. XSHORTMEGA%   67:   52:   66:    0:if
  1492. XSHORTMEGA%   68:   67:    0:    0:LABEL checkC
  1493. XSHORTMEGA%   69:   68:    0:    0:-
  1494. XSHORTMEGA%   70:    0:    0:    0:GOSUB checkC
  1495. XSHORTMEGA%   71:   70:    0:    0:LABEL command
  1496. XSHORTMEGA%   72:   71:    0:    0:-
  1497. XSHORTMEGA%   73:    0:    0:    0:GOSUB check
  1498. XSHORTMEGA%   74:   73:    0:    0:LABEL poof in
  1499. XSHORTMEGA%   75:   74:    0:    0:LABEL enter
  1500. XSHORTMEGA%   76:   75:    0:    0:LABEL start
  1501. XSHORTMEGA%   77:   76:    0:    0:-
  1502. XRUNNABLE%F
  1503. XPRIV%T
  1504. XOWNER%#
  1505. XCTIME%14-AUG-1989  8:49pm
  1506. XSTATLAB%enter
  1507. XRCOUNT%1
  1508. XECOUNT%0
  1509. XLASTRUN% 2-MAR-1990  2:48am
  1510. XSTATLAB%command
  1511. XRCOUNT%12
  1512. XECOUNT%0
  1513. XLASTRUN%22-FEB-1990  1:04am
  1514. XSTATLAB%say
  1515. XRCOUNT%7
  1516. XECOUNT%7
  1517. XLASTRUN%26-SEP-1989 10:17am
  1518. XSTATLAB%start
  1519. XRCOUNT%89
  1520. XECOUNT%0
  1521. XLASTRUN% 2-MAR-1990  2:45am
  1522. XSTATLAB%poof in
  1523. XRCOUNT%61
  1524. XECOUNT%0
  1525. XLASTRUN%22-FEB-1990  1:04am
  1526. XSTATLAB%look around
  1527. XRCOUNT%174
  1528. XECOUNT%174
  1529. XLASTRUN% 2-MAR-1990  2:49am
  1530. XSTATLAB%escaped
  1531. XRCOUNT%61
  1532. XECOUNT%61
  1533. XLASTRUN% 2-MAR-1990  2:45am
  1534. XSTATLAB%poof out
  1535. XRCOUNT%61
  1536. XECOUNT%61
  1537. XLASTRUN% 2-MAR-1990  2:45am
  1538. XAUTHOR%pniemi
  1539. XWTIME%18-SEP-1989  1:39am
  1540. XSTART*MEGA!
  1541. XMEGA%Gandalf, Pen, Merlin, Azure the Lich, Goodgulf, Timothy the Thinker, p
  1542. XMEGA%, Monster Manager, Debugger, Asmodeus, Co-Pilot
  1543. XFLAGS%0
  1544. XDEFAULT*BLOCK!
  1545. XDEFAULT*BLOCK!
  1546. XROOM%home of merlin
  1547. XOWNER%#
  1548. XNICENAME%home of Merlin
  1549. XNAMEPRINT%3
  1550. XDESCLINE%A crystal ball is in the middle of the table.
  1551. XNULL*BLOCK!
  1552. XWHICH%0
  1553. XMAGICOBJ%%%NULL%%
  1554. XOBJHERE%crystal ball
  1555. XOBJHIDE%0
  1556. XOBJHERE%neutron handgrenade
  1557. XOBJHIDE%0
  1558. XOBJHERE%neutron handgrenade
  1559. XOBJHIDE%0
  1560. XNULL*DESCLINE!
  1561. XNULL*DESCLINE!
  1562. XGRPNAM1%
  1563. XGRPNAM2%
  1564. XTRAPTO%0
  1565. XTRAPCHANCE%0
  1566. XNULL*DESCLINE!
  1567. XNULL*BLOCK!
  1568. XSTART*MDL!
  1569. XSHORTMEGA%1:0:0:0:! Brief guarding for home of Merlin
  1570. XSHORTMEGA%2:0:0:0:"Voice says: Welcome to the home of Merlin."
  1571. XSHORTMEGA%-3:2:0:0:16
  1572. XSHORTMEGA%H6:1:3:Welcome
  1573. XSHORTMEGA%5:4:0:0:-
  1574. XSHORTMEGA%J4:0
  1575. XSHORTMEGA%7:0:0:0:_player name
  1576. XSHORTMEGA%8:0:0:0:"wizard"
  1577. XSHORTMEGA%-9:7:8:0:61
  1578. XSHORTMEGA%10:0:0:0:""
  1579. XSHORTMEGA%-11:0:0:0:4
  1580. XSHORTMEGA%-12:0:0:0:36
  1581. XSHORTMEGA%-13:11:12:0:12
  1582. XSHORTMEGA%-14:13:0:0:37
  1583. XSHORTMEGA%-15:9:10:14:22
  1584. XSHORTMEGA%H6:2:6:15:enter
  1585. XSHORTMEGA%17:16:0:0:-
  1586. XSHORTMEGA%H6:1:6:start
  1587. XSHORTMEGA%19:18:0:0:-
  1588. XSHORTMEGA%H6:0:escaped
  1589. XSHORTMEGA%21:20:0:0:-
  1590. XSHORTMEGA%-22:11:12:0:45
  1591. XSHORTMEGA%H5:1:22:items
  1592. XSHORTMEGA%24:0:0:0:_items
  1593. XSHORTMEGA%-25:24:0:0:10
  1594. XSHORTMEGA%H5:1:25:items
  1595. XSHORTMEGA%27:0:0:0:"You drop"
  1596. XSHORTMEGA%-28:27:24:0:15
  1597. XSHORTMEGA%-29:24:28:0:22
  1598. XSHORTMEGA%30:0:0:0:"drops"
  1599. XSHORTMEGA%-31:7:30:24:17
  1600. XSHORTMEGA%-32:24:31:0:22
  1601. XSHORTMEGA%-33:12:11:0:45
  1602. XSHORTMEGA%-34:33:0:0:37
  1603. XSHORTMEGA%-35:23:26:29:72:         2:32:34
  1604. XSHORTMEGA%-36:9:10:35:22
  1605. XSHORTMEGA%H4:1:36:items
  1606. XSHORTMEGA%H6:1:37:leave
  1607. XSHORTMEGA%39:38:0:0:-
  1608. XSHORTMEGA%H6:1:6:poof in
  1609. XSHORTMEGA%41:40:0:0:-
  1610. XSHORTMEGA%H6:0:poof out
  1611. XSHORTMEGA%43:42:0:0:-
  1612. XSHORTMEGA%H6:0:say
  1613. XSHORTMEGA%45:44:0:0:-
  1614. XSHORTMEGA%H6:0:look detail
  1615. XSHORTMEGA%47:46:0:0:-
  1616. XSHORTMEGA%H6:0:look around
  1617. XSHORTMEGA%49:48:0:0:-
  1618. XSHORTMEGA%50:0:0:0:_command
  1619. XSHORTMEGA%51:0:0:0:"status"
  1620. XSHORTMEGA%-52:50:51:0:2
  1621. XSHORTMEGA%53:0:0:0:"Status: "
  1622. XSHORTMEGA%-54:53:12:0:15
  1623. XSHORTMEGA%55:0:0:0:"You can't "
  1624. XSHORTMEGA%-56:55:50:0:15
  1625. XSHORTMEGA%-57:52:54:56:22
  1626. XSHORTMEGA%H6:1:57:command
  1627. XSHORTMEGA%59:58:0:0:-
  1628. XSHORTMEGA%60:0:0:0:_direction
  1629. XSHORTMEGA%-61:60:0:0:71
  1630. XSHORTMEGA%H5:1:61:direction
  1631. XSHORTMEGA%-63:61:62:0:22
  1632. XSHORTMEGA%64:0:0:0:"You can't go "
  1633. XSHORTMEGA%-65:64:60:0:15
  1634. XSHORTMEGA%H6:2:63:65:wrong dir
  1635. XSHORTMEGA%67:66:0:0:-
  1636. XRUNNABLE%T
  1637. XPRIV%F
  1638. XOWNER%#
  1639. XCTIME%30-SEP-1989  9:46am
  1640. XSTATLAB%escaped
  1641. XRCOUNT%1
  1642. XECOUNT%0
  1643. XLASTRUN%13-JUN-1992  3:38pm
  1644. XSTATLAB%poof out
  1645. XRCOUNT%1
  1646. XECOUNT%0
  1647. XLASTRUN%13-JUN-1992  3:38pm
  1648. XSTATLAB%command
  1649. XRCOUNT%1
  1650. XECOUNT%0
  1651. XLASTRUN%13-JUN-1992  3:37pm
  1652. XAUTHOR%hurtta
  1653. XWTIME%13-JUN-1992  3:37pm
  1654. XNULL*MEGA!
  1655. XFLAGS%0
  1656. XDEFAULT*BLOCK!
  1657. XDEFAULT*BLOCK!
  1658. XROOM%treasury
  1659. XOWNER%#
  1660. XNICENAME%treasury
  1661. XNAMEPRINT%0
  1662. XSTART*BLOCK!
  1663. XBLOCK%You have just entered the castle treasury.
  1664. XBLOCK%
  1665. XBLOCK%The shimmering of all the gold lying around you almost makes        `0
  1666. V32
  1667. XBLOCK%you blind.  It's all yours, but beware: greediness is worth loosing
  1668. XBLOCK%one's head.
  1669. XBLOCK%
  1670. XDESCLINE%The ladders continue up.
  1671. XWHICH%2
  1672. XMAGICOBJ%%%NULL%%
  1673. XOBJHERE%gold sack
  1674. XOBJHIDE%0
  1675. XOBJHERE%gold sack
  1676. XOBJHIDE%0
  1677. XOBJHERE%gold sack
  1678. XOBJHIDE%0
  1679. XOBJHERE%gold sack
  1680. XOBJHIDE%0
  1681. XOBJHERE%gold sack
  1682. XOBJHIDE%0
  1683. XOBJHERE%gold sack
  1684. XOBJHIDE%0
  1685. XOBJHERE%gold sack
  1686. XOBJHIDE%0
  1687. XNULL*DESCLINE!
  1688. XNULL*DESCLINE!
  1689. XGRPNAM1%
  1690. XGRPNAM2%
  1691. XTRAPTO%0
  1692. XTRAPCHANCE%0
  1693. XDEFAULT*DESCLINE!
  1694. XNULL*BLOCK!
  1695. XNULL*MDL!
  1696. XDEFAULT*BLOCK!
  1697. XDEFAULT*BLOCK!
  1698. XROOM%over gate
  1699. XOWNER%#
  1700. XNICENAME%over gate
  1701. XNAMEPRINT%0
  1702. XSTART*BLOCK!
  1703. XBLOCK%  Watch your step  -  the architect was a bit drunk while planning thi
  1704. Vs
  1705. XBLOCK%castle so there is one little mistake in the design: if someone wants
  1706. V to`032
  1707. +-+-+-+-+-+-+-+-  END  OF PART 2 +-+-+-+-+-+-+-+-
  1708.