(script 44)

(string
    string_1508 "Fireplace"
    string_1512 "OpenSuit"
    string_151b "Room44"
    string_1522 "bed1"
    string_1527 "bed2"
    string_152c "chair"
    string_1532 "chest1"
    string_1539 "chest2"
    string_1540 "chute"
    string_1546 "chuteActions"
    string_1553 "couch"
    string_1559 "fireplace"
    string_1563 "item3"
    string_1569 "item4"
    string_156f "lamp"
    string_1574 "lamp1"
    string_157a "lamp2"
    string_1580 "mirror"
    string_1587 "myIcon"
    string_158e "myMusic"
    string_1596 "needle"
    string_159d "sofa"
    string_15a2 "suit1"
    string_15a8 "suit2"
    string_15ae "suitcase"
    string_15b7 "table"
    string_15bd "table2"
    string_15c4 "wingback"
    string_15cd ""
)

(said
    said_0e0e (look<through),chercher/cloth
    said_0e1c /(bagage,cloth)>
    said_0e26 /manteau
    said_0e2a /panel,(door<cachoterie)>
    said_0e37 /coiffeuse,(nightstand<dressing)
    said_0e43 /mur
    said_0e47 <dans/coiffeuse,(nightstand<dressing)
    said_0e56 [<around,at][/room]
    said_0e64 ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
    said_0e83 change,porter,(attach<on)/cloth
    said_0e94 clore
    said_0e97 clore/door,chute
    said_0ea0 get
    said_0ea3 get/cloth
    said_0ea9 get/agenda
    said_0eaf get/miroir
    said_0eb5 hop,crawl,aller,enter,climb/chute
    said_0ec7 look
    said_0eca look/chute
    said_0ed0 look/colonel
    said_0ed6 look/door
    said_0edc look/eye/colonel
    said_0ee5 look/eye/dame
    said_0eee look/eye<colonel
    said_0ef7 look/eye>
    said_0efe look/eye[<dame,painting]
    said_0f0c look/miroir
    said_0f12 look/painting,colonel
    said_0f1b look/dame
    said_0f21 look/dame,man,colonel/painting
    said_0f30 look<(behind,below)/miroir
    said_0f3e look<(behind,below)/painting
    said_0f4c look<(bas,haut)
    said_0f57 look<at/reflection
    said_0f60 look<dans/miroir
    said_0f69 look>
    said_0f6d look[<at]/bed
    said_0f78 look[<at]/drawer
    said_0f83 bouger,get/painting
    said_0f8c open,(look<dans)
    said_0f97 open,bouger
    said_0f9d open/door,chute
    said_0fa6 open/coiffeuse,(nightstand<dressing)
    said_0fb4 debout
)

(synonym
    drawer | tiroir = chest | malle | poitrine | torse | torso | trunk
    drawer | tiroir = commode | dresser
    bagage | luggage | suitcase = affaire | cas | case | etui
    bagage | luggage | suitcase = bag | sac | sack | valise
    chute | glissiere | goulotte = archway | gate | gateway | opening | ouverture | portail
    chute | glissiere | goulotte = laundry | lingerie
    room = bedroom
)

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

