(script 47)

(string
    string_185e "Ldoor"
    string_1864 "Rail"
    string_1869 "Room47"
    string_1870 "Stair"
    string_1876 "cabL"
    string_187b "cabR"
    string_1880 "cat"
    string_1884 "chain2"
    string_188b "chain3"
    string_1892 "chand"
    string_1898 "falling"
    string_18a0 "hand"
    string_18a5 "hanky"
    string_18ab "jiggle"
    string_18b2 "lamp"
    string_18b7 "lamp3"
    string_18bd "lamp4"
    string_18c3 "lampL"
    string_18c9 "lampR"
    string_18cf "myDoor"
    string_18d6 "myIcon"
    string_18dd "myMusic"
    string_18e5 "pickUp"
    string_18ec "post1"
    string_18f2 "post2"
    string_18f8 "rail1"
    string_18fe "rail2"
    string_1904 "table"
    string_190a "table1"
    string_1911 "table2"
    string_1918 "vase"
    string_191d "wardL"
    string_1923 "wardR"
    string_1929 ""
)

(said
    said_1032 */armoire
    said_1038 /bathroom
    said_103c /aigle,post[<newel]
    said_1048 /curtain
    said_104c /door<bathroom
    said_1053 /door<cachoterie
    said_105a [<around,at,bas][/room]
    said_106b bang/door,closet
    said_1074 clore/door
    said_107a get,arracher,rotate,detach/aigle,post[<newel]
    said_1091 get/chandelier
    said_1097 get/handkerchief[/dirt]
    said_10a2 look/armoire
    said_10a8 look/balcon
    said_10ae look/chandelier,ceiling
    said_10b7 look/closet,(door<closet),(door[<!*])
    said_10cf look/handkerchief,dirt
    said_10d8 look<bas[/!*]
    said_10e3 look<haut
    said_10e9 look>
    said_10ed open,(look<dans)/door,closet
)

(synonym
    escalier | stair | staircase | stairway | step = downstair
    escalier | stair | staircase | stairway | step = upstair
    room = hall | hallway
    armoire | cabinet | cupboard | hutch | wardrobe = armoire | cabinet | cupboard | hutch | wardrobe
    balcon | balcony | railing = balcon | balcony | railing
    balcon | balcony | railing = banister | rail | rampe
)

(local
    local0 = $0000
    local1 = $0000
    local2 = $0000
    local3 = $0000
    local4 = $0000
    local5 = $0000
    local6 = $0000
)

