(script 2)

(string
    string_0e6c "Room2"
    string_0e72 "Spectre"
    string_0e7a "Yard"
    string_0e7f "crouton"
    string_0e87 "dijon"
    string_0e8d "door1"
    string_0e93 "door2"
    string_0e99 "ghost"
    string_0e9f "knockDoor"
    string_0ea9 "light1"
    string_0eb0 "light2"
    string_0eb7 "light3"
    string_0ebe "moodMusic"
    string_0ec8 "showers"
    string_0ed0 "soundFX"
)

(said
    said_09d4 /(crypt,door)>
    said_09de /archway
    said_09e2 /chapel
    said_09e6 /crypt
    said_09ea /door
    said_09ee /barriere
    said_09f2 /grave,monument
    said_09f9 /gravestone[/dirt]
    said_0a02 <(dans,around)/crypt
    said_0a0e [<around,at][/room]
    said_0a1c [<bas][/dirt]
    said_0a27 bang
    said_0a2a break,arracher
    said_0a30 climb/barriere
    said_0a36 clore/archway
    said_0a3c find,look/esprit
    said_0a45 get,attraper/esprit
    said_0a4e look,follow/path
    said_0a57 look,etudier/crypt
    said_0a60 look,etudier/ecriture,gravestone
    said_0a6c look/esprit
    said_0a72 look<(dans,around)/crypt
    said_0a80 look>
    said_0a84 bouger,get,appuyer/gravestone,grave
    said_0a93 open
    said_0a96 open/archway
    said_0a9c open/crypt,door
    said_0aa5 bonjour/esprit
    said_0aab debloquer
)

(synonym
    room = cemetery | cimetiere | graveyard
)

(local
    local0 = $0000
    local1 = $0000
)

