(script 48)

(string
    string_10bc "LookNote"
    string_10c5 "Room48"
    string_10cc "bed"
    string_10d0 "bed1"
    string_10d5 "bed2"
    string_10da "chair"
    string_10e0 "chest"
    string_10e6 "couch"
    string_10ec "desk"
    string_10f1 "enterPanel"
    string_10fc "exiting"
    string_1104 "lady"
    string_1109 "lamp"
    string_110e "lamp1"
    string_1114 "lamp2"
    string_111a "mySound"
    string_1122 "notebook"
    string_112b "panel"
    string_1131 "sofa"
    string_1136 "stain"
    string_113c "suit1"
    string_1142 "suit2"
    string_1148 "table"
    string_114e "table1"
    string_1155 "table2"
)

(said
    said_0a78 /carpet,dirt,blood,stain
    said_0a85 /panel,(door<cachoterie)>
    said_0a92 <bas
    said_0a96 [<around,at][/room]
    said_0aa4 ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
    said_0ac3 clore/carnet
    said_0ac9 get,arranger/chair
    said_0ad2 get/bagage
    said_0ad8 get/carnet
    said_0ade get/painting
    said_0ae4 look
    said_0ae7 look,etudier/carnet
    said_0af0 look/chair
    said_0af6 look/bureau
    said_0afc look/eye/dame
    said_0b05 look/eye>
    said_0b0c look/eye[<dame,painting]
    said_0b1a look/nightstand>
    said_0b21 look/painting
    said_0b27 look/top[<bureau]
    said_0b32 look/dame
    said_0b38 look/dame/painting
    said_0b41 look<behind,below/painting
    said_0b4d look>
    said_0b51 look[<at]/drawer
    said_0b5c look[<at]/bagage
    said_0b67 open,(look<dans)/(drawer<bureau),bureau,(top[<bureau])
    said_0b87 open,(look<dans)/bagage
    said_0b95 open,bouger
    said_0b9b open/carnet
    said_0ba1 open/painting
    said_0ba7 rotate/page
)

(synonym
    carnet | notebook | notepad = book | livre
    bagage | luggage | suitcase = affaire | cas | case | etui
    bagage | luggage | suitcase = bag | sac | sack | valise
    drawer | tiroir = commode | dresser
    room = bedroom
)

(local
    local0 = $0000
)

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