// 0fbe
(instance public Room44 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $2c
        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_002e
  002e:35 2b              ldi 2b 
  0030:65 20             aTop west 
  0032:35 00              ldi 0 
  0034:a0 00be            sag global190 
  0037:39 57            pushi 57 // $57 init
  0039:76               push0 
  003a:57 37 04         super Rm 4 

  003d:39 04            pushi 4 // $4 x
  003f:38 03e5          pushi 3e5 // $3e5 sel_997
  0042:78               push1 
  0043:38 012c          pushi 12c // $12c surrogate
  0046:76               push0 
  0047:43 28 08         callk SetCursor 8 

  004a:38 0084          pushi 84 // $84 stop
  004d:76               push0 
  004e:80 00b7            lag gConMusic 
  0051:4a 04             send 4 

  0053:7a               push2 
  0054:38 0087          pushi 87 // $87 clean
  0057:39 04            pushi 4 // $4 x
  0059:43 00 04         callk Load 4 

  005c:39 04            pushi 4 // $4 x
  005e:38 0080          pushi 80 // $80 timeLeft
  0061:39 16            pushi 16 // $16 brRight
  0063:38 028d          pushi 28d // $28d sel_653
  0066:39 26            pushi 26 // $26 mark
  0068:45 15 08         callb procedure_0015 8 // LoadMany 

  006b:39 03            pushi 3 // $3 y
  006d:38 0084          pushi 84 // $84 stop
  0070:39 4a            pushi 4a // $4a pragmaFail
  0072:39 4b            pushi 4b // $4b said
  0074:45 15 06         callb procedure_0015 6 // LoadMany 

  0077:39 61            pushi 61 // $61 add
  0079:39 0b            pushi b // $b nsBottom
  007b:74 0ffa          lofss $1078 // chest1
  007e:74 102d          lofss $10ae // chest2
  0081:74 116e          lofss $11f2 // item3
  0084:74 11a1          lofss $1228 // item4
  0087:74 105a          lofss $10e4 // bed1
  008a:74 108d          lofss $111a // bed2
  008d:74 10c0          lofss $1150 // mirror
  0090:74 10f3          lofss $1186 // sofa
  0093:74 11c8          lofss $125e // needle
  0096:74 11ef          lofss $1288 // table2
  0099:74 1120          lofss $11bc // wingback
  009c:39 62            pushi 62 // $62 eachElementDo
  009e:78               push1 
  009f:39 57            pushi 57 // $57 init
  00a1:39 3c            pushi 3c // $3c doit
  00a3:76               push0 
  00a4:81 0a              lag gAddToPics 
  00a6:4a 24             send 24 

  00a8:39 42            pushi 42 // $42 setPri
  00aa:78               push1 
  00ab:39 0d            pushi d // $d lsTop
  00ad:39 57            pushi 57 // $57 init
  00af:76               push0 
  00b0:38 00c6          pushi c6 // $c6 stopUpd
  00b3:76               push0 
  00b4:72 1207          lofsa $12be // lamp1
  00b7:4a 0e             send e 

  00b9:39 42            pushi 42 // $42 setPri
  00bb:78               push1 
  00bc:39 0d            pushi d // $d lsTop
  00be:39 57            pushi 57 // $57 init
  00c0:76               push0 
  00c1:38 00c6          pushi c6 // $c6 stopUpd
  00c4:76               push0 
  00c5:72 1248          lofsa $1310 // lamp2
  00c8:4a 0e             send e 

  00ca:80 00df            lag gDetailLevel 
  00cd:31 1e              bnt code_00ed 
  00cf:38 00a3          pushi a3 // $a3 startUpd
  00d2:76               push0 
  00d3:39 7e            pushi 7e // $7e setCycle
  00d5:78               push1 
  00d6:51 16            class Fwd 
  00d8:36                push 
  00d9:72 11e2          lofsa $12be // lamp1
  00dc:4a 0a             send a 

  00de:38 00a3          pushi a3 // $a3 startUpd
  00e1:76               push0 
  00e2:39 7e            pushi 7e // $7e setCycle
  00e4:78               push1 
  00e5:51 16            class Fwd 
  00e7:36                push 
  00e8:72 1225          lofsa $1310 // lamp2
  00eb:4a 0a             send a 


        code_00ed
  00ed:38 010a          pushi 10a // $10a setRegions
  00f0:78               push1 
  00f1:38 00d5          pushi d5 // $d5 ignoreHorizon
  00f4:38 010b          pushi 10b // $10b setFeatures
  00f7:39 0b            pushi b // $b nsBottom
  00f9:74 1054          lofss $1150 // mirror
  00fc:74 1189          lofss $1288 // table2
  00ff:74 10ba          lofss $11bc // wingback
  0102:74 1081          lofss $1186 // sofa
  0105:74 1120          lofss $1228 // item4
  0108:74 10e7          lofss $11f2 // item3
  010b:74 100c          lofss $111a // bed2
  010e:74 0fd3          lofss $10e4 // bed1
  0111:74 0f64          lofss $1078 // chest1
  0114:74 0f97          lofss $10ae // chest2
  0117:74 1354          lofss $146e // Fireplace
  011a:54 20             self 20 

  011c:39 42            pushi 42 // $42 setPri
  011e:78               push1 
  011f:39 07            pushi 7 // $7 cel
  0121:39 57            pushi 57 // $57 init
  0123:76               push0 
  0124:38 00c6          pushi c6 // $c6 stopUpd
  0127:76               push0 
  0128:72 1237          lofsa $1362 // suit1
  012b:4a 0e             send e 

  012d:88 00a5            lsg gAct 
  0130:35 05              ldi 5 
  0132:1a                 eq? 
  0133:31 0f              bnt code_0144 
  0135:35 01              ldi 1 
  0137:a3 06              sal local6 
  0139:38 010a          pushi 10a // $10a setRegions
  013c:78               push1 
  013d:38 0112          pushi 112 // $112 hesitation
  0140:54 06             self 6 

  0142:33 32              jmp code_0176 

        code_0144
  0144:88 00a5            lsg gAct 
  0147:35 00              ldi 0 
  0149:1a                 eq? 
  014a:31 14              bnt code_0160 
  014c:39 42            pushi 42 // $42 setPri
  014e:78               push1 
  014f:39 0b            pushi b // $b nsBottom
  0151:38 00c9          pushi c9 // $c9 ignoreActors
  0154:78               push1 
  0155:78               push1 
  0156:39 57            pushi 57 // $57 init
  0158:76               push0 
  0159:72 1258          lofsa $13b4 // suit2
  015c:4a 10             send 10 

  015e:33 16              jmp code_0176 

        code_0160
  0160:39 42            pushi 42 // $42 setPri
  0162:78               push1 
  0163:39 0b            pushi b // $b nsBottom
  0165:38 00c9          pushi c9 // $c9 ignoreActors
  0168:78               push1 
  0169:78               push1 
  016a:39 57            pushi 57 // $57 init
  016c:76               push0 
  016d:38 00c6          pushi c6 // $c6 stopUpd
  0170:76               push0 
  0171:72 1240          lofsa $13b4 // suit2
  0174:4a 14             send 14 


        code_0176
  0176:88 00a5            lsg gAct 
  0179:35 03              ldi 3 
  017b:1a                 eq? 
  017c:31 14              bnt code_0192 
  017e:89 76              lsg gMustDos 
  0180:35 02              ldi 2 
  0182:12                 and 
  0183:31 0d              bnt code_0192 
  0185:35 01              ldi 1 
  0187:a3 06              sal local6 
  0189:38 010a          pushi 10a // $10a setRegions
  018c:78               push1 
  018d:38 0109          pushi 109 // $109 picAngle
  0190:54 06             self 6 


        code_0192
  0192:88 00a5            lsg gAct 
  0195:35 06              ldi 6 
  0197:1a                 eq? 
  0198:31 1d              bnt code_01b7 
  019a:89 76              lsg gMustDos 
  019c:35 02              ldi 2 
  019e:12                 and 
  019f:31 16              bnt code_01b7 
  01a1:78               push1 
  01a2:39 24            pushi 24 // $24 cursor
  01a4:45 07 02         callb procedure_0007 2 // IsFlag 

  01a7:18                 not 
  01a8:31 0d              bnt code_01b7 
  01aa:35 01              ldi 1 
  01ac:a3 06              sal local6 
  01ae:38 010a          pushi 10a // $10a setRegions
  01b1:78               push1 
  01b2:38 0181          pushi 181 // $181 sel_385
  01b5:54 06             self 6 


        code_01b7
  01b7:38 00c8          pushi c8 // $c8 setLoop
  01ba:78               push1 
  01bb:76               push0 
  01bc:38 00a2          pushi a2 // $a2 setCel
  01bf:78               push1 
  01c0:39 09            pushi 9 // $9 nsTop
  01c2:39 37            pushi 37 // $37 yStep
  01c4:78               push1 
  01c5:39 05            pushi 5 // $5 view
  01c7:39 12            pushi 12 // $12 illegalBits
  01c9:78               push1 
  01ca:76               push0 
  01cb:39 42            pushi 42 // $42 setPri
  01cd:78               push1 
  01ce:7a               push2 
  01cf:38 00c9          pushi c9 // $c9 ignoreActors
  01d2:78               push1 
  01d3:78               push1 
  01d4:39 57            pushi 57 // $57 init
  01d6:76               push0 
  01d7:38 00c6          pushi c6 // $c6 stopUpd
  01da:76               push0 
  01db:39 7a            pushi 7a // $7a setScript
  01dd:78               push1 
  01de:74 0e33          lofss $1014 // chuteActions
  01e1:72 1222          lofsa $1406 // chute
  01e4:4a 32             send 32 

  01e6:88 00a5            lsg gAct 
  01e9:35 00              ldi 0 
  01eb:1a                 eq? 
  01ec:31 2a              bnt code_0218 
  01ee:88 00cb            lsg global203 
  01f1:35 01              ldi 1 
  01f3:1e                 gt? 
  01f4:31 04              bnt code_01fa 
  01f6:35 01              ldi 1 
  01f8:a3 06              sal local6 

        code_01fa
  01fa:38 010a          pushi 10a // $10a setRegions
  01fd:78               push1 
  01fe:38 00e6          pushi e6 // $e6 prompt
  0201:54 06             self 6 

  0203:88 00cb            lsg global203 
  0206:35 00              ldi 0 
  0208:1a                 eq? 
  0209:31 0d              bnt code_0218 
  020b:38 010a          pushi 10a // $10a setRegions
  020e:78               push1 
  020f:38 019b          pushi 19b // $19b sel_411
  0212:54 06             self 6 

  0214:35 01              ldi 1 
  0216:a3 05              sal local5 

        code_0218
  0218:89 0c              lsg gPrevRoomNum 
  021a:3c                 dup 
  021b:35 2b              ldi 2b 
  021d:1a                 eq? 
  021e:31 0e              bnt code_022e 
  0220:38 00c5          pushi c5 // $c5 posn
  0223:7a               push2 
  0224:78               push1 
  0225:38 0098          pushi 98 // $98 center
  0228:81 00              lag gEgo 
  022a:4a 08             send 8 

  022c:33 2c              jmp code_025a 

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

  0241:33 17              jmp code_025a 

        code_0243
  0243:3c                 dup 
  0244:35 32              ldi 32 
  0246:1a                 eq? 
  0247:31 11              bnt code_025a 
  0249:38 00c5          pushi c5 // $c5 posn
  024c:7a               push2 
  024d:39 44            pushi 44 // $44 next
  024f:38 00a7          pushi a7 // $a7 isStopped
  0252:81 00              lag gEgo 
  0254:4a 08             send 8 

  0256:35 01              ldi 1 
  0258:a3 07              sal local7 

        code_025a
  025a:3a                toss 
  025b:39 05            pushi 5 // $5 view
  025d:78               push1 
  025e:76               push0 
  025f:38 00c9          pushi c9 // $c9 ignoreActors
  0262:78               push1 
  0263:76               push0 
  0264:39 12            pushi 12 // $12 illegalBits
  0266:78               push1 
  0267:38 8000          pushi 8000 // $8000 sel_32768
  026a:39 57            pushi 57 // $57 init
  026c:76               push0 
  026d:81 00              lag gEgo 
  026f:4a 16             send 16 

  0271:48                 ret 
    )

    (method (doit) // method_0272
  0272:83 07              lal local7 
  0274:31 0e              bnt code_0284 
  0276:35 00              ldi 0 
  0278:a3 07              sal local7 
  027a:7a               push2 
  027b:39 2c            pushi 2c // $2c handle
  027d:76               push0 
  027e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0284
  0284:76               push0 
  0285:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0288:31 08              bnt code_0292 
  028a:39 37            pushi 37 // $37 yStep
  028c:78               push1 
  028d:7a               push2 
  028e:81 00              lag gEgo 
  0290:4a 06             send 6 


        code_0292
  0292:88 00cb            lsg global203 
  0295:35 01              ldi 1 
  0297:1a                 eq? 
  0298:31 14              bnt code_02ae 
  029a:83 05              lal local5 
  029c:31 10              bnt code_02ae 
  029e:39 58            pushi 58 // $58 dispose
  02a0:76               push0 
  02a1:78               push1 
  02a2:38 019b          pushi 19b // $19b sel_411
  02a5:43 02 02         callk ScriptID 2 

  02a8:4a 04             send 4 

  02aa:35 00              ldi 0 
  02ac:a3 05              sal local5 

        code_02ae
  02ae:38 00db          pushi db // $db onControl
  02b1:78               push1 
  02b2:78               push1 
  02b3:81 00              lag gEgo 
  02b5:4a 06             send 6 

  02b7:36                push 
  02b8:35 04              ldi 4 
  02ba:12                 and 
  02bb:31 0a              bnt code_02c7 
  02bd:38 00f8          pushi f8 // $f8 newRoom
  02c0:78               push1 
  02c1:39 2d            pushi 2d // $2d client
  02c3:81 02              lag gCurRoom 
  02c5:4a 06             send 6 


        code_02c7
  02c7:83 03              lal local3 
  02c9:18                 not 
  02ca:31 2e              bnt code_02fa 
  02cc:39 04            pushi 4 // $4 x
  02ce:76               push0 
  02cf:81 00              lag gEgo 
  02d1:4a 04             send 4 

  02d3:36                push 
  02d4:35 33              ldi 33 
  02d6:22                 lt? 
  02d7:31 18              bnt code_02f1 
  02d9:39 03            pushi 3 // $3 y
  02db:76               push0 
  02dc:81 00              lag gEgo 
  02de:4a 04             send 4 

  02e0:36                push 
  02e1:35 7f              ldi 7f 
  02e3:1e                 gt? 
  02e4:31 0b              bnt code_02f1 
  02e6:39 42            pushi 42 // $42 setPri
  02e8:78               push1 
  02e9:39 0a            pushi a // $a nsLeft
  02eb:81 00              lag gEgo 
  02ed:4a 06             send 6 

  02ef:33 09              jmp code_02fa 

        code_02f1
  02f1:39 42            pushi 42 // $42 setPri
  02f3:78               push1 
  02f4:39 ff            pushi ff // $ff checkAni
  02f6:81 00              lag gEgo 
  02f8:4a 06             send 6 


        code_02fa
  02fa:39 04            pushi 4 // $4 x
  02fc:76               push0 
  02fd:81 00              lag gEgo 
  02ff:4a 04             send 4 

  0301:36                push 
  0302:35 1e              ldi 1e 
  0304:22                 lt? 
  0305:31 06              bnt code_030d 
  0307:35 00              ldi 0 
  0309:65 2a             aTop vertAngle 
  030b:33 1a              jmp code_0327 

        code_030d
  030d:39 04            pushi 4 // $4 x
  030f:76               push0 
  0310:81 00              lag gEgo 
  0312:4a 04             send 4 

  0314:36                push 
  0315:34 008c            ldi 8c 
  0318:22                 lt? 
  0319:31 07              bnt code_0322 
  031b:34 00a3            ldi a3 
  031e:65 2a             aTop vertAngle 
  0320:33 05              jmp code_0327 

        code_0322
  0322:34 0089            ldi 89 
  0325:65 2a             aTop vertAngle 

        code_0327
  0327:88 00cb            lsg global203 
  032a:35 01              ldi 1 
  032c:1e                 gt? 
  032d:31 04              bnt code_0333 
  032f:35 01              ldi 1 
  0331:a3 06              sal local6 

        code_0333
  0333:39 3c            pushi 3c // $3c doit
  0335:76               push0 
  0336:57 37 04         super Rm 4 

  0339:48                 ret 
    )

    (method (dispose) // method_033a
  033a:78               push1 
  033b:38 03d9          pushi 3d9 // $3d9 sel_985
  033e:43 03 02         callk DisposeScript 2 

  0341:39 58            pushi 58 // $58 dispose
  0343:76               push0 
  0344:57 37 04         super Rm 4 

  0347:48                 ret 
    )

    (method (newRoom) // method_0348
  0348:76               push0 
  0349:45 0f 00         callb procedure_000f 0 // cls 

  034c:38 00f8          pushi f8 // $f8 newRoom
  034f:78               push1 
  0350:8f 01              lsp param1 
  0352:57 37 06         super Rm 6 

  0355:48                 ret 
    )

    (method (handleEvent) // method_0356
  0356:39 4c            pushi 4c // $4c claimed
  0358:76               push0 
  0359:87 01              lap param1 
  035b:4a 04             send 4 

  035d:31 01              bnt code_0360 
  035f:48                 ret 

        code_0360
  0360:39 22            pushi 22 // $22 type
  0362:76               push0 
  0363:87 01              lap param1 
  0365:4a 04             send 4 

  0367:36                push 
  0368:34 0080            ldi 80 
  036b:1a                 eq? 
  036c:30 01ad            bnt code_051c 
  036f:78               push1 
  0370:38 03de          pushi 3de // $3de sel_990
  0373:43 03 02         callk DisposeScript 2 

  0376:80 00d0            lag global208 
  0379:31 23              bnt code_039e 
  037b:78               push1 
  037c:74 0ae5          lofss $0e64 // ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
  037f:43 25 02         callk Said 2 

  0382:31 1a              bnt code_039e 
  0384:39 7a            pushi 7a // $7a setScript
  0386:78               push1 
  0387:7a               push2 
  0388:38 00f3          pushi f3 // $f3 close
  038b:76               push0 
  038c:43 02 04         callk ScriptID 4 

  038f:36                push 
  0390:54 06             self 6 

  0392:39 6f            pushi 6f // $6f handleEvent
  0394:78               push1 
  0395:8f 01              lsp param1 
  0397:39 76            pushi 76 // $76 script
  0399:76               push0 
  039a:54 04             self 4 

  039c:4a 06             send 6 


        code_039e
  039e:39 4c            pushi 4c // $4c claimed
  03a0:76               push0 
  03a1:87 01              lap param1 
  03a3:4a 04             send 4 

  03a5:31 03              bnt code_03aa 
  03a7:32 0172            jmp code_051c 

        code_03aa
  03aa:78               push1 
  03ab:74 0a7c          lofss $0e2a // /panel,(door<cachoterie)>
  03ae:43 25 02         callk Said 2 

  03b1:31 6e              bnt code_0421 
  03b3:78               push1 
  03b4:74 0b10          lofss $0ec7 // look
  03b7:43 25 02         callk Said 2 

  03ba:31 20              bnt code_03dc 
  03bc:88 00af            lsg global175 
  03bf:35 20              ldi 20 
  03c1:12                 and 
  03c2:31 0c              bnt code_03d0 
  03c4:7a               push2 
  03c5:39 2c            pushi 2c // $2c handle
  03c7:78               push1 
  03c8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03ce:33 0a              jmp code_03da 

        code_03d0
  03d0:7a               push2 
  03d1:39 2c            pushi 2c // $2c handle
  03d3:7a               push2 
  03d4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03da
  03da:33 42              jmp code_041e 

        code_03dc
  03dc:88 00af            lsg global175 
  03df:35 20              ldi 20 
  03e1:12                 and 
  03e2:31 3a              bnt code_041e 
  03e4:78               push1 
  03e5:74 0baf          lofss $0f97 // open,bouger
  03e8:43 25 02         callk Said 2 

  03eb:31 31              bnt code_041e 
  03ed:83 06              lal local6 
  03ef:18                 not 
  03f0:31 21              bnt code_0413 
  03f2:38 00db          pushi db // $db onControl
  03f5:78               push1 
  03f6:78               push1 
  03f7:81 00              lag gEgo 
  03f9:4a 06             send 6 

  03fb:36                push 
  03fc:35 08              ldi 8 
  03fe:12                 and 
  03ff:31 0c              bnt code_040d 
  0401:38 00f8          pushi f8 // $f8 newRoom
  0404:78               push1 
  0405:39 32            pushi 32 // $32 b-i2
  0407:81 02              lag gCurRoom 
  0409:4a 06             send 6 

  040b:33 04              jmp code_0411 

        code_040d
  040d:76               push0 
  040e:45 09 00         callb procedure_0009 0 // NotClose 


        code_0411
  0411:33 0b              jmp code_041e 

        code_0413
  0413:7a               push2 
  0414:39 2c            pushi 2c // $2c handle
  0416:39 03            pushi 3 // $3 y
  0418:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_041e
  041e:32 00fb            jmp code_051c 

        code_0421
  0421:78               push1 
  0422:74 0b44          lofss $0f69 // look>
  0425:43 25 02         callk Said 2 

  0428:31 6f              bnt code_0499 
  042a:78               push1 
  042b:74 0a28          lofss $0e56 // [<around,at][/room]
  042e:43 25 02         callk Said 2 

  0431:31 0d              bnt code_0440 
  0433:7a               push2 
  0434:39 2c            pushi 2c // $2c handle
  0436:39 04            pushi 4 // $4 x
  0438:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  043e:33 56              jmp code_0496 

        code_0440
  0440:78               push1 
  0441:74 09e2          lofss $0e26 // /manteau
  0444:43 25 02         callk Said 2 

  0447:31 0d              bnt code_0456 
  0449:7a               push2 
  044a:39 2c            pushi 2c // $2c handle
  044c:39 05            pushi 5 // $5 view
  044e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0454:33 40              jmp code_0496 

        code_0456
  0456:78               push1 
  0457:74 09e9          lofss $0e43 // /mur
  045a:43 25 02         callk Said 2 

  045d:31 0d              bnt code_046c 
  045f:7a               push2 
  0460:39 2c            pushi 2c // $2c handle
  0462:39 06            pushi 6 // $6 loop
  0464:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  046a:33 2a              jmp code_0496 

        code_046c
  046c:78               push1 
  046d:74 09d7          lofss $0e47 // <dans/coiffeuse,(nightstand<dressing)
  0470:43 25 02         callk Said 2 

  0473:31 0d              bnt code_0482 
  0475:7a               push2 
  0476:39 2c            pushi 2c // $2c handle
  0478:39 07            pushi 7 // $7 cel
  047a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0480:33 14              jmp code_0496 

        code_0482
  0482:78               push1 
  0483:74 09b1          lofss $0e37 // /coiffeuse,(nightstand<dressing)
  0486:43 25 02         callk Said 2 

  0489:31 0b              bnt code_0496 
  048b:7a               push2 
  048c:39 2c            pushi 2c // $2c handle
  048e:39 08            pushi 8 // $8 underBits
  0490:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0496
  0496:32 0083            jmp code_051c 

        code_0499
  0499:78               push1 
  049a:74 0b09          lofss $0fa6 // open/coiffeuse,(nightstand<dressing)
  049d:43 25 02         callk Said 2 

  04a0:31 0d              bnt code_04af 
  04a2:7a               push2 
  04a3:39 2c            pushi 2c // $2c handle
  04a5:39 07            pushi 7 // $7 cel
  04a7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04ad:33 6d              jmp code_051c 

        code_04af
  04af:78               push1 
  04b0:74 09f6          lofss $0ea9 // get/agenda
  04b3:43 25 02         callk Said 2 

  04b6:31 64              bnt code_051c 
  04b8:38 00ee          pushi ee // $ee has
  04bb:78               push1 
  04bc:39 13            pushi 13 // $13 brTop
  04be:81 00              lag gEgo 
  04c0:4a 06             send 6 

  04c2:31 06              bnt code_04ca 
  04c4:76               push0 
  04c5:45 0a 00         callb procedure_000a 0 // AlreadyTook 

  04c8:33 52              jmp code_051c 

        code_04ca
  04ca:38 00ae          pushi ae // $ae distanceTo
  04cd:78               push1 
  04ce:74 0ee3          lofss $13b4 // suit2
  04d1:81 00              lag gEgo 
  04d3:4a 06             send 6 

  04d5:36                push 
  04d6:35 0f              ldi f 
  04d8:22                 lt? 
  04d9:31 3d              bnt code_0518 
  04db:88 00a5            lsg gAct 
  04de:35 06              ldi 6 
  04e0:20                 ge? 
  04e1:31 28              bnt code_050b 
  04e3:76               push0 
  04e4:45 03 00         callb procedure_0003 0 // HandsOff 

  04e7:35 01              ldi 1 
  04e9:a3 04              sal local4 
  04eb:35 01              ldi 1 
  04ed:a0 00b6            sag global182 
  04f0:38 00ec          pushi ec // $ec get
  04f3:78               push1 
  04f4:39 13            pushi 13 // $13 brTop
  04f6:81 00              lag gEgo 
  04f8:4a 06             send 6 

  04fa:35 01              ldi 1 
  04fc:a3 02              sal local2 
  04fe:39 7a            pushi 7a // $7a setScript
  0500:78               push1 
  0501:74 0b44          lofss $1048 // OpenSuit
  0504:72 0ead          lofsa $13b4 // suit2
  0507:4a 06             send 6 

  0509:33 0b              jmp code_0516 

        code_050b
  050b:7a               push2 
  050c:39 2c            pushi 2c // $2c handle
  050e:39 09            pushi 9 // $9 nsTop
  0510:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0516
  0516:33 04              jmp code_051c 

        code_0518
  0518:76               push0 
  0519:45 09 00         callb procedure_0009 0 // NotClose 


        code_051c
  051c:48                 ret 
    )

)