// 0ab4
(instance public Room2 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $2
        style $ffff
        horizon $0
        controls $0
        north $0
        east $0
        south $0
        west $0
        curPic $0
        picAngle $0
        vanishingX $a0
        vanishingY $8ad0
        vertAngle $0
    )
    (method (init) // method_0016
  0016:35 09              ldi 9 
  0018:65 1c             aTop east 
  001a:39 57            pushi 57 // $57 init
  001c:76               push0 
  001d:57 37 04         super Rm 4 

  0020:35 ff              ldi ff 
  0022:a3 00              sal local0 
  0024:7a               push2 
  0025:38 0084          pushi 84 // $84 stop
  0028:39 2e            pushi 2e // $2e dx
  002a:43 00 04         callk Load 4 

  002d:7a               push2 
  002e:38 0084          pushi 84 // $84 stop
  0031:39 30            pushi 30 // $30 b-moveCnt
  0033:43 00 04         callk Load 4 

  0036:7a               push2 
  0037:38 0080          pushi 80 // $80 timeLeft
  003a:39 38            pushi 38 // $38 moveSpeed
  003c:43 00 04         callk Load 4 

  003f:39 61            pushi 61 // $61 add
  0041:7a               push2 
  0042:74 0b87          lofss $0bcc // dijon
  0045:74 0b5a          lofss $0ba2 // crouton
  0048:39 3c            pushi 3c // $3c doit
  004a:76               push0 
  004b:81 0a              lag gAddToPics 
  004d:4a 0c             send c 

  004f:38 010b          pushi 10b // $10b setFeatures
  0052:78               push1 
  0053:74 0dea          lofss $0e40 // Yard
  0056:54 06             self 6 

  0058:80 00df            lag gDetailLevel 
  005b:31 2a              bnt code_0087 
  005d:39 7a            pushi 7a // $7a setScript
  005f:78               push1 
  0060:74 0adf          lofss $0b42 // showers
  0063:39 57            pushi 57 // $57 init
  0065:76               push0 
  0066:38 0089          pushi 89 // $89 hide
  0069:76               push0 
  006a:72 0c95          lofsa $0d02 // light1
  006d:4a 0e             send e 

  006f:39 57            pushi 57 // $57 init
  0071:76               push0 
  0072:38 0089          pushi 89 // $89 hide
  0075:76               push0 
  0076:72 0cd7          lofsa $0d50 // light2
  0079:4a 08             send 8 

  007b:39 57            pushi 57 // $57 init
  007d:76               push0 
  007e:38 0089          pushi 89 // $89 hide
  0081:76               push0 
  0082:72 0d19          lofsa $0d9e // light3
  0085:4a 08             send 8 


        code_0087
  0087:39 42            pushi 42 // $42 setPri
  0089:78               push1 
  008a:39 06            pushi 6 // $6 loop
  008c:38 00c9          pushi c9 // $c9 ignoreActors
  008f:78               push1 
  0090:78               push1 
  0091:38 00c6          pushi c6 // $c6 stopUpd
  0094:76               push0 
  0095:39 57            pushi 57 // $57 init
  0097:76               push0 
  0098:72 0b5b          lofsa $0bf6 // door1
  009b:4a 14             send 14 

  009d:38 00c6          pushi c6 // $c6 stopUpd
  00a0:76               push0 
  00a1:72 0ba4          lofsa $0c48 // door2
  00a4:4a 04             send 4 

  00a6:7a               push2 
  00a7:78               push1 
  00a8:39 64            pushi 64 // $64 allTrue
  00aa:43 40 04         callk Random 4 

  00ad:36                push 
  00ae:35 19              ldi 19 
  00b0:22                 lt? 
  00b1:31 3b              bnt code_00ee 
  00b3:89 0c              lsg gPrevRoomNum 
  00b5:35 09              ldi 9 
  00b7:1a                 eq? 
  00b8:31 34              bnt code_00ee 
  00ba:7a               push2 
  00bb:38 0084          pushi 84 // $84 stop
  00be:39 0c            pushi c // $c nsRight
  00c0:43 00 04         callk Load 4 

  00c3:38 00c8          pushi c8 // $c8 setLoop
  00c6:78               push1 
  00c7:39 03            pushi 3 // $3 y
  00c9:39 42            pushi 42 // $42 setPri
  00cb:78               push1 
  00cc:39 0a            pushi a // $a nsLeft
  00ce:39 7a            pushi 7a // $7a setScript
  00d0:78               push1 
  00d1:74 0a3a          lofss $0b0e // Spectre
  00d4:39 57            pushi 57 // $57 init
  00d6:76               push0 
  00d7:72 0bc0          lofsa $0c9a // ghost
  00da:4a 16             send 16 

  00dc:39 2b            pushi 2b // $2b number
  00de:78               push1 
  00df:39 2e            pushi 2e // $2e dx
  00e1:39 06            pushi 6 // $6 loop
  00e3:78               push1 
  00e4:39 ff            pushi ff // $ff checkAni
  00e6:39 2a            pushi 2a // $2a play
  00e8:76               push0 
  00e9:72 0d00          lofsa $0dec // moodMusic
  00ec:4a 10             send 10 


        code_00ee
  00ee:89 0c              lsg gPrevRoomNum 
  00f0:35 39              ldi 39 
  00f2:1a                 eq? 
  00f3:31 3d              bnt code_0132 
  00f5:76               push0 
  00f6:45 03 00         callb procedure_0003 0 // HandsOff 

  00f9:35 04              ldi 4 
  00fb:a0 008a            sag gTombBarred 
  00fe:38 00c5          pushi c5 // $c5 posn
  0101:7a               push2 
  0102:38 00a4          pushi a4 // $a4 cycleSpeed
  0105:39 66            pushi 66 // $66 isEmpty
  0107:38 00d3          pushi d3 // $d3 setMotion
  010a:39 04            pushi 4 // $4 x
  010c:51 1d            class MoveTo 
  010e:36                push 
  010f:38 00a4          pushi a4 // $a4 cycleSpeed
  0112:39 6c            pushi 6c // $6c addToEnd
  0114:7c            pushSelf 
  0115:81 00              lag gEgo 
  0117:4a 14             send 14 

  0119:38 00c9          pushi c9 // $c9 ignoreActors
  011c:78               push1 
  011d:78               push1 
  011e:39 07            pushi 7 // $7 cel
  0120:78               push1 
  0121:38 00a6          pushi a6 // $a6 lastCel
  0124:76               push0 
  0125:72 0b20          lofsa $0c48 // door2
  0128:4a 04             send 4 

  012a:36                push 
  012b:72 0b1a          lofsa $0c48 // door2
  012e:4a 0c             send c 

  0130:33 1f              jmp code_0151 

        code_0132
  0132:39 06            pushi 6 // $6 loop
  0134:78               push1 
  0135:78               push1 
  0136:38 00c5          pushi c5 // $c5 posn
  0139:7a               push2 
  013a:38 0136          pushi 136 // $136 elevatorID
  013d:39 7e            pushi 7e // $7e setCycle
  013f:81 00              lag gEgo 
  0141:4a 0e             send e 

  0143:39 07            pushi 7 // $7 cel
  0145:78               push1 
  0146:76               push0 
  0147:38 00c9          pushi c9 // $c9 ignoreActors
  014a:78               push1 
  014b:76               push0 
  014c:72 0af9          lofsa $0c48 // door2
  014f:4a 0c             send c 


        code_0151
  0151:39 57            pushi 57 // $57 init
  0153:76               push0 
  0154:72 0af1          lofsa $0c48 // door2
  0157:4a 04             send 4 

  0159:39 05            pushi 5 // $5 view
  015b:78               push1 
  015c:76               push0 
  015d:39 12            pushi 12 // $12 illegalBits
  015f:78               push1 
  0160:38 8040          pushi 8040 // $8040 sel_32832
  0163:39 57            pushi 57 // $57 init
  0165:76               push0 
  0166:81 00              lag gEgo 
  0168:4a 10             send 10 

  016a:35 01              ldi 1 
  016c:a3 01              sal local1 
  016e:48                 ret 
    )

    (method (doit) // method_016f
  016f:76               push0 
  0170:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0173:31 09              bnt code_017e 
  0175:7a               push2 
  0176:7a               push2 
  0177:76               push0 
  0178:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_017e
  017e:38 00db          pushi db // $db onControl
  0181:78               push1 
  0182:78               push1 
  0183:81 00              lag gEgo 
  0185:4a 06             send 6 

  0187:36                push 
  0188:35 10              ldi 10 
  018a:12                 and 
  018b:31 15              bnt code_01a2 
  018d:39 42            pushi 42 // $42 setPri
  018f:78               push1 
  0190:39 ff            pushi ff // $ff checkAni
  0192:81 00              lag gEgo 
  0194:4a 06             send 6 

  0196:38 00f8          pushi f8 // $f8 newRoom
  0199:78               push1 
  019a:39 39            pushi 39 // $39 canBeHere
  019c:81 02              lag gCurRoom 
  019e:4a 06             send 6 

  01a0:33 57              jmp code_01f9 

        code_01a2
  01a2:38 00db          pushi db // $db onControl
  01a5:78               push1 
  01a6:78               push1 
  01a7:81 00              lag gEgo 
  01a9:4a 06             send 6 

  01ab:36                push 
  01ac:35 08              ldi 8 
  01ae:12                 and 
  01af:31 48              bnt code_01f9 
  01b1:88 008a            lsg gTombBarred 
  01b4:35 01              ldi 1 
  01b6:1a                 eq? 
  01b7:31 40              bnt code_01f9 
  01b9:39 06            pushi 6 // $6 loop
  01bb:76               push0 
  01bc:81 00              lag gEgo 
  01be:4a 04             send 4 

  01c0:36                push 
  01c1:35 03              ldi 3 
  01c3:1a                 eq? 
  01c4:31 33              bnt code_01f9 
  01c6:39 07            pushi 7 // $7 cel
  01c8:76               push0 
  01c9:72 0a7c          lofsa $0c48 // door2
  01cc:4a 04             send 4 

  01ce:36                push 
  01cf:35 00              ldi 0 
  01d1:1a                 eq? 
  01d2:31 25              bnt code_01f9 
  01d4:35 02              ldi 2 
  01d6:a0 008a            sag gTombBarred 
  01d9:76               push0 
  01da:45 03 00         callb procedure_0003 0 // HandsOff 

  01dd:38 00c9          pushi c9 // $c9 ignoreActors
  01e0:78               push1 
  01e1:78               push1 
  01e2:72 0a63          lofsa $0c48 // door2
  01e5:4a 06             send 6 

  01e7:38 00d3          pushi d3 // $d3 setMotion
  01ea:39 04            pushi 4 // $4 x
  01ec:51 1d            class MoveTo 
  01ee:36                push 
  01ef:38 00a4          pushi a4 // $a4 cycleSpeed
  01f2:39 68            pushi 68 // $68 release
  01f4:7c            pushSelf 
  01f5:81 00              lag gEgo 
  01f7:4a 0c             send c 


        code_01f9
  01f9:39 3c            pushi 3c // $3c doit
  01fb:76               push0 
  01fc:57 37 04         super Rm 4 

  01ff:48                 ret 
    )

    (method (dispose) // method_0200
  0200:39 58            pushi 58 // $58 dispose
  0202:76               push0 
  0203:57 37 04         super Rm 4 

  0206:48                 ret 
    )

    (method (newRoom) // method_0207
  0207:38 0102          pushi 102 // $102 keep
  020a:78               push1 
  020b:76               push0 
  020c:78               push1 
  020d:38 00d0          pushi d0 // $d0 baseSetter
  0210:43 02 02         callk ScriptID 2 

  0213:4a 06             send 6 

  0215:38 00f8          pushi f8 // $f8 newRoom
  0218:78               push1 
  0219:8f 01              lsp param1 
  021b:57 37 06         super Rm 6 

  021e:48                 ret 
    )

    (method (handleEvent) // method_021f
  021f:3f 01             link 1 // (var $1)
  0221:39 4c            pushi 4c // $4c claimed
  0223:76               push0 
  0224:87 01              lap param1 
  0226:4a 04             send 4 

  0228:31 01              bnt code_022b 
  022a:48                 ret 

        code_022b
  022b:39 22            pushi 22 // $22 type
  022d:76               push0 
  022e:87 01              lap param1 
  0230:4a 04             send 4 

  0232:36                push 
  0233:34 0080            ldi 80 
  0236:1a                 eq? 
  0237:30 0304            bnt code_053e 
  023a:38 00db          pushi db // $db onControl
  023d:76               push0 
  023e:81 00              lag gEgo 
  0240:4a 04             send 4 

  0242:36                push 
  0243:35 20              ldi 20 
  0245:12                 and 
  0246:2f 0f               bt code_0257 
  0248:38 00db          pushi db // $db onControl
  024b:76               push0 
  024c:81 00              lag gEgo 
  024e:4a 04             send 4 

  0250:36                push 
  0251:35 08              ldi 8 
  0253:12                 and 
  0254:30 0103            bnt code_035a 

        code_0257
  0257:78               push1 
  0258:74 0817          lofss $0a72 // look<(dans,around)/crypt
  025b:43 25 02         callk Said 2 

  025e:31 0c              bnt code_026c 
  0260:7a               push2 
  0261:7a               push2 
  0262:78               push1 
  0263:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0269:32 00ee            jmp code_035a 

        code_026c
  026c:78               push1 
  026d:74 0764          lofss $09d4 // /(crypt,door)>
  0270:43 25 02         callk Said 2 

  0273:30 00e4            bnt code_035a 
  0276:78               push1 
  0277:74 0819          lofss $0a93 // open
  027a:43 25 02         callk Said 2 

  027d:31 49              bnt code_02c8 
  027f:38 00db          pushi db // $db onControl
  0282:76               push0 
  0283:81 00              lag gEgo 
  0285:4a 04             send 4 

  0287:36                push 
  0288:35 20              ldi 20 
  028a:12                 and 
  028b:31 21              bnt code_02ae 
  028d:35 00              ldi 0 
  028f:a3 00              sal local0 
  0291:76               push0 
  0292:45 03 00         callb procedure_0003 0 // HandsOff 

  0295:39 12            pushi 12 // $12 illegalBits
  0297:78               push1 
  0298:38 8000          pushi 8000 // $8000 sel_32768
  029b:38 00d3          pushi d3 // $d3 setMotion
  029e:39 04            pushi 4 // $4 x
  02a0:51 1d            class MoveTo 
  02a2:36                push 
  02a3:39 2b            pushi 2b // $2b number
  02a5:39 76            pushi 76 // $76 script
  02a7:7c            pushSelf 
  02a8:81 00              lag gEgo 
  02aa:4a 12             send 12 

  02ac:33 17              jmp code_02c5 

        code_02ae
  02ae:38 00db          pushi db // $db onControl
  02b1:76               push0 
  02b2:81 00              lag gEgo 
  02b4:4a 04             send 4 

  02b6:36                push 
  02b7:35 08              ldi 8 
  02b9:12                 and 
  02ba:31 09              bnt code_02c5 
  02bc:7a               push2 
  02bd:7a               push2 
  02be:7a               push2 
  02bf:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_02c5
  02c5:32 0092            jmp code_035a 

        code_02c8
  02c8:78               push1 
  02c9:74 07df          lofss $0aab // debloquer
  02cc:43 25 02         callk Said 2 

  02cf:31 3c              bnt code_030d 
  02d1:38 00db          pushi db // $db onControl
  02d4:76               push0 
  02d5:81 00              lag gEgo 
  02d7:4a 04             send 4 

  02d9:36                push 
  02da:35 20              ldi 20 
  02dc:12                 and 
  02dd:2f 16               bt code_02f5 
  02df:38 00db          pushi db // $db onControl
  02e2:76               push0 
  02e3:81 00              lag gEgo 
  02e5:4a 04             send 4 

  02e7:36                push 
  02e8:35 08              ldi 8 
  02ea:12                 and 
  02eb:31 14              bnt code_0301 
  02ed:88 008a            lsg gTombBarred 
  02f0:35 01              ldi 1 
  02f2:1a                 eq? 
  02f3:31 0c              bnt code_0301 

        code_02f5
  02f5:7a               push2 
  02f6:7a               push2 
  02f7:39 03            pushi 3 // $3 y
  02f9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02ff:33 0a              jmp code_030b 

        code_0301
  0301:7a               push2 
  0302:7a               push2 
  0303:39 04            pushi 4 // $4 x
  0305:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_030b
  030b:33 4d              jmp code_035a 

        code_030d
  030d:78               push1 
  030e:74 0719          lofss $0a2a // break,arracher
  0311:43 25 02         callk Said 2 

  0314:31 3c              bnt code_0352 
  0316:38 00db          pushi db // $db onControl
  0319:76               push0 
  031a:81 00              lag gEgo 
  031c:4a 04             send 4 

  031e:36                push 
  031f:35 20              ldi 20 
  0321:12                 and 
  0322:2f 16               bt code_033a 
  0324:38 00db          pushi db // $db onControl
  0327:76               push0 
  0328:81 00              lag gEgo 
  032a:4a 04             send 4 

  032c:36                push 
  032d:35 08              ldi 8 
  032f:12                 and 
  0330:31 14              bnt code_0346 
  0332:88 008a            lsg gTombBarred 
  0335:35 01              ldi 1 
  0337:1a                 eq? 
  0338:31 0c              bnt code_0346 

        code_033a
  033a:7a               push2 
  033b:7a               push2 
  033c:39 03            pushi 3 // $3 y
  033e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0344:33 0a              jmp code_0350 

        code_0346
  0346:7a               push2 
  0347:7a               push2 
  0348:39 05            pushi 5 // $5 view
  034a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0350
  0350:33 08              jmp code_035a 

        code_0352
  0352:39 4c            pushi 4c // $4c claimed
  0354:78               push1 
  0355:76               push0 
  0356:87 01              lap param1 
  0358:4a 06             send 6 


        code_035a
  035a:39 4c            pushi 4c // $4c claimed
  035c:76               push0 
  035d:87 01              lap param1 
  035f:4a 04             send 4 

  0361:18                 not 
  0362:30 01d9            bnt code_053e 
  0365:78               push1 
  0366:74 06ee          lofss $0a57 // look,etudier/crypt
  0369:43 25 02         callk Said 2 

  036c:31 0d              bnt code_037b 
  036e:7a               push2 
  036f:7a               push2 
  0370:39 06            pushi 6 // $6 loop
  0372:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0378:32 01c3            jmp code_053e 

        code_037b
  037b:78               push1 
  037c:74 06a8          lofss $0a27 // bang
  037f:43 25 02         callk Said 2 

  0382:31 20              bnt code_03a4 
  0384:38 00db          pushi db // $db onControl
  0387:78               push1 
  0388:76               push0 
  0389:81 00              lag gEgo 
  038b:4a 06             send 6 

  038d:36                push 
  038e:35 01              ldi 1 
  0390:12                 and 
  0391:31 06              bnt code_0399 
  0393:76               push0 
  0394:45 09 00         callb procedure_0009 0 // NotClose 

  0397:33 08              jmp code_03a1 

        code_0399
  0399:39 7a            pushi 7a // $7a setScript
  039b:78               push1 
  039c:74 07d3          lofss $0b72 // knockDoor
  039f:54 06             self 6 


        code_03a1
  03a1:32 019a            jmp code_053e 

        code_03a4
  03a4:78               push1 
  03a5:74 06b8          lofss $0a60 // look,etudier/ecriture,gravestone
  03a8:43 25 02         callk Said 2 

  03ab:31 0d              bnt code_03ba 
  03ad:7a               push2 
  03ae:7a               push2 
  03af:39 07            pushi 7 // $7 cel
  03b1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03b7:32 0184            jmp code_053e 

        code_03ba
  03ba:78               push1 
  03bb:74 0690          lofss $0a4e // look,follow/path
  03be:43 25 02         callk Said 2 

  03c1:31 0d              bnt code_03d0 
  03c3:7a               push2 
  03c4:7a               push2 
  03c5:39 08            pushi 8 // $8 underBits
  03c7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03cd:32 016e            jmp code_053e 

        code_03d0
  03d0:78               push1 
  03d1:74 0668          lofss $0a3c // find,look/esprit
  03d4:43 25 02         callk Said 2 

  03d7:31 0d              bnt code_03e6 
  03d9:7a               push2 
  03da:7a               push2 
  03db:39 09            pushi 9 // $9 nsTop
  03dd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03e3:32 0158            jmp code_053e 

        code_03e6
  03e6:78               push1 
  03e7:74 0696          lofss $0a80 // look>
  03ea:43 25 02         callk Said 2 

  03ed:30 00c9            bnt code_04b9 
  03f0:78               push1 
  03f1:74 061a          lofss $0a0e // [<around,at][/room]
  03f4:43 25 02         callk Said 2 

  03f7:31 0c              bnt code_0405 
  03f9:7a               push2 
  03fa:7a               push2 
  03fb:76               push0 
  03fc:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0402:32 00b1            jmp code_04b6 

        code_0405
  0405:78               push1 
  0406:74 0613          lofss $0a1c // [<bas][/dirt]
  0409:43 25 02         callk Said 2 

  040c:31 0d              bnt code_041b 
  040e:7a               push2 
  040f:7a               push2 
  0410:39 0a            pushi a // $a nsLeft
  0412:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0418:32 009b            jmp code_04b6 

        code_041b
  041b:78               push1 
  041c:74 05d3          lofss $09f2 // /grave,monument
  041f:43 25 02         callk Said 2 

  0422:31 0d              bnt code_0431 
  0424:7a               push2 
  0425:7a               push2 
  0426:39 0b            pushi b // $b nsBottom
  0428:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  042e:32 0085            jmp code_04b6 

        code_0431
  0431:78               push1 
  0432:74 05cd          lofss $0a02 // <(dans,around)/crypt
  0435:43 25 02         callk Said 2 

  0438:31 06              bnt code_0440 
  043a:76               push0 
  043b:45 09 00         callb procedure_0009 0 // NotClose 

  043e:33 76              jmp code_04b6 

        code_0440
  0440:78               push1 
  0441:74 05a6          lofss $09ea // /door
  0444:43 25 02         callk Said 2 

  0447:31 0c              bnt code_0455 
  0449:7a               push2 
  044a:7a               push2 
  044b:39 0c            pushi c // $c nsRight
  044d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0453:33 61              jmp code_04b6 

        code_0455
  0455:78               push1 
  0456:74 058d          lofss $09e6 // /crypt
  0459:43 25 02         callk Said 2 

  045c:31 06              bnt code_0464 
  045e:76               push0 
  045f:45 09 00         callb procedure_0009 0 // NotClose 

  0462:33 52              jmp code_04b6 

        code_0464
  0464:78               push1 
  0465:74 0586          lofss $09ee // /barriere
  0468:43 25 02         callk Said 2 

  046b:31 0c              bnt code_0479 
  046d:7a               push2 
  046e:7a               push2 
  046f:39 0d            pushi d // $d lsTop
  0471:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0477:33 3d              jmp code_04b6 

        code_0479
  0479:78               push1 
  047a:74 0561          lofss $09de // /archway
  047d:43 25 02         callk Said 2 

  0480:31 0c              bnt code_048e 
  0482:7a               push2 
  0483:7a               push2 
  0484:39 0e            pushi e // $e lsLeft
  0486:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  048c:33 28              jmp code_04b6 

        code_048e
  048e:78               push1 
  048f:74 0550          lofss $09e2 // /chapel
  0492:43 25 02         callk Said 2 

  0495:31 0c              bnt code_04a3 
  0497:7a               push2 
  0498:7a               push2 
  0499:39 0f            pushi f // $f lsBottom
  049b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04a1:33 13              jmp code_04b6 

        code_04a3
  04a3:78               push1 
  04a4:74 0552          lofss $09f9 // /gravestone[/dirt]
  04a7:43 25 02         callk Said 2 

  04aa:31 0a              bnt code_04b6 
  04ac:7a               push2 
  04ad:7a               push2 
  04ae:39 10            pushi 10 // $10 lsRight
  04b0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_04b6
  04b6:32 0085            jmp code_053e 

        code_04b9
  04b9:78               push1 
  04ba:74 05c7          lofss $0a84 // bouger,get,appuyer/gravestone,grave
  04bd:43 25 02         callk Said 2 

  04c0:31 0c              bnt code_04ce 
  04c2:7a               push2 
  04c3:7a               push2 
  04c4:39 11            pushi 11 // $11 signal
  04c6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04cc:33 70              jmp code_053e 

        code_04ce
  04ce:78               push1 
  04cf:74 0573          lofss $0a45 // get,attraper/esprit
  04d2:43 25 02         callk Said 2 

  04d5:31 0c              bnt code_04e3 
  04d7:7a               push2 
  04d8:7a               push2 
  04d9:39 09            pushi 9 // $9 nsTop
  04db:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04e1:33 5b              jmp code_053e 

        code_04e3
  04e3:78               push1 
  04e4:74 05be          lofss $0aa5 // bonjour/esprit
  04e7:43 25 02         callk Said 2 

  04ea:31 0c              bnt code_04f8 
  04ec:7a               push2 
  04ed:7a               push2 
  04ee:39 12            pushi 12 // $12 illegalBits
  04f0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04f6:33 46              jmp code_053e 

        code_04f8
  04f8:78               push1 
  04f9:74 0534          lofss $0a30 // climb/barriere
  04fc:43 25 02         callk Said 2 

  04ff:31 0c              bnt code_050d 
  0501:7a               push2 
  0502:7a               push2 
  0503:39 13            pushi 13 // $13 brTop
  0505:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  050b:33 31              jmp code_053e 

        code_050d
  050d:78               push1 
  050e:74 058b          lofss $0a9c // open/crypt,door
  0511:43 25 02         callk Said 2 

  0514:31 06              bnt code_051c 
  0516:76               push0 
  0517:45 09 00         callb procedure_0009 0 // NotClose 

  051a:33 22              jmp code_053e 

        code_051c
  051c:78               push1 
  051d:74 0576          lofss $0a96 // open/archway
  0520:43 25 02         callk Said 2 

  0523:31 06              bnt code_052b 
  0525:76               push0 
  0526:45 10 00         callb procedure_0010 0 // AlreadyOpen 

  0529:33 13              jmp code_053e 

        code_052b
  052b:78               push1 
  052c:74 0507          lofss $0a36 // clore/archway
  052f:43 25 02         callk Said 2 

  0532:31 0a              bnt code_053e 
  0534:7a               push2 
  0535:7a               push2 
  0536:39 14            pushi 14 // $14 brLeft
  0538:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_053e
  053e:48                 ret 
    )

    (method (cue) // method_053f
  053f:8b 00              lsl local0 
  0541:35 ff              ldi ff 
  0543:1c                 ne? 
  0544:30 0104            bnt code_064b 
  0547:cb 00              +sl local0 
  0549:3c                 dup 
  054a:35 01              ldi 1 
  054c:1a                 eq? 
  054d:31 2d              bnt code_057c 
  054f:39 06            pushi 6 // $6 loop
  0551:78               push1 
  0552:39 03            pushi 3 // $3 y
  0554:81 00              lag gEgo 
  0556:4a 06             send 6 

  0558:38 00a3          pushi a3 // $a3 startUpd
  055b:76               push0 
  055c:39 7e            pushi 7e // $7e setCycle
  055e:7a               push2 
  055f:51 1a            class End 
  0561:36                push 
  0562:7c            pushSelf 
  0563:72 0690          lofsa $0bf6 // door1
  0566:4a 0c             send c 

  0568:39 2b            pushi 2b // $2b number
  056a:78               push1 
  056b:39 4d            pushi 4d // $4d value
  056d:39 06            pushi 6 // $6 loop
  056f:78               push1 
  0570:78               push1 
  0571:39 2a            pushi 2a // $2a play
  0573:76               push0 
  0574:72 089f          lofsa $0e16 // soundFX
  0577:4a 10             send 10 

  0579:32 00ce            jmp code_064a 

        code_057c
  057c:3c                 dup 
  057d:35 02              ldi 2 
  057f:1a                 eq? 
  0580:31 27              bnt code_05a9 
  0582:38 0084          pushi 84 // $84 stop
  0585:76               push0 
  0586:72 088d          lofsa $0e16 // soundFX
  0589:4a 04             send 4 

  058b:7a               push2 
  058c:7a               push2 
  058d:39 15            pushi 15 // $15 brBottom
  058f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0595:38 00d3          pushi d3 // $d3 setMotion
  0598:39 04            pushi 4 // $4 x
  059a:51 1d            class MoveTo 
  059c:36                push 
  059d:39 29            pushi 29 // $29 edit
  059f:39 6a            pushi 6a // $6a prev
  05a1:7c            pushSelf 
  05a2:81 00              lag gEgo 
  05a4:4a 0c             send c 

  05a6:32 00a1            jmp code_064a 

        code_05a9
  05a9:3c                 dup 
  05aa:35 03              ldi 3 
  05ac:1a                 eq? 
  05ad:31 14              bnt code_05c3 
  05af:38 00d3          pushi d3 // $d3 setMotion
  05b2:39 04            pushi 4 // $4 x
  05b4:51 1d            class MoveTo 
  05b6:36                push 
  05b7:39 12            pushi 12 // $12 illegalBits
  05b9:39 68            pushi 68 // $68 release
  05bb:7c            pushSelf 
  05bc:81 00              lag gEgo 
  05be:4a 0c             send c 

  05c0:32 0087            jmp code_064a 

        code_05c3
  05c3:3c                 dup 
  05c4:35 04              ldi 4 
  05c6:1a                 eq? 
  05c7:31 1d              bnt code_05e6 
  05c9:7a               push2 
  05ca:7a               push2 
  05cb:39 16            pushi 16 // $16 brRight
  05cd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05d3:38 00d3          pushi d3 // $d3 setMotion
  05d6:39 04            pushi 4 // $4 x
  05d8:51 1d            class MoveTo 
  05da:36                push 
  05db:39 29            pushi 29 // $29 edit
  05dd:39 6a            pushi 6a // $6a prev
  05df:7c            pushSelf 
  05e0:81 00              lag gEgo 
  05e2:4a 0c             send c 

  05e4:33 64              jmp code_064a 

        code_05e6
  05e6:3c                 dup 
  05e7:35 05              ldi 5 
  05e9:1a                 eq? 
  05ea:31 13              bnt code_05ff 
  05ec:38 00d3          pushi d3 // $d3 setMotion
  05ef:39 04            pushi 4 // $4 x
  05f1:51 1d            class MoveTo 
  05f3:36                push 
  05f4:39 2b            pushi 2b // $2b number
  05f6:39 76            pushi 76 // $76 script
  05f8:7c            pushSelf 
  05f9:81 00              lag gEgo 
  05fb:4a 0c             send c 

  05fd:33 4b              jmp code_064a 

        code_05ff
  05ff:3c                 dup 
  0600:35 06              ldi 6 
  0602:1a                 eq? 
  0603:31 1f              bnt code_0624 
  0605:39 7e            pushi 7e // $7e setCycle
  0607:7a               push2 
  0608:51 1b            class Beg 
  060a:36                push 
  060b:7c            pushSelf 
  060c:72 05e7          lofsa $0bf6 // door1
  060f:4a 08             send 8 

  0611:39 2b            pushi 2b // $2b number
  0613:78               push1 
  0614:39 4d            pushi 4d // $4d value
  0616:39 06            pushi 6 // $6 loop
  0618:78               push1 
  0619:78               push1 
  061a:39 2a            pushi 2a // $2a play
  061c:76               push0 
  061d:72 07f6          lofsa $0e16 // soundFX
  0620:4a 10             send 10 

  0622:33 26              jmp code_064a 

        code_0624
  0624:3c                 dup 
  0625:35 07              ldi 7 
  0627:1a                 eq? 
  0628:31 20              bnt code_064a 
  062a:38 0084          pushi 84 // $84 stop
  062d:76               push0 
  062e:72 07e5          lofsa $0e16 // soundFX
  0631:4a 04             send 4 

  0633:38 00c6          pushi c6 // $c6 stopUpd
  0636:76               push0 
  0637:72 05bc          lofsa $0bf6 // door1
  063a:4a 04             send 4 

  063c:38 00d6          pushi d6 // $d6 observeControl
  063f:78               push1 
  0640:39 40            pushi 40 // $40 modifiers
  0642:81 00              lag gEgo 
  0644:4a 06             send 6 

  0646:76               push0 
  0647:45 04 00         callb procedure_0004 0 // HandsOn 


        code_064a
  064a:3a                toss 

        code_064b
  064b:88 008a            lsg gTombBarred 
  064e:35 01              ldi 1 
  0650:1e                 gt? 
  0651:31 74              bnt code_06c7 
  0653:c8 008a            +sg gTombBarred 
  0656:3c                 dup 
  0657:35 03              ldi 3 
  0659:1a                 eq? 
  065a:31 12              bnt code_066e 
  065c:38 00a3          pushi a3 // $a3 startUpd
  065f:76               push0 
  0660:39 7e            pushi 7e // $7e setCycle
  0662:7a               push2 
  0663:51 1a            class End 
  0665:36                push 
  0666:7c            pushSelf 
  0667:72 05de          lofsa $0c48 // door2
  066a:4a 0c             send c 

  066c:33 58              jmp code_06c6 

        code_066e
  066e:3c                 dup 
  066f:35 04              ldi 4 
  0671:1a                 eq? 
  0672:31 1d              bnt code_0691 
  0674:39 42            pushi 42 // $42 setPri
  0676:78               push1 
  0677:39 05            pushi 5 // $5 view
  0679:38 00d3          pushi d3 // $d3 setMotion
  067c:39 03            pushi 3 // $3 y
  067e:51 1d            class MoveTo 
  0680:36                push 
  0681:38 00a4          pushi a4 // $a4 cycleSpeed
  0684:39 62            pushi 62 // $62 eachElementDo
  0686:81 00              lag gEgo 
  0688:4a 10             send 10 

  068a:35 01              ldi 1 
  068c:a0 008a            sag gTombBarred 
  068f:33 35              jmp code_06c6 

        code_0691
  0691:3c                 dup 
  0692:35 05              ldi 5 
  0694:1a                 eq? 
  0695:31 17              bnt code_06ae 
  0697:38 00a3          pushi a3 // $a3 startUpd
  069a:76               push0 
  069b:38 00c9          pushi c9 // $c9 ignoreActors
  069e:78               push1 
  069f:76               push0 
  06a0:39 7e            pushi 7e // $7e setCycle
  06a2:7a               push2 
  06a3:51 1b            class Beg 
  06a5:36                push 
  06a6:7c            pushSelf 
  06a7:72 059e          lofsa $0c48 // door2
  06aa:4a 12             send 12 

  06ac:33 18              jmp code_06c6 

        code_06ae
  06ae:3c                 dup 
  06af:35 06              ldi 6 
  06b1:1a                 eq? 
  06b2:31 12              bnt code_06c6 
  06b4:38 00c6          pushi c6 // $c6 stopUpd
  06b7:76               push0 
  06b8:72 058d          lofsa $0c48 // door2
  06bb:4a 04             send 4 

  06bd:76               push0 
  06be:45 04 00         callb procedure_0004 0 // HandsOn 

  06c1:35 01              ldi 1 
  06c3:a0 008a            sag gTombBarred 

        code_06c6
  06c6:3a                toss 

        code_06c7
  06c7:48                 ret 
    )

)