// 0bde
(instance public Room48 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $30
        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_0026
  0026:35 2f              ldi 2f 
  0028:65 20             aTop west 
  002a:39 57            pushi 57 // $57 init
  002c:76               push0 
  002d:57 37 04         super Rm 4 

  0030:39 03            pushi 3 // $3 y
  0032:38 0084          pushi 84 // $84 stop
  0035:39 4a            pushi 4a // $4a pragmaFail
  0037:39 4b            pushi 4b // $4b said
  0039:45 15 06         callb procedure_0015 6 // LoadMany 

  003c:88 00a5            lsg gAct 
  003f:35 06              ldi 6 
  0041:1a                 eq? 
  0042:31 51              bnt code_0095 
  0044:89 76              lsg gMustDos 
  0046:35 01              ldi 1 
  0048:12                 and 
  0049:18                 not 
  004a:31 2d              bnt code_0079 
  004c:7a               push2 
  004d:38 0087          pushi 87 // $87 clean
  0050:39 29            pushi 29 // $29 edit
  0052:43 00 04         callk Load 4 

  0055:39 05            pushi 5 // $5 view
  0057:38 0084          pushi 84 // $84 stop
  005a:39 1d            pushi 1d // $1d back
  005c:39 5e            pushi 5e // $5e respondsTo
  005e:39 5f            pushi 5f // $5f yourself
  0060:39 60            pushi 60 // $60 size
  0062:45 15 0a         callb procedure_0015 a // LoadMany 

  0065:7a               push2 
  0066:38 0082          pushi 82 // $82 owner
  0069:38 0196          pushi 196 // $196 sel_406
  006c:43 00 04         callk Load 4 

  006f:7a               push2 
  0070:38 0080          pushi 80 // $80 timeLeft
  0073:38 0282          pushi 282 // $282 sel_642
  0076:43 00 04         callk Load 4 


        code_0079
  0079:39 07            pushi 7 // $7 cel
  007b:78               push1 
  007c:39 04            pushi 4 // $4 x
  007e:72 0d87          lofsa $0e08 // chair
  0081:4a 06             send 6 

  0083:39 42            pushi 42 // $42 setPri
  0085:78               push1 
  0086:39 04            pushi 4 // $4 x
  0088:38 00c9          pushi c9 // $c9 ignoreActors
  008b:78               push1 
  008c:78               push1 
  008d:39 57            pushi 57 // $57 init
  008f:76               push0 
  0090:72 0fdd          lofsa $1070 // stain
  0093:4a 10             send 10 


        code_0095
  0095:39 61            pushi 61 // $61 add
  0097:39 0b            pushi b // $b nsBottom
  0099:74 0c28          lofss $0cc4 // lady
  009c:74 0c5b          lofss $0cfa // bed1
  009f:74 0cc4          lofss $0d66 // bed2
  00a2:74 0c8b          lofss $0d30 // chest
  00a5:74 0cf4          lofss $0d9c // desk
  00a8:74 0d27          lofss $0dd2 // table1
  00ab:74 0dc6          lofss $0e74 // table2
  00ae:74 0df9          lofss $0eaa // suit1
  00b1:74 0e2c          lofss $0ee0 // suit2
  00b4:74 0d87          lofss $0e3e // sofa
  00b7:74 0d4e          lofss $0e08 // chair
  00ba:39 62            pushi 62 // $62 eachElementDo
  00bc:78               push1 
  00bd:39 57            pushi 57 // $57 init
  00bf:39 3c            pushi 3c // $3c doit
  00c1:76               push0 
  00c2:81 0a              lag gAddToPics 
  00c4:4a 24             send 24 

  00c6:38 010b          pushi 10b // $10b setFeatures
  00c9:39 0b            pushi b // $b nsBottom
  00cb:74 0ddc          lofss $0eaa // suit1
  00ce:74 0e0f          lofss $0ee0 // suit2
  00d1:74 0bf0          lofss $0cc4 // lady
  00d4:74 0c23          lofss $0cfa // bed1
  00d7:74 0c56          lofss $0d30 // chest
  00da:74 0c89          lofss $0d66 // bed2
  00dd:74 0cf2          lofss $0dd2 // table1
  00e0:74 0d25          lofss $0e08 // chair
  00e3:74 0d58          lofss $0e3e // sofa
  00e6:74 0d8b          lofss $0e74 // table2
  00e9:74 0cb0          lofss $0d9c // desk
  00ec:54 1a             self 1a 

  00ee:80 00df            lag gDetailLevel 
  00f1:31 27              bnt code_011a 
  00f3:39 42            pushi 42 // $42 setPri
  00f5:78               push1 
  00f6:78               push1 
  00f7:39 7e            pushi 7e // $7e setCycle
  00f9:78               push1 
  00fa:51 16            class Fwd 
  00fc:36                push 
  00fd:39 57            pushi 57 // $57 init
  00ff:76               push0 
  0100:72 0e65          lofsa $0f68 // lamp1
  0103:4a 10             send 10 

  0105:39 42            pushi 42 // $42 setPri
  0107:78               push1 
  0108:39 05            pushi 5 // $5 view
  010a:39 7e            pushi 7e // $7e setCycle
  010c:78               push1 
  010d:51 16            class Fwd 
  010f:36                push 
  0110:39 57            pushi 57 // $57 init
  0112:76               push0 
  0113:72 0ea4          lofsa $0fba // lamp2
  0116:4a 10             send 10 

  0118:33 21              jmp code_013b 

        code_011a
  011a:39 42            pushi 42 // $42 setPri
  011c:78               push1 
  011d:78               push1 
  011e:39 57            pushi 57 // $57 init
  0120:76               push0 
  0121:38 00c6          pushi c6 // $c6 stopUpd
  0124:76               push0 
  0125:72 0e40          lofsa $0f68 // lamp1
  0128:4a 0e             send e 

  012a:39 42            pushi 42 // $42 setPri
  012c:78               push1 
  012d:39 05            pushi 5 // $5 view
  012f:39 57            pushi 57 // $57 init
  0131:76               push0 
  0132:38 00c6          pushi c6 // $c6 stopUpd
  0135:76               push0 
  0136:72 0e81          lofsa $0fba // lamp2
  0139:4a 0e             send e 


        code_013b
  013b:38 00c8          pushi c8 // $c8 setLoop
  013e:78               push1 
  013f:7a               push2 
  0140:38 00a2          pushi a2 // $a2 setCel
  0143:78               push1 
  0144:39 06            pushi 6 // $6 loop
  0146:39 04            pushi 4 // $4 x
  0148:78               push1 
  0149:89 0c              lsg gPrevRoomNum 
  014b:35 32              ldi 32 
  014d:1a                 eq? 
  014e:31 05              bnt code_0155 
  0150:34 00a5            ldi a5 
  0153:33 03              jmp code_0158 

        code_0155
  0155:34 00a9            ldi a9 

        code_0158
  0158:36                push 
  0159:39 42            pushi 42 // $42 setPri
  015b:78               push1 
  015c:39 04            pushi 4 // $4 x
  015e:39 57            pushi 57 // $57 init
  0160:76               push0 
  0161:38 00c6          pushi c6 // $c6 stopUpd
  0164:76               push0 
  0165:72 0ea4          lofsa $100c // panel
  0168:4a 20             send 20 

  016a:88 00a5            lsg gAct 
  016d:3c                 dup 
  016e:35 00              ldi 0 
  0170:1a                 eq? 
  0171:31 18              bnt code_018b 
  0173:88 00c7            lsg global199 
  0176:35 00              ldi 0 
  0178:1e                 gt? 
  0179:31 0d              bnt code_0188 
  017b:35 01              ldi 1 
  017d:a3 00              sal local0 
  017f:38 010a          pushi 10a // $10a setRegions
  0182:78               push1 
  0183:38 017b          pushi 17b // $17b sel_379
  0186:54 06             self 6 


        code_0188
  0188:32 0081            jmp code_020c 

        code_018b
  018b:3c                 dup 
  018c:35 01              ldi 1 
  018e:1a                 eq? 
  018f:31 0f              bnt code_01a0 
  0191:35 01              ldi 1 
  0193:a3 00              sal local0 
  0195:38 010a          pushi 10a // $10a setRegions
  0198:78               push1 
  0199:38 00f1          pushi f1 // $f1 write
  019c:54 06             self 6 

  019e:33 6c              jmp code_020c 

        code_01a0
  01a0:3c                 dup 
  01a1:35 02              ldi 2 
  01a3:1a                 eq? 
  01a4:31 3a              bnt code_01e0 
  01a6:89 76              lsg gMustDos 
  01a8:35 04              ldi 4 
  01aa:12                 and 
  01ab:31 20              bnt code_01cd 
  01ad:88 0172            lsg global370 
  01b0:35 02              ldi 2 
  01b2:22                 lt? 
  01b3:31 18              bnt code_01cd 
  01b5:88 00ad            lsg gSpyFlags 
  01b8:35 08              ldi 8 
  01ba:14                  or 
  01bb:a0 00ad            sag gSpyFlags 
  01be:35 01              ldi 1 
  01c0:a3 00              sal local0 
  01c2:38 010a          pushi 10a // $10a setRegions
  01c5:78               push1 
  01c6:38 0104          pushi 104 // $104 picture
  01c9:54 06             self 6 

  01cb:33 11              jmp code_01de 

        code_01cd
  01cd:76               push0 
  01ce:45 03 00         callb procedure_0003 0 // HandsOff 

  01d1:35 01              ldi 1 
  01d3:a3 00              sal local0 
  01d5:38 010a          pushi 10a // $10a setRegions
  01d8:78               push1 
  01d9:38 0103          pushi 103 // $103 initialized
  01dc:54 06             self 6 


        code_01de
  01de:33 2c              jmp code_020c 

        code_01e0
  01e0:3c                 dup 
  01e1:35 05              ldi 5 
  01e3:1a                 eq? 
  01e4:31 0f              bnt code_01f5 
  01e6:35 01              ldi 1 
  01e8:a3 00              sal local0 
  01ea:38 010a          pushi 10a // $10a setRegions
  01ed:78               push1 
  01ee:38 0114          pushi 114 // $114 minPause
  01f1:54 06             self 6 

  01f3:33 17              jmp code_020c 

        code_01f5
  01f5:3c                 dup 
  01f6:35 06              ldi 6 
  01f8:1a                 eq? 
  01f9:31 11              bnt code_020c 
  01fb:39 42            pushi 42 // $42 setPri
  01fd:78               push1 
  01fe:39 09            pushi 9 // $9 nsTop
  0200:39 57            pushi 57 // $57 init
  0202:76               push0 
  0203:38 00c6          pushi c6 // $c6 stopUpd
  0206:76               push0 
  0207:72 0d0c          lofsa $0f16 // notebook
  020a:4a 0e             send e 


        code_020c
  020c:3a                toss 
  020d:89 0c              lsg gPrevRoomNum 
  020f:35 32              ldi 32 
  0211:1c                 ne? 
  0212:31 1b              bnt code_022f 
  0214:39 05            pushi 5 // $5 view
  0216:78               push1 
  0217:76               push0 
  0218:38 00c5          pushi c5 // $c5 posn
  021b:7a               push2 
  021c:39 08            pushi 8 // $8 underBits
  021e:39 60            pushi 60 // $60 size
  0220:39 12            pushi 12 // $12 illegalBits
  0222:78               push1 
  0223:38 8008          pushi 8008 // $8008 sel_32776
  0226:39 57            pushi 57 // $57 init
  0228:76               push0 
  0229:81 00              lag gEgo 
  022b:4a 18             send 18 

  022d:33 3e              jmp code_026d 

        code_022f
  022f:39 05            pushi 5 // $5 view
  0231:78               push1 
  0232:76               push0 
  0233:39 12            pushi 12 // $12 illegalBits
  0235:78               push1 
  0236:38 8000          pushi 8000 // $8000 sel_32768
  0239:39 42            pushi 42 // $42 setPri
  023b:78               push1 
  023c:7a               push2 
  023d:39 06            pushi 6 // $6 loop
  023f:78               push1 
  0240:7a               push2 
  0241:38 00c5          pushi c5 // $c5 posn
  0244:7a               push2 
  0245:38 00af          pushi af // $af incClientPos
  0248:39 4f            pushi 4f // $4f restore
  024a:39 57            pushi 57 // $57 init
  024c:76               push0 
  024d:81 00              lag gEgo 
  024f:4a 24             send 24 

  0251:8b 00              lsl local0 
  0253:35 00              ldi 0 
  0255:1a                 eq? 
  0256:31 15              bnt code_026d 
  0258:38 00c5          pushi c5 // $c5 posn
  025b:7a               push2 
  025c:38 00a9          pushi a9 // $a9 moveDone
  025f:39 4f            pushi 4f // $4f restore
  0261:81 00              lag gEgo 
  0263:4a 08             send 8 

  0265:39 7a            pushi 7a // $7a setScript
  0267:78               push1 
  0268:74 09c9          lofss $0c34 // enterPanel
  026b:54 06             self 6 


        code_026d
  026d:48                 ret 
    )

    (method (doit) // method_026e
  026e:88 00ad            lsg gSpyFlags 
  0271:35 08              ldi 8 
  0273:12                 and 
  0274:18                 not 
  0275:31 1b              bnt code_0292 
  0277:88 00a5            lsg gAct 
  027a:35 06              ldi 6 
  027c:1a                 eq? 
  027d:31 13              bnt code_0292 
  027f:88 00ad            lsg gSpyFlags 
  0282:35 08              ldi 8 
  0284:14                  or 
  0285:a0 00ad            sag gSpyFlags 
  0288:7a               push2 
  0289:39 30            pushi 30 // $30 b-moveCnt
  028b:76               push0 
  028c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0292
  0292:76               push0 
  0293:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0296:31 0a              bnt code_02a2 
  0298:7a               push2 
  0299:39 30            pushi 30 // $30 b-moveCnt
  029b:78               push1 
  029c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_02a2
  02a2:38 00da          pushi da // $da inRect
  02a5:39 04            pushi 4 // $4 x
  02a7:39 6e            pushi 6e // $6e indexOf
  02a9:39 54            pushi 54 // $54 delete
  02ab:38 008f          pushi 8f // $8f moveTo
  02ae:39 6b            pushi 6b // $6b addToFront
  02b0:81 00              lag gEgo 
  02b2:4a 0c             send c 

  02b4:31 0b              bnt code_02c1 
  02b6:39 42            pushi 42 // $42 setPri
  02b8:78               push1 
  02b9:39 05            pushi 5 // $5 view
  02bb:81 00              lag gEgo 
  02bd:4a 06             send 6 

  02bf:33 09              jmp code_02ca 

        code_02c1
  02c1:39 42            pushi 42 // $42 setPri
  02c3:78               push1 
  02c4:39 ff            pushi ff // $ff checkAni
  02c6:81 00              lag gEgo 
  02c8:4a 06             send 6 


        code_02ca
  02ca:38 00db          pushi db // $db onControl
  02cd:78               push1 
  02ce:76               push0 
  02cf:81 00              lag gEgo 
  02d1:4a 06             send 6 

  02d3:36                push 
  02d4:35 08              ldi 8 
  02d6:12                 and 
  02d7:31 12              bnt code_02eb 
  02d9:88 00cc            lsg global204 
  02dc:35 00              ldi 0 
  02de:1a                 eq? 
  02df:31 0a              bnt code_02eb 
  02e1:38 00f8          pushi f8 // $f8 newRoom
  02e4:78               push1 
  02e5:39 32            pushi 32 // $32 b-i2
  02e7:81 02              lag gCurRoom 
  02e9:4a 06             send 6 


        code_02eb
  02eb:39 04            pushi 4 // $4 x
  02ed:76               push0 
  02ee:81 00              lag gEgo 
  02f0:4a 04             send 4 

  02f2:36                push 
  02f3:34 008c            ldi 8c 
  02f6:22                 lt? 
  02f7:31 07              bnt code_0300 
  02f9:34 00a3            ldi a3 
  02fc:65 2a             aTop vertAngle 
  02fe:33 05              jmp code_0305 

        code_0300
  0300:34 0089            ldi 89 
  0303:65 2a             aTop vertAngle 

        code_0305
  0305:39 3c            pushi 3c // $3c doit
  0307:76               push0 
  0308:57 37 04         super Rm 4 

  030b:48                 ret 
    )

    (method (dispose) // method_030c
  030c:78               push1 
  030d:38 00cc          pushi cc // $cc isExtra
  0310:43 03 02         callk DisposeScript 2 

  0313:39 58            pushi 58 // $58 dispose
  0315:76               push0 
  0316:57 37 04         super Rm 4 

  0319:48                 ret 
    )

    (method (newRoom) // method_031a
  031a:38 00f8          pushi f8 // $f8 newRoom
  031d:78               push1 
  031e:8f 01              lsp param1 
  0320:57 37 06         super Rm 6 

  0323:48                 ret 
    )

    (method (handleEvent) // method_0324
  0324:39 6f            pushi 6f // $6f handleEvent
  0326:78               push1 
  0327:8f 01              lsp param1 
  0329:57 37 06         super Rm 6 

  032c:39 4c            pushi 4c // $4c claimed
  032e:76               push0 
  032f:87 01              lap param1 
  0331:4a 04             send 4 

  0333:31 01              bnt code_0336 
  0335:48                 ret 

        code_0336
  0336:39 22            pushi 22 // $22 type
  0338:76               push0 
  0339:87 01              lap param1 
  033b:4a 04             send 4 

  033d:36                push 
  033e:34 0080            ldi 80 
  0341:1a                 eq? 
  0342:30 0110            bnt code_0455 
  0345:80 00d0            lag global208 
  0348:31 2f              bnt code_0379 
  034a:78               push1 
  034b:74 0756          lofss $0aa4 // ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
  034e:43 25 02         callk Said 2 

  0351:31 26              bnt code_0379 
  0353:39 7a            pushi 7a // $7a setScript
  0355:78               push1 
  0356:7a               push2 
  0357:38 00f3          pushi f3 // $f3 close
  035a:76               push0 
  035b:43 02 04         callk ScriptID 4 

  035e:36                push 
  035f:54 06             self 6 

  0361:39 6f            pushi 6f // $6f handleEvent
  0363:78               push1 
  0364:8f 01              lsp param1 
  0366:39 76            pushi 76 // $76 script
  0368:76               push0 
  0369:54 04             self 4 

  036b:4a 06             send 6 

  036d:39 4c            pushi 4c // $4c claimed
  036f:76               push0 
  0370:87 01              lap param1 
  0372:4a 04             send 4 

  0374:31 03              bnt code_0379 
  0376:35 01              ldi 1 
  0378:48                 ret 

        code_0379
  0379:78               push1 
  037a:74 0708          lofss $0a85 // /panel,(door<cachoterie)>
  037d:43 25 02         callk Said 2 

  0380:31 72              bnt code_03f4 
  0382:88 00af            lsg global175 
  0385:34 0080            ldi 80 
  0388:12                 and 
  0389:31 3d              bnt code_03c8 
  038b:78               push1 
  038c:74 0806          lofss $0b95 // open,bouger
  038f:43 25 02         callk Said 2 

  0392:31 34              bnt code_03c8 
  0394:83 00              lal local0 
  0396:18                 not 
  0397:31 23              bnt code_03bc 
  0399:38 00db          pushi db // $db onControl
  039c:78               push1 
  039d:76               push0 
  039e:81 00              lag gEgo 
  03a0:4a 06             send 6 

  03a2:36                push 
  03a3:35 04              ldi 4 
  03a5:12                 and 
  03a6:31 0e              bnt code_03b6 
  03a8:76               push0 
  03a9:45 03 00         callb procedure_0003 0 // HandsOff 

  03ac:39 7a            pushi 7a // $7a setScript
  03ae:78               push1 
  03af:74 08b2          lofss $0c64 // exiting
  03b2:54 06             self 6 

  03b4:33 04              jmp code_03ba 

        code_03b6
  03b6:76               push0 
  03b7:45 09 00         callb procedure_0009 0 // NotClose 


        code_03ba
  03ba:33 0a              jmp code_03c6 

        code_03bc
  03bc:7a               push2 
  03bd:39 30            pushi 30 // $30 b-moveCnt
  03bf:7a               push2 
  03c0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03c6
  03c6:33 2a              jmp code_03f2 

        code_03c8
  03c8:78               push1 
  03c9:74 0718          lofss $0ae4 // look
  03cc:43 25 02         callk Said 2 

  03cf:31 21              bnt code_03f2 
  03d1:88 00af            lsg global175 
  03d4:34 0080            ldi 80 
  03d7:12                 and 
  03d8:31 0d              bnt code_03e7 
  03da:7a               push2 
  03db:39 30            pushi 30 // $30 b-moveCnt
  03dd:39 03            pushi 3 // $3 y
  03df:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03e5:33 0b              jmp code_03f2 

        code_03e7
  03e7:7a               push2 
  03e8:39 30            pushi 30 // $30 b-moveCnt
  03ea:39 04            pushi 4 // $4 x
  03ec:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03f2
  03f2:33 61              jmp code_0455 

        code_03f4
  03f4:78               push1 
  03f5:74 0755          lofss $0b4d // look>
  03f8:43 25 02         callk Said 2 

  03fb:31 58              bnt code_0455 
  03fd:78               push1 
  03fe:74 0695          lofss $0a96 // [<around,at][/room]
  0401:43 25 02         callk Said 2 

  0404:31 20              bnt code_0426 
  0406:88 00a5            lsg gAct 
  0409:35 06              ldi 6 
  040b:20                 ge? 
  040c:31 0c              bnt code_041a 
  040e:7a               push2 
  040f:39 30            pushi 30 // $30 b-moveCnt
  0411:76               push0 
  0412:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0418:33 0a              jmp code_0424 

        code_041a
  041a:7a               push2 
  041b:39 30            pushi 30 // $30 b-moveCnt
  041d:78               push1 
  041e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0424
  0424:33 2f              jmp code_0455 

        code_0426
  0426:78               push1 
  0427:74 064e          lofss $0a78 // /carpet,dirt,blood,stain
  042a:43 25 02         callk Said 2 

  042d:2f 09               bt code_0438 
  042f:78               push1 
  0430:74 065f          lofss $0a92 // <bas
  0433:43 25 02         callk Said 2 

  0436:31 1d              bnt code_0455 

        code_0438
  0438:88 00a5            lsg gAct 
  043b:35 06              ldi 6 
  043d:1a                 eq? 
  043e:31 0d              bnt code_044d 
  0440:7a               push2 
  0441:39 30            pushi 30 // $30 b-moveCnt
  0443:39 05            pushi 5 // $5 view
  0445:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  044b:33 08              jmp code_0455 

        code_044d
  044d:39 4c            pushi 4c // $4c claimed
  044f:78               push1 
  0450:76               push0 
  0451:87 01              lap param1 
  0453:4a 06             send 6 


        code_0455
  0455:48                 ret 
    )

)

