home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 8 / amigaformatcd08.iso / screenplay / utilities / graal / 2.room < prev    next >
Text File  |  1996-10-15  |  16KB  |  333 lines
  1. /*                       This is a room file for GRAAL
  2. /*
  3. /*                                   2.room
  4. /*
  5. /*                   describing the street outside the bar
  6. /*
  7. /* Room flags: 2=1,3=1 if Olaf has read all Motel signs
  8. /*             4=1 if Olaf has obtained proper information from Guide Book
  9. /*                 to want a camel.
  10. /*             4=2 Olaf is now allowed to buy camel
  11. /*             4=3 Camel bought
  12. /*             4=4 Camel willing to go
  13. /*             5=1 Shop keeper has opened!
  14. /*             6=1 Weather conditions
  15.  
  16. SECTION: 1
  17.  
  18. UPDATE: 6;2
  19.  
  20. BG_IFF: 2BG.IFF
  21.  
  22. START_POS: 1;$800D;456;101;R;3
  23. START_POS: 2;14;10;115;L;1
  24.  
  25. FLOOR: 1;0;111;479;119;1-1/2-2/3-3/4-4
  26. FLOOR: 2;233;91;252;119;1-1/2-2/3-1/4-4
  27. FLOOR: 3;452;96;462;119;1-1/2-1/3-3/4-4
  28. FLOOR: 4;143;106;462;119;1-1/2-2/3-3/4-4
  29.  
  30. EXIT: 1;454;58;462;98;455;102;Last Bar in\Constantinople
  31. EXIT: 2;0;0;30;119;8;115;harbour
  32.  
  33. CLPART: 2FG.IFF
  34.  
  35. /* 1-5 is nomad
  36. ROOMBOBS: 5;1;1;1;21;28;22;0
  37. /* 6 Shop window notice
  38. ROOMBOBS: 1;6;111;1;13;13;0;0
  39. /* 7 Camel
  40. ROOMBOBS: 1;7;8;35;48;31;0;0
  41. /* 8 Shop window
  42. ROOMBOBS: 1;8;127;2;11;22;0;0
  43. /* 9-10 Camel
  44. ROOMBOBS: 2;9;58;35;48;31;50;0
  45. /* 11 Big Motel Sign
  46. ROOMBOBS: 1;11;139;0;46;19;0;0
  47. /* 12 Small Motel Sign
  48. ROOMBOBS: 1;12;185;0;13;10;0;0
  49. /* 13 No Vacancies Sign
  50. ROOMBOBS: 1;13;185;9;13;10;0;0
  51. /* 14-16 Bell
  52. ROOMBOBS: 3;14;202;1;6;23;10;0
  53. /* 17 Shop door
  54. ROOMBOBS: 1;17;232;0;23;38;0;0
  55. /* 18 Motel door
  56. ROOMBOBS: 1;18;262;0;24;38;0;0
  57. /* 19 Curtain
  58. ROOMBOBS: 1;19;166;27;39;15;0;0
  59. /* 20-25 Curtain being opened
  60. ROOMBOBS: 1;20;168;44;37;15;0;0
  61. ROOMBOBS: 1;21;168;44;31;15;0;0
  62. ROOMBOBS: 1;22;168;44;25;15;0;0
  63. ROOMBOBS: 1;23;168;44;19;15;0;0
  64. ROOMBOBS: 1;24;168;44;13;15;0;0
  65. ROOMBOBS: 1;25;168;44;7;15;0;0
  66. /* 26 Piece of wall to hide emerging shopkeeper
  67. ROOMBOBS: 1;26;230;40;19;23;0;0
  68. /* 27-35 Shopkeeper 27-29 walking, 30-32 talking, 33 Stretching out, 34-35 Shelf
  69. ROOMBOBS: 9;27;0;79;19;19;20;0
  70. /* 36 Nomad receiving something
  71. ROOMBOBS: 1;36;229;70;21;28;0;0
  72. /* 37 Camel opening mouth
  73. ROOMBOBS: 1;37;8;105;48;31;0;0
  74.  
  75. ROOMOBJ: 1;big\sign;2;VIS;55;RBOB11;176;62;2;48;12; ;NPICK;0;8;0;MID;WD;a;this;it
  76. ROOMOBJ: 2;notice;2;VIS;58;RBOB6;387;86;10;20;$800E; ;NPICK;0;8;0;MID;WD;a;this;it
  77. ROOMOBJ: 3;small\sign;2;VIS;54;RBOB12;156;79;7;30;12; ;NPICK;0;8;0;MID;WD;a;this;it
  78. ROOMOBJ: 4;additional\sign;2;VIS;53;RBOB13;156;91;7;20;12; ;NPICK;0;8;0;MID;WD;a;this;it
  79. ROOMOBJ: 5;window;2;VIS;56;RBOB8;284;88;-5;16;12; ;NPICK;0;8;0;MID;-;a;this;it
  80. ROOMOBJ: 6;bell;2;VIS;52;RBOB14;430;91;-10;10;14; ;NPICK;0;8;0;MID;TD;a;this;it
  81. ROOMOBJ: 7;door;2;VIS;40;RBOB17;349;103;0;-5;12; ;NPICK;0;8;0;MID;DW;a;this;it
  82. ROOMOBJ: 8;door;2;VIS;39;RBOB18;177;104;0;-5;12; ;NPICK;0;8;0;MID;DW;a;this;it
  83. ROOMOBJ: 9;curtain;2;VIS;38;RBOB19;400;83;0;-20;12; ;NPICK;0;8;0;HIGH;D;a;this;it
  84.  
  85.  
  86.  
  87. /* The below relates to the state of the harbour
  88. /* No sign should be out if not one of the below conditions are fulfilled.
  89. DACT: SETRF 3,7=0
  90. /* If shop has been visited once, put out sign 1 in harbour
  91. DACT: IFRF 4,1=1;SETRF 3,7=1
  92. /* If shop has been visited twice, put out sign 2 in harbour
  93. DACT: IFRF 4,1=2;SETRF 3,7=2
  94.  
  95. /* Check the weather, alter the sky and take in the notice.
  96. DACT: IFRF 6=1;COLOUR DLY,23,$678;HIDE ROBJ2
  97.  
  98. /* Check if bell has called upon shopkeeper yet
  99. DACT: IFRF 5=1;HIDE ROBJ9;SHOW 2,394,86,RBOB30
  100.  
  101. /* Lights! Camera! Action!
  102. DACT: TRACK NO;LIGHTS ON
  103.  
  104.  
  105.  
  106. /* Nomad dialogue
  107. LINE: 2;1;Well, goodbye.; ; 
  108. LACT: 2;1;RESP R,2,May Allah guide you safely on your journey, effendi.;EDLG;EXIT
  109. /*
  110. LINE: 2;2;You haven't seen a salt merchant from Medina around here?; ;IFOF 2=1
  111. LACT: 2;2;RESP R,2,I am sorry, no, effendi.;W 25;RESP R,2,I and Marlboro just come to town from long way East. ;DSET 2,+3,+4,+7,N2,N6
  112. /*
  113. LINE: 2;3;Excuse me - Who is Marlboro?; ; 
  114. LACT: 2;3;RESP R,2,Is my camel...;DSET 2,N3
  115. /*
  116. LINE: 2;4;Are you really SURE you haven't seen a salt merchant?; ; 
  117. LACT: 2;4;RESP R,2,Hmm...;W 25;RESP R,2,What does salt merchant look like?;DSET 2,S1,+5,+11,+12
  118. /*
  119. LINE: 2;5;Well... uh... Rather thirsty?; ; 
  120. LACT: 2;5;RESP R,2,I am sorry, effendi. No thirsty person come here.;W 25;RESP R,2,Believe me...;W 25;RESP R,2,Me and Marlboro expert on thirsty!;DSET 2,R1
  121. /*
  122. LINE: 2;6;Er... Nice day, isn't it?; ; 
  123. LACT: 2;6;RESP R,2,So it is, effendi.;DSET 2,N6
  124. /*
  125. LINE: 2;7;So, did you get a room at the motel?; ;IFRF 2=1;IFRF 3=1
  126. LACT: 2;7;RESP R,2,No such luck, effendi.;RESP R,2,Motel already full, and now I don't know how I do.;RESP R,2,No other place in town accept camels!;ADDRF 0,20,1;DSET 2,+8,N7
  127. /*
  128. LINE: 2;8;I guess I could use a camel to get me out of here.; ;IFRF 4=1
  129. LACT: 2;8;RESP R,2,Hmm...;RESP R,2,Yes, why not? I will not need one for a while.;RESP R,2,20 gold pieces, and it is yours!;SETRF 4=2;DSET 2,E,+9,+10
  130. /*
  131. LINE: 2;9;Wait here, will you? I will be back.; ; 
  132. LACT: 2;9;RESP R,2,I be here. I have nowhere else to go, effendi.;EDLG;EXIT
  133. /*
  134. LINE: 2;10;OK, we have a deal. Here is 20 gold pieces for the camel.; ;IFCARR SOBJ5
  135. LACT: 2;10;HANDLE;W 12;SHOW 9, , ,RBOB36;W 50;HANDLE -1;W 12;SHOW 9, , ,DEF;REMOVE SOBJ5,N,0
  136. LACT: 2;10;RESP R,2,Excellent.;RESP R,2,May he serve you well, effendi!;ADDRF 0,20,1;SETRF 4=3;EDLG;EXIT
  137. /*
  138. LINE: 2;11;Like he's just won big in a game of dice, probably.; ; 
  139. LACT: 2;11;RESP R,2,Hmmm...;RESP R,2,...no.;RESP R,2,Have not seen man like that.;DSET 2,R1
  140. /*
  141. LINE: 2;12;Like a man from Medina - that is where he comes from.; ; 
  142. LACT: 2;12;RESP R,2,Hmm...;RESP R,2,To my knowledge, fashion in Medina not so different from other places.;RESP R,2,How to know he is from Medina, do you mean?;DSET 2,E,+13,+14
  143. /*
  144. LINE: 2;13;Don't they have these special little buttons...; ; 
  145. LACT: 2;13;RESP R,2,I now think the heat may be affecting your brain, effendi.;DSET 2,R1
  146. /*
  147. LINE: 2;14;Oh, I don't know. Forget it.; ; 
  148. LACT: 2;14;RESP R,2,Well, nothing much to remember really, effendi!;DSET 2,L,R1;EDLG;EXIT
  149. /*
  150. LINE: 2;15;Could you please help me with this camel of yours?; ; 
  151. LACT: 2;15;RESP R,2,Is not my camel no longer, effendi!;DSET 2,N15
  152. /*
  153. LINE: 2;16;What is wrong with the animal?; ; 
  154. LACT: 2;16;RESP R,2,You must understand, effendi...;RESP R,2,...Marlboro is very like human.;RESP R,2,Sometimes happy, sometimes not.;RESP R,2,Sometimes needs cheering up!;DSET 2,N16,+18
  155. /*
  156. LINE: 2;17;On second thoughts, forget it.; ; 
  157. LACT: 2;17;RESP R,2,It has completely left my mind even as we speak, effendi.;EDLG;EXIT
  158. /*
  159. LINE: 2;18;What would you suggest to cheer him up, then?; ; 
  160. LACT: 2;18;RESP R,2,I have no idea, effendi;RESP R,2,I have had him for five years...;RESP R,2,...and have not found anything yet, I'm afraid!;DSET 2,N18,+19
  161. /*
  162. LINE: 2;19;Very well, I'll think of something, I guess.; ; 
  163. LACT: 2;19;RESP R,2,I can only wish you the best of luck, effendi!;EDLG;EXIT
  164.  
  165. /* Pawn shop dialogue
  166. LINE: 5;1;About time you showed up!; ; 
  167. LACT: 5;1;RESP R,5,Oh? Well, I never work during a heat wave...;RESP R,5,...and only fools do business during one!;DSET 5,N1
  168. /*
  169. LINE: 5;2;I don't know what I want, really. Give me a clue.; ; 
  170. LACT: 5;2;RESP R,5,I am not a fortune teller. Now, get to the point!;DSET 5,N2
  171. /*
  172. LINE: 5;3;Exactly what is this shop of yours?; ; 
  173. LACT: 5;3;RESP R,5,This is the one and only pawnshop in Constantinople.;RESP R,5,Are you buying or selling?;DSET 5,N1,N2,N3,N12,+4,+5,+13
  174. /*
  175. LINE: 5;4;I'm always on the lookout for nice things.;What I really want is something completely different.; 
  176. LACT: 5;4;RESP R,5,Well, what do you want then?;DSET 5,S1,+6,+7,+8
  177. /*
  178. LINE: 5;5;I guess I'm selling.;I have another very interesting item for you!; 
  179. LACT: 5;5;RESP R,5,Let me hear what you have to offer.;DSET 5,S1,+9,+10,+11,+14,+15
  180. /*
  181. LINE: 5;6;Some information - that's what!; ; 
  182. LACT: 5;6;RESP R,5,What? Have you ever heard of a pawn shop dealing in information???;DSET 5,R1
  183. /*
  184. LINE: 5;7;A first-class ticket for a caravan to Jerusalem.; ; 
  185. LACT: 5;7;RESP R,5,Oh, you are too late - I sold the last one I had yesterday!;DSET 5,R1
  186. /*
  187. LINE: 5;8;Some mead? A map? A camel? A llama?; ; 
  188. LACT: 5;8;RESP R,5,Nope! Nope! Nope! Nope! Nothing like that here, I'm afraid!;DSET 5,R1
  189. /*
  190. LINE: 5;9;Give me a good deal on this fine knife.; ; 
  191. LACT: 5;9;HANDLE;SHOW 2, , ,RBOB33;W 50;RESP R,5,No more knives. I have enough to last me a lifetime already.;SHOW 2, , ,RBOB30;HANDLE -1;DSET 5,R1
  192. /*
  193. LINE: 5;10;You simply must have this totally amazing wrapping paper!; ; 
  194. LACT: 5;10;HANDLE;SHOW 2, , ,RBOB33;W 50;RESP R,5,No, I certainly must not!;HANDLE -1;DSET 5,R1
  195. /*
  196. LINE: 5;11;How about this wooden flute?;There is something you don't know about the flute.; 
  197. LACT: 5;11;IFOF 1=1;RESP R,5,Oh yes? Like what?
  198. LACT: 5;11;IFOF 1=0;SETOF 1=1;HANDLE;SHOW 2, , ,RBOB33;W 50;RESP R,5,It doesn't seem that valuable to me.;HANDLE -1
  199. LACT: 5;11;DSET 5,E,+16,+17,+18,+19
  200. /*
  201. LINE: 5;12;Oh, I forgot something. I will be with you shortly!; ; 
  202. LACT: 5;12;RESP R,5,I will be here - provided that awful heat doesn't return.;EDLG;EXIT
  203. /*
  204. LINE: 5;13;I have to go away and think about this some more. Sorry!;Seems I need to think some more - au revoir!; 
  205. LACT: 5;13;RESP R,5,Take your time!;EDLG;EXIT
  206. /*
  207. LINE: 5;14;I have this rare, exotic bird's feather.; ; 
  208. LACT: 5;14;HANDLE;SHOW 2, , ,RBOB33;W 50;RESP R,5,Who are you trying to kid? This is nothing but an ordinary seabird feather!;RESP R,5,I could pick these out on the pier myself, by the hundreds!;HANDLE -1;DSET 5,R1
  209. /*
  210. LINE: 5;15;I think this cup of fine mead is right up your alley.; ;IFCARR SOBJ3
  211. LACT: 5;15;HANDLE;SHOW 2, , ,RBOB33;W 50;RESP R,5,Not yet - but yes, the best thing you could do with it is certainly to pour it out in the alley!;HANDLE -1;DSET 5,R1
  212. /*
  213. LINE: 5;16;But it has a really beautiful sound!; ; 
  214. LACT: 5;16;RESP R,5,Sorry. Perhaps if it had been made of gold.;DSET 5,R1
  215. /*
  216. LINE: 5;17;Well, looks may deceive...; ; 
  217. LACT: 5;17;RESP R,5,Now you got me interested. What do you mean?;DSET 5,E,+20,+21
  218. /*
  219. LINE: 5;18;Would you believe me if I told you it's a magic flute?; ; 
  220. LACT: 5;18;RESP R,5,Not really.;DSET 5,R1
  221. /*
  222. LINE: 5;19;Oh, rats.; ; 
  223. LACT: 5;19;RESP R,5,Yes, I've heard you can get rid of rats using a flute.;RESP R,5,But since I don't have any, I'm not interested!;HANDLE -1;DSET 5,R1
  224. /*
  225. LINE: 5;20;Oh, you wouldn't believe me.; ; 
  226. LACT: 5;20;RESP R,5,Suit yourself!;DSET 5,R1
  227. /*
  228. LINE: 5;21;I actually used this flute to change the weather, believe it or not.; ; 
  229. LACT: 5;21;RESP R,5,You did?;RESP R,5,Could it be possible...;RESP R,5,You mean this is actually one of the famous Indian weather-flutes?;RESP R,5,Incredible!;RESP R,5,If it is, I must have it! Oh, to be able to get rid of the sun whenever I want!
  230. LACT: 5;21;RESP R,5,Let me have another look!;HANDLE;W 50;SHOW 2, , ,RBOB33;W 50;RESP R,5,Yes, it seems it is the genuine thing!
  231. LACT: 5;21;SHOW 2, , ,RBOB33;W 50;RESP R,5,Here is 20 gold pieces. Do we have a deal?;HANDLE -1;SAY You bet!;REMOVE SOBJ1,N,0;GET SOBJ5,N
  232. LACT: 5;21;SETOF 2,2=1;SHOW 2, , ,RBOB34;W 25;SHOW 2, , ,RBOB35;W 50;SHOW 2, , ,RBOB34;W 25;RESP R,5,Thank you very much!;ADDRF 0,20,1;EDLG;EXIT
  233.  
  234.  
  235.  
  236. /*
  237. /* Action 0 - Exit
  238. /* ===============
  239. /*
  240. ACTION: 0;IFOBJ 1;MEXIT;GOTO 1,1
  241. ACTION: 0;IFOBJ 2;MEXIT;GOTO 3,1
  242. /*
  243. /* Action 1 - Give
  244. /* ===============
  245. /*
  246. /* Giving money to nomad
  247. ACTION: 1;IFOBJ SOBJ5;IFOBJ2 9;IFRF 4=0|1;MOBJ 9;SAY Do you need some money?;RESP R,2,No thank you, effendi. I am not a beggar. I am a wealthy man.;EXIT
  248. ACTION: 1;IFOBJ SOBJ5;IFOBJ2 9;IFRF 4=2;MOBJ 9;HANDLE 9;W 12;SHOW 9, , ,RBOB36;W 50;HANDLE -1;W 12;SHOW 9, , ,DEF;REMOVE SOBJ5,N,0
  249. ACTION: 1;IFOBJ SOBJ5;IFOBJ2 9;IFRF 4=2;RESP R,2,Excellent.;RESP R,2,May he serve you well, effendi!;SETRF 4=3;ADDRF 0,20,1;EXIT
  250. /* Giving camel
  251. ACTION: 1;IFOBJ 11;IFOBJ2 9;IFRF 4=0|1|2;SAY It is not mine to give.;EXIT
  252. ACTION: 1;IFOBJ 11;IFOBJ2 9;SAY You must be joking! After all the trouble I had getting him?;EXIT
  253. /* Giving anything else handy
  254. ACTION: 1;IFOBJ2 9;IFCARR;MOBJ 9;HANDLE
  255. ACTION: 1;IFOBJ SOBJ3;IFOBJ2 9;RESP R,2,No thank you, effendi.;RESP R,2,Thirsty as I may be...;RESP R,2,I do have some standards!;HANDLE -1;EXIT
  256. ACTION: 1;IFOBJ2 9;IFCARR;RESP R,2,Oh, no, effendi...;RESP R,2,I could not possibly accept such a distinguished gift!;HANDLE -1;EXIT
  257. /* Giving cup to camel
  258. ACTION: 1;IFOBJ2 11;IFOBJ SOBJ3;IFRF 4=3;SAMLOAD CRUNCH.IFF;OBJ1 11;MOBJ;SAY OK. Here's something to cheer you up!;HANDLE;OBJ1;W 25
  259. ACTION: 1;IFOBJ2 11;IFOBJ SOBJ3;IFRF 4=3;SHOW 11, , ,A 0,(RBOB37,24)(RBOB9,12)(RBOB10,12)(RBOB9,12);SAM LOOP,4000;CBOB $800E;REMOVE SOBJ3,U,0;W 150;SAM NO;SHOW 11, , ,DEF
  260. ACTION: 1;IFOBJ2 11;IFOBJ SOBJ3;IFRF 4=3;SETRF 4=4;SAY Whoops...;SAY ...he ate the cup! Oh, well.;SAY I wonder if it worked?;ADDRF 0,20,1;EXIT
  261. /* Giving anything to camel
  262. ACTION: 1;IFOBJ2 11;IFCARR;IFRF 4=3;MOBJ 11;SAY Hello, Marlboro, old mate. Care for #W11 #OBJ1?;OBJ1 11;HANDLE;W 50;HANDLE -1;SAY Obviously not.;EXIT
  263. /*
  264. /* Action 2- Pick up
  265. /* =================
  266. /*
  267. /* Action 3 - Use
  268. /* ==============
  269. /*
  270. ACTION: 3;IFOBJ ROBJ5;SAY Let's skip the cat-burglar stuff for now, shall we?;EXIT
  271. ACTION: 3;IFOBJ ROBJ6;SAMLOAD BELL.IFF;MOBJ;HANDLE;SHOW ROBJ6,431,91,RBOB15;SAM ONCE,DEF;W 12;SHOW ROBJ6,430,91,RBOB14;W 12;SHOW ROBJ6,429,91,RBOB16;W 12;SHOW ROBJ6,430,91,RBOB14;HANDLE -1
  272. ACTION: 3;IFOBJ ROBJ6;IFRF 6=0;IFOF 1=0;W 100;SAY Nothing happens. The shop owner is probably out cold because of the heat...;SAY ...if such a thing is possible.;SETOF 1=1;EXIT
  273. ACTION: 3;IFOBJ ROBJ6;IFRF 6=0;IFOF 1=1;W 100;SAY Still no answer.;EXIT
  274. ACTION: 3;IFOBJ ROBJ6;IFRF 6=1;IFRF 5=0;CUTSCENE 14,F;SETRF 5=1;DSET 5,+1,+2,+3,+12;EXIT
  275. ACTION: 3;IFOBJ ROBJ6;IFRF 6=1;IFRF 5=1;RESP R,5,HEY! Stop ringing that bell, will you?|Stop it! That is NOT a toy!;EXIT
  276. ACTION: 3;IFOBJ ROBJ7|ROBJ8;VERB 4;REDO
  277. ACTION: 3;IFOBJ 11;IFRF 4=0|1|2;SAY It is not mine to use.;EXIT
  278. ACTION: 3;IFOBJ 11;IFRF 4=3;MOBJ;SAY Come on then, boy!;HANDLE;W 50;HANDLE -1;SAY Up you go!;HANDLE;W 50;HANDLE -1;SAY Very annoying...;SAY ...the animal doesn't move an inch!;EXIT
  279. ACTION: 3;IFOBJ 11;IFRF 4=4;MOBJ;HANDLE;W 50;ADDRF 0,20,1;GOTO 5,1;EXIT
  280. ACTION: 3;IFOBJ 24;IFOBJ2 ROBJ9;IFRF 5=0;SAY I'd rather not.;SAY If someone is inside, I may get into a lot of trouble!;EXIT
  281. ACTION: 3;IFOBJ2 11;IFOBJ 21;IFRF 4=3;OBJ1 11;MOBJ;SAY Tickle-tickle...;HANDLE;W 50;HANDLE -1;W 25;SAY A brick wall would be more ticklish.;EXIT
  282.  
  283. /*
  284. /* Action 4 - Open
  285. /* ===============
  286. /*
  287. ACTION: 4;IFOBJ 9;SAY Give me a break, will you??;EXIT
  288. ACTION: 4;IFOBJ ROBJ5;MOBJ;SAY It's just a hole in the wall - there is nothing to open.;EXIT
  289. ACTION: 4;IFOBJ ROBJ7|ROBJ8;MOBJ;HANDLE;W 25;HANDLE -1;SAY It's locked.;EXIT
  290. ACTION: 4;IFOBJ ROBJ9;VERB 9;REDO
  291. /*
  292. /* Action 5 - Talk to
  293. /* ==================
  294. /*
  295. ACTION: 5;IFOBJ 2;IFOF 2=0;MOBJ;SAY I say...;RESP R,5,Yes?;DSET 5;EXIT
  296. ACTION: 5;IFOBJ 2;IFOF 2=1;SAY I have done enough business with him.;EXIT
  297. ACTION: 5;IFOBJ 9;MOBJ;SAY Hello.;RESP R,2,Hello, effendi.
  298. ACTION: 5;IFOBJ 9;IFRF 4=0|1|2;DSET 2,+1,+2,+6;EXIT
  299. ACTION: 5;IFOBJ 9;IFRF 4=3;DSET 2,E,+15,+16,+17;EXIT
  300. ACTION: 5;IFOBJ 9;IFRF 4=4;SAY Let's not try his patience any further!;EXIT
  301. /*
  302. /* Action 6 - Push
  303. /* ===============
  304. /*
  305. ACTION: 6;IFOBJ ROBJ7|ROBJ8;VERB 4;REDO
  306. ACTION: 6;IFOBJ ROBJ9;VERB 9;REDO
  307. ACTION: 6;IFOBJ 11;IFRF 4=3;MOBJ;HANDLE;SAY Nnngh!;HANDLE -1;SAY Too heavy!;EXIT
  308. /*
  309. /* Action 7 - Close
  310. /* ================
  311. /*
  312. /* Action 8 - Look at
  313. /* ==================
  314. /*
  315. ACTION: 8;MOBJ
  316. ACTION: 8;IFOBJ ROBJ1;SAY It says: "Caravan Club Motel";EXIT
  317. ACTION: 8;IFOBJ ROBJ2;SAY This shop is closed for the duration of the heat wave!;EXIT
  318. ACTION: 8;IFOBJ ROBJ3;SAY It says: "Please leave your camels on the ground floor.";SETRF 2=1;EXIT
  319. ACTION: 8;IFOBJ ROBJ4;SAY It says: "NO VACANCIES";SETRF 3=1;EXIT
  320. ACTION: 8;IFOBJ 9;SAY Here's a foreign-looking chap...;EXIT
  321. ACTION: 8;IFOBJ 11;IFRF 4=0;SAY An impressive-looking animal. Even when it's laying down.;EXIT
  322. ACTION: 8;IFOBJ 11;SAY This seems like a good, reliable vehicle for long-distance travel through tough terrain.;EXIT
  323. /*
  324. /* Action 9 - Pull
  325. /* ===============
  326. /*
  327. ACTION: 9;IFOBJ ROBJ9;MOBJ;HANDLE;W 25;HANDLE -1;SAY It's fastened from the inside.;EXIT
  328. ACTION: 9;IFOBJ ROBJ7|ROBJ8;VERB 4;REDO
  329. ACTION: 9;IFOBJ ROBJ6;VERB 3;REDO
  330. ACTION: 9;IFOBJ 11;IFRF 4=3;VERB 6;REDO
  331. /*
  332. /* End of room file.
  333.