// 100e
(instance chuteActions of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (handleEvent) // method_051d
  051d:39 22            pushi 22 // $22 type
  051f:76               push0 
  0520:87 01              lap param1 
  0522:4a 04             send 4 

  0524:36                push 
  0525:34 0080            ldi 80 
  0528:1a                 eq? 
  0529:30 00e6            bnt code_0612 
  052c:39 4c            pushi 4c // $4c claimed
  052e:76               push0 
  052f:87 01              lap param1 
  0531:4a 04             send 4 

  0533:31 03              bnt code_0538 
  0535:32 00da            jmp code_0612 

        code_0538
  0538:78               push1 
  0539:74 0a10          lofss $0f4c // look<(bas,haut)
  053c:43 25 02         callk Said 2 

  053f:31 1c              bnt code_055d 
  0541:83 00              lal local0 
  0543:31 0d              bnt code_0552 
  0545:7a               push2 
  0546:39 2c            pushi 2c // $2c handle
  0548:39 0a            pushi a // $a nsLeft
  054a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0550:33 08              jmp code_055a 

        code_0552
  0552:39 4c            pushi 4c // $4c claimed
  0554:78               push1 
  0555:76               push0 
  0556:87 01              lap param1 
  0558:4a 06             send 6 


        code_055a
  055a:32 00b5            jmp code_0612 

        code_055d
  055d:78               push1 
  055e:74 0969          lofss $0eca // look/chute
  0561:43 25 02         callk Said 2 

  0564:31 1f              bnt code_0585 
  0566:83 00              lal local0 
  0568:31 0d              bnt code_0577 
  056a:7a               push2 
  056b:39 2c            pushi 2c // $2c handle
  056d:39 0a            pushi a // $a nsLeft
  056f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0575:33 0b              jmp code_0582 

        code_0577
  0577:7a               push2 
  0578:39 2c            pushi 2c // $2c handle
  057a:39 0b            pushi b // $b nsBottom
  057c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0582
  0582:32 008d            jmp code_0612 

        code_0585
  0585:78               push1 
  0586:74 0a14          lofss $0f9d // open/door,chute
  0589:43 25 02         callk Said 2 

  058c:31 35              bnt code_05c3 
  058e:83 00              lal local0 
  0590:31 0d              bnt code_059f 
  0592:7a               push2 
  0593:39 2c            pushi 2c // $2c handle
  0595:39 0c            pushi c // $c nsRight
  0597:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  059d:33 22              jmp code_05c1 

        code_059f
  059f:38 00da          pushi da // $da inRect
  05a2:39 04            pushi 4 // $4 x
  05a4:39 0a            pushi a // $a nsLeft
  05a6:39 7f            pushi 7f // $7f setReal
  05a8:39 28            pushi 28 // $28 message
  05aa:38 0087          pushi 87 // $87 clean
  05ad:81 00              lag gEgo 
  05af:4a 0c             send c 

  05b1:31 0a              bnt code_05bd 
  05b3:35 00              ldi 0 
  05b5:65 0a             aTop state 
  05b7:35 01              ldi 1 
  05b9:65 10             aTop cycles 
  05bb:33 04              jmp code_05c1 

        code_05bd
  05bd:76               push0 
  05be:45 09 00         callb procedure_0009 0 // NotClose 


        code_05c1
  05c1:33 4f              jmp code_0612 

        code_05c3
  05c3:78               push1 
  05c4:74 08ee          lofss $0eb5 // hop,crawl,aller,enter,climb/chute
  05c7:43 25 02         callk Said 2 

  05ca:31 1f              bnt code_05eb 
  05cc:83 00              lal local0 
  05ce:31 0e              bnt code_05de 
  05d0:76               push0 
  05d1:45 03 00         callb procedure_0003 0 // HandsOff 

  05d4:35 05              ldi 5 
  05d6:65 0a             aTop state 
  05d8:35 01              ldi 1 
  05da:65 10             aTop cycles 
  05dc:33 0b              jmp code_05e9 

        code_05de
  05de:7a               push2 
  05df:39 2c            pushi 2c // $2c handle
  05e1:39 0d            pushi d // $d lsTop
  05e3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_05e9
  05e9:33 27              jmp code_0612 

        code_05eb
  05eb:78               push1 
  05ec:74 09c5          lofss $0fb4 // debout
  05ef:43 25 02         callk Said 2 

  05f2:2f 09               bt code_05fd 
  05f4:78               push1 
  05f5:74 089f          lofss $0e97 // clore/door,chute
  05f8:43 25 02         callk Said 2 

  05fb:31 15              bnt code_0612 

        code_05fd
  05fd:83 00              lal local0 
  05ff:31 06              bnt code_0607 
  0601:35 01              ldi 1 
  0603:65 10             aTop cycles 
  0605:33 0b              jmp code_0612 

        code_0607
  0607:7a               push2 
  0608:39 2c            pushi 2c // $2c handle
  060a:39 0e            pushi e // $e lsLeft
  060c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0612
  0612:48                 ret 
    )

    (method (changeState) // method_0613
  0613:87 01              lap param1 
  0615:65 0a             aTop state 
  0617:36                push 
  0618:3c                 dup 
  0619:35 00              ldi 0 
  061b:1a                 eq? 
  061c:31 07              bnt code_0625 
  061e:76               push0 
  061f:45 0f 00         callb procedure_000f 0 // cls 

  0622:32 0201            jmp code_0826 

        code_0625
  0625:3c                 dup 
  0626:35 01              ldi 1 
  0628:1a                 eq? 
  0629:31 22              bnt code_064d 
  062b:38 00e9          pushi e9 // $e9 canControl
  062e:78               push1 
  062f:76               push0 
  0630:51 2b            class User 
  0632:4a 06             send 6 

  0634:39 12            pushi 12 // $12 illegalBits
  0636:78               push1 
  0637:76               push0 
  0638:38 00d3          pushi d3 // $d3 setMotion
  063b:39 04            pushi 4 // $4 x
  063d:51 1d            class MoveTo 
  063f:36                push 
  0640:39 20            pushi 20 // $20 state
  0642:38 0080          pushi 80 // $80 timeLeft
  0645:7c            pushSelf 
  0646:81 00              lag gEgo 
  0648:4a 12             send 12 

  064a:32 01d9            jmp code_0826 

        code_064d
  064d:3c                 dup 
  064e:35 02              ldi 2 
  0650:1a                 eq? 
  0651:31 3e              bnt code_0691 
  0653:39 05            pushi 5 // $5 view
  0655:78               push1 
  0656:39 16            pushi 16 // $16 brRight
  0658:39 06            pushi 6 // $6 loop
  065a:78               push1 
  065b:76               push0 
  065c:39 07            pushi 7 // $7 cel
  065e:78               push1 
  065f:76               push0 
  0660:39 7e            pushi 7e // $7e setCycle
  0662:78               push1 
  0663:51 1a            class End 
  0665:36                push 
  0666:81 00              lag gEgo 
  0668:4a 18             send 18 

  066a:39 2b            pushi 2b // $2b number
  066c:78               push1 
  066d:39 4a            pushi 4a // $4a pragmaFail
  066f:39 06            pushi 6 // $6 loop
  0671:78               push1 
  0672:78               push1 
  0673:39 2a            pushi 2a // $2a play
  0675:76               push0 
  0676:72 0e21          lofsa $149a // myMusic
  0679:4a 10             send 10 

  067b:38 00d3          pushi d3 // $d3 setMotion
  067e:39 04            pushi 4 // $4 x
  0680:51 1d            class MoveTo 
  0682:36                push 
  0683:39 13            pushi 13 // $13 brTop
  0685:38 00a7          pushi a7 // $a7 isStopped
  0688:7c            pushSelf 
  0689:72 0d7a          lofsa $1406 // chute
  068c:4a 0c             send c 

  068e:32 0195            jmp code_0826 

        code_0691
  0691:3c                 dup 
  0692:35 03              ldi 3 
  0694:1a                 eq? 
  0695:31 12              bnt code_06a9 
  0697:7a               push2 
  0698:39 2c            pushi 2c // $2c handle
  069a:39 0f            pushi f // $f lsBottom
  069c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  06a2:35 01              ldi 1 
  06a4:a3 00              sal local0 
  06a6:32 017d            jmp code_0826 

        code_06a9
  06a9:3c                 dup 
  06aa:35 04              ldi 4 
  06ac:1a                 eq? 
  06ad:31 34              bnt code_06e3 
  06af:38 00d3          pushi d3 // $d3 setMotion
  06b2:39 03            pushi 3 // $3 y
  06b4:51 1d            class MoveTo 
  06b6:36                push 
  06b7:39 13            pushi 13 // $13 brTop
  06b9:39 7f            pushi 7f // $7f setReal
  06bb:72 0d48          lofsa $1406 // chute
  06be:4a 0a             send a 

  06c0:35 00              ldi 0 
  06c2:a3 00              sal local0 
  06c4:39 2b            pushi 2b // $2b number
  06c6:78               push1 
  06c7:39 4b            pushi 4b // $4b said
  06c9:39 06            pushi 6 // $6 loop
  06cb:78               push1 
  06cc:78               push1 
  06cd:39 2a            pushi 2a // $2a play
  06cf:76               push0 
  06d0:72 0dc7          lofsa $149a // myMusic
  06d3:4a 10             send 10 

  06d5:39 7e            pushi 7e // $7e setCycle
  06d7:7a               push2 
  06d8:51 1b            class Beg 
  06da:36                push 
  06db:7c            pushSelf 
  06dc:81 00              lag gEgo 
  06de:4a 08             send 8 

  06e0:32 0143            jmp code_0826 

        code_06e3
  06e3:3c                 dup 
  06e4:35 05              ldi 5 
  06e6:1a                 eq? 
  06e7:31 24              bnt code_070d 
  06e9:39 05            pushi 5 // $5 view
  06eb:78               push1 
  06ec:76               push0 
  06ed:39 06            pushi 6 // $6 loop
  06ef:78               push1 
  06f0:78               push1 
  06f1:39 7e            pushi 7e // $7e setCycle
  06f3:78               push1 
  06f4:51 17            class Walk 
  06f6:36                push 
  06f7:39 12            pushi 12 // $12 illegalBits
  06f9:78               push1 
  06fa:38 8000          pushi 8000 // $8000 sel_32768
  06fd:81 00              lag gEgo 
  06ff:4a 18             send 18 

  0701:38 00e9          pushi e9 // $e9 canControl
  0704:78               push1 
  0705:78               push1 
  0706:51 2b            class User 
  0708:4a 06             send 6 

  070a:32 0119            jmp code_0826 

        code_070d
  070d:3c                 dup 
  070e:35 06              ldi 6 
  0710:1a                 eq? 
  0711:31 58              bnt code_076b 
  0713:39 2b            pushi 2b // $2b number
  0715:78               push1 
  0716:39 09            pushi 9 // $9 nsTop
  0718:39 06            pushi 6 // $6 loop
  071a:78               push1 
  071b:78               push1 
  071c:39 2a            pushi 2a // $2a play
  071e:76               push0 
  071f:72 0d78          lofsa $149a // myMusic
  0722:4a 10             send 10 

  0724:38 00c8          pushi c8 // $c8 setLoop
  0727:78               push1 
  0728:7a               push2 
  0729:39 07            pushi 7 // $7 cel
  072b:78               push1 
  072c:76               push0 
  072d:38 00d3          pushi d3 // $d3 setMotion
  0730:39 03            pushi 3 // $3 y
  0732:51 1d            class MoveTo 
  0734:36                push 
  0735:39 1a            pushi 1a // $1a text
  0737:38 0080          pushi 80 // $80 timeLeft
  073a:39 7e            pushi 7e // $7e setCycle
  073c:7a               push2 
  073d:51 1a            class End 
  073f:36                push 
  0740:7c            pushSelf 
  0741:81 00              lag gEgo 
  0743:4a 1e             send 1e 

  0745:39 0d            pushi d // $d lsTop
  0747:39 2c            pushi 2c // $2c handle
  0749:39 10            pushi 10 // $10 lsRight
  074b:39 43            pushi 43 // $43 at
  074d:38 00a0          pushi a0 // $a0 cycleDone
  0750:38 0098          pushi 98 // $98 center
  0753:39 21            pushi 21 // $21 font
  0755:39 04            pushi 4 // $4 x
  0757:39 46            pushi 46 // $46 width
  0759:39 7d            pushi 7d // $7d set
  075b:39 1e            pushi 1e // $1e mode
  075d:78               push1 
  075e:39 53            pushi 53 // $53 draw
  0760:39 58            pushi 58 // $58 dispose
  0762:46 00ff 0000 1a  calle ff procedure_0000 1a // Print 

  0768:32 00bb            jmp code_0826 

        code_076b
  076b:3c                 dup 
  076c:35 07              ldi 7 
  076e:1a                 eq? 
  076f:31 07              bnt code_0778 
  0771:35 04              ldi 4 
  0773:65 12             aTop seconds 
  0775:32 00ae            jmp code_0826 

        code_0778
  0778:3c                 dup 
  0779:35 08              ldi 8 
  077b:1a                 eq? 
  077c:31 30              bnt code_07ae 
  077e:88 00cb            lsg global203 
  0781:35 01              ldi 1 
  0783:1e                 gt? 
  0784:31 09              bnt code_078f 
  0786:76               push0 
  0787:45 0f 00         callb procedure_000f 0 // cls 

  078a:35 63              ldi 63 
  078c:a0 00ac            sag global172 

        code_078f
  078f:7a               push2 
  0790:39 0a            pushi a // $a nsLeft
  0792:39 05            pushi 5 // $5 view
  0794:43 6a 04         callk ShakeScreen 4 

  0797:39 2b            pushi 2b // $2b number
  0799:78               push1 
  079a:39 2f            pushi 2f // $2f dy
  079c:39 06            pushi 6 // $6 loop
  079e:78               push1 
  079f:78               push1 
  07a0:39 2a            pushi 2a // $2a play
  07a2:76               push0 
  07a3:72 0cf4          lofsa $149a // myMusic
  07a6:4a 10             send 10 

  07a8:35 15              ldi 15 
  07aa:65 10             aTop cycles 
  07ac:33 78              jmp code_0826 

        code_07ae
  07ae:3c                 dup 
  07af:35 09              ldi 9 
  07b1:1a                 eq? 
  07b2:31 4c              bnt code_0800 
  07b4:35 6e              ldi 6e 
  07b6:a0 00ac            sag global172 
  07b9:35 01              ldi 1 
  07bb:a3 03              sal local3 
  07bd:39 2b            pushi 2b // $2b number
  07bf:78               push1 
  07c0:39 39            pushi 39 // $39 canBeHere
  07c2:39 06            pushi 6 // $6 loop
  07c4:78               push1 
  07c5:78               push1 
  07c6:39 2a            pushi 2a // $2a play
  07c8:78               push1 
  07c9:7c            pushSelf 
  07ca:72 0ccd          lofsa $149a // myMusic
  07cd:4a 12             send 12 

  07cf:39 05            pushi 5 // $5 view
  07d1:78               push1 
  07d2:39 26            pushi 26 // $26 mark
  07d4:38 00c8          pushi c8 // $c8 setLoop
  07d7:78               push1 
  07d8:78               push1 
  07d9:38 00c5          pushi c5 // $c5 posn
  07dc:7a               push2 
  07dd:39 14            pushi 14 // $14 brLeft
  07df:38 00c8          pushi c8 // $c8 setLoop
  07e2:39 7e            pushi 7e // $7e setCycle
  07e4:78               push1 
  07e5:51 17            class Walk 
  07e7:36                push 
  07e8:39 42            pushi 42 // $42 setPri
  07ea:78               push1 
  07eb:39 09            pushi 9 // $9 nsTop
  07ed:38 00d3          pushi d3 // $d3 setMotion
  07f0:39 04            pushi 4 // $4 x
  07f2:51 1d            class MoveTo 
  07f4:36                push 
  07f5:39 19            pushi 19 // $19 time
  07f7:39 ff            pushi ff // $ff checkAni
  07f9:7c            pushSelf 
  07fa:81 00              lag gEgo 
  07fc:4a 2c             send 2c 

  07fe:33 26              jmp code_0826 

        code_0800
  0800:3c                 dup 
  0801:35 0a              ldi a 
  0803:1a                 eq? 
  0804:31 12              bnt code_0818 
  0806:72 0cbb          lofsa $14c4 // myIcon
  0809:a0 0080            sag global128 
  080c:35 00              ldi 0 
  080e:a0 0081            sag global129 
  0811:35 01              ldi 1 
  0813:a0 0084            sag global132 
  0816:33 0e              jmp code_0826 

        code_0818
  0818:3c                 dup 
  0819:35 0b              ldi b 
  081b:1a                 eq? 
  081c:31 08              bnt code_0826 
  081e:7a               push2 
  081f:39 2c            pushi 2c // $2c handle
  0821:39 11            pushi 11 // $11 signal
  0823:45 13 04         callb procedure_0013 4 // EgoDead 


        code_0826
  0826:3a                toss 
  0827:48                 ret 
    )

)