// 0c2e
(instance enterPanel 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_0456
  0456:87 01              lap param1 
  0458:65 0a             aTop state 
  045a:36                push 
  045b:3c                 dup 
  045c:35 00              ldi 0 
  045e:1a                 eq? 
  045f:31 30              bnt code_0491 
  0461:76               push0 
  0462:45 03 00         callb procedure_0003 0 // HandsOff 

  0465:35 01              ldi 1 
  0467:a0 00cc            sag global204 
  046a:38 00d3          pushi d3 // $d3 setMotion
  046d:39 04            pushi 4 // $4 x
  046f:51 1d            class MoveTo 
  0471:36                push 
  0472:38 008c          pushi 8c // $8c track
  0475:39 54            pushi 54 // $54 delete
  0477:7c            pushSelf 
  0478:72 0b91          lofsa $100c // panel
  047b:4a 0c             send c 

  047d:39 2b            pushi 2b // $2b number
  047f:78               push1 
  0480:39 4a            pushi 4a // $4a pragmaFail
  0482:39 06            pushi 6 // $6 loop
  0484:78               push1 
  0485:78               push1 
  0486:39 2a            pushi 2a // $2a play
  0488:76               push0 
  0489:72 072e          lofsa $0bba // mySound
  048c:4a 10             send 10 

  048e:32 0086            jmp code_0517 

        code_0491
  0491:3c                 dup 
  0492:35 01              ldi 1 
  0494:1a                 eq? 
  0495:31 23              bnt code_04ba 
  0497:38 00d3          pushi d3 // $d3 setMotion
  049a:39 04            pushi 4 // $4 x
  049c:51 1d            class MoveTo 
  049e:36                push 
  049f:39 04            pushi 4 // $4 x
  04a1:76               push0 
  04a2:81 00              lag gEgo 
  04a4:4a 04             send 4 

  04a6:36                push 
  04a7:39 03            pushi 3 // $3 y
  04a9:76               push0 
  04aa:81 00              lag gEgo 
  04ac:4a 04             send 4 

  04ae:36                push 
  04af:35 0f              ldi f 
  04b1:02                 add 
  04b2:36                push 
  04b3:7c            pushSelf 
  04b4:81 00              lag gEgo 
  04b6:4a 0c             send c 

  04b8:33 5d              jmp code_0517 

        code_04ba
  04ba:3c                 dup 
  04bb:35 02              ldi 2 
  04bd:1a                 eq? 
  04be:31 35              bnt code_04f5 
  04c0:39 42            pushi 42 // $42 setPri
  04c2:78               push1 
  04c3:39 ff            pushi ff // $ff checkAni
  04c5:39 12            pushi 12 // $12 illegalBits
  04c7:78               push1 
  04c8:38 8008          pushi 8008 // $8008 sel_32776
  04cb:81 00              lag gEgo 
  04cd:4a 0c             send c 

  04cf:38 00d3          pushi d3 // $d3 setMotion
  04d2:39 04            pushi 4 // $4 x
  04d4:51 1d            class MoveTo 
  04d6:36                push 
  04d7:38 00a9          pushi a9 // $a9 moveDone
  04da:39 54            pushi 54 // $54 delete
  04dc:7c            pushSelf 
  04dd:72 0b2c          lofsa $100c // panel
  04e0:4a 0c             send c 

  04e2:39 2b            pushi 2b // $2b number
  04e4:78               push1 
  04e5:39 4b            pushi 4b // $4b said
  04e7:39 06            pushi 6 // $6 loop
  04e9:78               push1 
  04ea:78               push1 
  04eb:39 2a            pushi 2a // $2a play
  04ed:76               push0 
  04ee:72 06c9          lofsa $0bba // mySound
  04f1:4a 10             send 10 

  04f3:33 22              jmp code_0517 

        code_04f5
  04f5:3c                 dup 
  04f6:35 03              ldi 3 
  04f8:1a                 eq? 
  04f9:31 1c              bnt code_0517 
  04fb:76               push0 
  04fc:45 04 00         callb procedure_0004 0 // HandsOn 

  04ff:7a               push2 
  0500:39 30            pushi 30 // $30 b-moveCnt
  0502:39 06            pushi 6 // $6 loop
  0504:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  050a:35 00              ldi 0 
  050c:a0 00cc            sag global204 
  050f:39 7a            pushi 7a // $7a setScript
  0511:78               push1 
  0512:76               push0 
  0513:63 08             pToa client 
  0515:4a 06             send 6 


        code_0517
  0517:3a                toss 
  0518:48                 ret 
    )

)