// 0b08
(instance Spectre of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (doit) // method_06c8
  06c8:3f 01             link 1 // (var $1)
  06ca:67 0a             pTos state 
  06cc:35 01              ldi 1 
  06ce:1a                 eq? 
  06cf:2f 07               bt code_06d8 
  06d1:67 0a             pTos state 
  06d3:35 02              ldi 2 
  06d5:1a                 eq? 
  06d6:31 2d              bnt code_0705 

        code_06d8
  06d8:39 07            pushi 7 // $7 cel
  06da:76               push0 
  06db:72 05bc          lofsa $0c9a // ghost
  06de:4a 04             send 4 

  06e0:36                push 
  06e1:35 01              ldi 1 
  06e3:12                 and 
  06e4:a5 00              sat temp0 
  06e6:39 42            pushi 42 // $42 setPri
  06e8:78               push1 
  06e9:8d 00              lst temp0 
  06eb:35 03              ldi 3 
  06ed:0e                 shl 
  06ee:36                push 
  06ef:35 06              ldi 6 
  06f1:02                 add 
  06f2:36                push 
  06f3:38 00c5          pushi c5 // $c5 posn
  06f6:7a               push2 
  06f7:38 00ab          pushi ab // $ab setTarget
  06fa:8d 00              lst temp0 
  06fc:35 64              ldi 64 
  06fe:02                 add 
  06ff:36                push 
  0700:72 0597          lofsa $0c9a // ghost
  0703:4a 0e             send e 


        code_0705
  0705:39 3c            pushi 3c // $3c doit
  0707:76               push0 
  0708:57 05 04         super Script 4 

  070b:48                 ret 
    )

    (method (changeState) // method_070c
  070c:87 01              lap param1 
  070e:65 0a             aTop state 
  0710:36                push 
  0711:3c                 dup 
  0712:35 00              ldi 0 
  0714:1a                 eq? 
  0715:31 20              bnt code_0737 
  0717:38 00ca          pushi ca // $ca show
  071a:76               push0 
  071b:39 7e            pushi 7e // $7e setCycle
  071d:78               push1 
  071e:51 17            class Walk 
  0720:36                push 
  0721:38 00d3          pushi d3 // $d3 setMotion
  0724:39 04            pushi 4 // $4 x
  0726:51 1d            class MoveTo 
  0728:36                push 
  0729:38 00ab          pushi ab // $ab setTarget
  072c:39 64            pushi 64 // $64 allTrue
  072e:7c            pushSelf 
  072f:72 0568          lofsa $0c9a // ghost
  0732:4a 16             send 16 

  0734:32 0084            jmp code_07bb 

        code_0737
  0737:3c                 dup 
  0738:35 01              ldi 1 
  073a:1a                 eq? 
  073b:31 11              bnt code_074e 
  073d:39 7e            pushi 7e // $7e setCycle
  073f:78               push1 
  0740:51 16            class Fwd 
  0742:36                push 
  0743:72 0554          lofsa $0c9a // ghost
  0746:4a 06             send 6 

  0748:35 03              ldi 3 
  074a:65 12             aTop seconds 
  074c:33 6d              jmp code_07bb 

        code_074e
  074e:3c                 dup 
  074f:35 02              ldi 2 
  0751:1a                 eq? 
  0752:31 17              bnt code_076b 
  0754:38 00c8          pushi c8 // $c8 setLoop
  0757:78               push1 
  0758:39 04            pushi 4 // $4 x
  075a:39 7e            pushi 7e // $7e setCycle
  075c:78               push1 
  075d:51 16            class Fwd 
  075f:36                push 
  0760:72 0537          lofsa $0c9a // ghost
  0763:4a 0c             send c 

  0765:35 03              ldi 3 
  0767:65 12             aTop seconds 
  0769:33 50              jmp code_07bb 

        code_076b
  076b:3c                 dup 
  076c:35 03              ldi 3 
  076e:1a                 eq? 
  076f:31 22              bnt code_0793 
  0771:38 0088          pushi 88 // $88 fade
  0774:76               push0 
  0775:72 0674          lofsa $0dec // moodMusic
  0778:4a 04             send 4 

  077a:38 00c8          pushi c8 // $c8 setLoop
  077d:78               push1 
  077e:39 05            pushi 5 // $5 view
  0780:38 00a4          pushi a4 // $a4 cycleSpeed
  0783:78               push1 
  0784:7a               push2 
  0785:39 7e            pushi 7e // $7e setCycle
  0787:7a               push2 
  0788:51 1a            class End 
  078a:36                push 
  078b:7c            pushSelf 
  078c:72 050b          lofsa $0c9a // ghost
  078f:4a 14             send 14 

  0791:33 28              jmp code_07bb 

        code_0793
  0793:3c                 dup 
  0794:35 04              ldi 4 
  0796:1a                 eq? 
  0797:31 22              bnt code_07bb 
  0799:39 2b            pushi 2b // $2b number
  079b:78               push1 
  079c:39 0c            pushi c // $c nsRight
  079e:39 06            pushi 6 // $6 loop
  07a0:78               push1 
  07a1:39 ff            pushi ff // $ff checkAni
  07a3:39 2a            pushi 2a // $2a play
  07a5:76               push0 
  07a6:72 0643          lofsa $0dec // moodMusic
  07a9:4a 10             send 10 

  07ab:39 58            pushi 58 // $58 dispose
  07ad:76               push0 
  07ae:72 04e9          lofsa $0c9a // ghost
  07b1:4a 04             send 4 

  07b3:39 7a            pushi 7a // $7a setScript
  07b5:78               push1 
  07b6:76               push0 
  07b7:63 08             pToa client 
  07b9:4a 06             send 6 


        code_07bb
  07bb:3a                toss 
  07bc:48                 ret 
    )

)