// 1042
(instance OpenSuit 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_0828
  0828:87 01              lap param1 
  082a:65 0a             aTop state 
  082c:36                push 
  082d:3c                 dup 
  082e:35 00              ldi 0 
  0830:1a                 eq? 
  0831:31 0e              bnt code_0841 
  0833:39 7e            pushi 7e // $7e setCycle
  0835:7a               push2 
  0836:51 1a            class End 
  0838:36                push 
  0839:7c            pushSelf 
  083a:63 08             pToa client 
  083c:4a 08             send 8 

  083e:32 0084            jmp code_08c5 

        code_0841
  0841:3c                 dup 
  0842:35 01              ldi 1 
  0844:1a                 eq? 
  0845:31 06              bnt code_084d 
  0847:35 02              ldi 2 
  0849:65 12             aTop seconds 
  084b:33 78              jmp code_08c5 

        code_084d
  084d:3c                 dup 
  084e:35 02              ldi 2 
  0850:1a                 eq? 
  0851:31 49              bnt code_089c 
  0853:83 04              lal local4 
  0855:31 0a              bnt code_0861 
  0857:76               push0 
  0858:45 16 00         callb procedure_0016 0 // Ok 

  085b:35 00              ldi 0 
  085d:a3 04              sal local4 
  085f:33 35              jmp code_0896 

        code_0861
  0861:83 02              lal local2 
  0863:31 26              bnt code_088b 
  0865:38 00ee          pushi ee // $ee has
  0868:78               push1 
  0869:39 13            pushi 13 // $13 brTop
  086b:81 00              lag gEgo 
  086d:4a 06             send 6 

  086f:31 0d              bnt code_087e 
  0871:7a               push2 
  0872:39 2c            pushi 2c // $2c handle
  0874:39 12            pushi 12 // $12 illegalBits
  0876:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  087c:33 0b              jmp code_0889 

        code_087e
  087e:7a               push2 
  087f:39 2c            pushi 2c // $2c handle
  0881:39 13            pushi 13 // $13 brTop
  0883:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0889
  0889:33 0b              jmp code_0896 

        code_088b
  088b:7a               push2 
  088c:39 2c            pushi 2c // $2c handle
  088e:39 14            pushi 14 // $14 brLeft
  0890:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0896
  0896:35 01              ldi 1 
  0898:65 10             aTop cycles 
  089a:33 29              jmp code_08c5 

        code_089c
  089c:3c                 dup 
  089d:35 03              ldi 3 
  089f:1a                 eq? 
  08a0:31 0d              bnt code_08af 
  08a2:39 7e            pushi 7e // $7e setCycle
  08a4:7a               push2 
  08a5:51 1b            class Beg 
  08a7:36                push 
  08a8:7c            pushSelf 
  08a9:63 08             pToa client 
  08ab:4a 08             send 8 

  08ad:33 16              jmp code_08c5 

        code_08af
  08af:3c                 dup 
  08b0:35 04              ldi 4 
  08b2:1a                 eq? 
  08b3:31 10              bnt code_08c5 
  08b5:76               push0 
  08b6:45 04 00         callb procedure_0004 0 // HandsOn 

  08b9:38 00c6          pushi c6 // $c6 stopUpd
  08bc:76               push0 
  08bd:39 7a            pushi 7a // $7a setScript
  08bf:78               push1 
  08c0:76               push0 
  08c1:63 08             pToa client 
  08c3:4a 0a             send a 


        code_08c5
  08c5:3a                toss 
  08c6:48                 ret 
    )

)