// 0c5e
(instance exiting 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_0519
  0519:87 01              lap param1 
  051b:65 0a             aTop state 
  051d:36                push 
  051e:3c                 dup 
  051f:35 00              ldi 0 
  0521:1a                 eq? 
  0522:31 30              bnt code_0554 
  0524:76               push0 
  0525:45 03 00         callb procedure_0003 0 // HandsOff 

  0528:35 01              ldi 1 
  052a:a0 00cc            sag global204 
  052d:38 00d3          pushi d3 // $d3 setMotion
  0530:39 04            pushi 4 // $4 x
  0532:51 1d            class MoveTo 
  0534:36                push 
  0535:38 008c          pushi 8c // $8c track
  0538:39 54            pushi 54 // $54 delete
  053a:7c            pushSelf 
  053b:72 0ace          lofsa $100c // panel
  053e:4a 0c             send c 

  0540:39 2b            pushi 2b // $2b number
  0542:78               push1 
  0543:39 4a            pushi 4a // $4a pragmaFail
  0545:39 06            pushi 6 // $6 loop
  0547:78               push1 
  0548:78               push1 
  0549:39 2a            pushi 2a // $2a play
  054b:76               push0 
  054c:72 066b          lofsa $0bba // mySound
  054f:4a 10             send 10 

  0551:32 00a6            jmp code_05fa 

        code_0554
  0554:3c                 dup 
  0555:35 01              ldi 1 
  0557:1a                 eq? 
  0558:31 35              bnt code_058f 
  055a:38 00da          pushi da // $da inRect
  055d:39 04            pushi 4 // $4 x
  055f:38 00a8          pushi a8 // $a8 endCel
  0562:39 57            pushi 57 // $57 init
  0564:38 00a9          pushi a9 // $a9 moveDone
  0567:39 59            pushi 59 // $59 showStr
  0569:81 00              lag gEgo 
  056b:4a 0c             send c 

  056d:31 06              bnt code_0575 
  056f:35 01              ldi 1 
  0571:65 10             aTop cycles 
  0573:33 18              jmp code_058d 

        code_0575
  0575:39 12            pushi 12 // $12 illegalBits
  0577:78               push1 
  0578:38 8000          pushi 8000 // $8000 sel_32768
  057b:38 00d3          pushi d3 // $d3 setMotion
  057e:39 04            pushi 4 // $4 x
  0580:51 1d            class MoveTo 
  0582:36                push 
  0583:38 00a9          pushi a9 // $a9 moveDone
  0586:39 58            pushi 58 // $58 dispose
  0588:7c            pushSelf 
  0589:81 00              lag gEgo 
  058b:4a 12             send 12 


        code_058d
  058d:33 6b              jmp code_05fa 

        code_058f
  058f:3c                 dup 
  0590:35 02              ldi 2 
  0592:1a                 eq? 
  0593:31 1a              bnt code_05af 
  0595:39 12            pushi 12 // $12 illegalBits
  0597:78               push1 
  0598:38 8000          pushi 8000 // $8000 sel_32768
  059b:38 00d3          pushi d3 // $d3 setMotion
  059e:39 04            pushi 4 // $4 x
  05a0:51 1d            class MoveTo 
  05a2:36                push 
  05a3:38 00a9          pushi a9 // $a9 moveDone
  05a6:39 4f            pushi 4f // $4f restore
  05a8:7c            pushSelf 
  05a9:81 00              lag gEgo 
  05ab:4a 12             send 12 

  05ad:33 4b              jmp code_05fa 

        code_05af
  05af:3c                 dup 
  05b0:35 03              ldi 3 
  05b2:1a                 eq? 
  05b3:31 2e              bnt code_05e3 
  05b5:39 42            pushi 42 // $42 setPri
  05b7:78               push1 
  05b8:7a               push2 
  05b9:81 00              lag gEgo 
  05bb:4a 06             send 6 

  05bd:38 00d3          pushi d3 // $d3 setMotion
  05c0:39 04            pushi 4 // $4 x
  05c2:51 1d            class MoveTo 
  05c4:36                push 
  05c5:38 00a9          pushi a9 // $a9 moveDone
  05c8:39 54            pushi 54 // $54 delete
  05ca:7c            pushSelf 
  05cb:72 0a3e          lofsa $100c // panel
  05ce:4a 0c             send c 

  05d0:39 2b            pushi 2b // $2b number
  05d2:78               push1 
  05d3:39 4b            pushi 4b // $4b said
  05d5:39 06            pushi 6 // $6 loop
  05d7:78               push1 
  05d8:78               push1 
  05d9:39 2a            pushi 2a // $2a play
  05db:76               push0 
  05dc:72 05db          lofsa $0bba // mySound
  05df:4a 10             send 10 

  05e1:33 17              jmp code_05fa 

        code_05e3
  05e3:3c                 dup 
  05e4:35 04              ldi 4 
  05e6:1a                 eq? 
  05e7:31 11              bnt code_05fa 
  05e9:76               push0 
  05ea:45 04 00         callb procedure_0004 0 // HandsOn 

  05ed:35 00              ldi 0 
  05ef:a0 00cc            sag global204 
  05f2:39 7a            pushi 7a // $7a setScript
  05f4:78               push1 
  05f5:76               push0 
  05f6:63 08             pToa client 
  05f8:4a 06             send 6 


        code_05fa
  05fa:3a                toss 
  05fb:48                 ret 
    )

)