// 1104
(instance public Room47 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $2f
        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_002a
  002a:39 57            pushi 57 // $57 init
  002c:76               push0 
  002d:57 37 04         super Rm 4 

  0030:35 00              ldi 0 
  0032:a1 3d              sag global61 
  0034:35 25              ldi 25 
  0036:65 1e             aTop south 
  0038:35 2b              ldi 2b 
  003a:65 1a             aTop north 
  003c:35 64              ldi 64 
  003e:65 16             aTop horizon 
  0040:39 61            pushi 61 // $61 add
  0042:39 0c            pushi c // $c nsRight
  0044:74 11f7          lofss $123e // cabL
  0047:74 121e          lofss $1268 // cabR
  004a:74 1245          lofss $1292 // cat
  004d:74 126c          lofss $12bc // vase
  0050:74 1197          lofss $11ea // post1
  0053:74 11be          lofss $1214 // post2
  0056:74 12f9          lofss $1352 // chain2
  0059:74 1320          lofss $137c // chain3
  005c:74 1347          lofss $13a6 // table1
  005f:74 137a          lofss $13dc // table2
  0062:74 1281          lofss $12e6 // wardR
  0065:74 12b4          lofss $131c // wardL
  0068:39 62            pushi 62 // $62 eachElementDo
  006a:78               push1 
  006b:39 57            pushi 57 // $57 init
  006d:39 3c            pushi 3c // $3c doit
  006f:76               push0 
  0070:81 0a              lag gAddToPics 
  0072:4a 26             send 26 

  0074:38 010a          pushi 10a // $10a setRegions
  0077:78               push1 
  0078:38 00d3          pushi d3 // $d3 setMotion
  007b:38 010b          pushi 10b // $10b setFeatures
  007e:39 06            pushi 6 // $6 loop
  0080:74 173f          lofss $17c2 // Stair
  0083:74 1320          lofss $13a6 // table1
  0086:74 1353          lofss $13dc // table2
  0089:74 1290          lofss $131c // wardL
  008c:74 1257          lofss $12e6 // wardR
  008f:74 1704          lofss $1796 // Rail
  0092:54 16             self 16 

  0094:39 04            pushi 4 // $4 x
  0096:38 0080          pushi 80 // $80 timeLeft
  0099:39 09            pushi 9 // $9 nsTop
  009b:39 26            pushi 26 // $26 mark
  009d:38 028b          pushi 28b // $28b sel_651
  00a0:45 15 08         callb procedure_0015 8 // LoadMany 

  00a3:39 08            pushi 8 // $8 underBits
  00a5:38 0084          pushi 84 // $84 stop
  00a8:39 26            pushi 26 // $26 mark
  00aa:39 2b            pushi 2b // $2b number
  00ac:39 2c            pushi 2c // $2c handle
  00ae:39 2f            pushi 2f // $2f dy
  00b0:39 39            pushi 39 // $39 canBeHere
  00b2:39 57            pushi 57 // $57 init
  00b4:39 6d            pushi 6d // $6d addAfter
  00b6:45 15 10         callb procedure_0015 10 // LoadMany 

  00b9:80 00b1            lag gGertieRoomState 
  00bc:31 27              bnt code_00e5 
  00be:78               push1 
  00bf:76               push0 
  00c0:45 07 02         callb procedure_0007 2 // IsFlag 

  00c3:18                 not 
  00c4:31 1f              bnt code_00e5 
  00c6:35 01              ldi 1 
  00c8:a3 05              sal local5 
  00ca:39 06            pushi 6 // $6 loop
  00cc:78               push1 
  00cd:7a               push2 
  00ce:81 00              lag gEgo 
  00d0:4a 06             send 6 

  00d2:7a               push2 
  00d3:38 0081          pushi 81 // $81 prevSignal
  00d6:39 0b            pushi b // $b nsBottom
  00d8:43 00 04         callk Load 4 

  00db:7a               push2 
  00dc:38 0080          pushi 80 // $80 timeLeft
  00df:38 01fb          pushi 1fb // $1fb sel_507
  00e2:43 00 04         callk Load 4 


        code_00e5
  00e5:80 00df            lag gDetailLevel 
  00e8:31 6f              bnt code_0159 
  00ea:39 42            pushi 42 // $42 setPri
  00ec:78               push1 
  00ed:39 0f            pushi f // $f lsBottom
  00ef:39 57            pushi 57 // $57 init
  00f1:76               push0 
  00f2:38 00c6          pushi c6 // $c6 stopUpd
  00f5:76               push0 
  00f6:39 7a            pushi 7a // $7a setScript
  00f8:78               push1 
  00f9:74 108e          lofss $118a // jiggle
  00fc:72 1313          lofsa $1412 // chand
  00ff:4a 14             send 14 

  0101:39 42            pushi 42 // $42 setPri
  0103:78               push1 
  0104:39 08            pushi 8 // $8 underBits
  0106:39 7e            pushi 7e // $7e setCycle
  0108:78               push1 
  0109:51 16            class Fwd 
  010b:36                push 
  010c:39 57            pushi 57 // $57 init
  010e:76               push0 
  010f:72 146c          lofsa $157e // lampL
  0112:4a 10             send 10 

  0114:39 42            pushi 42 // $42 setPri
  0116:78               push1 
  0117:39 08            pushi 8 // $8 underBits
  0119:39 7e            pushi 7e // $7e setCycle
  011b:78               push1 
  011c:51 16            class Fwd 
  011e:36                push 
  011f:39 57            pushi 57 // $57 init
  0121:76               push0 
  0122:72 14ab          lofsa $15d0 // lampR
  0125:4a 10             send 10 

  0127:39 42            pushi 42 // $42 setPri
  0129:78               push1 
  012a:39 0f            pushi f // $f lsBottom
  012c:39 7e            pushi 7e // $7e setCycle
  012e:78               push1 
  012f:51 16            class Fwd 
  0131:36                push 
  0132:38 00c9          pushi c9 // $c9 ignoreActors
  0135:78               push1 
  0136:78               push1 
  0137:39 57            pushi 57 // $57 init
  0139:76               push0 
  013a:72 14e5          lofsa $1622 // lamp3
  013d:4a 16             send 16 

  013f:39 42            pushi 42 // $42 setPri
  0141:78               push1 
  0142:39 0f            pushi f // $f lsBottom
  0144:39 7e            pushi 7e // $7e setCycle
  0146:78               push1 
  0147:51 16            class Fwd 
  0149:36                push 
  014a:38 00c9          pushi c9 // $c9 ignoreActors
  014d:78               push1 
  014e:78               push1 
  014f:39 57            pushi 57 // $57 init
  0151:76               push0 
  0152:72 151f          lofsa $1674 // lamp4
  0155:4a 16             send 16 

  0157:33 5f              jmp code_01b8 

        code_0159
  0159:39 42            pushi 42 // $42 setPri
  015b:78               push1 
  015c:39 0f            pushi f // $f lsBottom
  015e:39 57            pushi 57 // $57 init
  0160:76               push0 
  0161:38 00c6          pushi c6 // $c6 stopUpd
  0164:76               push0 
  0165:72 12aa          lofsa $1412 // chand
  0168:4a 0e             send e 

  016a:39 42            pushi 42 // $42 setPri
  016c:78               push1 
  016d:39 08            pushi 8 // $8 underBits
  016f:39 57            pushi 57 // $57 init
  0171:76               push0 
  0172:38 00c6          pushi c6 // $c6 stopUpd
  0175:76               push0 
  0176:72 1405          lofsa $157e // lampL
  0179:4a 0e             send e 

  017b:39 42            pushi 42 // $42 setPri
  017d:78               push1 
  017e:39 08            pushi 8 // $8 underBits
  0180:39 57            pushi 57 // $57 init
  0182:76               push0 
  0183:38 00c6          pushi c6 // $c6 stopUpd
  0186:76               push0 
  0187:72 1446          lofsa $15d0 // lampR
  018a:4a 0e             send e 

  018c:39 42            pushi 42 // $42 setPri
  018e:78               push1 
  018f:39 0f            pushi f // $f lsBottom
  0191:38 00c9          pushi c9 // $c9 ignoreActors
  0194:78               push1 
  0195:78               push1 
  0196:39 57            pushi 57 // $57 init
  0198:76               push0 
  0199:38 00c6          pushi c6 // $c6 stopUpd
  019c:76               push0 
  019d:72 1482          lofsa $1622 // lamp3
  01a0:4a 14             send 14 

  01a2:39 42            pushi 42 // $42 setPri
  01a4:78               push1 
  01a5:39 0f            pushi f // $f lsBottom
  01a7:38 00c9          pushi c9 // $c9 ignoreActors
  01aa:78               push1 
  01ab:78               push1 
  01ac:39 57            pushi 57 // $57 init
  01ae:76               push0 
  01af:38 00c6          pushi c6 // $c6 stopUpd
  01b2:76               push0 
  01b3:72 14be          lofsa $1674 // lamp4
  01b6:4a 14             send 14 


        code_01b8
  01b8:39 57            pushi 57 // $57 init
  01ba:76               push0 
  01bb:38 00c6          pushi c6 // $c6 stopUpd
  01be:76               push0 
  01bf:72 12a2          lofsa $1464 // Ldoor
  01c2:4a 08             send 8 

  01c4:39 42            pushi 42 // $42 setPri
  01c6:78               push1 
  01c7:39 0b            pushi b // $b nsBottom
  01c9:38 00c9          pushi c9 // $c9 ignoreActors
  01cc:78               push1 
  01cd:78               push1 
  01ce:39 57            pushi 57 // $57 init
  01d0:76               push0 
  01d1:38 00c6          pushi c6 // $c6 stopUpd
  01d4:76               push0 
  01d5:72 12de          lofsa $14b6 // rail1
  01d8:4a 14             send 14 

  01da:39 42            pushi 42 // $42 setPri
  01dc:78               push1 
  01dd:39 0b            pushi b // $b nsBottom
  01df:38 00c9          pushi c9 // $c9 ignoreActors
  01e2:78               push1 
  01e3:78               push1 
  01e4:39 57            pushi 57 // $57 init
  01e6:76               push0 
  01e7:38 00c6          pushi c6 // $c6 stopUpd
  01ea:76               push0 
  01eb:72 132c          lofsa $151a // rail2
  01ee:4a 14             send 14 

  01f0:88 00a5            lsg gAct 
  01f3:35 01              ldi 1 
  01f5:1a                 eq? 
  01f6:31 1e              bnt code_0216 
  01f8:38 00ee          pushi ee // $ee has
  01fb:78               push1 
  01fc:39 17            pushi 17 // $17 name
  01fe:81 00              lag gEgo 
  0200:4a 06             send 6 

  0202:18                 not 
  0203:31 11              bnt code_0216 
  0205:7a               push2 
  0206:38 0080          pushi 80 // $80 timeLeft
  0209:39 11            pushi 11 // $11 signal
  020b:43 00 04         callk Load 4 

  020e:39 57            pushi 57 // $57 init
  0210:76               push0 
  0211:72 1500          lofsa $1714 // hanky
  0214:4a 04             send 4 


        code_0216
  0216:89 0c              lsg gPrevRoomNum 
  0218:3c                 dup 
  0219:35 30              ldi 30 
  021b:1a                 eq? 
  021c:31 10              bnt code_022e 
  021e:38 00c5          pushi c5 // $c5 posn
  0221:7a               push2 
  0222:38 00e4          pushi e4 // $e4 echo
  0225:39 6a            pushi 6a // $6a prev
  0227:81 00              lag gEgo 
  0229:4a 08             send 8 

  022b:32 00df            jmp code_030d 

        code_022e
  022e:3c                 dup 
  022f:35 2e              ldi 2e 
  0231:1a                 eq? 
  0232:31 0f              bnt code_0243 
  0234:38 00c5          pushi c5 // $c5 posn
  0237:7a               push2 
  0238:39 69            pushi 69 // $69 last
  023a:39 6d            pushi 6d // $6d addAfter
  023c:81 00              lag gEgo 
  023e:4a 08             send 8 

  0240:32 00ca            jmp code_030d 

        code_0243
  0243:3c                 dup 
  0244:35 2b              ldi 2b 
  0246:1a                 eq? 
  0247:31 4c              bnt code_0295 
  0249:39 04            pushi 4 // $4 x
  024b:76               push0 
  024c:81 00              lag gEgo 
  024e:4a 04             send 4 

  0250:36                push 
  0251:35 63              ldi 63 
  0253:22                 lt? 
  0254:31 0e              bnt code_0264 
  0256:38 00c5          pushi c5 // $c5 posn
  0259:7a               push2 
  025a:39 6e            pushi 6e // $6e indexOf
  025c:39 69            pushi 69 // $69 last
  025e:81 00              lag gEgo 
  0260:4a 08             send 8 

  0262:33 2f              jmp code_0293 

        code_0264
  0264:39 04            pushi 4 // $4 x
  0266:76               push0 
  0267:81 00              lag gEgo 
  0269:4a 04             send 4 

  026b:36                push 
  026c:34 00de            ldi de 
  026f:1e                 gt? 
  0270:31 0f              bnt code_0281 
  0272:38 00c5          pushi c5 // $c5 posn
  0275:7a               push2 
  0276:38 00cd          pushi cd // $cd xLast
  0279:39 69            pushi 69 // $69 last
  027b:81 00              lag gEgo 
  027d:4a 08             send 8 

  027f:33 12              jmp code_0293 

        code_0281
  0281:38 00c5          pushi c5 // $c5 posn
  0284:7a               push2 
  0285:39 04            pushi 4 // $4 x
  0287:76               push0 
  0288:81 00              lag gEgo 
  028a:4a 04             send 4 

  028c:36                push 
  028d:39 69            pushi 69 // $69 last
  028f:81 00              lag gEgo 
  0291:4a 08             send 8 


        code_0293
  0293:33 78              jmp code_030d 

        code_0295
  0295:3c                 dup 
  0296:35 4a              ldi 4a 
  0298:1a                 eq? 
  0299:31 22              bnt code_02bd 
  029b:39 42            pushi 42 // $42 setPri
  029d:78               push1 
  029e:39 09            pushi 9 // $9 nsTop
  02a0:38 00c5          pushi c5 // $c5 posn
  02a3:7a               push2 
  02a4:38 00fe          pushi fe // $fe setCursor
  02a7:39 72            pushi 72 // $72 cycles
  02a9:38 00d3          pushi d3 // $d3 setMotion
  02ac:39 03            pushi 3 // $3 y
  02ae:51 1d            class MoveTo 
  02b0:36                push 
  02b1:38 0102          pushi 102 // $102 keep
  02b4:38 0083          pushi 83 // $83 playMaybe
  02b7:81 00              lag gEgo 
  02b9:4a 18             send 18 

  02bb:33 50              jmp code_030d 

        code_02bd
  02bd:3c                 dup 
  02be:35 25              ldi 25 
  02c0:1a                 eq? 
  02c1:31 4a              bnt code_030d 
  02c3:35 01              ldi 1 
  02c5:a3 03              sal local3 
  02c7:39 04            pushi 4 // $4 x
  02c9:76               push0 
  02ca:81 00              lag gEgo 
  02cc:4a 04             send 4 

  02ce:36                push 
  02cf:34 00a0            ldi a0 
  02d2:22                 lt? 
  02d3:31 1c              bnt code_02f1 
  02d5:38 00c5          pushi c5 // $c5 posn
  02d8:7a               push2 
  02d9:39 27            pushi 27 // $27 who
  02db:38 00bc          pushi bc // $bc motionInited
  02de:38 00d3          pushi d3 // $d3 setMotion
  02e1:39 03            pushi 3 // $3 y
  02e3:51 1d            class MoveTo 
  02e5:36                push 
  02e6:39 3c            pushi 3c // $3c doit
  02e8:38 008b          pushi 8b // $8b select
  02eb:81 00              lag gEgo 
  02ed:4a 12             send 12 

  02ef:33 1c              jmp code_030d 

        code_02f1
  02f1:38 00c5          pushi c5 // $c5 posn
  02f4:7a               push2 
  02f5:38 0118          pushi 118 // $118 stopExtra
  02f8:38 00bc          pushi bc // $bc motionInited
  02fb:38 00d3          pushi d3 // $d3 setMotion
  02fe:39 03            pushi 3 // $3 y
  0300:51 1d            class MoveTo 
  0302:36                push 
  0303:38 0105          pushi 105 // $105 north
  0306:38 0088          pushi 88 // $88 fade
  0309:81 00              lag gEgo 
  030b:4a 12             send 12 


        code_030d
  030d:3a                toss 
  030e:39 05            pushi 5 // $5 view
  0310:78               push1 
  0311:76               push0 
  0312:39 12            pushi 12 // $12 illegalBits
  0314:78               push1 
  0315:38 8000          pushi 8000 // $8000 sel_32768
  0318:39 57            pushi 57 // $57 init
  031a:76               push0 
  031b:81 00              lag gEgo 
  031d:4a 10             send 10 

  031f:48                 ret 
    )

    (method (doit) // method_0320
  0320:3f 01             link 1 // (var $1)
  0322:76               push0 
  0323:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0326:31 0a              bnt code_0332 
  0328:7a               push2 
  0329:39 2f            pushi 2f // $2f dy
  032b:76               push0 
  032c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0332
  0332:80 00d8            lag global216 
  0335:31 19              bnt code_0350 
  0337:8b 05              lsl local5 
  0339:35 01              ldi 1 
  033b:1a                 eq? 
  033c:31 12              bnt code_0350 
  033e:35 02              ldi 2 
  0340:a3 05              sal local5 
  0342:39 7a            pushi 7a // $7a setScript
  0344:78               push1 
  0345:7a               push2 
  0346:38 0198          pushi 198 // $198 sel_408
  0349:76               push0 
  034a:43 02 04         callk ScriptID 4 

  034d:36                push 
  034e:54 06             self 6 


        code_0350
  0350:8b 05              lsl local5 
  0352:35 02              ldi 2 
  0354:1a                 eq? 
  0355:31 62              bnt code_03b9 
  0357:78               push1 
  0358:76               push0 
  0359:45 07 02         callb procedure_0007 2 // IsFlag 

  035c:31 5b              bnt code_03b9 
  035e:35 00              ldi 0 
  0360:a3 05              sal local5 
  0362:39 61            pushi 61 // $61 add
  0364:39 0c            pushi c // $c nsRight
  0366:74 0ed5          lofss $123e // cabL
  0369:74 0efc          lofss $1268 // cabR
  036c:74 0f23          lofss $1292 // cat
  036f:74 0f4a          lofss $12bc // vase
  0372:74 0e75          lofss $11ea // post1
  0375:74 0e9c          lofss $1214 // post2
  0378:74 0fd7          lofss $1352 // chain2
  037b:74 0ffe          lofss $137c // chain3
  037e:74 1025          lofss $13a6 // table1
  0381:74 1058          lofss $13dc // table2
  0384:74 0f5f          lofss $12e6 // wardR
  0387:74 0f92          lofss $131c // wardL
  038a:39 62            pushi 62 // $62 eachElementDo
  038c:78               push1 
  038d:39 57            pushi 57 // $57 init
  038f:39 3c            pushi 3c // $3c doit
  0391:76               push0 
  0392:81 0a              lag gAddToPics 
  0394:4a 26             send 26 

  0396:38 010b          pushi 10b // $10b setFeatures
  0399:39 06            pushi 6 // $6 loop
  039b:74 1424          lofss $17c2 // Stair
  039e:74 1005          lofss $13a6 // table1
  03a1:74 1038          lofss $13dc // table2
  03a4:74 0f75          lofss $131c // wardL
  03a7:74 0f3c          lofss $12e6 // wardR
  03aa:74 13e9          lofss $1796 // Rail
  03ad:54 10             self 10 

  03af:39 62            pushi 62 // $62 eachElementDo
  03b1:78               push1 
  03b2:38 00ca          pushi ca // $ca show
  03b5:81 05              lag gCast 
  03b7:4a 06             send 6 


        code_03b9
  03b9:83 04              lal local4 
  03bb:18                 not 
  03bc:31 31              bnt code_03ef 
  03be:38 00db          pushi db // $db onControl
  03c1:78               push1 
  03c2:76               push0 
  03c3:81 00              lag gEgo 
  03c5:4a 06             send 6 

  03c7:36                push 
  03c8:35 08              ldi 8 
  03ca:12                 and 
  03cb:2f 0f               bt code_03dc 
  03cd:38 00db          pushi db // $db onControl
  03d0:78               push1 
  03d1:76               push0 
  03d2:81 00              lag gEgo 
  03d4:4a 06             send 6 

  03d6:36                push 
  03d7:35 10              ldi 10 
  03d9:12                 and 
  03da:31 06              bnt code_03e2 

        code_03dc
  03dc:35 09              ldi 9 
  03de:a5 00              sat temp0 
  03e0:33 04              jmp code_03e6 

        code_03e2
  03e2:35 ff              ldi ff 
  03e4:a5 00              sat temp0 

        code_03e6
  03e6:39 42            pushi 42 // $42 setPri
  03e8:78               push1 
  03e9:8d 00              lst temp0 
  03eb:81 00              lag gEgo 
  03ed:4a 06             send 6 


        code_03ef
  03ef:38 00db          pushi db // $db onControl
  03f2:78               push1 
  03f3:78               push1 
  03f4:81 00              lag gEgo 
  03f6:4a 06             send 6 

  03f8:36                push 
  03f9:3c                 dup 
  03fa:35 04              ldi 4 
  03fc:1a                 eq? 
  03fd:31 0d              bnt code_040c 
  03ff:38 00f8          pushi f8 // $f8 newRoom
  0402:78               push1 
  0403:39 2e            pushi 2e // $2e dx
  0405:81 02              lag gCurRoom 
  0407:4a 06             send 6 

  0409:32 00e5            jmp code_04f1 

        code_040c
  040c:3c                 dup 
  040d:35 02              ldi 2 
  040f:1a                 eq? 
  0410:31 0d              bnt code_041f 
  0412:38 00f8          pushi f8 // $f8 newRoom
  0415:78               push1 
  0416:39 30            pushi 30 // $30 b-moveCnt
  0418:81 02              lag gCurRoom 
  041a:4a 06             send 6 

  041c:32 00d2            jmp code_04f1 

        code_041f
  041f:3c                 dup 
  0420:35 10              ldi 10 
  0422:1a                 eq? 
  0423:31 1a              bnt code_043f 
  0425:39 06            pushi 6 // $6 loop
  0427:76               push0 
  0428:81 00              lag gEgo 
  042a:4a 04             send 4 

  042c:36                push 
  042d:35 03              ldi 3 
  042f:1a                 eq? 
  0430:31 0a              bnt code_043c 
  0432:38 00f8          pushi f8 // $f8 newRoom
  0435:78               push1 
  0436:39 4a            pushi 4a // $4a pragmaFail
  0438:81 02              lag gCurRoom 
  043a:4a 06             send 6 


        code_043c
  043c:32 00b2            jmp code_04f1 

        code_043f
  043f:3c                 dup 
  0440:34 0800            ldi 800 
  0443:1a                 eq? 
  0444:31 1d              bnt code_0463 
  0446:83 03              lal local3 
  0448:18                 not 
  0449:31 15              bnt code_0460 
  044b:35 01              ldi 1 
  044d:a3 03              sal local3 
  044f:38 00d3          pushi d3 // $d3 setMotion
  0452:39 03            pushi 3 // $3 y
  0454:51 1d            class MoveTo 
  0456:36                push 
  0457:39 27            pushi 27 // $27 who
  0459:38 00be          pushi be // $be offScreenOK
  045c:81 00              lag gEgo 
  045e:4a 0a             send a 


        code_0460
  0460:32 008e            jmp code_04f1 

        code_0463
  0463:3c                 dup 
  0464:34 1000            ldi 1000 
  0467:1a                 eq? 
  0468:31 1d              bnt code_0487 
  046a:83 03              lal local3 
  046c:18                 not 
  046d:31 16              bnt code_0485 
  046f:35 01              ldi 1 
  0471:a3 03              sal local3 
  0473:38 00d3          pushi d3 // $d3 setMotion
  0476:39 03            pushi 3 // $3 y
  0478:51 1d            class MoveTo 
  047a:36                push 
  047b:38 0118          pushi 118 // $118 stopExtra
  047e:38 00be          pushi be // $be offScreenOK
  0481:81 00              lag gEgo 
  0483:4a 0a             send a 


        code_0485
  0485:33 6a              jmp code_04f1 

        code_0487
  0487:3c                 dup 
  0488:35 01              ldi 1 
  048a:1a                 eq? 
  048b:31 0a              bnt code_0497 
  048d:83 03              lal local3 
  048f:31 04              bnt code_0495 
  0491:35 00              ldi 0 
  0493:a3 03              sal local3 

        code_0495
  0495:33 5a              jmp code_04f1 

        code_0497
  0497:3c                 dup 
  0498:34 0080            ldi 80 
  049b:1a                 eq? 
  049c:31 53              bnt code_04f1 
  049e:8b 02              lsl local2 
  04a0:35 00              ldi 0 
  04a2:1a                 eq? 
  04a3:31 4c              bnt code_04f1 
  04a5:39 3a            pushi 3a // $3a heading
  04a7:76               push0 
  04a8:81 00              lag gEgo 
  04aa:4a 04             send 4 

  04ac:36                push 
  04ad:34 0086            ldi 86 
  04b0:1e                 gt? 
  04b1:31 3e              bnt code_04f1 
  04b3:39 3a            pushi 3a // $3a heading
  04b5:76               push0 
  04b6:81 00              lag gEgo 
  04b8:4a 04             send 4 

  04ba:36                push 
  04bb:34 00e2            ldi e2 
  04be:22                 lt? 
  04bf:31 30              bnt code_04f1 
  04c1:35 01              ldi 1 
  04c3:a3 02              sal local2 
  04c5:35 00              ldi 0 
  04c7:65 1e             aTop south 
  04c9:65 1a             aTop north 
  04cb:39 04            pushi 4 // $4 x
  04cd:76               push0 
  04ce:81 00              lag gEgo 
  04d0:4a 04             send 4 

  04d2:36                push 
  04d3:34 00a0            ldi a0 
  04d6:22                 lt? 
  04d7:31 0d              bnt code_04e6 
  04d9:39 7a            pushi 7a // $7a setScript
  04db:78               push1 
  04dc:74 0cdb          lofss $11ba // falling
  04df:72 0fd4          lofsa $14b6 // rail1
  04e2:4a 06             send 6 

  04e4:33 0b              jmp code_04f1 

        code_04e6
  04e6:39 7a            pushi 7a // $7a setScript
  04e8:78               push1 
  04e9:74 0cce          lofss $11ba // falling
  04ec:72 102b          lofsa $151a // rail2
  04ef:4a 06             send 6 


        code_04f1
  04f1:3a                toss 
  04f2:39 03            pushi 3 // $3 y
  04f4:76               push0 
  04f5:81 00              lag gEgo 
  04f7:4a 04             send 4 

  04f9:36                push 
  04fa:34 0091            ldi 91 
  04fd:22                 lt? 
  04fe:31 2f              bnt code_052f 
  0500:39 04            pushi 4 // $4 x
  0502:76               push0 
  0503:81 00              lag gEgo 
  0505:4a 04             send 4 

  0507:36                push 
  0508:34 0082            ldi 82 
  050b:22                 lt? 
  050c:31 06              bnt code_0514 
  050e:35 0f              ldi f 
  0510:65 2a             aTop vertAngle 
  0512:33 19              jmp code_052d 

        code_0514
  0514:39 04            pushi 4 // $4 x
  0516:76               push0 
  0517:81 00              lag gEgo 
  0519:4a 04             send 4 

  051b:36                push 
  051c:34 00be            ldi be 
  051f:22                 lt? 
  0520:31 06              bnt code_0528 
  0522:35 00              ldi 0 
  0524:65 2a             aTop vertAngle 
  0526:33 05              jmp code_052d 

        code_0528
  0528:34 00a0            ldi a0 
  052b:65 2a             aTop vertAngle 

        code_052d
  052d:33 04              jmp code_0533 

        code_052f
  052f:35 00              ldi 0 
  0531:65 2a             aTop vertAngle 

        code_0533
  0533:39 3c            pushi 3c // $3c doit
  0535:76               push0 
  0536:57 37 04         super Rm 4 

  0539:48                 ret 
    )

    (method (dispose) // method_053a
  053a:39 58            pushi 58 // $58 dispose
  053c:76               push0 
  053d:57 37 04         super Rm 4 

  0540:48                 ret 
    )

    (method (newRoom) // method_0541
  0541:8f 01              lsp param1 
  0543:35 2e              ldi 2e 
  0545:1c                 ne? 
  0546:31 15              bnt code_055d 
  0548:88 00b1            lsg gGertieRoomState 
  054b:35 01              ldi 1 
  054d:1a                 eq? 
  054e:2f 08               bt code_0558 
  0550:88 00b1            lsg gGertieRoomState 
  0553:35 03              ldi 3 
  0555:1a                 eq? 
  0556:31 05              bnt code_055d 

        code_0558
  0558:35 02              ldi 2 
  055a:a0 00b1            sag gGertieRoomState 

        code_055d
  055d:38 00f8          pushi f8 // $f8 newRoom
  0560:78               push1 
  0561:8f 01              lsp param1 
  0563:57 37 06         super Rm 6 

  0566:48                 ret 
    )

    (method (handleEvent) // method_0567
  0567:3f 01             link 1 // (var $1)
  0569:39 22            pushi 22 // $22 type
  056b:76               push0 
  056c:87 01              lap param1 
  056e:4a 04             send 4 

  0570:36                push 
  0571:3c                 dup 
  0572:34 0080            ldi 80 
  0575:1a                 eq? 
  0576:30 00ba            bnt code_0633 
  0579:78               push1 
  057a:74 0b5b          lofss $10d8 // look<bas[/!*]
  057d:43 25 02         callk Said 2 

  0580:31 0d              bnt code_058f 
  0582:7a               push2 
  0583:39 2f            pushi 2f // $2f dy
  0585:78               push1 
  0586:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  058c:32 00a1            jmp code_0630 

        code_058f
  058f:78               push1 
  0590:74 0b56          lofss $10e9 // look>
  0593:43 25 02         callk Said 2 

  0596:31 75              bnt code_060d 
  0598:78               push1 
  0599:74 0abe          lofss $105a // [<around,at,bas][/room]
  059c:43 25 02         callk Said 2 

  059f:31 0c              bnt code_05ad 
  05a1:7a               push2 
  05a2:39 2f            pushi 2f // $2f dy
  05a4:76               push0 
  05a5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05ab:33 5e              jmp code_060b 

        code_05ad
  05ad:78               push1 
  05ae:74 0aa2          lofss $1053 // /door<cachoterie
  05b1:43 25 02         callk Said 2 

  05b4:31 0c              bnt code_05c2 
  05b6:7a               push2 
  05b7:39 2f            pushi 2f // $2f dy
  05b9:7a               push2 
  05ba:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05c0:33 49              jmp code_060b 

        code_05c2
  05c2:78               push1 
  05c3:74 0a86          lofss $104c // /door<bathroom
  05c6:43 25 02         callk Said 2 

  05c9:2f 09               bt code_05d4 
  05cb:78               push1 
  05cc:74 0a69          lofss $1038 // /bathroom
  05cf:43 25 02         callk Said 2 

  05d2:31 0d              bnt code_05e1 

        code_05d4
  05d4:7a               push2 
  05d5:39 2f            pushi 2f // $2f dy
  05d7:39 03            pushi 3 // $3 y
  05d9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05df:33 2a              jmp code_060b 

        code_05e1
  05e1:78               push1 
  05e2:74 0a57          lofss $103c // /aigle,post[<newel]
  05e5:43 25 02         callk Said 2 

  05e8:31 0d              bnt code_05f7 
  05ea:7a               push2 
  05eb:39 2f            pushi 2f // $2f dy
  05ed:39 04            pushi 4 // $4 x
  05ef:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05f5:33 14              jmp code_060b 

        code_05f7
  05f7:78               push1 
  05f8:74 0a4d          lofss $1048 // /curtain
  05fb:43 25 02         callk Said 2 

  05fe:31 0b              bnt code_060b 
  0600:7a               push2 
  0601:39 2f            pushi 2f // $2f dy
  0603:39 05            pushi 5 // $5 view
  0605:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_060b
  060b:33 23              jmp code_0630 

        code_060d
  060d:78               push1 
  060e:74 0a69          lofss $107a // get,arracher,rotate,detach/aigle,post[<newel]
  0611:43 25 02         callk Said 2 

  0614:31 0d              bnt code_0623 
  0616:7a               push2 
  0617:39 2f            pushi 2f // $2f dy
  0619:39 06            pushi 6 // $6 loop
  061b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0621:33 0d              jmp code_0630 

        code_0623
  0623:78               push1 
  0624:74 0a0b          lofss $1032 // */armoire
  0627:43 25 02         callk Said 2 

  062a:31 04              bnt code_0630 
  062c:76               push0 
  062d:45 09 00         callb procedure_0009 0 // NotClose 


        code_0630
  0630:32 0235            jmp code_0868 

        code_0633
  0633:3c                 dup 
  0634:35 01              ldi 1 
  0636:1a                 eq? 
  0637:30 012d            bnt code_0767 
  063a:38 00e3          pushi e3 // $e3 controls
  063d:76               push0 
  063e:51 2b            class User 
  0640:4a 04             send 4 

  0642:36                push 
  0643:35 00              ldi 0 
  0645:1a                 eq? 
  0646:2f 2e               bt code_0676 
  0648:38 00db          pushi db // $db onControl
  064b:78               push1 
  064c:76               push0 
  064d:81 00              lag gEgo 
  064f:4a 06             send 6 

  0651:36                push 
  0652:35 01              ldi 1 
  0654:12                 and 
  0655:2f 1f               bt code_0676 
  0657:38 00db          pushi db // $db onControl
  065a:78               push1 
  065b:76               push0 
  065c:81 00              lag gEgo 
  065e:4a 06             send 6 

  0660:36                push 
  0661:35 08              ldi 8 
  0663:12                 and 
  0664:2f 10               bt code_0676 
  0666:38 00db          pushi db // $db onControl
  0669:78               push1 
  066a:76               push0 
  066b:81 00              lag gEgo 
  066d:4a 06             send 6 

  066f:36                push 
  0670:34 0080            ldi 80 
  0673:12                 and 
  0674:31 01              bnt code_0677 

        code_0676
  0676:48                 ret 

        code_0677
  0677:38 00db          pushi db // $db onControl
  067a:78               push1 
  067b:76               push0 
  067c:81 00              lag gEgo 
  067e:4a 06             send 6 

  0680:36                push 
  0681:3c                 dup 
  0682:34 0200            ldi 200 
  0685:1a                 eq? 
  0686:31 66              bnt code_06ee 
  0688:38 00d3          pushi d3 // $d3 setMotion
  068b:39 03            pushi 3 // $3 y
  068d:51 1d            class MoveTo 
  068f:36                push 
  0690:39 03            pushi 3 // $3 y
  0692:76               push0 
  0693:87 01              lap param1 
  0695:4a 04             send 4 

  0697:36                push 
  0698:39 03            pushi 3 // $3 y
  069a:76               push0 
  069b:81 00              lag gEgo 
  069d:4a 04             send 4 

  069f:22                 lt? 
  06a0:31 04              bnt code_06a6 
  06a2:35 3c              ldi 3c 
  06a4:33 14              jmp code_06ba 

        code_06a6
  06a6:39 03            pushi 3 // $3 y
  06a8:76               push0 
  06a9:87 01              lap param1 
  06ab:4a 04             send 4 

  06ad:36                push 
  06ae:39 03            pushi 3 // $3 y
  06b0:76               push0 
  06b1:81 00              lag gEgo 
  06b3:4a 04             send 4 

  06b5:1e                 gt? 
  06b6:31 02              bnt code_06ba 
  06b8:35 27              ldi 27 

        code_06ba
  06ba:36                push 
  06bb:39 03            pushi 3 // $3 y
  06bd:76               push0 
  06be:87 01              lap param1 
  06c0:4a 04             send 4 

  06c2:36                push 
  06c3:39 03            pushi 3 // $3 y
  06c5:76               push0 
  06c6:81 00              lag gEgo 
  06c8:4a 04             send 4 

  06ca:22                 lt? 
  06cb:31 05              bnt code_06d2 
  06cd:34 0088            ldi 88 
  06d0:33 15              jmp code_06e7 

        code_06d2
  06d2:39 03            pushi 3 // $3 y
  06d4:76               push0 
  06d5:87 01              lap param1 
  06d7:4a 04             send 4 

  06d9:36                push 
  06da:39 03            pushi 3 // $3 y
  06dc:76               push0 
  06dd:81 00              lag gEgo 
  06df:4a 04             send 4 

  06e1:1e                 gt? 
  06e2:31 03              bnt code_06e7 
  06e4:34 00be            ldi be 

        code_06e7
  06e7:36                push 
  06e8:81 00              lag gEgo 
  06ea:4a 0a             send a 

  06ec:33 6d              jmp code_075b 

        code_06ee
  06ee:3c                 dup 
  06ef:34 0400            ldi 400 
  06f2:1a                 eq? 
  06f3:31 66              bnt code_075b 
  06f5:38 00d3          pushi d3 // $d3 setMotion
  06f8:39 03            pushi 3 // $3 y
  06fa:51 1d            class MoveTo 
  06fc:36                push 
  06fd:39 03            pushi 3 // $3 y
  06ff:76               push0 
  0700:87 01              lap param1 
  0702:4a 04             send 4 

  0704:36                push 
  0705:39 03            pushi 3 // $3 y
  0707:76               push0 
  0708:81 00              lag gEgo 
  070a:4a 04             send 4 

  070c:22                 lt? 
  070d:31 05              bnt code_0714 
  070f:34 0105            ldi 105 
  0712:33 15              jmp code_0729 

        code_0714
  0714:39 03            pushi 3 // $3 y
  0716:76               push0 
  0717:87 01              lap param1 
  0719:4a 04             send 4 

  071b:36                push 
  071c:39 03            pushi 3 // $3 y
  071e:76               push0 
  071f:81 00              lag gEgo 
  0721:4a 04             send 4 

  0723:1e                 gt? 
  0724:31 03              bnt code_0729 
  0726:34 0118            ldi 118 

        code_0729
  0729:36                push 
  072a:39 03            pushi 3 // $3 y
  072c:76               push0 
  072d:87 01              lap param1 
  072f:4a 04             send 4 

  0731:36                push 
  0732:39 03            pushi 3 // $3 y
  0734:76               push0 
  0735:81 00              lag gEgo 
  0737:4a 04             send 4 

  0739:22                 lt? 
  073a:31 05              bnt code_0741 
  073c:34 0088            ldi 88 
  073f:33 15              jmp code_0756 

        code_0741
  0741:39 03            pushi 3 // $3 y
  0743:76               push0 
  0744:87 01              lap param1 
  0746:4a 04             send 4 

  0748:36                push 
  0749:39 03            pushi 3 // $3 y
  074b:76               push0 
  074c:81 00              lag gEgo 
  074e:4a 04             send 4 

  0750:1e                 gt? 
  0751:31 03              bnt code_0756 
  0753:34 00be            ldi be 

        code_0756
  0756:36                push 
  0757:81 00              lag gEgo 
  0759:4a 0a             send a 


        code_075b
  075b:3a                toss 
  075c:39 4c            pushi 4c // $4c claimed
  075e:78               push1 
  075f:78               push1 
  0760:87 01              lap param1 
  0762:4a 06             send 6 

  0764:32 0101            jmp code_0868 

        code_0767
  0767:3c                 dup 
  0768:35 40              ldi 40 
  076a:1a                 eq? 
  076b:30 00fa            bnt code_0868 
  076e:38 00e3          pushi e3 // $e3 controls
  0771:76               push0 
  0772:51 2b            class User 
  0774:4a 04             send 4 

  0776:36                push 
  0777:35 00              ldi 0 
  0779:1a                 eq? 
  077a:2f 3d               bt code_07b9 
  077c:38 00db          pushi db // $db onControl
  077f:78               push1 
  0780:76               push0 
  0781:81 00              lag gEgo 
  0783:4a 06             send 6 

  0785:36                push 
  0786:35 01              ldi 1 
  0788:12                 and 
  0789:2f 2e               bt code_07b9 
  078b:38 00db          pushi db // $db onControl
  078e:78               push1 
  078f:76               push0 
  0790:81 00              lag gEgo 
  0792:4a 06             send 6 

  0794:36                push 
  0795:35 08              ldi 8 
  0797:12                 and 
  0798:2f 1f               bt code_07b9 
  079a:38 00db          pushi db // $db onControl
  079d:78               push1 
  079e:76               push0 
  079f:81 00              lag gEgo 
  07a1:4a 06             send 6 

  07a3:36                push 
  07a4:35 20              ldi 20 
  07a6:12                 and 
  07a7:2f 10               bt code_07b9 
  07a9:38 00db          pushi db // $db onControl
  07ac:78               push1 
  07ad:76               push0 
  07ae:81 00              lag gEgo 
  07b0:4a 06             send 6 

  07b2:36                push 
  07b3:34 0080            ldi 80 
  07b6:12                 and 
  07b7:31 01              bnt code_07ba 

        code_07b9
  07b9:48                 ret 

        code_07ba
  07ba:39 28            pushi 28 // $28 message
  07bc:76               push0 
  07bd:87 01              lap param1 
  07bf:4a 04             send 4 

  07c1:36                push 
  07c2:3c                 dup 
  07c3:35 01              ldi 1 
  07c5:1a                 eq? 
  07c6:31 48              bnt code_0810 
  07c8:38 00db          pushi db // $db onControl
  07cb:78               push1 
  07cc:76               push0 
  07cd:81 00              lag gEgo 
  07cf:4a 06             send 6 

  07d1:36                push 
  07d2:3c                 dup 
  07d3:34 0200            ldi 200 
  07d6:1a                 eq? 
  07d7:31 13              bnt code_07ec 
  07d9:38 00d3          pushi d3 // $d3 setMotion
  07dc:39 03            pushi 3 // $3 y
  07de:51 1d            class MoveTo 
  07e0:36                push 
  07e1:39 3c            pushi 3c // $3c doit
  07e3:38 0088          pushi 88 // $88 fade
  07e6:81 00              lag gEgo 
  07e8:4a 0a             send a 

  07ea:33 19              jmp code_0805 

        code_07ec
  07ec:3c                 dup 
  07ed:34 0400            ldi 400 
  07f0:1a                 eq? 
  07f1:31 12              bnt code_0805 
  07f3:38 00d3          pushi d3 // $d3 setMotion
  07f6:39 03            pushi 3 // $3 y
  07f8:51 1d            class MoveTo 
  07fa:36                push 
  07fb:38 0105          pushi 105 // $105 north
  07fe:38 0088          pushi 88 // $88 fade
  0801:81 00              lag gEgo 
  0803:4a 0a             send a 


        code_0805
  0805:3a                toss 
  0806:39 4c            pushi 4c // $4c claimed
  0808:78               push1 
  0809:78               push1 
  080a:87 01              lap param1 
  080c:4a 06             send 6 

  080e:33 57              jmp code_0867 

        code_0810
  0810:3c                 dup 
  0811:35 05              ldi 5 
  0813:1a                 eq? 
  0814:31 48              bnt code_085e 
  0816:38 00db          pushi db // $db onControl
  0819:78               push1 
  081a:76               push0 
  081b:81 00              lag gEgo 
  081d:4a 06             send 6 

  081f:36                push 
  0820:3c                 dup 
  0821:34 0200            ldi 200 
  0824:1a                 eq? 
  0825:31 13              bnt code_083a 
  0827:38 00d3          pushi d3 // $d3 setMotion
  082a:39 03            pushi 3 // $3 y
  082c:51 1d            class MoveTo 
  082e:36                push 
  082f:39 27            pushi 27 // $27 who
  0831:38 00be          pushi be // $be offScreenOK
  0834:81 00              lag gEgo 
  0836:4a 0a             send a 

  0838:33 19              jmp code_0853 

        code_083a
  083a:3c                 dup 
  083b:34 0400            ldi 400 
  083e:1a                 eq? 
  083f:31 12              bnt code_0853 
  0841:38 00d3          pushi d3 // $d3 setMotion
  0844:39 03            pushi 3 // $3 y
  0846:51 1d            class MoveTo 
  0848:36                push 
  0849:38 0118          pushi 118 // $118 stopExtra
  084c:38 00be          pushi be // $be offScreenOK
  084f:81 00              lag gEgo 
  0851:4a 0a             send a 


        code_0853
  0853:3a                toss 
  0854:39 4c            pushi 4c // $4c claimed
  0856:78               push1 
  0857:78               push1 
  0858:87 01              lap param1 
  085a:4a 06             send 6 

  085c:33 09              jmp code_0867 

        code_085e
  085e:39 4c            pushi 4c // $4c claimed
  0860:78               push1 
  0861:78               push1 
  0862:87 01              lap param1 
  0864:4a 06             send 6 

  0866:48                 ret 

        code_0867
  0867:3a                toss 

        code_0868
  0868:3a                toss 
  0869:48                 ret 
    )

)