// 1072
(instance chest1 of RPicView
    (properties
        y $5b
        x $2b
        z $0
        heading $0
        view $90
        loop $0
        cel $4
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_08c7
  08c7:39 03            pushi 3 // $3 y
  08c9:7c            pushSelf 
  08ca:8f 01              lsp param1 
  08cc:39 03            pushi 3 // $3 y
  08ce:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  08d4:2f 09               bt code_08df 
  08d6:78               push1 
  08d7:74 069e          lofss $0f78 // look[<at]/drawer
  08da:43 25 02         callk Said 2 

  08dd:31 13              bnt code_08f2 

        code_08df
  08df:39 4c            pushi 4c // $4c claimed
  08e1:78               push1 
  08e2:78               push1 
  08e3:87 01              lap param1 
  08e5:4a 06             send 6 

  08e7:7a               push2 
  08e8:39 2c            pushi 2c // $2c handle
  08ea:39 15            pushi 15 // $15 brBottom
  08ec:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_08f2
  08f2:48                 ret 
    )

)

// 10a8
(instance chest2 of RPicView
    (properties
        y $5b
        x $cd
        z $0
        heading $0
        view $90
        loop $0
        cel $4
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_08f3
  08f3:39 03            pushi 3 // $3 y
  08f5:7c            pushSelf 
  08f6:8f 01              lsp param1 
  08f8:39 03            pushi 3 // $3 y
  08fa:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0900:31 1d              bnt code_091f 
  0902:39 4c            pushi 4c // $4c claimed
  0904:78               push1 
  0905:76               push0 
  0906:87 01              lap param1 
  0908:4a 06             send 6 

  090a:31 13              bnt code_091f 
  090c:39 4c            pushi 4c // $4c claimed
  090e:78               push1 
  090f:78               push1 
  0910:87 01              lap param1 
  0912:4a 06             send 6 

  0914:7a               push2 
  0915:39 2c            pushi 2c // $2c handle
  0917:39 15            pushi 15 // $15 brBottom
  0919:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_091f
  091f:48                 ret 
    )

)