// 0c8e
(instance LookNote 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_05fc
  05fc:87 01              lap param1 
  05fe:65 0a             aTop state 
  0600:36                push 
  0601:3c                 dup 
  0602:35 00              ldi 0 
  0604:1a                 eq? 
  0605:31 34              bnt code_063b 
  0607:89 76              lsg gMustDos 
  0609:35 01              ldi 1 
  060b:12                 and 
  060c:18                 not 
  060d:31 1b              bnt code_062a 
  060f:89 76              lsg gMustDos 
  0611:35 01              ldi 1 
  0613:14                  or 
  0614:a1 76              sag gMustDos 
  0616:39 7a            pushi 7a // $7a setScript
  0618:78               push1 
  0619:7a               push2 
  061a:38 0196          pushi 196 // $196 sel_406
  061d:76               push0 
  061e:43 02 04         callk ScriptID 4 

  0621:36                push 
  0622:54 06             self 6 

  0624:35 ff              ldi ff 
  0626:65 0a             aTop state 
  0628:33 0b              jmp code_0635 

        code_062a
  062a:39 76            pushi 76 // $76 script
  062c:76               push0 
  062d:54 04             self 4 

  062f:31 04              bnt code_0635 
  0631:35 ff              ldi ff 
  0633:65 0a             aTop state 

        code_0635
  0635:35 01              ldi 1 
  0637:65 10             aTop cycles 
  0639:33 30              jmp code_066b 

        code_063b
  063b:3c                 dup 
  063c:35 01              ldi 1 
  063e:1a                 eq? 
  063f:31 1c              bnt code_065d 
  0641:7a               push2 
  0642:39 30            pushi 30 // $30 b-moveCnt
  0644:39 07            pushi 7 // $7 cel
  0646:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  064c:7a               push2 
  064d:39 30            pushi 30 // $30 b-moveCnt
  064f:39 08            pushi 8 // $8 underBits
  0651:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0657:35 01              ldi 1 
  0659:65 10             aTop cycles 
  065b:33 0e              jmp code_066b 

        code_065d
  065d:3c                 dup 
  065e:35 02              ldi 2 
  0660:1a                 eq? 
  0661:31 08              bnt code_066b 
  0663:39 7a            pushi 7a // $7a setScript
  0665:78               push1 
  0666:76               push0 
  0667:63 08             pToa client 
  0669:4a 06             send 6 


        code_066b
  066b:3a                toss 
  066c:48                 ret 
    )

)