// 1154
(instance myDoor 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_086a
  086a:87 01              lap param1 
  086c:65 0a             aTop state 
  086e:36                push 
  086f:3c                 dup 
  0870:35 00              ldi 0 
  0872:1a                 eq? 
  0873:31 3a              bnt code_08af 
  0875:76               push0 
  0876:45 03 00         callb procedure_0003 0 // HandsOff 

  0879:39 04            pushi 4 // $4 x
  087b:76               push0 
  087c:81 00              lag gEgo 
  087e:4a 04             send 4 

  0880:36                push 
  0881:35 56              ldi 56 
  0883:1a                 eq? 
  0884:31 14              bnt code_089a 
  0886:39 03            pushi 3 // $3 y
  0888:76               push0 
  0889:81 00              lag gEgo 
  088b:4a 04             send 4 

  088d:36                push 
  088e:34 0083            ldi 83 
  0891:1a                 eq? 
  0892:31 06              bnt code_089a 
  0894:35 01              ldi 1 
  0896:65 10             aTop cycles 
  0898:33 12              jmp code_08ac 

        code_089a
  089a:38 00d3          pushi d3 // $d3 setMotion
  089d:39 04            pushi 4 // $4 x
  089f:51 1d            class MoveTo 
  08a1:36                push 
  08a2:39 56            pushi 56 // $56 new
  08a4:38 0083          pushi 83 // $83 playMaybe
  08a7:7c            pushSelf 
  08a8:81 00              lag gEgo 
  08aa:4a 0c             send c 


        code_08ac
  08ac:32 0169            jmp code_0a18 

        code_08af
  08af:3c                 dup 
  08b0:35 01              ldi 1 
  08b2:1a                 eq? 
  08b3:31 33              bnt code_08e8 
  08b5:7a               push2 
  08b6:89 00              lsg gEgo 
  08b8:74 0ba9          lofss $1464 // Ldoor
  08bb:45 02 04         callb procedure_0002 4 // LookAt 

  08be:38 00c9          pushi c9 // $c9 ignoreActors
  08c1:78               push1 
  08c2:78               push1 
  08c3:38 00a4          pushi a4 // $a4 cycleSpeed
  08c6:78               push1 
  08c7:7a               push2 
  08c8:39 7e            pushi 7e // $7e setCycle
  08ca:7a               push2 
  08cb:51 1a            class End 
  08cd:36                push 
  08ce:7c            pushSelf 
  08cf:72 0b92          lofsa $1464 // Ldoor
  08d2:4a 14             send 14 

  08d4:39 2b            pushi 2b // $2b number
  08d6:78               push1 
  08d7:39 2b            pushi 2b // $2b number
  08d9:39 06            pushi 6 // $6 loop
  08db:78               push1 
  08dc:78               push1 
  08dd:39 2a            pushi 2a // $2a play
  08df:76               push0 
  08e0:72 0f0b          lofsa $17ee // myMusic
  08e3:4a 10             send 10 

  08e5:32 0130            jmp code_0a18 

        code_08e8
  08e8:3c                 dup 
  08e9:35 02              ldi 2 
  08eb:1a                 eq? 
  08ec:31 15              bnt code_0903 
  08ee:38 00d3          pushi d3 // $d3 setMotion
  08f1:39 04            pushi 4 // $4 x
  08f3:51 1d            class MoveTo 
  08f5:36                push 
  08f6:39 42            pushi 42 // $42 setPri
  08f8:38 0083          pushi 83 // $83 playMaybe
  08fb:7c            pushSelf 
  08fc:81 00              lag gEgo 
  08fe:4a 0c             send c 

  0900:32 0115            jmp code_0a18 

        code_0903
  0903:3c                 dup 
  0904:35 03              ldi 3 
  0906:1a                 eq? 
  0907:31 35              bnt code_093e 
  0909:39 06            pushi 6 // $6 loop
  090b:78               push1 
  090c:39 03            pushi 3 // $3 y
  090e:81 00              lag gEgo 
  0910:4a 06             send 6 

  0912:35 01              ldi 1 
  0914:a3 01              sal local1 
  0916:88 00a5            lsg gAct 
  0919:35 00              ldi 0 
  091b:1e                 gt? 
  091c:31 19              bnt code_0937 
  091e:88 00a5            lsg gAct 
  0921:35 07              ldi 7 
  0923:22                 lt? 
  0924:31 11              bnt code_0937 
  0926:7a               push2 
  0927:78               push1 
  0928:39 64            pushi 64 // $64 allTrue
  092a:43 40 04         callk Random 4 

  092d:36                push 
  092e:35 19              ldi 19 
  0930:22                 lt? 
  0931:31 04              bnt code_0937 
  0933:35 06              ldi 6 
  0935:65 0a             aTop state 

        code_0937
  0937:35 02              ldi 2 
  0939:65 12             aTop seconds 
  093b:32 00da            jmp code_0a18 

        code_093e
  093e:3c                 dup 
  093f:35 04              ldi 4 
  0941:1a                 eq? 
  0942:31 20              bnt code_0964 
  0944:7a               push2 
  0945:39 2f            pushi 2f // $2f dy
  0947:39 07            pushi 7 // $7 cel
  0949:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  094f:38 00d3          pushi d3 // $d3 setMotion
  0952:39 04            pushi 4 // $4 x
  0954:51 1d            class MoveTo 
  0956:36                push 
  0957:39 56            pushi 56 // $56 new
  0959:38 0083          pushi 83 // $83 playMaybe
  095c:7c            pushSelf 
  095d:81 00              lag gEgo 
  095f:4a 0c             send c 

  0961:32 00b4            jmp code_0a18 

        code_0964
  0964:3c                 dup 
  0965:35 05              ldi 5 
  0967:1a                 eq? 
  0968:31 35              bnt code_099f 
  096a:39 06            pushi 6 // $6 loop
  096c:78               push1 
  096d:78               push1 
  096e:81 00              lag gEgo 
  0970:4a 06             send 6 

  0972:38 00c9          pushi c9 // $c9 ignoreActors
  0975:78               push1 
  0976:76               push0 
  0977:38 00a4          pushi a4 // $a4 cycleSpeed
  097a:78               push1 
  097b:7a               push2 
  097c:39 7e            pushi 7e // $7e setCycle
  097e:7a               push2 
  097f:51 1b            class Beg 
  0981:36                push 
  0982:7c            pushSelf 
  0983:72 0ade          lofsa $1464 // Ldoor
  0986:4a 14             send 14 

  0988:39 2b            pushi 2b // $2b number
  098a:78               push1 
  098b:39 2c            pushi 2c // $2c handle
  098d:39 06            pushi 6 // $6 loop
  098f:78               push1 
  0990:78               push1 
  0991:39 2a            pushi 2a // $2a play
  0993:76               push0 
  0994:72 0e57          lofsa $17ee // myMusic
  0997:4a 10             send 10 

  0999:35 00              ldi 0 
  099b:a3 01              sal local1 
  099d:33 79              jmp code_0a18 

        code_099f
  099f:3c                 dup 
  09a0:35 06              ldi 6 
  09a2:1a                 eq? 
  09a3:31 0e              bnt code_09b3 
  09a5:76               push0 
  09a6:45 04 00         callb procedure_0004 0 // HandsOn 

  09a9:39 7a            pushi 7a // $7a setScript
  09ab:78               push1 
  09ac:76               push0 
  09ad:63 08             pToa client 
  09af:4a 06             send 6 

  09b1:33 65              jmp code_0a18 

        code_09b3
  09b3:3c                 dup 
  09b4:35 07              ldi 7 
  09b6:1a                 eq? 
  09b7:31 2a              bnt code_09e3 
  09b9:39 7e            pushi 7e // $7e setCycle
  09bb:7a               push2 
  09bc:51 1a            class End 
  09be:36                push 
  09bf:7c            pushSelf 
  09c0:39 57            pushi 57 // $57 init
  09c2:76               push0 
  09c3:72 0d00          lofsa $16c6 // hand
  09c6:4a 0c             send c 

  09c8:39 2b            pushi 2b // $2b number
  09ca:78               push1 
  09cb:39 57            pushi 57 // $57 init
  09cd:39 06            pushi 6 // $6 loop
  09cf:78               push1 
  09d0:78               push1 
  09d1:39 2a            pushi 2a // $2a play
  09d3:76               push0 
  09d4:72 0e17          lofsa $17ee // myMusic
  09d7:4a 10             send 10 

  09d9:38 0089          pushi 89 // $89 hide
  09dc:76               push0 
  09dd:81 00              lag gEgo 
  09df:4a 04             send 4 

  09e1:33 35              jmp code_0a18 

        code_09e3
  09e3:3c                 dup 
  09e4:35 08              ldi 8 
  09e6:1a                 eq? 
  09e7:31 2f              bnt code_0a18 
  09e9:39 05            pushi 5 // $5 view
  09eb:78               push1 
  09ec:38 028b          pushi 28b // $28b sel_651
  09ef:38 00a5          pushi a5 // $a5 cycler
  09f2:78               push1 
  09f3:51 1a            class End 
  09f5:36                push 
  09f6:72 0e1f          lofsa $1818 // myIcon
  09f9:4a 0c             send c 

  09fb:72 0e1a          lofsa $1818 // myIcon
  09fe:a0 0080            sag global128 
  0a01:35 00              ldi 0 
  0a03:a0 0081            sag global129 
  0a06:35 00              ldi 0 
  0a08:a0 0082            sag global130 
  0a0b:35 01              ldi 1 
  0a0d:a0 0084            sag global132 
  0a10:7a               push2 
  0a11:39 2f            pushi 2f // $2f dy
  0a13:39 08            pushi 8 // $8 underBits
  0a15:45 13 04         callb procedure_0013 4 // EgoDead 


        code_0a18
  0a18:3a                toss 
  0a19:48                 ret 
    )

)