// 0b3c
(instance showers of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_07bd
  07bd:87 01              lap param1 
  07bf:65 0a             aTop state 
  07c1:36                push 
  07c2:3c                 dup 
  07c3:35 00              ldi 0 
  07c5:1a                 eq? 
  07c6:31 48              bnt code_0810 
  07c8:83 01              lal local1 
  07ca:31 3a              bnt code_0806 
  07cc:39 76            pushi 76 // $76 script
  07ce:76               push0 
  07cf:72 04c8          lofsa $0c9a // ghost
  07d2:4a 04             send 4 

  07d4:18                 not 
  07d5:31 2f              bnt code_0806 
  07d7:38 00ca          pushi ca // $ca show
  07da:76               push0 
  07db:39 7e            pushi 7e // $7e setCycle
  07dd:78               push1 
  07de:51 16            class Fwd 
  07e0:36                push 
  07e1:72 051e          lofsa $0d02 // light1
  07e4:4a 0a             send a 

  07e6:38 00ca          pushi ca // $ca show
  07e9:76               push0 
  07ea:39 7e            pushi 7e // $7e setCycle
  07ec:78               push1 
  07ed:51 16            class Fwd 
  07ef:36                push 
  07f0:72 055d          lofsa $0d50 // light2
  07f3:4a 0a             send a 

  07f5:38 00ca          pushi ca // $ca show
  07f8:76               push0 
  07f9:39 7e            pushi 7e // $7e setCycle
  07fb:78               push1 
  07fc:51 16            class Fwd 
  07fe:36                push 
  07ff:72 059c          lofsa $0d9e // light3
  0802:4a 0a             send a 

  0804:33 04              jmp code_080a 

        code_0806
  0806:35 02              ldi 2 
  0808:65 0a             aTop state 

        code_080a
  080a:35 07              ldi 7 
  080c:65 10             aTop cycles 
  080e:33 66              jmp code_0876 

        code_0810
  0810:3c                 dup 
  0811:35 01              ldi 1 
  0813:1a                 eq? 
  0814:31 35              bnt code_084b 
  0816:39 7e            pushi 7e // $7e setCycle
  0818:78               push1 
  0819:51 1a            class End 
  081b:36                push 
  081c:72 04e3          lofsa $0d02 // light1
  081f:4a 06             send 6 

  0821:39 7e            pushi 7e // $7e setCycle
  0823:78               push1 
  0824:51 1a            class End 
  0826:36                push 
  0827:72 0526          lofsa $0d50 // light2
  082a:4a 06             send 6 

  082c:39 7e            pushi 7e // $7e setCycle
  082e:78               push1 
  082f:51 1a            class End 
  0831:36                push 
  0832:72 0569          lofsa $0d9e // light3
  0835:4a 06             send 6 

  0837:39 2b            pushi 2b // $2b number
  0839:78               push1 
  083a:39 11            pushi 11 // $11 signal
  083c:39 06            pushi 6 // $6 loop
  083e:78               push1 
  083f:78               push1 
  0840:39 2a            pushi 2a // $2a play
  0842:78               push1 
  0843:7c            pushSelf 
  0844:72 05cf          lofsa $0e16 // soundFX
  0847:4a 12             send 12 

  0849:33 2b              jmp code_0876 

        code_084b
  084b:3c                 dup 
  084c:35 02              ldi 2 
  084e:1a                 eq? 
  084f:31 17              bnt code_0868 
  0851:7a               push2 
  0852:78               push1 
  0853:39 64            pushi 64 // $64 allTrue
  0855:43 40 04         callk Random 4 

  0858:36                push 
  0859:35 19              ldi 19 
  085b:22                 lt? 
  085c:31 04              bnt code_0862 
  085e:35 ff              ldi ff 
  0860:65 0a             aTop state 

        code_0862
  0862:35 03              ldi 3 
  0864:65 12             aTop seconds 
  0866:33 0e              jmp code_0876 

        code_0868
  0868:3c                 dup 
  0869:35 03              ldi 3 
  086b:1a                 eq? 
  086c:31 08              bnt code_0876 
  086e:35 01              ldi 1 
  0870:65 0a             aTop state 
  0872:35 05              ldi 5 
  0874:65 12             aTop seconds 

        code_0876
  0876:3a                toss 
  0877:48                 ret 
    )

)