// 0cbe
(instance lady of RPicView
    (properties
        y $2f
        x $8a
        z $0
        heading $0
        view $94
        loop $1
        cel $0
        priority $5
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_066d
  066d:78               push1 
  066e:74 04d0          lofss $0b41 // look<behind,below/painting
  0671:43 25 02         callk Said 2 

  0674:31 0e              bnt code_0684 
  0676:7a               push2 
  0677:39 30            pushi 30 // $30 b-moveCnt
  0679:39 09            pushi 9 // $9 nsTop
  067b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0681:32 0091            jmp code_0715 

        code_0684
  0684:78               push1 
  0685:74 0456          lofss $0ade // get/painting
  0688:43 25 02         callk Said 2 

  068b:31 0d              bnt code_069a 
  068d:7a               push2 
  068e:39 30            pushi 30 // $30 b-moveCnt
  0690:39 0a            pushi a // $a nsLeft
  0692:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0698:33 7b              jmp code_0715 

        code_069a
  069a:78               push1 
  069b:74 0503          lofss $0ba1 // open/painting
  069e:43 25 02         callk Said 2 

  06a1:31 0d              bnt code_06b0 
  06a3:7a               push2 
  06a4:39 30            pushi 30 // $30 b-moveCnt
  06a6:39 0b            pushi b // $b nsBottom
  06a8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  06ae:33 65              jmp code_0715 

        code_06b0
  06b0:78               push1 
  06b1:74 0451          lofss $0b05 // look/eye>
  06b4:43 25 02         callk Said 2 

  06b7:31 09              bnt code_06c2 
  06b9:78               push1 
  06ba:74 0475          lofss $0b32 // look/dame
  06bd:43 25 02         callk Said 2 

  06c0:2f 12               bt code_06d4 

        code_06c2
  06c2:78               push1 
  06c3:74 0446          lofss $0b0c // look/eye[<dame,painting]
  06c6:43 25 02         callk Said 2 

  06c9:2f 09               bt code_06d4 
  06cb:78               push1 
  06cc:74 042d          lofss $0afc // look/eye/dame
  06cf:43 25 02         callk Said 2 

  06d2:31 0d              bnt code_06e1 

        code_06d4
  06d4:7a               push2 
  06d5:39 30            pushi 30 // $30 b-moveCnt
  06d7:39 0c            pushi c // $c nsRight
  06d9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  06df:33 34              jmp code_0715 

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

  06ee:2f 12               bt code_0702 
  06f0:78               push1 
  06f1:74 042d          lofss $0b21 // look/painting
  06f4:43 25 02         callk Said 2 

  06f7:2f 09               bt code_0702 
  06f9:78               push1 
  06fa:74 043b          lofss $0b38 // look/dame/painting
  06fd:43 25 02         callk Said 2 

  0700:31 13              bnt code_0715 

        code_0702
  0702:39 4c            pushi 4c // $4c claimed
  0704:78               push1 
  0705:78               push1 
  0706:87 01              lap param1 
  0708:4a 06             send 6 

  070a:7a               push2 
  070b:39 30            pushi 30 // $30 b-moveCnt
  070d:39 0d            pushi d // $d lsTop
  070f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0715
  0715:48                 ret 
    )

)

// 0cf4
(instance bed1 of RPicView
    (properties
        y $69
        x $d0
        z $0
        heading $0
        view $94
        loop $2
        cel $0
        priority $6
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0716
  0716:39 03            pushi 3 // $3 y
  0718:7c            pushSelf 
  0719:8f 01              lsp param1 
  071b:39 03            pushi 3 // $3 y
  071d:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0723:31 0f              bnt code_0734 
  0725:39 4c            pushi 4c // $4c claimed
  0727:78               push1 
  0728:78               push1 
  0729:87 01              lap param1 
  072b:4a 06             send 6 

  072d:78               push1 
  072e:74 099b          lofss $10cc // bed
  0731:45 19 02         callb procedure_0019 2 // DoLook 


        code_0734
  0734:48                 ret 
    )

)

// 0d2a
(instance chest of RPicView
    (properties
        y $59
        x $88
        z $0
        heading $0
        view $94
        loop $1
        cel $1
        priority $5
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0735
  0735:78               push1 
  0736:74 044e          lofss $0b87 // open,(look<dans)/bagage
  0739:43 25 02         callk Said 2 

  073c:31 0d              bnt code_074b 
  073e:7a               push2 
  073f:39 30            pushi 30 // $30 b-moveCnt
  0741:39 0e            pushi e // $e lsLeft
  0743:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0749:33 57              jmp code_07a2 

        code_074b
  074b:78               push1 
  074c:74 040d          lofss $0b5c // look[<at]/bagage
  074f:43 25 02         callk Said 2 

  0752:31 0d              bnt code_0761 
  0754:7a               push2 
  0755:39 30            pushi 30 // $30 b-moveCnt
  0757:39 0f            pushi f // $f lsBottom
  0759:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  075f:33 41              jmp code_07a2 

        code_0761
  0761:78               push1 
  0762:74 036d          lofss $0ad2 // get/bagage
  0765:43 25 02         callk Said 2 

  0768:31 0d              bnt code_0777 
  076a:7a               push2 
  076b:39 30            pushi 30 // $30 b-moveCnt
  076d:39 10            pushi 10 // $10 lsRight
  076f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0775:33 2b              jmp code_07a2 

        code_0777
  0777:39 03            pushi 3 // $3 y
  0779:7c            pushSelf 
  077a:8f 01              lsp param1 
  077c:39 03            pushi 3 // $3 y
  077e:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0784:2f 09               bt code_078f 
  0786:78               push1 
  0787:74 03c7          lofss $0b51 // look[<at]/drawer
  078a:43 25 02         callk Said 2 

  078d:31 13              bnt code_07a2 

        code_078f
  078f:39 4c            pushi 4c // $4c claimed
  0791:78               push1 
  0792:78               push1 
  0793:87 01              lap param1 
  0795:4a 06             send 6 

  0797:7a               push2 
  0798:39 30            pushi 30 // $30 b-moveCnt
  079a:39 11            pushi 11 // $11 signal
  079c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_07a2
  07a2:48                 ret 
    )

)

// 0d60
(instance bed2 of RPicView
    (properties
        y $6b
        x $68
        z $0
        heading $0
        view $94
        loop $2
        cel $1
        priority $6
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_07a3
  07a3:39 03            pushi 3 // $3 y
  07a5:7c            pushSelf 
  07a6:8f 01              lsp param1 
  07a8:39 03            pushi 3 // $3 y
  07aa:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  07b0:31 0f              bnt code_07c1 
  07b2:39 4c            pushi 4c // $4c claimed
  07b4:78               push1 
  07b5:78               push1 
  07b6:87 01              lap param1 
  07b8:4a 06             send 6 

  07ba:78               push1 
  07bb:74 090e          lofss $10cc // bed
  07be:45 19 02         callb procedure_0019 2 // DoLook 


        code_07c1
  07c1:48                 ret 
    )

)