// 1184
(instance jiggle 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_0a1a
  0a1a:87 01              lap param1 
  0a1c:65 0a             aTop state 
  0a1e:36                push 
  0a1f:3c                 dup 
  0a20:35 00              ldi 0 
  0a22:1a                 eq? 
  0a23:31 2a              bnt code_0a4f 
  0a25:83 05              lal local5 
  0a27:18                 not 
  0a28:31 1a              bnt code_0a44 
  0a2a:7a               push2 
  0a2b:78               push1 
  0a2c:39 64            pushi 64 // $64 allTrue
  0a2e:43 40 04         callk Random 4 

  0a31:36                push 
  0a32:35 0a              ldi a 
  0a34:22                 lt? 
  0a35:31 0d              bnt code_0a44 
  0a37:8b 04              lsl local4 
  0a39:35 00              ldi 0 
  0a3b:1a                 eq? 
  0a3c:31 06              bnt code_0a44 
  0a3e:35 01              ldi 1 
  0a40:65 10             aTop cycles 
  0a42:33 08              jmp code_0a4c 

        code_0a44
  0a44:35 ff              ldi ff 
  0a46:65 0a             aTop state 
  0a48:35 05              ldi 5 
  0a4a:65 12             aTop seconds 

        code_0a4c
  0a4c:32 00ae            jmp code_0afd 

        code_0a4f
  0a4f:3c                 dup 
  0a50:35 01              ldi 1 
  0a52:1a                 eq? 
  0a53:31 32              bnt code_0a87 
  0a55:83 06              lal local6 
  0a57:18                 not 
  0a58:31 15              bnt code_0a6f 
  0a5a:35 01              ldi 1 
  0a5c:a3 06              sal local6 
  0a5e:39 2b            pushi 2b // $2b number
  0a60:78               push1 
  0a61:39 6d            pushi 6d // $6d addAfter
  0a63:39 06            pushi 6 // $6 loop
  0a65:78               push1 
  0a66:78               push1 
  0a67:39 2a            pushi 2a // $2a play
  0a69:76               push0 
  0a6a:72 0d81          lofsa $17ee // myMusic
  0a6d:4a 10             send 10 


        code_0a6f
  0a6f:38 00c5          pushi c5 // $c5 posn
  0a72:7a               push2 
  0a73:38 00a2          pushi a2 // $a2 setCel
  0a76:39 57            pushi 57 // $57 init
  0a78:38 00c7          pushi c7 // $c7 forceUpd
  0a7b:76               push0 
  0a7c:72 0993          lofsa $1412 // chand
  0a7f:4a 0c             send c 

  0a81:35 02              ldi 2 
  0a83:65 10             aTop cycles 
  0a85:33 76              jmp code_0afd 

        code_0a87
  0a87:3c                 dup 
  0a88:35 02              ldi 2 
  0a8a:1a                 eq? 
  0a8b:31 18              bnt code_0aa5 
  0a8d:38 00c5          pushi c5 // $c5 posn
  0a90:7a               push2 
  0a91:38 00a1          pushi a1 // $a1 motionCue
  0a94:39 57            pushi 57 // $57 init
  0a96:38 00c7          pushi c7 // $c7 forceUpd
  0a99:76               push0 
  0a9a:72 0975          lofsa $1412 // chand
  0a9d:4a 0c             send c 

  0a9f:35 02              ldi 2 
  0aa1:65 10             aTop cycles 
  0aa3:33 58              jmp code_0afd 

        code_0aa5
  0aa5:3c                 dup 
  0aa6:35 03              ldi 3 
  0aa8:1a                 eq? 
  0aa9:31 18              bnt code_0ac3 
  0aab:38 00c5          pushi c5 // $c5 posn
  0aae:7a               push2 
  0aaf:38 00a2          pushi a2 // $a2 setCel
  0ab2:39 57            pushi 57 // $57 init
  0ab4:38 00c7          pushi c7 // $c7 forceUpd
  0ab7:76               push0 
  0ab8:72 0957          lofsa $1412 // chand
  0abb:4a 0c             send c 

  0abd:35 02              ldi 2 
  0abf:65 10             aTop cycles 
  0ac1:33 3a              jmp code_0afd 

        code_0ac3
  0ac3:3c                 dup 
  0ac4:35 04              ldi 4 
  0ac6:1a                 eq? 
  0ac7:31 34              bnt code_0afd 
  0ac9:38 00c5          pushi c5 // $c5 posn
  0acc:7a               push2 
  0acd:38 00a1          pushi a1 // $a1 motionCue
  0ad0:39 57            pushi 57 // $57 init
  0ad2:72 093d          lofsa $1412 // chand
  0ad5:4a 08             send 8 

  0ad7:cb 00              +sl local0 
  0ad9:35 03              ldi 3 
  0adb:1a                 eq? 
  0adc:31 17              bnt code_0af5 
  0ade:38 00c6          pushi c6 // $c6 stopUpd
  0ae1:76               push0 
  0ae2:72 092d          lofsa $1412 // chand
  0ae5:4a 04             send 4 

  0ae7:35 00              ldi 0 
  0ae9:a3 06              sal local6 
  0aeb:35 00              ldi 0 
  0aed:a3 00              sal local0 
  0aef:35 ff              ldi ff 
  0af1:65 0a             aTop state 
  0af3:33 04              jmp code_0af9 

        code_0af5
  0af5:35 00              ldi 0 
  0af7:65 0a             aTop state 

        code_0af9
  0af9:35 02              ldi 2 
  0afb:65 10             aTop cycles 

        code_0afd
  0afd:3a                toss 
  0afe:48                 ret 
    )

)