// 0b6c
(instance knockDoor of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0878
  0878:87 01              lap param1 
  087a:65 0a             aTop state 
  087c:36                push 
  087d:3c                 dup 
  087e:35 00              ldi 0 
  0880:1a                 eq? 
  0881:31 24              bnt code_08a7 
  0883:39 03            pushi 3 // $3 y
  0885:7a               push2 
  0886:39 17            pushi 17 // $17 name
  0888:39 58            pushi 58 // $58 dispose
  088a:46 00ff 0000 06  calle ff procedure_0000 6 // Print 

  0890:39 05            pushi 5 // $5 view
  0892:78               push1 
  0893:39 38            pushi 38 // $38 moveSpeed
  0895:39 06            pushi 6 // $6 loop
  0897:78               push1 
  0898:76               push0 
  0899:39 7e            pushi 7e // $7e setCycle
  089b:7a               push2 
  089c:51 1a            class End 
  089e:36                push 
  089f:7c            pushSelf 
  08a0:81 00              lag gEgo 
  08a2:4a 14             send 14 

  08a4:32 008e            jmp code_0935 

        code_08a7
  08a7:3c                 dup 
  08a8:35 01              ldi 1 
  08aa:1a                 eq? 
  08ab:31 25              bnt code_08d2 
  08ad:39 2b            pushi 2b // $2b number
  08af:78               push1 
  08b0:39 30            pushi 30 // $30 b-moveCnt
  08b2:39 06            pushi 6 // $6 loop
  08b4:78               push1 
  08b5:78               push1 
  08b6:39 2a            pushi 2a // $2a play
  08b8:76               push0 
  08b9:72 055a          lofsa $0e16 // soundFX
  08bc:4a 10             send 10 

  08be:39 06            pushi 6 // $6 loop
  08c0:78               push1 
  08c1:7a               push2 
  08c2:39 7e            pushi 7e // $7e setCycle
  08c4:78               push1 
  08c5:51 16            class Fwd 
  08c7:36                push 
  08c8:81 00              lag gEgo 
  08ca:4a 0c             send c 

  08cc:35 06              ldi 6 
  08ce:65 10             aTop cycles 
  08d0:33 63              jmp code_0935 

        code_08d2
  08d2:3c                 dup 
  08d3:35 02              ldi 2 
  08d5:1a                 eq? 
  08d6:31 1e              bnt code_08f6 
  08d8:39 05            pushi 5 // $5 view
  08da:78               push1 
  08db:39 38            pushi 38 // $38 moveSpeed
  08dd:39 06            pushi 6 // $6 loop
  08df:78               push1 
  08e0:76               push0 
  08e1:39 07            pushi 7 // $7 cel
  08e3:78               push1 
  08e4:39 03            pushi 3 // $3 y
  08e6:39 7e            pushi 7e // $7e setCycle
  08e8:78               push1 
  08e9:51 1b            class Beg 
  08eb:36                push 
  08ec:81 00              lag gEgo 
  08ee:4a 18             send 18 

  08f0:35 03              ldi 3 
  08f2:65 12             aTop seconds 
  08f4:33 3f              jmp code_0935 

        code_08f6
  08f6:3c                 dup 
  08f7:35 03              ldi 3 
  08f9:1a                 eq? 
  08fa:31 14              bnt code_0910 
  08fc:76               push0 
  08fd:45 0f 00         callb procedure_000f 0 // cls 

  0900:7a               push2 
  0901:7a               push2 
  0902:39 18            pushi 18 // $18 key
  0904:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  090a:35 01              ldi 1 
  090c:65 10             aTop cycles 
  090e:33 25              jmp code_0935 

        code_0910
  0910:3c                 dup 
  0911:35 04              ldi 4 
  0913:1a                 eq? 
  0914:31 1f              bnt code_0935 
  0916:76               push0 
  0917:45 0f 00         callb procedure_000f 0 // cls 

  091a:39 05            pushi 5 // $5 view
  091c:78               push1 
  091d:76               push0 
  091e:39 7e            pushi 7e // $7e setCycle
  0920:78               push1 
  0921:51 17            class Walk 
  0923:36                push 
  0924:39 06            pushi 6 // $6 loop
  0926:78               push1 
  0927:39 03            pushi 3 // $3 y
  0929:81 00              lag gEgo 
  092b:4a 12             send 12 

  092d:39 7a            pushi 7a // $7a setScript
  092f:78               push1 
  0930:76               push0 
  0931:63 08             pToa client 
  0933:4a 06             send 6 


        code_0935
  0935:3a                toss 
  0936:48                 ret 
    )

)