// 0d96
(instance desk of RPicView
    (properties
        y $87
        x $11b
        z $0
        heading $0
        view $94
        loop $1
        cel $8
        priority $9
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_07c2
  07c2:78               push1 
  07c3:74 03a1          lofss $0b67 // open,(look<dans)/(drawer<bureau),bureau,(top[<bureau])
  07c6:43 25 02         callk Said 2 

  07c9:31 0d              bnt code_07d8 
  07cb:7a               push2 
  07cc:39 30            pushi 30 // $30 b-moveCnt
  07ce:39 12            pushi 12 // $12 illegalBits
  07d0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  07d6:33 40              jmp code_0818 

        code_07d8
  07d8:39 03            pushi 3 // $3 y
  07da:7c            pushSelf 
  07db:8f 01              lsp param1 
  07dd:39 03            pushi 3 // $3 y
  07df:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  07e5:2f 09               bt code_07f0 
  07e7:78               push1 
  07e8:74 030b          lofss $0af6 // look/bureau
  07eb:43 25 02         callk Said 2 

  07ee:31 28              bnt code_0818 

        code_07f0
  07f0:39 4c            pushi 4c // $4c claimed
  07f2:78               push1 
  07f3:78               push1 
  07f4:87 01              lap param1 
  07f6:4a 06             send 6 

  07f8:88 00a5            lsg gAct 
  07fb:35 05              ldi 5 
  07fd:1a                 eq? 
  07fe:31 0d              bnt code_080d 
  0800:7a               push2 
  0801:39 30            pushi 30 // $30 b-moveCnt
  0803:39 13            pushi 13 // $13 brTop
  0805:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  080b:33 0b              jmp code_0818 

        code_080d
  080d:7a               push2 
  080e:39 30            pushi 30 // $30 b-moveCnt
  0810:39 14            pushi 14 // $14 brLeft
  0812:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0818
  0818:48                 ret 
    )

)

// 0dcc
(instance table1 of RPicView
    (properties
        y $5a
        x $3f
        z $0
        heading $0
        view $94
        loop $1
        cel $2
        priority $5
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0819
  0819:39 03            pushi 3 // $3 y
  081b:7c            pushSelf 
  081c:8f 01              lsp param1 
  081e:39 03            pushi 3 // $3 y
  0820:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0826:31 13              bnt code_083b 
  0828:39 4c            pushi 4c // $4c claimed
  082a:78               push1 
  082b:78               push1 
  082c:87 01              lap param1 
  082e:4a 06             send 6 

  0830:7a               push2 
  0831:39 30            pushi 30 // $30 b-moveCnt
  0833:39 11            pushi 11 // $11 signal
  0835:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_083b
  083b:48                 ret 
    )

)

// 0e02
(instance chair of RPicView
    (properties
        y $89
        x $fe
        z $0
        heading $0
        view $94
        loop $2
        cel $3
        priority $9
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_083c
  083c:88 00a5            lsg gAct 
  083f:35 06              ldi 6 
  0841:1a                 eq? 
  0842:31 41              bnt code_0885 
  0844:78               push1 
  0845:74 0281          lofss $0ac9 // get,arranger/chair
  0848:43 25 02         callk Said 2 

  084b:31 0d              bnt code_085a 
  084d:7a               push2 
  084e:39 30            pushi 30 // $30 b-moveCnt
  0850:39 15            pushi 15 // $15 brBottom
  0852:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0858:33 2b              jmp code_0885 

        code_085a
  085a:78               push1 
  085b:74 0292          lofss $0af0 // look/chair
  085e:43 25 02         callk Said 2 

  0861:2f 0f               bt code_0872 
  0863:39 03            pushi 3 // $3 y
  0865:7c            pushSelf 
  0866:8f 01              lsp param1 
  0868:39 03            pushi 3 // $3 y
  086a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0870:31 13              bnt code_0885 

        code_0872
  0872:39 4c            pushi 4c // $4c claimed
  0874:78               push1 
  0875:78               push1 
  0876:87 01              lap param1 
  0878:4a 06             send 6 

  087a:7a               push2 
  087b:39 30            pushi 30 // $30 b-moveCnt
  087d:39 16            pushi 16 // $16 brRight
  087f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0885
  0885:39 03            pushi 3 // $3 y
  0887:7c            pushSelf 
  0888:8f 01              lsp param1 
  088a:39 03            pushi 3 // $3 y
  088c:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0892:31 0f              bnt code_08a3 
  0894:39 4c            pushi 4c // $4c claimed
  0896:78               push1 
  0897:78               push1 
  0898:87 01              lap param1 
  089a:4a 06             send 6 

  089c:78               push1 
  089d:74 083a          lofss $10da // chair
  08a0:45 19 02         callb procedure_0019 2 // DoLook 


        code_08a3
  08a3:48                 ret 
    )

)

// 0e38
(instance sofa of RPicView
    (properties
        y $9d
        x $c2
        z $0
        heading $0
        view $94
        loop $1
        cel $7
        priority $b
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_08a4
  08a4:39 03            pushi 3 // $3 y
  08a6:7c            pushSelf 
  08a7:8f 01              lsp param1 
  08a9:39 03            pushi 3 // $3 y
  08ab:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  08b1:31 0f              bnt code_08c2 
  08b3:39 4c            pushi 4c // $4c claimed
  08b5:78               push1 
  08b6:78               push1 
  08b7:87 01              lap param1 
  08b9:4a 06             send 6 

  08bb:78               push1 
  08bc:74 0827          lofss $10e6 // couch
  08bf:45 19 02         callb procedure_0019 2 // DoLook 


        code_08c2
  08c2:48                 ret 
    )

)

// 0e6e
(instance table2 of RPicView
    (properties
        y $9d
        x $85
        z $0
        heading $0
        view $94
        loop $1
        cel $6
        priority $b
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_08c3
  08c3:39 03            pushi 3 // $3 y
  08c5:7c            pushSelf 
  08c6:8f 01              lsp param1 
  08c8:39 03            pushi 3 // $3 y
  08ca:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  08d0:2f 09               bt code_08db 
  08d2:78               push1 
  08d3:74 0244          lofss $0b1a // look/nightstand>
  08d6:43 25 02         callk Said 2 

  08d9:31 43              bnt code_091e 

        code_08db
  08db:88 00a5            lsg gAct 
  08de:35 02              ldi 2 
  08e0:1a                 eq? 
  08e1:31 1d              bnt code_0900 
  08e3:88 0172            lsg global370 
  08e6:35 02              ldi 2 
  08e8:1e                 gt? 
  08e9:31 15              bnt code_0900 
  08eb:7a               push2 
  08ec:39 30            pushi 30 // $30 b-moveCnt
  08ee:39 17            pushi 17 // $17 name
  08f0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  08f6:39 4c            pushi 4c // $4c claimed
  08f8:78               push1 
  08f9:78               push1 
  08fa:87 01              lap param1 
  08fc:4a 06             send 6 

  08fe:33 1e              jmp code_091e 

        code_0900
  0900:39 03            pushi 3 // $3 y
  0902:7c            pushSelf 
  0903:8f 01              lsp param1 
  0905:39 03            pushi 3 // $3 y
  0907:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  090d:31 0f              bnt code_091e 
  090f:78               push1 
  0910:74 0835          lofss $1148 // table
  0913:45 19 02         callb procedure_0019 2 // DoLook 

  0916:39 4c            pushi 4c // $4c claimed
  0918:78               push1 
  0919:78               push1 
  091a:87 01              lap param1 
  091c:4a 06             send 6 


        code_091e
  091e:48                 ret 
    )

)