// 11b4
(instance falling 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_0aff
  0aff:87 01              lap param1 
  0b01:65 0a             aTop state 
  0b03:36                push 
  0b04:3c                 dup 
  0b05:35 00              ldi 0 
  0b07:1a                 eq? 
  0b08:31 2b              bnt code_0b35 
  0b0a:76               push0 
  0b0b:45 03 00         callb procedure_0003 0 // HandsOff 

  0b0e:35 01              ldi 1 
  0b10:a3 04              sal local4 
  0b12:7a               push2 
  0b13:39 2f            pushi 2f // $2f dy
  0b15:39 09            pushi 9 // $9 nsTop
  0b17:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0b1d:39 05            pushi 5 // $5 view
  0b1f:78               push1 
  0b20:39 09            pushi 9 // $9 nsTop
  0b22:38 00c8          pushi c8 // $c8 setLoop
  0b25:78               push1 
  0b26:76               push0 
  0b27:39 7e            pushi 7e // $7e setCycle
  0b29:7a               push2 
  0b2a:51 1a            class End 
  0b2c:36                push 
  0b2d:7c            pushSelf 
  0b2e:81 00              lag gEgo 
  0b30:4a 14             send 14 

  0b32:32 0184            jmp code_0cb9 

        code_0b35
  0b35:3c                 dup 
  0b36:35 01              ldi 1 
  0b38:1a                 eq? 
  0b39:31 3d              bnt code_0b78 
  0b3b:39 2b            pushi 2b // $2b number
  0b3d:78               push1 
  0b3e:39 26            pushi 26 // $26 mark
  0b40:39 06            pushi 6 // $6 loop
  0b42:78               push1 
  0b43:78               push1 
  0b44:39 2a            pushi 2a // $2a play
  0b46:76               push0 
  0b47:72 0ca4          lofsa $17ee // myMusic
  0b4a:4a 10             send 10 

  0b4c:38 00c8          pushi c8 // $c8 setLoop
  0b4f:78               push1 
  0b50:78               push1 
  0b51:39 7e            pushi 7e // $7e setCycle
  0b53:78               push1 
  0b54:51 16            class Fwd 
  0b56:36                push 
  0b57:81 00              lag gEgo 
  0b59:4a 0c             send c 

  0b5b:39 05            pushi 5 // $5 view
  0b5d:78               push1 
  0b5e:39 09            pushi 9 // $9 nsTop
  0b60:39 07            pushi 7 // $7 cel
  0b62:78               push1 
  0b63:76               push0 
  0b64:38 00c8          pushi c8 // $c8 setLoop
  0b67:78               push1 
  0b68:39 03            pushi 3 // $3 y
  0b6a:39 7e            pushi 7e // $7e setCycle
  0b6c:7a               push2 
  0b6d:51 1a            class End 
  0b6f:36                push 
  0b70:7c            pushSelf 
  0b71:63 08             pToa client 
  0b73:4a 1a             send 1a 

  0b75:32 0141            jmp code_0cb9 

        code_0b78
  0b78:3c                 dup 
  0b79:35 02              ldi 2 
  0b7b:1a                 eq? 
  0b7c:31 3f              bnt code_0bbd 
  0b7e:39 12            pushi 12 // $12 illegalBits
  0b80:78               push1 
  0b81:76               push0 
  0b82:38 00dc          pushi dc // $dc setStep
  0b85:7a               push2 
  0b86:39 0c            pushi c // $c nsRight
  0b88:39 0c            pushi c // $c nsRight
  0b8a:38 00d3          pushi d3 // $d3 setMotion
  0b8d:39 03            pushi 3 // $3 y
  0b8f:51 1d            class MoveTo 
  0b91:36                push 
  0b92:39 04            pushi 4 // $4 x
  0b94:76               push0 
  0b95:63 08             pToa client 
  0b97:4a 04             send 4 

  0b99:36                push 
  0b9a:38 00fa          pushi fa // $fa restart
  0b9d:63 08             pToa client 
  0b9f:4a 18             send 18 

  0ba1:38 00c8          pushi c8 // $c8 setLoop
  0ba4:78               push1 
  0ba5:7a               push2 
  0ba6:39 42            pushi 42 // $42 setPri
  0ba8:78               push1 
  0ba9:39 0f            pushi f // $f lsBottom
  0bab:39 7e            pushi 7e // $7e setCycle
  0bad:7a               push2 
  0bae:51 1a            class End 
  0bb0:36                push 
  0bb1:7c            pushSelf 
  0bb2:39 12            pushi 12 // $12 illegalBits
  0bb4:78               push1 
  0bb5:76               push0 
  0bb6:81 00              lag gEgo 
  0bb8:4a 1a             send 1a 

  0bba:32 00fc            jmp code_0cb9 

        code_0bbd
  0bbd:3c                 dup 
  0bbe:35 03              ldi 3 
  0bc0:1a                 eq? 
  0bc1:31 2d              bnt code_0bf0 
  0bc3:38 00a2          pushi a2 // $a2 setCel
  0bc6:78               push1 
  0bc7:39 09            pushi 9 // $9 nsTop
  0bc9:39 7e            pushi 7e // $7e setCycle
  0bcb:78               push1 
  0bcc:76               push0 
  0bcd:38 00dc          pushi dc // $dc setStep
  0bd0:7a               push2 
  0bd1:39 0a            pushi a // $a nsLeft
  0bd3:39 0a            pushi a // $a nsLeft
  0bd5:38 00d3          pushi d3 // $d3 setMotion
  0bd8:39 04            pushi 4 // $4 x
  0bda:51 1d            class MoveTo 
  0bdc:36                push 
  0bdd:39 04            pushi 4 // $4 x
  0bdf:76               push0 
  0be0:81 00              lag gEgo 
  0be2:4a 04             send 4 

  0be4:36                push 
  0be5:38 00fa          pushi fa // $fa restart
  0be8:7c            pushSelf 
  0be9:81 00              lag gEgo 
  0beb:4a 20             send 20 

  0bed:32 00c9            jmp code_0cb9 

        code_0bf0
  0bf0:3c                 dup 
  0bf1:35 04              ldi 4 
  0bf3:1a                 eq? 
  0bf4:31 21              bnt code_0c17 
  0bf6:38 0084          pushi 84 // $84 stop
  0bf9:76               push0 
  0bfa:72 0bf1          lofsa $17ee // myMusic
  0bfd:4a 04             send 4 

  0bff:39 2b            pushi 2b // $2b number
  0c01:78               push1 
  0c02:39 2f            pushi 2f // $2f dy
  0c04:39 06            pushi 6 // $6 loop
  0c06:78               push1 
  0c07:78               push1 
  0c08:39 2a            pushi 2a // $2a play
  0c0a:76               push0 
  0c0b:72 0be0          lofsa $17ee // myMusic
  0c0e:4a 10             send 10 

  0c10:35 02              ldi 2 
  0c12:65 10             aTop cycles 
  0c14:32 00a2            jmp code_0cb9 

        code_0c17
  0c17:3c                 dup 
  0c18:35 05              ldi 5 
  0c1a:1a                 eq? 
  0c1b:31 0f              bnt code_0c2c 
  0c1d:7a               push2 
  0c1e:39 0a            pushi a // $a nsLeft
  0c20:39 05            pushi 5 // $5 view
  0c22:43 6a 04         callk ShakeScreen 4 

  0c25:35 03              ldi 3 
  0c27:65 12             aTop seconds 
  0c29:32 008d            jmp code_0cb9 

        code_0c2c
  0c2c:3c                 dup 
  0c2d:35 06              ldi 6 
  0c2f:1a                 eq? 
  0c30:31 5c              bnt code_0c8e 
  0c32:39 2b            pushi 2b // $2b number
  0c34:78               push1 
  0c35:39 39            pushi 39 // $39 canBeHere
  0c37:39 06            pushi 6 // $6 loop
  0c39:78               push1 
  0c3a:78               push1 
  0c3b:39 2a            pushi 2a // $2a play
  0c3d:78               push1 
  0c3e:7c            pushSelf 
  0c3f:72 0bac          lofsa $17ee // myMusic
  0c42:4a 12             send 12 

  0c44:39 05            pushi 5 // $5 view
  0c46:78               push1 
  0c47:39 26            pushi 26 // $26 mark
  0c49:38 00a2          pushi a2 // $a2 setCel
  0c4c:78               push1 
  0c4d:39 ff            pushi ff // $ff checkAni
  0c4f:38 00c8          pushi c8 // $c8 setLoop
  0c52:78               push1 
  0c53:76               push0 
  0c54:39 42            pushi 42 // $42 setPri
  0c56:78               push1 
  0c57:39 0f            pushi f // $f lsBottom
  0c59:39 7e            pushi 7e // $7e setCycle
  0c5b:78               push1 
  0c5c:51 16            class Fwd 
  0c5e:36                push 
  0c5f:38 00dc          pushi dc // $dc setStep
  0c62:7a               push2 
  0c63:39 03            pushi 3 // $3 y
  0c65:39 03            pushi 3 // $3 y
  0c67:38 00c9          pushi c9 // $c9 ignoreActors
  0c6a:78               push1 
  0c6b:78               push1 
  0c6c:39 12            pushi 12 // $12 illegalBits
  0c6e:78               push1 
  0c6f:76               push0 
  0c70:38 00d5          pushi d5 // $d5 ignoreHorizon
  0c73:78               push1 
  0c74:78               push1 
  0c75:38 00d3          pushi d3 // $d3 setMotion
  0c78:39 04            pushi 4 // $4 x
  0c7a:51 1d            class MoveTo 
  0c7c:36                push 
  0c7d:39 04            pushi 4 // $4 x
  0c7f:76               push0 
  0c80:81 00              lag gEgo 
  0c82:4a 04             send 4 

  0c84:36                push 
  0c85:39 ce            pushi ce // $ce yLast
  0c87:7c            pushSelf 
  0c88:81 00              lag gEgo 
  0c8a:4a 44             send 44 

  0c8c:33 2b              jmp code_0cb9 

        code_0c8e
  0c8e:3c                 dup 
  0c8f:35 07              ldi 7 
  0c91:1a                 eq? 
  0c92:31 17              bnt code_0cab 
  0c94:72 0b81          lofsa $1818 // myIcon
  0c97:a0 0080            sag global128 
  0c9a:35 00              ldi 0 
  0c9c:a0 0081            sag global129 
  0c9f:35 00              ldi 0 
  0ca1:a0 0082            sag global130 
  0ca4:35 01              ldi 1 
  0ca6:a0 0084            sag global132 
  0ca9:33 0e              jmp code_0cb9 

        code_0cab
  0cab:3c                 dup 
  0cac:35 08              ldi 8 
  0cae:1a                 eq? 
  0caf:31 08              bnt code_0cb9 
  0cb1:7a               push2 
  0cb2:39 2f            pushi 2f // $2f dy
  0cb4:39 0a            pushi a // $a nsLeft
  0cb6:45 13 04         callb procedure_0013 4 // EgoDead 


        code_0cb9
  0cb9:3a                toss 
  0cba:48                 ret 
    )

)