// 0b9c
(instance crouton of PV
    (properties
        y $2e
        x $a5
        z $0
        heading $0
        view $66
        loop $2
        cel $0
        priority $e
        signal $0
    )
)

// 0bc6
(instance dijon of PV
    (properties
        y $3b
        x $2c
        z $0
        heading $0
        view $66
        loop $2
        cel $1
        priority $e
        signal $0
    )
)

// 0bf0
(instance door1 of Prop
    (properties
        y $75
        x $1c
        z $0
        heading $0
        yStep $2
        view $66
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0937
  0937:39 03            pushi 3 // $3 y
  0939:7c            pushSelf 
  093a:8f 01              lsp param1 
  093c:39 03            pushi 3 // $3 y
  093e:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0944:31 12              bnt code_0958 
  0946:39 4c            pushi 4c // $4c claimed
  0948:78               push1 
  0949:78               push1 
  094a:87 01              lap param1 
  094c:4a 06             send 6 

  094e:7a               push2 
  094f:7a               push2 
  0950:39 19            pushi 19 // $19 time
  0952:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0958
  0958:48                 ret 
    )

)

// 0c42
(instance door2 of Prop
    (properties
        y $65
        x $9a
        z $0
        heading $0
        yStep $2
        view $66
        loop $1
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0959
  0959:39 03            pushi 3 // $3 y
  095b:7c            pushSelf 
  095c:8f 01              lsp param1 
  095e:39 03            pushi 3 // $3 y
  0960:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0966:31 12              bnt code_097a 
  0968:39 4c            pushi 4c // $4c claimed
  096a:78               push1 
  096b:78               push1 
  096c:87 01              lap param1 
  096e:4a 06             send 6 

  0970:7a               push2 
  0971:7a               push2 
  0972:39 0c            pushi c // $c nsRight
  0974:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_097a
  097a:48                 ret 
    )

)