// 10de
(instance bed1 of RPicView
    (properties
        y $6a
        x $d3
        z $0
        heading $0
        view $90
        loop $0
        cel $7
        priority $7
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0920
  0920:39 03            pushi 3 // $3 y
  0922:7c            pushSelf 
  0923:8f 01              lsp param1 
  0925:39 03            pushi 3 // $3 y
  0927:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  092d:2f 09               bt code_0938 
  092f:78               push1 
  0930:74 063a          lofss $0f6d // look[<at]/bed
  0933:43 25 02         callk Said 2 

  0936:31 13              bnt code_094b 

        code_0938
  0938:39 4c            pushi 4c // $4c claimed
  093a:78               push1 
  093b:78               push1 
  093c:87 01              lap param1 
  093e:4a 06             send 6 

  0940:7a               push2 
  0941:39 2c            pushi 2c // $2c handle
  0943:39 16            pushi 16 // $16 brRight
  0945:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_094b
  094b:48                 ret 
    )

)

// 1114
(instance bed2 of RPicView
    (properties
        y $99
        x $10d
        z $0
        heading $0
        view $90
        loop $0
        cel $8
        priority $b
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_094c
  094c:39 03            pushi 3 // $3 y
  094e:7c            pushSelf 
  094f:8f 01              lsp param1 
  0951:39 03            pushi 3 // $3 y
  0953:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0959:31 1d              bnt code_0978 
  095b:39 4c            pushi 4c // $4c claimed
  095d:78               push1 
  095e:76               push0 
  095f:87 01              lap param1 
  0961:4a 06             send 6 

  0963:31 13              bnt code_0978 
  0965:39 4c            pushi 4c // $4c claimed
  0967:78               push1 
  0968:78               push1 
  0969:87 01              lap param1 
  096b:4a 06             send 6 

  096d:7a               push2 
  096e:39 2c            pushi 2c // $2c handle
  0970:39 16            pushi 16 // $16 brRight
  0972:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0978
  0978:48                 ret 
    )

)

// 114a
(instance mirror of RPicView
    (properties
        y $93
        x $118
        z $0
        heading $0
        view $90
        loop $0
        cel $0
        priority $a
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0979
  0979:78               push1 
  097a:74 05e3          lofss $0f60 // look<dans/miroir
  097d:43 25 02         callk Said 2 

  0980:2f 09               bt code_098b 
  0982:78               push1 
  0983:74 05d1          lofss $0f57 // look<at/reflection
  0986:43 25 02         callk Said 2 

  0989:31 28              bnt code_09b3 

        code_098b
  098b:38 00ae          pushi ae // $ae distanceTo
  098e:78               push1 
  098f:74 07be          lofss $1150 // mirror
  0992:81 00              lag gEgo 
  0994:4a 06             send 6 

  0996:36                push 
  0997:35 50              ldi 50 
  0999:22                 lt? 
  099a:31 11              bnt code_09ad 
  099c:35 0c              ldi c 
  099e:a0 00d5            sag global213 
  09a1:39 03            pushi 3 // $3 y
  09a3:76               push0 
  09a4:39 2c            pushi 2c // $2c handle
  09a6:39 17            pushi 17 // $17 name
  09a8:45 01 06         callb procedure_0001 6 // Say 

  09ab:33 04              jmp code_09b1 

        code_09ad
  09ad:76               push0 
  09ae:45 09 00         callb procedure_0009 0 // NotClose 


        code_09b1
  09b1:33 57              jmp code_0a0a 

        code_09b3
  09b3:78               push1 
  09b4:74 0579          lofss $0f30 // look<(behind,below)/miroir
  09b7:43 25 02         callk Said 2 

  09ba:31 0d              bnt code_09c9 
  09bc:7a               push2 
  09bd:39 2c            pushi 2c // $2c handle
  09bf:39 18            pushi 18 // $18 key
  09c1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09c7:33 41              jmp code_0a0a 

        code_09c9
  09c9:78               push1 
  09ca:74 04e2          lofss $0eaf // get/miroir
  09cd:43 25 02         callk Said 2 

  09d0:31 0d              bnt code_09df 
  09d2:7a               push2 
  09d3:39 2c            pushi 2c // $2c handle
  09d5:39 19            pushi 19 // $19 time
  09d7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09dd:33 2b              jmp code_0a0a 

        code_09df
  09df:39 03            pushi 3 // $3 y
  09e1:7c            pushSelf 
  09e2:8f 01              lsp param1 
  09e4:39 03            pushi 3 // $3 y
  09e6:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  09ec:2f 09               bt code_09f7 
  09ee:78               push1 
  09ef:74 051a          lofss $0f0c // look/miroir
  09f2:43 25 02         callk Said 2 

  09f5:31 13              bnt code_0a0a 

        code_09f7
  09f7:7a               push2 
  09f8:39 2c            pushi 2c // $2c handle
  09fa:39 1a            pushi 1a // $1a text
  09fc:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a02:39 4c            pushi 4c // $4c claimed
  0a04:78               push1 
  0a05:78               push1 
  0a06:87 01              lap param1 
  0a08:4a 06             send 6 


        code_0a0a
  0a0a:48                 ret 
    )

)

// 1180
(instance sofa of RPicView
    (properties
        y $a9
        x $ac
        z $0
        heading $0
        view $90
        loop $0
        cel $1
        priority $d
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0a0b
  0a0b:39 03            pushi 3 // $3 y
  0a0d:7c            pushSelf 
  0a0e:8f 01              lsp param1 
  0a10:39 03            pushi 3 // $3 y
  0a12:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a18:31 0f              bnt code_0a29 
  0a1a:39 4c            pushi 4c // $4c claimed
  0a1c:78               push1 
  0a1d:78               push1 
  0a1e:87 01              lap param1 
  0a20:4a 06             send 6 

  0a22:78               push1 
  0a23:74 0b2d          lofss $1553 // couch
  0a26:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a29
  0a29:48                 ret 
    )

)

// 11b6
(instance wingback of RPicView
    (properties
        y $94
        x $71
        z $0
        heading $0
        view $90
        loop $0
        cel $2
        priority $a
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0a2a
  0a2a:39 03            pushi 3 // $3 y
  0a2c:7c            pushSelf 
  0a2d:8f 01              lsp param1 
  0a2f:39 03            pushi 3 // $3 y
  0a31:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a37:31 0f              bnt code_0a48 
  0a39:39 4c            pushi 4c // $4c claimed
  0a3b:78               push1 
  0a3c:78               push1 
  0a3d:87 01              lap param1 
  0a3f:4a 06             send 6 

  0a41:78               push1 
  0a42:74 0ae7          lofss $152c // chair
  0a45:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a48
  0a48:48                 ret 
    )

)

// 11ec
(instance item3 of RPicView
    (properties
        y $74
        x $fb
        z $0
        heading $0
        view $90
        loop $0
        cel $3
        priority $8
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0a49
  0a49:39 03            pushi 3 // $3 y
  0a4b:7c            pushSelf 
  0a4c:8f 01              lsp param1 
  0a4e:39 03            pushi 3 // $3 y
  0a50:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a56:31 0f              bnt code_0a67 
  0a58:39 4c            pushi 4c // $4c claimed
  0a5a:78               push1 
  0a5b:78               push1 
  0a5c:87 01              lap param1 
  0a5e:4a 06             send 6 

  0a60:78               push1 
  0a61:74 0b53          lofss $15b7 // table
  0a64:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a67
  0a67:48                 ret 
    )

)