// 11e4
(instance post1 of PV
    (properties
        y $7a
        x $4e
        z $0
        heading $0
        view $93
        loop $2
        cel $0
        priority $f
        signal $4000
    )
)

// 120e
(instance post2 of PV
    (properties
        y $79
        x $f3
        z $0
        heading $0
        view $93
        loop $2
        cel $1
        priority $f
        signal $4000
    )
)

// 1238
(instance cabL of PV
    (properties
        y $35
        x $7c
        z $0
        heading $0
        view $93
        loop $2
        cel $8
        priority $2
        signal $0
    )
)

// 1262
(instance cabR of PV
    (properties
        y $35
        x $c7
        z $0
        heading $0
        view $93
        loop $2
        cel $9
        priority $2
        signal $0
    )
)

// 128c
(instance cat of PV
    (properties
        y $35
        x $8f
        z $0
        heading $0
        view $93
        loop $2
        cel $6
        priority $2
        signal $0
    )
)

// 12b6
(instance vase of PV
    (properties
        y $34
        x $b1
        z $0
        heading $0
        view $93
        loop $2
        cel $7
        priority $1
        signal $0
    )
)

// 12e0
(instance wardR of RPicView
    (properties
        y $50
        x $dc
        z $0
        heading $0
        view $93
        loop $2
        cel $5
        priority $4
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0cbb
  0cbb:39 03            pushi 3 // $3 y
  0cbd:7c            pushSelf 
  0cbe:8f 01              lsp param1 
  0cc0:39 03            pushi 3 // $3 y
  0cc2:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0cc8:2f 09               bt code_0cd3 
  0cca:78               push1 
  0ccb:74 03d4          lofss $10a2 // look/armoire
  0cce:43 25 02         callk Said 2 

  0cd1:31 13              bnt code_0ce6 

        code_0cd3
  0cd3:39 4c            pushi 4c // $4c claimed
  0cd5:78               push1 
  0cd6:78               push1 
  0cd7:87 01              lap param1 
  0cd9:4a 06             send 6 

  0cdb:7a               push2 
  0cdc:39 2f            pushi 2f // $2f dy
  0cde:39 0b            pushi b // $b nsBottom
  0ce0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ce6
  0ce6:48                 ret 
    )

)