// 0c94
(instance ghost of Act
    (properties
        y $98
        x $a1
        z $0
        heading $0
        yStep $2
        view $66
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
        illegalBits $0
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
    (method (handleEvent) // method_097b
  097b:39 76            pushi 76 // $76 script
  097d:76               push0 
  097e:54 04             self 4 

  0980:31 2a              bnt code_09ac 
  0982:39 03            pushi 3 // $3 y
  0984:7c            pushSelf 
  0985:8f 01              lsp param1 
  0987:39 03            pushi 3 // $3 y
  0989:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  098f:2f 09               bt code_099a 
  0991:78               push1 
  0992:74 00d7          lofss $0a6c // look/esprit
  0995:43 25 02         callk Said 2 

  0998:31 12              bnt code_09ac 

        code_099a
  099a:39 4c            pushi 4c // $4c claimed
  099c:78               push1 
  099d:78               push1 
  099e:87 01              lap param1 
  09a0:4a 06             send 6 

  09a2:7a               push2 
  09a3:7a               push2 
  09a4:39 1a            pushi 1a // $1a text
  09a6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_09ac
  09ac:48                 ret 
    )

)

// 0cfc
(instance light1 of Prop
    (properties
        y $21
        x $101
        z $0
        heading $0
        yStep $2
        view $66
        loop $6
        cel $0
        priority $0
        underBits $0
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 0d4a
(instance light2 of Prop
    (properties
        y $5c
        x $119
        z $0
        heading $0
        yStep $2
        view $66
        loop $7
        cel $0
        priority $0
        underBits $0
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 0d98
(instance light3 of Prop
    (properties
        y $7e
        x $106
        z $0
        heading $0
        yStep $2
        view $66
        loop $8
        cel $0
        priority $0
        underBits $0
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 0de6
(instance moodMusic of Sound
    (properties
        state $0
        number $11
        priority $0
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 0e10
(instance soundFX of Sound
    (properties
        state $0
        number $11
        priority $5
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 0e3a
(instance Yard of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $6b
        nsLeft $57
        nsBottom $b3
        nsRight $fc
    )
    (method (handleEvent) // method_09ad
  09ad:39 03            pushi 3 // $3 y
  09af:7c            pushSelf 
  09b0:8f 01              lsp param1 
  09b2:39 03            pushi 3 // $3 y
  09b4:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  09ba:31 12              bnt code_09ce 
  09bc:39 4c            pushi 4c // $4c claimed
  09be:78               push1 
  09bf:78               push1 
  09c0:87 01              lap param1 
  09c2:4a 06             send 6 

  09c4:7a               push2 
  09c5:7a               push2 
  09c6:39 0b            pushi b // $b nsBottom
  09c8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_09ce
  09ce:48                 ret 
  09cf:00                bnot 
    )

)