// 0ea4
(instance suit1 of RPicView
    (properties
        y $71
        x $d6
        z $0
        heading $0
        view $94
        loop $1
        cel $3
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_091f
  091f:39 03            pushi 3 // $3 y
  0921:7c            pushSelf 
  0922:8f 01              lsp param1 
  0924:39 03            pushi 3 // $3 y
  0926:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  092c:31 13              bnt code_0941 
  092e:39 4c            pushi 4c // $4c claimed
  0930:78               push1 
  0931:78               push1 
  0932:87 01              lap param1 
  0934:4a 06             send 6 

  0936:7a               push2 
  0937:39 30            pushi 30 // $30 b-moveCnt
  0939:39 0f            pushi f // $f lsBottom
  093b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0941
  0941:48                 ret 
    )

)

// 0eda
(instance suit2 of RPicView
    (properties
        y $64
        x $48
        z $0
        heading $0
        view $94
        loop $1
        cel $4
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0942
  0942:39 03            pushi 3 // $3 y
  0944:7c            pushSelf 
  0945:8f 01              lsp param1 
  0947:39 03            pushi 3 // $3 y
  0949:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  094f:31 13              bnt code_0964 
  0951:39 4c            pushi 4c // $4c claimed
  0953:78               push1 
  0954:78               push1 
  0955:87 01              lap param1 
  0957:4a 06             send 6 

  0959:7a               push2 
  095a:39 30            pushi 30 // $30 b-moveCnt
  095c:39 0f            pushi f // $f lsBottom
  095e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0964
  0964:48                 ret 
    )

)

// 0f10
(instance notebook of Prop
    (properties
        y $6f
        x $11a
        z $0
        heading $0
        yStep $2
        view $94
        loop $1
        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
    )
    (method (handleEvent) // method_0965
  0965:39 6f            pushi 6f // $6f handleEvent
  0967:78               push1 
  0968:8f 01              lsp param1 
  096a:57 27 06         super Prop 6 

  096d:39 03            pushi 3 // $3 y
  096f:7c            pushSelf 
  0970:8f 01              lsp param1 
  0972:39 03            pushi 3 // $3 y
  0974:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  097a:2f 12               bt code_098e 
  097c:78               push1 
  097d:74 0176          lofss $0af6 // look/bureau
  0980:43 25 02         callk Said 2 

  0983:2f 09               bt code_098e 
  0985:78               push1 
  0986:74 019e          lofss $0b27 // look/top[<bureau]
  0989:43 25 02         callk Said 2 

  098c:31 16              bnt code_09a4 

        code_098e
  098e:39 4c            pushi 4c // $4c claimed
  0990:78               push1 
  0991:78               push1 
  0992:87 01              lap param1 
  0994:4a 06             send 6 

  0996:7a               push2 
  0997:39 30            pushi 30 // $30 b-moveCnt
  0999:39 18            pushi 18 // $18 key
  099b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09a1:32 0088            jmp code_0a2c 

        code_09a4
  09a4:78               push1 
  09a5:74 01ff          lofss $0ba7 // rotate/page
  09a8:43 25 02         callk Said 2 

  09ab:31 0d              bnt code_09ba 
  09ad:7a               push2 
  09ae:39 30            pushi 30 // $30 b-moveCnt
  09b0:39 19            pushi 19 // $19 time
  09b2:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09b8:33 72              jmp code_0a2c 

        code_09ba
  09ba:78               push1 
  09bb:74 01dd          lofss $0b9b // open/carnet
  09be:43 25 02         callk Said 2 

  09c1:31 0d              bnt code_09d0 
  09c3:7a               push2 
  09c4:39 30            pushi 30 // $30 b-moveCnt
  09c6:39 1a            pushi 1a // $1a text
  09c8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09ce:33 5c              jmp code_0a2c 

        code_09d0
  09d0:78               push1 
  09d1:74 00ef          lofss $0ac3 // clore/carnet
  09d4:43 25 02         callk Said 2 

  09d7:31 0d              bnt code_09e6 
  09d9:7a               push2 
  09da:39 30            pushi 30 // $30 b-moveCnt
  09dc:39 1b            pushi 1b // $1b elements
  09de:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09e4:33 46              jmp code_0a2c 

        code_09e6
  09e6:78               push1 
  09e7:74 00ee          lofss $0ad8 // get/carnet
  09ea:43 25 02         callk Said 2 

  09ed:31 0d              bnt code_09fc 
  09ef:7a               push2 
  09f0:39 30            pushi 30 // $30 b-moveCnt
  09f2:39 1c            pushi 1c // $1c color
  09f4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09fa:33 30              jmp code_0a2c 

        code_09fc
  09fc:78               push1 
  09fd:74 00e7          lofss $0ae7 // look,etudier/carnet
  0a00:43 25 02         callk Said 2 

  0a03:31 27              bnt code_0a2c 
  0a05:38 00da          pushi da // $da inRect
  0a08:39 04            pushi 4 // $4 x
  0a0a:38 00f9          pushi f9 // $f9 startRoom
  0a0d:39 76            pushi 76 // $76 script
  0a0f:38 0132          pushi 132 // $132 cycle
  0a12:38 0090          pushi 90 // $90 setMark
  0a15:81 00              lag gEgo 
  0a17:4a 0c             send c 

  0a19:31 0d              bnt code_0a28 
  0a1b:39 7a            pushi 7a // $7a setScript
  0a1d:78               push1 
  0a1e:74 0273          lofss $0c94 // LookNote
  0a21:72 01c0          lofsa $0be4 // Room48
  0a24:4a 06             send 6 

  0a26:33 04              jmp code_0a2c 

        code_0a28
  0a28:76               push0 
  0a29:45 09 00         callb procedure_0009 0 // NotClose 


        code_0a2c
  0a2c:48                 ret 
    )

)

// 0f62
(instance lamp1 of Prop
    (properties
        y $2c
        x $48
        z $0
        heading $0
        yStep $2
        view $94
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0a2d
  0a2d:39 6f            pushi 6f // $6f handleEvent
  0a2f:78               push1 
  0a30:8f 01              lsp param1 
  0a32:57 27 06         super Prop 6 

  0a35:39 03            pushi 3 // $3 y
  0a37:7c            pushSelf 
  0a38:8f 01              lsp param1 
  0a3a:39 03            pushi 3 // $3 y
  0a3c:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a42:31 0f              bnt code_0a53 
  0a44:39 4c            pushi 4c // $4c claimed
  0a46:78               push1 
  0a47:78               push1 
  0a48:87 01              lap param1 
  0a4a:4a 06             send 6 

  0a4c:78               push1 
  0a4d:74 06b9          lofss $1109 // lamp
  0a50:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a53
  0a53:48                 ret 
    )

)

// 0fb4
(instance lamp2 of Prop
    (properties
        y $2b
        x $ca
        z $0
        heading $0
        yStep $2
        view $94
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0a54
  0a54:39 03            pushi 3 // $3 y
  0a56:7c            pushSelf 
  0a57:8f 01              lsp param1 
  0a59:39 03            pushi 3 // $3 y
  0a5b:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a61:31 0f              bnt code_0a72 
  0a63:39 4c            pushi 4c // $4c claimed
  0a65:78               push1 
  0a66:78               push1 
  0a67:87 01              lap param1 
  0a69:4a 06             send 6 

  0a6b:78               push1 
  0a6c:74 069a          lofss $1109 // lamp
  0a6f:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a72
  0a72:48                 ret 
  0a73:00                bnot 
    )

)

// 1006
(instance panel of Act
    (properties
        y $54
        x $0
        z $0
        heading $0
        yStep $2
        view $94
        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
        illegalBits $0
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)

// 106a
(instance stain of Prop
    (properties
        y $8c
        x $f4
        z $0
        heading $0
        yStep $2
        view $94
        loop $2
        cel $5
        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
    )
)