// 1316
(instance wardL of RPicView
    (properties
        y $50
        x $67
        z $0
        heading $0
        view $93
        loop $2
        cel $4
        priority $4
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0ce7
  0ce7:39 03            pushi 3 // $3 y
  0ce9:7c            pushSelf 
  0cea:8f 01              lsp param1 
  0cec:39 03            pushi 3 // $3 y
  0cee:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0cf4:2f 09               bt code_0cff 
  0cf6:78               push1 
  0cf7:74 03a8          lofss $10a2 // look/armoire
  0cfa:43 25 02         callk Said 2 

  0cfd:31 13              bnt code_0d12 

        code_0cff
  0cff:39 4c            pushi 4c // $4c claimed
  0d01:78               push1 
  0d02:78               push1 
  0d03:87 01              lap param1 
  0d05:4a 06             send 6 

  0d07:7a               push2 
  0d08:39 2f            pushi 2f // $2f dy
  0d0a:39 0b            pushi b // $b nsBottom
  0d0c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0d12
  0d12:48                 ret 
    )

)

// 134c
(instance chain2 of PV
    (properties
        y $2f
        x $a2
        z $0
        heading $0
        view $93
        loop $2
        cel $3
        priority $f
        signal $0
    )
)

// 1376
(instance chain3 of PV
    (properties
        y $41
        x $a2
        z $0
        heading $0
        view $93
        loop $2
        cel $3
        priority $f
        signal $0
    )
)

// 13a0
(instance table1 of RPicView
    (properties
        y $5e
        x $65
        z $0
        heading $0
        view $93
        loop $2
        cel $a
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0d13
  0d13:39 03            pushi 3 // $3 y
  0d15:7c            pushSelf 
  0d16:8f 01              lsp param1 
  0d18:39 03            pushi 3 // $3 y
  0d1a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0d20:31 0f              bnt code_0d31 
  0d22:39 4c            pushi 4c // $4c claimed
  0d24:78               push1 
  0d25:78               push1 
  0d26:87 01              lap param1 
  0d28:4a 06             send 6 

  0d2a:78               push1 
  0d2b:74 0bd6          lofss $1904 // table
  0d2e:45 19 02         callb procedure_0019 2 // DoLook 


        code_0d31
  0d31:48                 ret 
    )

)

// 13d6
(instance table2 of RPicView
    (properties
        y $5e
        x $dd
        z $0
        heading $0
        view $93
        loop $2
        cel $b
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0d32
  0d32:39 03            pushi 3 // $3 y
  0d34:7c            pushSelf 
  0d35:8f 01              lsp param1 
  0d37:39 03            pushi 3 // $3 y
  0d39:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0d3f:31 0f              bnt code_0d50 
  0d41:39 4c            pushi 4c // $4c claimed
  0d43:78               push1 
  0d44:78               push1 
  0d45:87 01              lap param1 
  0d47:4a 06             send 6 

  0d49:78               push1 
  0d4a:74 0bb7          lofss $1904 // table
  0d4d:45 19 02         callb procedure_0019 2 // DoLook 


        code_0d50
  0d50:48                 ret 
    )

)

// 140c
(instance chand of Prop
    (properties
        y $57
        x $a1
        z $0
        heading $0
        yStep $2
        view $93
        loop $2
        cel $2
        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_0d51
  0d51:83 05              lal local5 
  0d53:18                 not 
  0d54:31 4a              bnt code_0da0 
  0d56:78               push1 
  0d57:74 0337          lofss $1091 // get/chandelier
  0d5a:43 25 02         callk Said 2 

  0d5d:31 0d              bnt code_0d6c 
  0d5f:7a               push2 
  0d60:39 2f            pushi 2f // $2f dy
  0d62:39 0c            pushi c // $c nsRight
  0d64:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0d6a:33 34              jmp code_0da0 

        code_0d6c
  0d6c:39 03            pushi 3 // $3 y
  0d6e:7c            pushSelf 
  0d6f:8f 01              lsp param1 
  0d71:39 03            pushi 3 // $3 y
  0d73:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0d79:2f 12               bt code_0d8d 
  0d7b:78               push1 
  0d7c:74 032f          lofss $10ae // look/chandelier,ceiling
  0d7f:43 25 02         callk Said 2 

  0d82:2f 09               bt code_0d8d 
  0d84:78               push1 
  0d85:74 035b          lofss $10e3 // look<haut
  0d88:43 25 02         callk Said 2 

  0d8b:31 13              bnt code_0da0 

        code_0d8d
  0d8d:39 4c            pushi 4c // $4c claimed
  0d8f:78               push1 
  0d90:78               push1 
  0d91:87 01              lap param1 
  0d93:4a 06             send 6 

  0d95:7a               push2 
  0d96:39 2f            pushi 2f // $2f dy
  0d98:39 0d            pushi d // $d lsTop
  0d9a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0da0
  0da0:48                 ret 
    )

)

// 145e
(instance Ldoor of Prop
    (properties
        y $81
        x $35
        z $0
        heading $0
        yStep $2
        view $93
        loop $3
        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_0da1
  0da1:83 05              lal local5 
  0da3:18                 not 
  0da4:30 0082            bnt code_0e29 
  0da7:78               push1 
  0da8:74 02c9          lofss $1074 // clore/door
  0dab:43 25 02         callk Said 2 

  0dae:31 06              bnt code_0db6 
  0db0:76               push0 
  0db1:45 11 00         callb procedure_0011 0 // AlreadyClosed 

  0db4:33 73              jmp code_0e29 

        code_0db6
  0db6:78               push1 
  0db7:74 02b1          lofss $106b // bang/door,closet
  0dba:43 25 02         callk Said 2 

  0dbd:31 0d              bnt code_0dcc 
  0dbf:7a               push2 
  0dc0:39 2f            pushi 2f // $2f dy
  0dc2:39 0e            pushi e // $e lsLeft
  0dc4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0dca:33 5d              jmp code_0e29 

        code_0dcc
  0dcc:78               push1 
  0dcd:74 031d          lofss $10ed // open,(look<dans)/door,closet
  0dd0:43 25 02         callk Said 2 

  0dd3:31 29              bnt code_0dfe 
  0dd5:83 01              lal local1 
  0dd7:31 06              bnt code_0ddf 
  0dd9:76               push0 
  0dda:45 10 00         callb procedure_0010 0 // AlreadyOpen 

  0ddd:33 1d              jmp code_0dfc 

        code_0ddf
  0ddf:38 00db          pushi db // $db onControl
  0de2:78               push1 
  0de3:76               push0 
  0de4:81 00              lag gEgo 
  0de6:4a 06             send 6 

  0de8:36                push 
  0de9:35 20              ldi 20 
  0deb:12                 and 
  0dec:31 0a              bnt code_0df8 
  0dee:39 7a            pushi 7a // $7a setScript
  0df0:78               push1 
  0df1:74 0366          lofss $115a // myDoor
  0df4:54 06             self 6 

  0df6:33 04              jmp code_0dfc 

        code_0df8
  0df8:76               push0 
  0df9:45 09 00         callb procedure_0009 0 // NotClose 


        code_0dfc
  0dfc:33 2b              jmp code_0e29 

        code_0dfe
  0dfe:39 03            pushi 3 // $3 y
  0e00:7c            pushSelf 
  0e01:8f 01              lsp param1 
  0e03:39 03            pushi 3 // $3 y
  0e05:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0e0b:2f 09               bt code_0e16 
  0e0d:78               push1 
  0e0e:74 02a6          lofss $10b7 // look/closet,(door<closet),(door[<!*])
  0e11:43 25 02         callk Said 2 

  0e14:31 13              bnt code_0e29 

        code_0e16
  0e16:39 4c            pushi 4c // $4c claimed
  0e18:78               push1 
  0e19:78               push1 
  0e1a:87 01              lap param1 
  0e1c:4a 06             send 6 

  0e1e:7a               push2 
  0e1f:39 2f            pushi 2f // $2f dy
  0e21:39 0f            pushi f // $f lsBottom
  0e23:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0e29
  0e29:48                 ret 
    )

)