// 1222
(instance item4 of RPicView
    (properties
        y $2a
        x $81
        z $0
        heading $0
        view $90
        loop $0
        cel $5
        priority $1
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0a68
  0a68:78               push1 
  0a69:74 048b          lofss $0ef7 // look/eye>
  0a6c:43 25 02         callk Said 2 

  0a6f:31 09              bnt code_0a7a 
  0a71:78               push1 
  0a72:74 045b          lofss $0ed0 // look/colonel
  0a75:43 25 02         callk Said 2 

  0a78:2f 12               bt code_0a8c 

        code_0a7a
  0a7a:78               push1 
  0a7b:74 0470          lofss $0eee // look/eye<colonel
  0a7e:43 25 02         callk Said 2 

  0a81:2f 09               bt code_0a8c 
  0a83:78               push1 
  0a84:74 0455          lofss $0edc // look/eye/colonel
  0a87:43 25 02         callk Said 2 

  0a8a:31 0e              bnt code_0a9a 

        code_0a8c
  0a8c:7a               push2 
  0a8d:39 2c            pushi 2c // $2c handle
  0a8f:39 1b            pushi 1b // $1b elements
  0a91:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a97:32 0091            jmp code_0b2b 

        code_0a9a
  0a9a:78               push1 
  0a9b:74 0459          lofss $0ef7 // look/eye>
  0a9e:43 25 02         callk Said 2 

  0aa1:31 09              bnt code_0aac 
  0aa3:78               push1 
  0aa4:74 0474          lofss $0f1b // look/dame
  0aa7:43 25 02         callk Said 2 

  0aaa:2f 12               bt code_0abe 

        code_0aac
  0aac:78               push1 
  0aad:74 044e          lofss $0efe // look/eye[<dame,painting]
  0ab0:43 25 02         callk Said 2 

  0ab3:2f 09               bt code_0abe 
  0ab5:78               push1 
  0ab6:74 042c          lofss $0ee5 // look/eye/dame
  0ab9:43 25 02         callk Said 2 

  0abc:31 0d              bnt code_0acb 

        code_0abe
  0abe:7a               push2 
  0abf:39 2c            pushi 2c // $2c handle
  0ac1:39 1c            pushi 1c // $1c color
  0ac3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0ac9:33 60              jmp code_0b2b 

        code_0acb
  0acb:78               push1 
  0acc:74 04b4          lofss $0f83 // bouger,get/painting
  0acf:43 25 02         callk Said 2 

  0ad2:31 0d              bnt code_0ae1 
  0ad4:7a               push2 
  0ad5:39 2c            pushi 2c // $2c handle
  0ad7:39 1d            pushi 1d // $1d back
  0ad9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0adf:33 4a              jmp code_0b2b 

        code_0ae1
  0ae1:78               push1 
  0ae2:74 0459          lofss $0f3e // look<(behind,below)/painting
  0ae5:43 25 02         callk Said 2 

  0ae8:31 0d              bnt code_0af7 
  0aea:7a               push2 
  0aeb:39 2c            pushi 2c // $2c handle
  0aed:39 1e            pushi 1e // $1e mode
  0aef:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0af5:33 34              jmp code_0b2b 

        code_0af7
  0af7:39 03            pushi 3 // $3 y
  0af9:7c            pushSelf 
  0afa:8f 01              lsp param1 
  0afc:39 03            pushi 3 // $3 y
  0afe:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b04:2f 12               bt code_0b18 
  0b06:78               push1 
  0b07:74 0408          lofss $0f12 // look/painting,colonel
  0b0a:43 25 02         callk Said 2 

  0b0d:2f 09               bt code_0b18 
  0b0f:78               push1 
  0b10:74 040e          lofss $0f21 // look/dame,man,colonel/painting
  0b13:43 25 02         callk Said 2 

  0b16:31 13              bnt code_0b2b 

        code_0b18
  0b18:39 4c            pushi 4c // $4c claimed
  0b1a:78               push1 
  0b1b:78               push1 
  0b1c:87 01              lap param1 
  0b1e:4a 06             send 6 

  0b20:7a               push2 
  0b21:39 2c            pushi 2c // $2c handle
  0b23:39 1f            pushi 1f // $1f style
  0b25:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0b2b
  0b2b:48                 ret 
    )

)

// 1258
(instance needle of PV
    (properties
        y $4e
        x $1a
        z $0
        heading $0
        view $90
        loop $0
        cel $6
        priority $9
        signal $0
    )
)

// 1282
(instance table2 of RPicView
    (properties
        y $a9
        x $7f
        z $0
        heading $0
        view $90
        loop $0
        cel $3
        priority $d
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0b2c
  0b2c:39 03            pushi 3 // $3 y
  0b2e:7c            pushSelf 
  0b2f:8f 01              lsp param1 
  0b31:39 03            pushi 3 // $3 y
  0b33:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b39:31 0f              bnt code_0b4a 
  0b3b:39 4c            pushi 4c // $4c claimed
  0b3d:78               push1 
  0b3e:78               push1 
  0b3f:87 01              lap param1 
  0b41:4a 06             send 6 

  0b43:78               push1 
  0b44:74 0a70          lofss $15b7 // table
  0b47:45 19 02         callb procedure_0019 2 // DoLook 


        code_0b4a
  0b4a:48                 ret 
    )

)

// 12b8
(instance lamp1 of Prop
    (properties
        y $1e
        x $f0
        z $0
        heading $0
        yStep $2
        view $90
        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_0b4b
  0b4b:39 03            pushi 3 // $3 y
  0b4d:7c            pushSelf 
  0b4e:8f 01              lsp param1 
  0b50:39 03            pushi 3 // $3 y
  0b52:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b58:31 0f              bnt code_0b69 
  0b5a:39 4c            pushi 4c // $4c claimed
  0b5c:78               push1 
  0b5d:78               push1 
  0b5e:87 01              lap param1 
  0b60:4a 06             send 6 

  0b62:78               push1 
  0b63:74 0a09          lofss $156f // lamp
  0b66:45 19 02         callb procedure_0019 2 // DoLook 


        code_0b69
  0b69:48                 ret 
    )

)

// 130a
(instance lamp2 of Prop
    (properties
        y $35
        x $12d
        z $0
        heading $0
        yStep $2
        view $90
        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_0b6a
  0b6a:39 03            pushi 3 // $3 y
  0b6c:7c            pushSelf 
  0b6d:8f 01              lsp param1 
  0b6f:39 03            pushi 3 // $3 y
  0b71:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b77:31 0f              bnt code_0b88 
  0b79:39 4c            pushi 4c // $4c claimed
  0b7b:78               push1 
  0b7c:78               push1 
  0b7d:87 01              lap param1 
  0b7f:4a 06             send 6 

  0b81:78               push1 
  0b82:74 09ea          lofss $156f // lamp
  0b85:45 19 02         callb procedure_0019 2 // DoLook 


        code_0b88
  0b88:48                 ret 
    )

)

