TILEMASTER2004 DATA V1
SCRIPT: 450
0 DBG "DBG: Running script 245"
0 CheckVis 10 -NODARK
0 CM -SHM NEUSE -NL
0 BREAK
10 CheckPos 249 -1 -1 21
0 CheckPos 250 -1 -1 22
0 CheckPos 251 -1 -1 23
0 CheckPos 252 -1 -1 24
0 CheckPos 253 -1 -1 25
0 CheckPos 254 -1 -1 26
0 CheckPos 255 -1 -1 27
0 CheckPos 256 -1 -1 28
0 CheckPos 280 -1 -1 400
15 M "ERROR (D9 statue script): Undefined position"
0 BREAK
21 AddKeyWords _Noticed 51  _TurnF 314  _TurnB 311  _TurnR 315  _TurnL 312  _Des 221
0 GOTO 31
22 AddKeyWords _Noticed 52  _TurnF 324  _TurnB 322  _TurnR 321  _TurnL 323  _Des 222
0 GOTO 32
23 AddKeyWords _Noticed 53  _TurnF 332  _TurnB 334  _TurnR 333  _TurnL 331  _Des 223
0 GOTO 33
24 AddKeyWords _Noticed 54  _TurnF 341  _TurnB 343  _TurnR 342  _TurnL 344  _Des 224
0 GOTO 34
25 AddKeyWords _Noticed 55  _TurnF 354  _TurnB 352  _TurnR 351  _TurnL 353  _Des 225
0 GOTO 35
26 AddKeyWords _Noticed 56  _TurnF 361  _TurnB 363  _TurnR 362  _TurnL 364  _Des 226
0 GOTO 36
27 AddKeyWords _Noticed 57  _TurnF 372  _TurnB 374  _TurnR 373  _TurnL 371  _Des 227
0 GOTO 37
28 AddKeyWords _Noticed 58  _TurnF 384  _TurnB 382  _TurnR 381  _TurnL 383  _Des 228
0 GOTO 38
31 CheckBFlag 34 1 1 111
0 GOTO 40
32 CheckBFlag 34 2 1 121
0 GOTO 40
33 CheckBFlag 34 3 1 131
0 GOTO 40
34 CheckBFlag 34 4 1 141
0 GOTO 40
35 CheckBFlag 34 5 1 151
0 GOTO 40
36 CheckBFlag 34 6 1 161
0 GOTO 40
37 CheckBFlag 34 7 1 171
0 GOTO 40
38 CheckBFlag 34 8 1 181
0 GOTO 40
40 CheckScriptType USE 50
41 CheckScriptType LOOK 50
0 AbilCheck PER 65 50
0 BREAK
50 DoKeyWord _Noticed
51 SetBFlag 34 1 1
0 DBG "DBG: Init south"
0 SetBFlag 32 1 0
0 SetBFlag 32 2 0
0 GOTO 200
52 SetBFlag 34 2 1
0 DBG "DBG: Init west"
0 SetBFlag 32 3 1
0 SetBFlag 32 4 1
0 GOTO 200
53 SetBFlag 34 3 1
0 DBG "DBG: Init east"
0 SetBFlag 32 5 1
0 SetBFlag 32 6 0
0 GOTO 200
54 SetBFlag 34 4 1
0 DBG "DBG: Init north"
0 SetBFlag 32 7 0
0 SetBFlag 32 8 0
0 GOTO 200
55 SetBFlag 34 5 1
0 DBG "DBG: Init west"
0 SetBFlag 33 1 1
0 SetBFlag 33 2 1
0 GOTO 200
56 SetBFlag 34 6 1
0 DBG "DBG: Init north"
0 SetBFlag 33 3 0
0 SetBFlag 33 4 0
0 GOTO 200
57 SetBFlag 34 7 1
0 DBG "DBG: Init east"
0 SetBFlag 33 5 1
0 SetBFlag 33 6 0
0 GOTO 200
58 SetBFlag 34 8 1
0 DBG "DBG: Init west"
0 SetBFlag 33 7 1
0 SetBFlag 33 8 1
0 GOTO 200
111 CheckBFlag 32 2 1 114
0 CheckBFlag 32 1 1 112
0 DBG "DBG: Current north"
0 GOTO 201
112 NOOP
0 DBG "DBG: Current east"
0 GOTO 203
114 CheckBFlag 32 1 1 115
0 DBG "DBG: Current south"
0 GOTO 200
115 NOOP
0 DBG "DBG: Current west"
0 GOTO 202
121 CheckBFlag 32 4 1 123
0 CheckBFlag 32 3 1 122
0 DBG "DBG: Current north"
0 GOTO 202
122 NOOP
0 DBG "DBG: Current east"
0 GOTO 201
123 CheckBFlag 32 3 1 124
0 DBG "DBG: Current south"
0 GOTO 203
124 NOOP
0 DBG "DBG: Current west"
0 GOTO 200
131 CheckBFlag 32 6 1 133
0 CheckBFlag 32 5 1 132
0 DBG "DBG: Current north"
0 GOTO 203
132 NOOP
0 DBG "DBG: Current east"
0 GOTO 200
133 CheckBFlag 32 5 1 134
0 DBG "DBG: Current south"
0 GOTO 202
134 NOOP
0 DBG "DBG: Current west"
0 GOTO 201
141 CheckBFlag 32 8 1 143
0 CheckBFlag 32 7 1 142
0 DBG "DBG: Current north"
0 GOTO 200
142 NOOP
0 DBG "DBG: Current east"
0 GOTO 202
143 CheckBFlag 32 7 1 144
0 DBG "DBG: Current south"
0 GOTO 201
144 NOOP
0 DBG "DBG: Current west"
0 GOTO 203
151 CheckBFlag 33 2 1 153
0 CheckBFlag 33 1 1 152
0 DBG "DBG: Current north"
0 GOTO 202
152 NOOP
0 DBG "DBG: Current east"
0 GOTO 201
153 CheckBFlag 33 1 1 154
0 DBG "DBG: Current south"
0 GOTO 203
154 NOOP
0 DBG "DBG: Current west"
0 GOTO 200
161 CheckBFlag 33 4 1 163
0 CheckBFlag 33 3 1 162
0 DBG "DBG: Current north"
0 GOTO 200
162 NOOP
0 DBG "DBG: Current east"
0 GOTO 202
163 CheckBFlag 33 3 1 164
0 DBG "DBG: Current south"
0 GOTO 201
164 NOOP
0 DBG "DBG: Current west"
0 GOTO 203
171 CheckBFlag 33 6 1 173
0 CheckBFlag 33 5 1 172
0 DBG "DBG: Current north"
0 GOTO 203
172 NOOP
0 DBG "DBG: Current east"
0 GOTO 200
173 CheckBFlag 33 5 1 174
0 DBG "DBG: Current south"
0 GOTO 202
174 NOOP
0 DBG "DBG: Current west"
0 GOTO 201
181 CheckBFlag 33 8 1 183
0 CheckBFlag 33 7 1 182
0 DBG "DBG: Current north"
0 GOTO 202
182 NOOP
0 DBG "DBG: Current east"
0 GOTO 201
183 CheckBFlag 33 7 1 184
0 DBG "DBG: Current south"
0 GOTO 203
184 NOOP
0 DBG "DBG: Current west"
0 GOTO 200
200 CM "The statue is facing forwards towards the hall"
0 GOTO 210
201 CM "The statue is facing backwards from the hall"
0 GOTO 210
202 CM "The statue is facing right from the hall"
0 GOTO 210
203 CM "The statue is facing left from the hall"
210 CM ", but you notice that it appears to be on a platform that rotates.  It is "
0 AddKeyWords _DesNext 230
0 DoKeyWord _Des
215 CM "The statue is "
0 AddKeyWords _DesNext 410
0 DoKeyWord _Des
221 CM "of a powerful warrior with his sword raised high up into the air above him."
0 DoKeyWord _DesNext
222 CM "of a female warrior wielding two swords."
0 DoKeyWord _DesNext
223 CM "of a cleric looking upwards with his hand raised."
0 DoKeyWord _DesNext
224 CM "of a warrior with formal ornamentation that probably implies some rank of significance.  He is holding out his hand in a gesture that seems to indicate halting."
0 DoKeyWord _DesNext
225 CM "of a strange, bald man who seems to be a warrior of some kind.  He is weilding a gigantic two-handed scimitar.  There are many strange symbols (which you cannot read) etched across his head and arms which appear to represent tatoos."
0 DoKeyWord _DesNext
226 CM "of a sinister-looking sorcerer wearing a large cloak with the hood pulled back and pointing his finger, a look of terrifying rage on his face."
0 DoKeyWord _DesNext
227 CM "of a wizard holding a staff and casting a spell."
0 DoKeyWord _DesNext
228 CM "of a strange non-human figure pointing a finger.  The creature's body has a strange, smooth shape and is not clearly male nor female, but rather something that looks only roughly humanoid."
0 DoKeyWord _DesNext
230 CM "  Do you wish to turn it? "
0 Verify 240
235 M "You leave the statue alone."
0 BREAK
240 CM "It seems to lock into place in 4 directions.  With respect to facing down the hall, do you wish to turn it so that it is forwards (F), backwards (B), right (R), left (L), or no change (N)? "
0 AddKeyWords F 250  B 251  R 252  L 253
0 DoKeyInput
0 CM "NONE" -NL
0 GOTO P235
250 CM "FORWARDS" -NL "The statue is now facing forwards." -NL
0 DoKeyWord _TurnF
251 CM "BACKWARDS" -NL "The statue is now facing backwards." -NL
0 DoKeyWord _TurnB
252 CM "RIGHT" -NL "The statue is now facing right." -NL
0 DoKeyWord _TurnR
253 CM "LEFT" -NL "The statue is now facing left." -NL
0 DoKeyWord _TurnL
311 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 32 1 0
0 SetBFlag 32 2 0
0 BREAK
312 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 32 1 1
0 SetBFlag 32 2 0
0 BREAK
314 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 32 1 0
0 SetBFlag 32 2 1
0 BREAK
315 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 32 1 1
0 SetBFlag 32 2 1
0 BREAK
321 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 32 3 0
0 SetBFlag 32 4 0
0 BREAK
322 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 32 3 1
0 SetBFlag 32 4 0
0 BREAK
323 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 32 3 0
0 SetBFlag 32 4 1
0 BREAK
324 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 32 3 1
0 SetBFlag 32 4 1
0 BREAK
331 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 32 5 0
0 SetBFlag 32 6 0
0 BREAK
332 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 32 5 1
0 SetBFlag 32 6 0
0 BREAK
333 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 32 5 0
0 SetBFlag 32 6 1
0 BREAK
334 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 32 5 1
0 SetBFlag 32 6 1
0 BREAK
341 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 32 7 0
0 SetBFlag 32 8 0
0 BREAK
342 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 32 7 1
0 SetBFlag 32 8 0
0 BREAK
343 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 32 7 0
0 SetBFlag 32 8 1
0 BREAK
344 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 32 7 1
0 SetBFlag 32 8 1
0 BREAK
351 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 33 1 0
0 SetBFlag 33 2 0
0 BREAK
352 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 33 1 1
0 SetBFlag 33 2 0
0 BREAK
353 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 33 1 0
0 SetBFlag 33 2 1
0 BREAK
354 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 33 1 1
0 SetBFlag 33 2 1
0 BREAK
361 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 33 3 0
0 SetBFlag 33 4 0
0 BREAK
362 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 33 3 1
0 SetBFlag 33 4 0
0 BREAK
363 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 33 3 0
0 SetBFlag 33 4 1
0 BREAK
364 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 33 3 1
0 SetBFlag 33 4 1
0 BREAK
371 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 33 5 0
0 SetBFlag 33 6 0
0 BREAK
372 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 33 5 1
0 SetBFlag 33 6 0
0 BREAK
373 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 33 5 0
0 SetBFlag 33 6 1
0 BREAK
374 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 33 5 1
0 SetBFlag 33 6 1
0 BREAK
381 NOOP
0 DBG "DBG: Set north"
0 SetBFlag 33 7 0
0 SetBFlag 33 8 0
0 BREAK
382 NOOP
0 DBG "DBG: Set east"
0 SetBFlag 33 7 1
0 SetBFlag 33 8 0
0 BREAK
383 NOOP
0 DBG "DBG: Set south"
0 SetBFlag 33 7 0
0 SetBFlag 33 8 1
0 BREAK
384 NOOP
0 DBG "DBG: Set west"
0 SetBFlag 33 7 1
0 SetBFlag 33 8 1
0 BREAK
400 NOOP
0 CheckTarget 401 -POS 1 1
0 CheckTarget 402 -POS 9 1
0 CheckTarget 403 -POS 1 9
0 CheckTarget 404 -POS 9 9
0 CheckTarget 405 -POS 1 4
0 CheckTarget 406 -POS 3 4
0 CheckTarget 407 -POS 1 6
0 CheckTarget 408 -POS 3 6
0 GOTO 15
401 AddKeyWords _Des 221
0 GOTO 215
402 AddKeyWords _Des 222
0 GOTO 215
403 AddKeyWords _Des 223
0 GOTO 215
404 AddKeyWords _Des 224
0 GOTO 215
405 AddKeyWords _Des 225
0 GOTO 215
406 AddKeyWords _Des 226
0 GOTO 215
407 AddKeyWords _Des 227
0 GOTO 215
408 AddKeyWords _Des 228
0 GOTO 215
410 CM -NL
0 BREAK