// 14b0
(instance rail1 of Act
    (properties
        y $8d
        x $73
        z $0
        heading $0
        yStep $2
        view $93
        loop $2
        cel $d
        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
        illegalBits $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)

// 1514
(instance rail2 of Act
    (properties
        y $8d
        x $d0
        z $0
        heading $0
        yStep $2
        view $93
        loop $2
        cel $e
        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
        illegalBits $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)

// 1578
(instance lampL of Prop
    (properties
        y $52
        x $59
        z $0
        heading $0
        yStep $2
        view $93
        loop $0
        cel $1
        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_0e2a
  0e2a:83 05              lal local5 
  0e2c:18                 not 
  0e2d:31 1e              bnt code_0e4d 
  0e2f:39 03            pushi 3 // $3 y
  0e31:7c            pushSelf 
  0e32:8f 01              lsp param1 
  0e34:39 03            pushi 3 // $3 y
  0e36:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0e3c:31 0f              bnt code_0e4d 
  0e3e:39 4c            pushi 4c // $4c claimed
  0e40:78               push1 
  0e41:78               push1 
  0e42:87 01              lap param1 
  0e44:4a 06             send 6 

  0e46:78               push1 
  0e47:74 0a68          lofss $18b2 // lamp
  0e4a:45 19 02         callb procedure_0019 2 // DoLook 


        code_0e4d
  0e4d:48                 ret 
    )

)

// 15ca
(instance lampR of Prop
    (properties
        y $52
        x $ea
        z $0
        heading $0
        yStep $2
        view $93
        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_0e4e
  0e4e:83 05              lal local5 
  0e50:18                 not 
  0e51:31 1e              bnt code_0e71 
  0e53:39 03            pushi 3 // $3 y
  0e55:7c            pushSelf 
  0e56:8f 01              lsp param1 
  0e58:39 03            pushi 3 // $3 y
  0e5a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0e60:31 0f              bnt code_0e71 
  0e62:39 4c            pushi 4c // $4c claimed
  0e64:78               push1 
  0e65:78               push1 
  0e66:87 01              lap param1 
  0e68:4a 06             send 6 

  0e6a:78               push1 
  0e6b:74 0a44          lofss $18b2 // lamp
  0e6e:45 19 02         callb procedure_0019 2 // DoLook 


        code_0e71
  0e71:48                 ret 
    )

)

// 161c
(instance lamp3 of Prop
    (properties
        y $b1
        x $ea
        z $0
        heading $0
        yStep $2
        view $93
        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_0e72
  0e72:83 05              lal local5 
  0e74:18                 not 
  0e75:31 1e              bnt code_0e95 
  0e77:39 03            pushi 3 // $3 y
  0e79:7c            pushSelf 
  0e7a:8f 01              lsp param1 
  0e7c:39 03            pushi 3 // $3 y
  0e7e:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0e84:31 0f              bnt code_0e95 
  0e86:39 4c            pushi 4c // $4c claimed
  0e88:78               push1 
  0e89:78               push1 
  0e8a:87 01              lap param1 
  0e8c:4a 06             send 6 

  0e8e:78               push1 
  0e8f:74 0a20          lofss $18b2 // lamp
  0e92:45 19 02         callb procedure_0019 2 // DoLook 


        code_0e95
  0e95:48                 ret 
    )

)

// 166e
(instance lamp4 of Prop
    (properties
        y $b1
        x $58
        z $0
        heading $0
        yStep $2
        view $93
        loop $0
        cel $1
        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_0e96
  0e96:83 05              lal local5 
  0e98:18                 not 
  0e99:31 1e              bnt code_0eb9 
  0e9b:39 03            pushi 3 // $3 y
  0e9d:7c            pushSelf 
  0e9e:8f 01              lsp param1 
  0ea0:39 03            pushi 3 // $3 y
  0ea2:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0ea8:31 0f              bnt code_0eb9 
  0eaa:39 4c            pushi 4c // $4c claimed
  0eac:78               push1 
  0ead:78               push1 
  0eae:87 01              lap param1 
  0eb0:4a 06             send 6 

  0eb2:78               push1 
  0eb3:74 09fc          lofss $18b2 // lamp
  0eb6:45 19 02         callb procedure_0019 2 // DoLook 


        code_0eb9
  0eb9:48                 ret 
    )

)

// 16c0
(instance hand of Prop
    (properties
        y $82
        x $42
        z $0
        heading $0
        yStep $2
        view $12
        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
    )
)

// 170e
(instance hanky of Prop
    (properties
        y $6c
        x $67
        z $0
        heading $0
        yStep $2
        view $93
        loop $2
        cel $c
        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_0eba
  0eba:83 05              lal local5 
  0ebc:18                 not 
  0ebd:31 6c              bnt code_0f2b 
  0ebf:39 03            pushi 3 // $3 y
  0ec1:7c            pushSelf 
  0ec2:8f 01              lsp param1 
  0ec4:39 03            pushi 3 // $3 y
  0ec6:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0ecc:2f 20               bt code_0eee 
  0ece:78               push1 
  0ecf:74 01fd          lofss $10cf // look/handkerchief,dirt
  0ed2:43 25 02         callk Said 2 

  0ed5:2f 17               bt code_0eee 
  0ed7:39 03            pushi 3 // $3 y
  0ed9:76               push0 
  0eda:81 00              lag gEgo 
  0edc:4a 04             send 4 

  0ede:36                push 
  0edf:34 0080            ldi 80 
  0ee2:22                 lt? 
  0ee3:31 1e              bnt code_0f03 
  0ee5:78               push1 
  0ee6:74 01ef          lofss $10d8 // look<bas[/!*]
  0ee9:43 25 02         callk Said 2 

  0eec:31 15              bnt code_0f03 

        code_0eee
  0eee:39 4c            pushi 4c // $4c claimed
  0ef0:78               push1 
  0ef1:78               push1 
  0ef2:87 01              lap param1 
  0ef4:4a 06             send 6 

  0ef6:7a               push2 
  0ef7:39 2f            pushi 2f // $2f dy
  0ef9:39 10            pushi 10 // $10 lsRight
  0efb:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0f01:33 28              jmp code_0f2b 

        code_0f03
  0f03:78               push1 
  0f04:74 0190          lofss $1097 // get/handkerchief[/dirt]
  0f07:43 25 02         callk Said 2 

  0f0a:31 1f              bnt code_0f2b 
  0f0c:38 00ae          pushi ae // $ae distanceTo
  0f0f:78               push1 
  0f10:74 0801          lofss $1714 // hanky
  0f13:81 00              lag gEgo 
  0f15:4a 06             send 6 

  0f17:36                push 
  0f18:35 14              ldi 14 
  0f1a:22                 lt? 
  0f1b:31 0a              bnt code_0f27 
  0f1d:39 7a            pushi 7a // $7a setScript
  0f1f:78               push1 
  0f20:74 0843          lofss $1766 // pickUp
  0f23:54 06             self 6 

  0f25:33 04              jmp code_0f2b 

        code_0f27
  0f27:76               push0 
  0f28:45 09 00         callb procedure_0009 0 // NotClose 


        code_0f2b
  0f2b:48                 ret 
    )

)

// 1760
(instance pickUp 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_0f2c
  0f2c:87 01              lap param1 
  0f2e:65 0a             aTop state 
  0f30:36                push 
  0f31:3c                 dup 
  0f32:35 00              ldi 0 
  0f34:1a                 eq? 
  0f35:31 14              bnt code_0f4b 
  0f37:76               push0 
  0f38:45 03 00         callb procedure_0003 0 // HandsOff 

  0f3b:7a               push2 
  0f3c:89 00              lsg gEgo 
  0f3e:74 07d3          lofss $1714 // hanky
  0f41:45 02 04         callb procedure_0002 4 // LookAt 

  0f44:35 02              ldi 2 
  0f46:65 10             aTop cycles 
  0f48:32 0082            jmp code_0fcd 

        code_0f4b
  0f4b:3c                 dup 
  0f4c:35 01              ldi 1 
  0f4e:1a                 eq? 
  0f4f:31 1b              bnt code_0f6c 
  0f51:39 05            pushi 5 // $5 view
  0f53:78               push1 
  0f54:39 11            pushi 11 // $11 signal
  0f56:39 07            pushi 7 // $7 cel
  0f58:78               push1 
  0f59:76               push0 
  0f5a:38 00d3          pushi d3 // $d3 setMotion
  0f5d:78               push1 
  0f5e:76               push0 
  0f5f:39 7e            pushi 7e // $7e setCycle
  0f61:7a               push2 
  0f62:51 1a            class End 
  0f64:36                push 
  0f65:7c            pushSelf 
  0f66:81 00              lag gEgo 
  0f68:4a 1a             send 1a 

  0f6a:33 61              jmp code_0fcd 

        code_0f6c
  0f6c:3c                 dup 
  0f6d:35 02              ldi 2 
  0f6f:1a                 eq? 
  0f70:31 22              bnt code_0f94 
  0f72:76               push0 
  0f73:45 16 00         callb procedure_0016 0 // Ok 

  0f76:38 0089          pushi 89 // $89 hide
  0f79:76               push0 
  0f7a:72 0797          lofsa $1714 // hanky
  0f7d:4a 04             send 4 

  0f7f:35 01              ldi 1 
  0f81:a0 00b6            sag global182 
  0f84:38 00ec          pushi ec // $ec get
  0f87:78               push1 
  0f88:39 17            pushi 17 // $17 name
  0f8a:81 00              lag gEgo 
  0f8c:4a 06             send 6 

  0f8e:35 02              ldi 2 
  0f90:65 10             aTop cycles 
  0f92:33 39              jmp code_0fcd 

        code_0f94
  0f94:3c                 dup 
  0f95:35 03              ldi 3 
  0f97:1a                 eq? 
  0f98:31 0d              bnt code_0fa7 
  0f9a:39 7e            pushi 7e // $7e setCycle
  0f9c:7a               push2 
  0f9d:51 1b            class Beg 
  0f9f:36                push 
  0fa0:7c            pushSelf 
  0fa1:81 00              lag gEgo 
  0fa3:4a 08             send 8 

  0fa5:33 26              jmp code_0fcd 

        code_0fa7
  0fa7:3c                 dup 
  0fa8:35 04              ldi 4 
  0faa:1a                 eq? 
  0fab:31 20              bnt code_0fcd 
  0fad:76               push0 
  0fae:45 04 00         callb procedure_0004 0 // HandsOn 

  0fb1:39 05            pushi 5 // $5 view
  0fb3:78               push1 
  0fb4:76               push0 
  0fb5:39 7e            pushi 7e // $7e setCycle
  0fb7:78               push1 
  0fb8:51 17            class Walk 
  0fba:36                push 
  0fbb:81 00              lag gEgo 
  0fbd:4a 0c             send c 

  0fbf:39 58            pushi 58 // $58 dispose
  0fc1:76               push0 
  0fc2:39 54            pushi 54 // $54 delete
  0fc4:76               push0 
  0fc5:39 7a            pushi 7a // $7a setScript
  0fc7:78               push1 
  0fc8:76               push0 
  0fc9:63 08             pToa client 
  0fcb:4a 0e             send e 


        code_0fcd
  0fcd:3a                toss 
  0fce:48                 ret 
    )

)

// 1790
(instance Rail of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $78
        nsLeft $4f
        nsBottom $8f
        nsRight $f1
    )
    (method (handleEvent) // method_0fcf
  0fcf:39 03            pushi 3 // $3 y
  0fd1:7c            pushSelf 
  0fd2:8f 01              lsp param1 
  0fd4:39 03            pushi 3 // $3 y
  0fd6:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0fdc:2f 09               bt code_0fe7 
  0fde:78               push1 
  0fdf:74 00c6          lofss $10a8 // look/balcon
  0fe2:43 25 02         callk Said 2 

  0fe5:31 13              bnt code_0ffa 

        code_0fe7
  0fe7:7a               push2 
  0fe8:39 2f            pushi 2f // $2f dy
  0fea:39 11            pushi 11 // $11 signal
  0fec:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0ff2:39 4c            pushi 4c // $4c claimed
  0ff4:78               push1 
  0ff5:78               push1 
  0ff6:87 01              lap param1 
  0ff8:4a 06             send 6 


        code_0ffa
  0ffa:48                 ret 
    )

)

// 17bc
(instance Stair of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $3f
        nsLeft $f4
        nsBottom $78
        nsRight $10d
    )
    (method (handleEvent) // method_0ffb
  0ffb:39 03            pushi 3 // $3 y
  0ffd:7c            pushSelf 
  0ffe:8f 01              lsp param1 
  1000:39 03            pushi 3 // $3 y
  1002:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  1008:31 13              bnt code_101d 
  100a:7a               push2 
  100b:39 2f            pushi 2f // $2f dy
  100d:39 12            pushi 12 // $12 illegalBits
  100f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1015:39 4c            pushi 4c // $4c claimed
  1017:78               push1 
  1018:78               push1 
  1019:87 01              lap param1 
  101b:4a 06             send 6 


        code_101d
  101d:48                 ret 
    )

)

// 17e8
(instance myMusic of Sound
    (properties
        state $0
        number $0
        priority $0
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 1812
(instance myIcon of DCIcon
    (properties
        type $4
        state $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        key $0
        said $0
        value $0
        view $28d
        loop $0
        cel $0
        cycler $0
        cycleSpeed $10
        signal $0
        count $ffff
    )
    (method (init) // method_101e
  101e:39 57            pushi 57 // $57 init
  1020:78               push1 
  1021:7c            pushSelf 
  1022:39 56            pushi 56 // $56 new
  1024:76               push0 
  1025:51 16            class Fwd 
  1027:4a 04             send 4 

  1029:65 20             aTop cycler 
  102b:4a 06             send 6 

  102d:48                 ret 
    )

)