// 135c
(instance suit1 of Prop
    (properties
        y $58
        x $d0
        z $0
        heading $0
        yStep $2
        view $90
        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_0b89
  0b89:78               push1 
  0b8a:74 0316          lofss $0ea3 // get/cloth
  0b8d:43 25 02         callk Said 2 

  0b90:31 32              bnt code_0bc4 
  0b92:38 00da          pushi da // $da inRect
  0b95:39 04            pushi 4 // $4 x
  0b97:38 00f5          pushi f5 // $f5 saidMe
  0b9a:38 0083          pushi 83 // $83 playMaybe
  0b9d:38 0122          pushi 122 // $122 xTilt
  0ba0:38 00a0          pushi a0 // $a0 cycleDone
  0ba3:81 00              lag gEgo 
  0ba5:4a 0c             send c 

  0ba7:31 0d              bnt code_0bb6 
  0ba9:7a               push2 
  0baa:39 2c            pushi 2c // $2c handle
  0bac:39 20            pushi 20 // $20 state
  0bae:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0bb4:33 0b              jmp code_0bc1 

        code_0bb6
  0bb6:7a               push2 
  0bb7:39 2c            pushi 2c // $2c handle
  0bb9:39 21            pushi 21 // $21 font
  0bbb:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0bc1
  0bc1:32 01d3            jmp code_0d97 

        code_0bc4
  0bc4:78               push1 
  0bc5:74 02bb          lofss $0e83 // change,porter,(attach<on)/cloth
  0bc8:43 25 02         callk Said 2 

  0bcb:31 32              bnt code_0bff 
  0bcd:38 00da          pushi da // $da inRect
  0bd0:39 04            pushi 4 // $4 x
  0bd2:38 00f5          pushi f5 // $f5 saidMe
  0bd5:38 0083          pushi 83 // $83 playMaybe
  0bd8:38 0122          pushi 122 // $122 xTilt
  0bdb:38 00a0          pushi a0 // $a0 cycleDone
  0bde:81 00              lag gEgo 
  0be0:4a 0c             send c 

  0be2:31 0d              bnt code_0bf1 
  0be4:7a               push2 
  0be5:39 2c            pushi 2c // $2c handle
  0be7:39 22            pushi 22 // $22 type
  0be9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0bef:33 0b              jmp code_0bfc 

        code_0bf1
  0bf1:7a               push2 
  0bf2:39 2c            pushi 2c // $2c handle
  0bf4:39 21            pushi 21 // $21 font
  0bf6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0bfc
  0bfc:32 0198            jmp code_0d97 

        code_0bff
  0bff:78               push1 
  0c00:74 020b          lofss $0e0e // (look<through),chercher/cloth
  0c03:43 25 02         callk Said 2 

  0c06:31 32              bnt code_0c3a 
  0c08:38 00da          pushi da // $da inRect
  0c0b:39 04            pushi 4 // $4 x
  0c0d:38 00f5          pushi f5 // $f5 saidMe
  0c10:38 0083          pushi 83 // $83 playMaybe
  0c13:38 0122          pushi 122 // $122 xTilt
  0c16:38 00a0          pushi a0 // $a0 cycleDone
  0c19:81 00              lag gEgo 
  0c1b:4a 0c             send c 

  0c1d:31 0d              bnt code_0c2c 
  0c1f:7a               push2 
  0c20:39 2c            pushi 2c // $2c handle
  0c22:39 23            pushi 23 // $23 window
  0c24:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c2a:33 0b              jmp code_0c37 

        code_0c2c
  0c2c:7a               push2 
  0c2d:39 2c            pushi 2c // $2c handle
  0c2f:39 24            pushi 24 // $24 cursor
  0c31:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0c37
  0c37:32 015d            jmp code_0d97 

        code_0c3a
  0c3a:78               push1 
  0c3b:74 01de          lofss $0e1c // /(bagage,cloth)>
  0c3e:43 25 02         callk Said 2 

  0c41:30 0135            bnt code_0d79 
  0c44:78               push1 
  0c45:74 0344          lofss $0f8c // open,(look<dans)
  0c48:43 25 02         callk Said 2 

  0c4b:30 00c2            bnt code_0d10 
  0c4e:38 00da          pushi da // $da inRect
  0c51:39 04            pushi 4 // $4 x
  0c53:38 00f5          pushi f5 // $f5 saidMe
  0c56:38 0083          pushi 83 // $83 playMaybe
  0c59:38 0122          pushi 122 // $122 xTilt
  0c5c:38 008c          pushi 8c // $8c track
  0c5f:81 00              lag gEgo 
  0c61:4a 0c             send c 

  0c63:31 43              bnt code_0ca8 
  0c65:88 00a5            lsg gAct 
  0c68:35 05              ldi 5 
  0c6a:22                 lt? 
  0c6b:31 0d              bnt code_0c7a 
  0c6d:7a               push2 
  0c6e:39 2c            pushi 2c // $2c handle
  0c70:39 09            pushi 9 // $9 nsTop
  0c72:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c78:33 2c              jmp code_0ca6 

        code_0c7a
  0c7a:88 00a5            lsg gAct 
  0c7d:35 05              ldi 5 
  0c7f:1a                 eq? 
  0c80:31 0d              bnt code_0c8f 
  0c82:7a               push2 
  0c83:39 2c            pushi 2c // $2c handle
  0c85:39 25            pushi 25 // $25 max
  0c87:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c8d:33 17              jmp code_0ca6 

        code_0c8f
  0c8f:76               push0 
  0c90:45 03 00         callb procedure_0003 0 // HandsOff 

  0c93:35 01              ldi 1 
  0c95:a3 02              sal local2 
  0c97:35 00              ldi 0 
  0c99:a3 01              sal local1 
  0c9b:39 7a            pushi 7a // $7a setScript
  0c9d:78               push1 
  0c9e:74 03a7          lofss $1048 // OpenSuit
  0ca1:72 0710          lofsa $13b4 // suit2
  0ca4:4a 06             send 6 


        code_0ca6
  0ca6:33 66              jmp code_0d0e 

        code_0ca8
  0ca8:38 00da          pushi da // $da inRect
  0cab:39 04            pushi 4 // $4 x
  0cad:38 00f1          pushi f1 // $f1 write
  0cb0:38 009a          pushi 9a // $9a left
  0cb3:38 0140          pushi 140 // $140 upRoomNo
  0cb6:38 00c8          pushi c8 // $c8 setLoop
  0cb9:81 00              lag gEgo 
  0cbb:4a 0c             send c 

  0cbd:2f 14               bt code_0cd3 
  0cbf:38 00da          pushi da // $da inRect
  0cc2:39 04            pushi 4 // $4 x
  0cc4:38 00b2          pushi b2 // $b2 lastBumped
  0cc7:76               push0 
  0cc8:38 0140          pushi 140 // $140 upRoomNo
  0ccb:39 62            pushi 62 // $62 eachElementDo
  0ccd:81 00              lag gEgo 
  0ccf:4a 0c             send c 

  0cd1:31 0d              bnt code_0ce0 

        code_0cd3
  0cd3:7a               push2 
  0cd4:39 2c            pushi 2c // $2c handle
  0cd6:39 26            pushi 26 // $26 mark
  0cd8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0cde:33 2e              jmp code_0d0e 

        code_0ce0
  0ce0:38 00ae          pushi ae // $ae distanceTo
  0ce3:78               push1 
  0ce4:74 067b          lofss $1362 // suit1
  0ce7:81 00              lag gEgo 
  0ce9:4a 06             send 6 

  0ceb:36                push 
  0cec:35 19              ldi 19 
  0cee:22                 lt? 
  0cef:31 19              bnt code_0d0a 
  0cf1:35 01              ldi 1 
  0cf3:a3 01              sal local1 
  0cf5:35 00              ldi 0 
  0cf7:a3 02              sal local2 
  0cf9:76               push0 
  0cfa:45 03 00         callb procedure_0003 0 // HandsOff 

  0cfd:39 7a            pushi 7a // $7a setScript
  0cff:78               push1 
  0d00:74 0345          lofss $1048 // OpenSuit
  0d03:72 065c          lofsa $1362 // suit1
  0d06:4a 06             send 6 

  0d08:33 04              jmp code_0d0e 

        code_0d0a
  0d0a:76               push0 
  0d0b:45 09 00         callb procedure_0009 0 // NotClose 


        code_0d0e
  0d0e:33 67              jmp code_0d77 

        code_0d10
  0d10:78               push1 
  0d11:74 01b3          lofss $0ec7 // look
  0d14:43 25 02         callk Said 2 

  0d17:31 0d              bnt code_0d26 
  0d19:7a               push2 
  0d1a:39 2c            pushi 2c // $2c handle
  0d1c:39 27            pushi 27 // $27 who
  0d1e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0d24:33 51              jmp code_0d77 

        code_0d26
  0d26:78               push1 
  0d27:74 016a          lofss $0e94 // clore
  0d2a:43 25 02         callk Said 2 

  0d2d:31 06              bnt code_0d35 
  0d2f:76               push0 
  0d30:45 11 00         callb procedure_0011 0 // AlreadyClosed 

  0d33:33 42              jmp code_0d77 

        code_0d35
  0d35:78               push1 
  0d36:74 0167          lofss $0ea0 // get
  0d39:43 25 02         callk Said 2 

  0d3c:31 39              bnt code_0d77 
  0d3e:38 00da          pushi da // $da inRect
  0d41:39 04            pushi 4 // $4 x
  0d43:38 00f5          pushi f5 // $f5 saidMe
  0d46:38 0083          pushi 83 // $83 playMaybe
  0d49:38 0122          pushi 122 // $122 xTilt
  0d4c:38 00a0          pushi a0 // $a0 cycleDone
  0d4f:81 00              lag gEgo 
  0d51:4a 0c             send c 

  0d53:2f 11               bt code_0d66 
  0d55:38 00ae          pushi ae // $ae distanceTo
  0d58:78               push1 
  0d59:74 0606          lofss $1362 // suit1
  0d5c:81 00              lag gEgo 
  0d5e:4a 06             send 6 

  0d60:36                push 
  0d61:35 19              ldi 19 
  0d63:22                 lt? 
  0d64:31 0d              bnt code_0d73 

        code_0d66
  0d66:7a               push2 
  0d67:39 2c            pushi 2c // $2c handle
  0d69:39 28            pushi 28 // $28 message
  0d6b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0d71:33 04              jmp code_0d77 

        code_0d73
  0d73:76               push0 
  0d74:45 09 00         callb procedure_0009 0 // NotClose 


        code_0d77
  0d77:33 1e              jmp code_0d97 

        code_0d79
  0d79:39 03            pushi 3 // $3 y
  0d7b:7c            pushSelf 
  0d7c:8f 01              lsp param1 
  0d7e:39 03            pushi 3 // $3 y
  0d80:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0d86:31 0f              bnt code_0d97 
  0d88:39 4c            pushi 4c // $4c claimed
  0d8a:78               push1 
  0d8b:78               push1 
  0d8c:87 01              lap param1 
  0d8e:4a 06             send 6 

  0d90:78               push1 
  0d91:74 081a          lofss $15ae // suitcase
  0d94:45 19 02         callb procedure_0019 2 // DoLook 


        code_0d97
  0d97:48                 ret 
    )

)

// 13ae
(instance suit2 of Prop
    (properties
        y $85
        x $109
        z $0
        heading $0
        yStep $2
        view $90
        loop $2
        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_0d98
  0d98:39 03            pushi 3 // $3 y
  0d9a:7c            pushSelf 
  0d9b:8f 01              lsp param1 
  0d9d:39 03            pushi 3 // $3 y
  0d9f:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0da5:31 0f              bnt code_0db6 
  0da7:39 4c            pushi 4c // $4c claimed
  0da9:78               push1 
  0daa:78               push1 
  0dab:87 01              lap param1 
  0dad:4a 06             send 6 

  0daf:78               push1 
  0db0:74 07fb          lofss $15ae // suitcase
  0db3:45 19 02         callb procedure_0019 2 // DoLook 


        code_0db6
  0db6:48                 ret 
    )

)

// 1400
(instance chute of Act
    (properties
        y $7f
        x $13
        z $0
        heading $0
        yStep $2
        view $90
        loop $0
        cel $9
        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
    )
    (method (handleEvent) // method_0db7
  0db7:39 6f            pushi 6f // $6f handleEvent
  0db9:78               push1 
  0dba:8f 01              lsp param1 
  0dbc:57 28 06         super Act 6 

  0dbf:39 03            pushi 3 // $3 y
  0dc1:7c            pushSelf 
  0dc2:8f 01              lsp param1 
  0dc4:39 03            pushi 3 // $3 y
  0dc6:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0dcc:2f 09               bt code_0dd7 
  0dce:78               push1 
  0dcf:74 0104          lofss $0ed6 // look/door
  0dd2:43 25 02         callk Said 2 

  0dd5:31 13              bnt code_0dea 

        code_0dd7
  0dd7:39 4c            pushi 4c // $4c claimed
  0dd9:78               push1 
  0dda:78               push1 
  0ddb:87 01              lap param1 
  0ddd:4a 06             send 6 

  0ddf:7a               push2 
  0de0:39 2c            pushi 2c // $2c handle
  0de2:39 06            pushi 6 // $6 loop
  0de4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0dea
  0dea:48                 ret 
    )

)

// 1468
(instance Fireplace of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $2f
        nsLeft $6c
        nsBottom $58
        nsRight $9a
    )
    (method (handleEvent) // method_0deb
  0deb:39 03            pushi 3 // $3 y
  0ded:7c            pushSelf 
  0dee:8f 01              lsp param1 
  0df0:39 03            pushi 3 // $3 y
  0df2:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0df8:31 0f              bnt code_0e09 
  0dfa:39 4c            pushi 4c // $4c claimed
  0dfc:78               push1 
  0dfd:78               push1 
  0dfe:87 01              lap param1 
  0e00:4a 06             send 6 

  0e02:78               push1 
  0e03:74 0753          lofss $1559 // fireplace
  0e06:45 19 02         callb procedure_0019 2 // DoLook 


        code_0e09
  0e09:48                 ret 
    )

)

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

// 14be
(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
    )
)



