(script 35)

(string
    string_1336 "Bdoor"
    string_133c "Bone"
    string_1341 "Cabinet"
    string_1349 "Fdoor"
    string_134f "Room35"
    string_1356 "Shadow"
    string_135d "Stove"
    string_1363 "Table"
    string_1369 "Window1"
    string_1371 "Window2"
    string_1379 "butterchurn"
    string_1385 "closeDoor"
    string_138f "door"
    string_1394 "frigDoor"
    string_139d "iceDoor"
    string_13a5 "icebox"
    string_13ac "kettle"
    string_13b3 "lamp"
    string_13b8 "lamp1"
    string_13be "lamp2"
    string_13c4 "myDoor"
    string_13cb "mySound"
    string_13d3 "rack"
    string_13d8 "shadowWalk"
    string_13e3 "shelf"
    string_13e9 "shelves"
    string_13f1 "sink"
    string_13f6 "stool"
    string_13fc "window"
    string_1403 ""
)

(said
    said_0bae //beauregard
    said_0bb3 /beauregard
    said_0bb7 /carpet
    said_0bbb /dish
    said_0bbf /door
    said_0bc3 <(dans,below)/nightstand
    said_0bcf [<around,at][/room]
    said_0bdd ask,raconter
    said_0be3 ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
    said_0c02 ask/celie/bone<for
    said_0c0e ask/lil/bone<for
    said_0c1a ask[/celie]/lil<about>
    said_0c29 ask[/lil]/celie<about>
    said_0c38 get/*/beauregard
    said_0c41 get/arriere<bone[<de]
    said_0c4f get/bone
    said_0c55 get/caldron
    said_0c5b get/dish
    said_0c61 look/armoire
    said_0c67 look/baratte
    said_0c6d look/chair,barstool
    said_0c76 look/congelateur
    said_0c7c look/nightstand
    said_0c82 look/cuisiniere
    said_0c88 look/pan
    said_0c8e look/evier
    said_0c94 look>
    said_0c98 look[<at]/caldron[<cafe]
    said_0ca8 open,(look<dans)/armoire
    said_0cb6 open,(look<dans)/baratte
    said_0cc4 open,(look<dans)/caldron
    said_0cd2 open,(look<dans)/congelateur
    said_0ce0 open,(look<dans)/cuisiniere
    said_0cee for,get,boire/coupe,cafe
    said_0cfd gommer/deliver
)

(synonym
    room = cuisine | kitchen
)

(local
    local0 = $0000
    local1 = $0000
    local2 = $0000
    local3 = $0000
)

// 0d0a
(instance public Room35 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $23
        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_0073
  0073:35 22              ldi 22 
  0075:65 20             aTop west 
  0077:39 57            pushi 57 // $57 init
  0079:76               push0 
  007a:57 37 04         super Rm 4 

  007d:35 00              ldi 0 
  007f:a0 00ca            sag global202 
  0082:76               push0 
  0083:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0086:a3 02              sal local2 
  0088:39 03            pushi 3 // $3 y
  008a:38 0084          pushi 84 // $84 stop
  008d:39 2b            pushi 2b // $2b number
  008f:39 2c            pushi 2c // $2c handle
  0091:45 15 06         callb procedure_0015 6 // LoadMany 

  0094:39 61            pushi 61 // $61 add
  0096:39 07            pushi 7 // $7 cel
  0098:74 0d85          lofss $0e20 // sink
  009b:74 0db8          lofss $0e56 // butterchurn
  009e:74 0deb          lofss $0e8c // stool
  00a1:74 0e1e          lofss $0ec2 // rack
  00a4:74 0e51          lofss $0ef8 // icebox
  00a7:74 0e84          lofss $0f2e // shelves
  00aa:74 0eb7          lofss $0f64 // shelf
  00ad:39 62            pushi 62 // $62 eachElementDo
  00af:78               push1 
  00b0:39 57            pushi 57 // $57 init
  00b2:39 3c            pushi 3c // $3c doit
  00b4:76               push0 
  00b5:81 0a              lag gAddToPics 
  00b7:4a 1c             send 1c 

  00b9:38 010b          pushi 10b // $10b setFeatures
  00bc:39 0b            pushi b // $b nsBottom
  00be:74 0d5f          lofss $0e20 // sink
  00c1:74 0d92          lofss $0e56 // butterchurn
  00c4:74 0dc5          lofss $0e8c // stool
  00c7:74 0e2e          lofss $0ef8 // icebox
  00ca:74 0e61          lofss $0f2e // shelves
  00cd:74 10bc          lofss $118c // Stove
  00d0:74 10e5          lofss $11b8 // Window1
  00d3:74 110e          lofss $11e4 // Window2
  00d6:74 0de9          lofss $0ec2 // rack
  00d9:74 122a          lofss $1306 // Cabinet
  00dc:74 11fb          lofss $12da // Table
  00df:54 1a             self 1a 

  00e1:39 42            pushi 42 // $42 setPri
  00e3:78               push1 
  00e4:39 05            pushi 5 // $5 view
  00e6:39 57            pushi 57 // $57 init
  00e8:76               push0 
  00e9:72 0fea          lofsa $10d6 // kettle
  00ec:4a 0a             send a 

  00ee:80 00df            lag gDetailLevel 
  00f1:31 35              bnt code_0128 
  00f3:39 7e            pushi 7e // $7e setCycle
  00f5:78               push1 
  00f6:51 16            class Fwd 
  00f8:36                push 
  00f9:39 57            pushi 57 // $57 init
  00fb:76               push0 
  00fc:72 0e8f          lofsa $0f8e // lamp1
  00ff:4a 0a             send a 

  0101:39 7e            pushi 7e // $7e setCycle
  0103:78               push1 
  0104:51 16            class Fwd 
  0106:36                push 
  0107:39 57            pushi 57 // $57 init
  0109:76               push0 
  010a:72 0ed3          lofsa $0fe0 // lamp2
  010d:4a 0a             send a 

  010f:88 00a5            lsg gAct 
  0112:35 02              ldi 2 
  0114:22                 lt? 
  0115:31 0f              bnt code_0126 
  0117:39 06            pushi 6 // $6 loop
  0119:78               push1 
  011a:76               push0 
  011b:39 7e            pushi 7e // $7e setCycle
  011d:78               push1 
  011e:51 16            class Fwd 
  0120:36                push 
  0121:72 0fb2          lofsa $10d6 // kettle
  0124:4a 0c             send c 


        code_0126
  0126:33 18              jmp code_0140 

        code_0128
  0128:39 57            pushi 57 // $57 init
  012a:76               push0 
  012b:38 00c6          pushi c6 // $c6 stopUpd
  012e:76               push0 
  012f:72 0e5c          lofsa $0f8e // lamp1
  0132:4a 08             send 8 

  0134:39 57            pushi 57 // $57 init
  0136:76               push0 
  0137:38 00c6          pushi c6 // $c6 stopUpd
  013a:76               push0 
  013b:72 0ea2          lofsa $0fe0 // lamp2
  013e:4a 08             send 8 


        code_0140
  0140:39 42            pushi 42 // $42 setPri
  0142:78               push1 
  0143:39 05            pushi 5 // $5 view
  0145:39 57            pushi 57 // $57 init
  0147:76               push0 
  0148:38 00c6          pushi c6 // $c6 stopUpd
  014b:76               push0 
  014c:72 10c1          lofsa $1210 // iceDoor
  014f:4a 0e             send e 

  0151:38 0082          pushi 82 // $82 owner
  0154:76               push0 
  0155:39 43            pushi 43 // $43 at
  0157:78               push1 
  0158:39 0c            pushi c // $c nsRight
  015a:81 09              lag gInventory 
  015c:4a 06             send 6 

  015e:4a 04             send 4 

  0160:36                push 
  0161:35 23              ldi 23 
  0163:1a                 eq? 
  0164:31 11              bnt code_0177 
  0166:39 42            pushi 42 // $42 setPri
  0168:78               push1 
  0169:39 04            pushi 4 // $4 x
  016b:39 57            pushi 57 // $57 init
  016d:76               push0 
  016e:38 00c6          pushi c6 // $c6 stopUpd
  0171:76               push0 
  0172:72 10e9          lofsa $125e // Bone
  0175:4a 0e             send e 


        code_0177
  0177:7a               push2 
  0178:78               push1 
  0179:39 64            pushi 64 // $64 allTrue
  017b:43 40 04         callk Random 4 

  017e:36                push 
  017f:35 23              ldi 23 
  0181:24                 le? 
  0182:31 33              bnt code_01b7 
  0184:88 00a5            lsg gAct 
  0187:35 01              ldi 1 
  0189:1e                 gt? 
  018a:31 2b              bnt code_01b7 
  018c:88 00a5            lsg gAct 
  018f:35 07              ldi 7 
  0191:22                 lt? 
  0192:31 23              bnt code_01b7 
  0194:39 12            pushi 12 // $12 illegalBits
  0196:78               push1 
  0197:76               push0 
  0198:38 00c5          pushi c5 // $c5 posn
  019b:7a               push2 
  019c:39 0d            pushi d // $d lsTop
  019e:39 52            pushi 52 // $52 icon
  01a0:39 42            pushi 42 // $42 setPri
  01a2:78               push1 
  01a3:7a               push2 
  01a4:39 57            pushi 57 // $57 init
  01a6:76               push0 
  01a7:72 0f7e          lofsa $1128 // Shadow
  01aa:4a 18             send 18 

  01ac:39 7a            pushi 7a // $7a setScript
  01ae:78               push1 
  01af:74 0bae          lofss $0d60 // shadowWalk
  01b2:72 0f73          lofsa $1128 // Shadow
  01b5:4a 06             send 6 


        code_01b7
  01b7:88 00a5            lsg gAct 
  01ba:3c                 dup 
  01bb:35 00              ldi 0 
  01bd:1a                 eq? 
  01be:31 0b              bnt code_01cb 
  01c0:38 010a          pushi 10a // $10a setRegions
  01c3:78               push1 
  01c4:38 00e5          pushi e5 // $e5 prevDir
  01c7:54 06             self 6 

  01c9:33 0f              jmp code_01da 

        code_01cb
  01cb:3c                 dup 
  01cc:35 01              ldi 1 
  01ce:1a                 eq? 
  01cf:31 09              bnt code_01da 
  01d1:38 010a          pushi 10a // $10a setRegions
  01d4:78               push1 
  01d5:38 00ec          pushi ec // $ec get
  01d8:54 06             self 6 


        code_01da
  01da:3a                toss 
  01db:39 07            pushi 7 // $7 cel
  01dd:78               push1 
  01de:89 0c              lsg gPrevRoomNum 
  01e0:35 0c              ldi c 
  01e2:1a                 eq? 
  01e3:31 04              bnt code_01e9 
  01e5:35 02              ldi 2 
  01e7:33 02              jmp code_01eb 

        code_01e9
  01e9:35 00              ldi 0 

        code_01eb
  01eb:36                push 
  01ec:38 00c9          pushi c9 // $c9 ignoreActors
  01ef:78               push1 
  01f0:78               push1 
  01f1:39 57            pushi 57 // $57 init
  01f3:76               push0 
  01f4:38 00c6          pushi c6 // $c6 stopUpd
  01f7:76               push0 
  01f8:72 0e37          lofsa $1032 // Fdoor
  01fb:4a 14             send 14 

  01fd:72 0e32          lofsa $1032 // Fdoor
  0200:a0 0175            sag global373 
  0203:39 07            pushi 7 // $7 cel
  0205:78               push1 
  0206:89 0c              lsg gPrevRoomNum 
  0208:35 0c              ldi c 
  020a:1a                 eq? 
  020b:31 04              bnt code_0211 
  020d:35 02              ldi 2 
  020f:33 02              jmp code_0213 

        code_0211
  0211:35 00              ldi 0 

        code_0213
  0213:36                push 
  0214:39 42            pushi 42 // $42 setPri
  0216:78               push1 
  0217:39 09            pushi 9 // $9 nsTop
  0219:38 00c9          pushi c9 // $c9 ignoreActors
  021c:78               push1 
  021d:78               push1 
  021e:39 57            pushi 57 // $57 init
  0220:76               push0 
  0221:38 00c6          pushi c6 // $c6 stopUpd
  0224:76               push0 
  0225:72 0e5c          lofsa $1084 // Bdoor
  0228:4a 1a             send 1a 

  022a:72 0e57          lofsa $1084 // Bdoor
  022d:a0 0176            sag global374 
  0230:89 0c              lsg gPrevRoomNum 
  0232:35 22              ldi 22 
  0234:1a                 eq? 
  0235:31 0d              bnt code_0244 
  0237:38 00c5          pushi c5 // $c5 posn
  023a:7a               push2 
  023b:78               push1 
  023c:39 7b            pushi 7b // $7b cycleCnt
  023e:81 00              lag gEgo 
  0240:4a 08             send 8 

  0242:33 1e              jmp code_0262 

        code_0244
  0244:76               push0 
  0245:45 03 00         callb procedure_0003 0 // HandsOff 

  0248:38 00c5          pushi c5 // $c5 posn
  024b:7a               push2 
  024c:38 00eb          pushi eb // $eb edgeHit
  024f:39 78            pushi 78 // $78 changeState
  0251:81 00              lag gEgo 
  0253:4a 08             send 8 

  0255:83 02              lal local2 
  0257:18                 not 
  0258:31 08              bnt code_0262 
  025a:39 7a            pushi 7a // $7a setScript
  025c:78               push1 
  025d:74 0b90          lofss $0df0 // closeDoor
  0260:54 06             self 6 


        code_0262
  0262:39 05            pushi 5 // $5 view
  0264:78               push1 
  0265:76               push0 
  0266:39 12            pushi 12 // $12 illegalBits
  0268:78               push1 
  0269:38 8024          pushi 8024 // $8024 sel_32804
  026c:39 57            pushi 57 // $57 init
  026e:76               push0 
  026f:81 00              lag gEgo 
  0271:4a 10             send 10 

  0273:48                 ret 
    )

    (method (doit) // method_0274
  0274:83 02              lal local2 
  0276:31 2f              bnt code_02a7 
  0278:35 00              ldi 0 
  027a:a3 02              sal local2 
  027c:7a               push2 
  027d:39 23            pushi 23 // $23 window
  027f:76               push0 
  0280:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0286:88 00a5            lsg gAct 
  0289:35 00              ldi 0 
  028b:1a                 eq? 
  028c:31 0a              bnt code_0298 
  028e:7a               push2 
  028f:39 23            pushi 23 // $23 window
  0291:78               push1 
  0292:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0298
  0298:89 0c              lsg gPrevRoomNum 
  029a:35 0c              ldi c 
  029c:1a                 eq? 
  029d:31 08              bnt code_02a7 
  029f:39 7a            pushi 7a // $7a setScript
  02a1:78               push1 
  02a2:74 0b4b          lofss $0df0 // closeDoor
  02a5:54 06             self 6 


        code_02a7
  02a7:38 00db          pushi db // $db onControl
  02aa:78               push1 
  02ab:76               push0 
  02ac:81 00              lag gEgo 
  02ae:4a 06             send 6 

  02b0:36                push 
  02b1:35 10              ldi 10 
  02b3:12                 and 
  02b4:31 24              bnt code_02da 
  02b6:83 00              lal local0 
  02b8:18                 not 
  02b9:31 1f              bnt code_02da 
  02bb:39 06            pushi 6 // $6 loop
  02bd:76               push0 
  02be:81 00              lag gEgo 
  02c0:4a 04             send 4 

  02c2:36                push 
  02c3:35 00              ldi 0 
  02c5:1a                 eq? 
  02c6:31 12              bnt code_02da 
  02c8:76               push0 
  02c9:45 03 00         callb procedure_0003 0 // HandsOff 

  02cc:35 01              ldi 1 
  02ce:a3 00              sal local0 
  02d0:39 7a            pushi 7a // $7a setScript
  02d2:78               push1 
  02d3:74 0aba          lofss $0d90 // myDoor
  02d6:81 00              lag gEgo 
  02d8:4a 06             send 6 


        code_02da
  02da:38 00db          pushi db // $db onControl
  02dd:78               push1 
  02de:78               push1 
  02df:81 00              lag gEgo 
  02e1:4a 06             send 6 

  02e3:36                push 
  02e4:35 04              ldi 4 
  02e6:12                 and 
  02e7:31 0a              bnt code_02f3 
  02e9:38 00f8          pushi f8 // $f8 newRoom
  02ec:78               push1 
  02ed:39 0c            pushi c // $c nsRight
  02ef:81 02              lag gCurRoom 
  02f1:4a 06             send 6 


        code_02f3
  02f3:39 04            pushi 4 // $4 x
  02f5:76               push0 
  02f6:81 00              lag gEgo 
  02f8:4a 04             send 4 

  02fa:36                push 
  02fb:35 64              ldi 64 
  02fd:22                 lt? 
  02fe:31 06              bnt code_0306 
  0300:35 00              ldi 0 
  0302:65 2a             aTop vertAngle 
  0304:33 1a              jmp code_0320 

        code_0306
  0306:39 04            pushi 4 // $4 x
  0308:76               push0 
  0309:81 00              lag gEgo 
  030b:4a 04             send 4 

  030d:36                push 
  030e:34 00a0            ldi a0 
  0311:22                 lt? 
  0312:31 07              bnt code_031b 
  0314:34 00a7            ldi a7 
  0317:65 2a             aTop vertAngle 
  0319:33 05              jmp code_0320 

        code_031b
  031b:34 0089            ldi 89 
  031e:65 2a             aTop vertAngle 

        code_0320
  0320:88 00ca            lsg global202 
  0323:3c                 dup 
  0324:35 01              ldi 1 
  0326:1a                 eq? 
  0327:31 07              bnt code_0330 
  0329:76               push0 
  032a:40 fce8 00        call proc_0016 0 

  032e:33 0b              jmp code_033b 

        code_0330
  0330:3c                 dup 
  0331:35 02              ldi 2 
  0333:1a                 eq? 
  0334:31 05              bnt code_033b 
  0336:76               push0 
  0337:40 fcf9 00        call proc_0034 0 


        code_033b
  033b:3a                toss 
  033c:35 00              ldi 0 
  033e:a0 00ca            sag global202 
  0341:39 3c            pushi 3c // $3c doit
  0343:76               push0 
  0344:57 37 04         super Rm 4 

  0347:48                 ret 
    )

    (method (dispose) // method_0348
  0348:39 58            pushi 58 // $58 dispose
  034a:76               push0 
  034b:57 37 04         super Rm 4 

  034e:48                 ret 
    )

    (method (newRoom) // method_034f
  034f:76               push0 
  0350:45 0f 00         callb procedure_000f 0 // cls 

  0353:38 00f8          pushi f8 // $f8 newRoom
  0356:78               push1 
  0357:8f 01              lsp param1 
  0359:57 37 06         super Rm 6 

  035c:48                 ret 
    )

    (method (handleEvent) // method_035d
  035d:3f 01             link 1 // (var $1)
  035f:78               push1 
  0360:38 03de          pushi 3de // $3de sel_990
  0363:43 03 02         callk DisposeScript 2 

  0366:39 6f            pushi 6f // $6f handleEvent
  0368:78               push1 
  0369:8f 01              lsp param1 
  036b:57 37 06         super Rm 6 

  036e:39 4c            pushi 4c // $4c claimed
  0370:76               push0 
  0371:87 01              lap param1 
  0373:4a 04             send 4 

  0375:31 03              bnt code_037a 
  0377:35 01              ldi 1 
  0379:48                 ret 

        code_037a
  037a:39 22            pushi 22 // $22 type
  037c:76               push0 
  037d:87 01              lap param1 
  037f:4a 04             send 4 

  0381:36                push 
  0382:34 0080            ldi 80 
  0385:1a                 eq? 
  0386:30 0134            bnt code_04bd 
  0389:88 00a5            lsg gAct 
  038c:35 01              ldi 1 
  038e:1c                 ne? 
  038f:2f 14               bt code_03a5 
  0391:78               push1 
  0392:74 0885          lofss $0c1a // ask[/celie]/lil<about>
  0395:43 25 02         callk Said 2 

  0398:18                 not 
  0399:31 0c              bnt code_03a7 
  039b:78               push1 
  039c:74 088a          lofss $0c29 // ask[/lil]/celie<about>
  039f:43 25 02         callk Said 2 

  03a2:18                 not 
  03a3:31 02              bnt code_03a7 

        code_03a5
  03a5:35 01              ldi 1 

        code_03a7
  03a7:a5 00              sat temp0 
  03a9:80 00d0            lag global208 
  03ac:31 27              bnt code_03d5 
  03ae:85 00              lat temp0 
  03b0:31 23              bnt code_03d5 
  03b2:78               push1 
  03b3:74 082d          lofss $0be3 // ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
  03b6:43 25 02         callk Said 2 

  03b9:31 1a              bnt code_03d5 
  03bb:39 7a            pushi 7a // $7a setScript
  03bd:78               push1 
  03be:7a               push2 
  03bf:38 00f3          pushi f3 // $f3 close
  03c2:76               push0 
  03c3:43 02 04         callk ScriptID 4 

  03c6:36                push 
  03c7:54 06             self 6 

  03c9:39 6f            pushi 6f // $6f handleEvent
  03cb:78               push1 
  03cc:8f 01              lsp param1 
  03ce:39 76            pushi 76 // $76 script
  03d0:76               push0 
  03d1:54 04             self 4 

  03d3:4a 06             send 6 


        code_03d5
  03d5:39 4c            pushi 4c // $4c claimed
  03d7:76               push0 
  03d8:87 01              lap param1 
  03da:4a 04             send 4 

  03dc:31 03              bnt code_03e1 
  03de:35 01              ldi 1 
  03e0:48                 ret 

        code_03e1
  03e1:78               push1 
  03e2:74 08af          lofss $0c94 // look>
  03e5:43 25 02         callk Said 2 

  03e8:30 0093            bnt code_047e 
  03eb:78               push1 
  03ec:74 07e0          lofss $0bcf // [<around,at][/room]
  03ef:43 25 02         callk Said 2 

  03f2:31 1e              bnt code_0412 
  03f4:7a               push2 
  03f5:39 23            pushi 23 // $23 window
  03f7:76               push0 
  03f8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03fe:88 00a5            lsg gAct 
  0401:35 00              ldi 0 
  0403:1a                 eq? 
  0404:31 0a              bnt code_0410 
  0406:7a               push2 
  0407:39 23            pushi 23 // $23 window
  0409:78               push1 
  040a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0410
  0410:33 6a              jmp code_047c 

        code_0412
  0412:78               push1 
  0413:74 07a5          lofss $0bbb // /dish
  0416:43 25 02         callk Said 2 

  0419:31 21              bnt code_043c 
  041b:88 00a5            lsg gAct 
  041e:35 00              ldi 0 
  0420:1a                 eq? 
  0421:31 0c              bnt code_042f 
  0423:7a               push2 
  0424:39 23            pushi 23 // $23 window
  0426:7a               push2 
  0427:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  042d:33 0b              jmp code_043a 

        code_042f
  042f:7a               push2 
  0430:39 23            pushi 23 // $23 window
  0432:39 03            pushi 3 // $3 y
  0434:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_043a
  043a:33 40              jmp code_047c 

        code_043c
  043c:78               push1 
  043d:74 077f          lofss $0bbf // /door
  0440:43 25 02         callk Said 2 

  0443:31 0d              bnt code_0452 
  0445:7a               push2 
  0446:39 23            pushi 23 // $23 window
  0448:39 04            pushi 4 // $4 x
  044a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0450:33 2a              jmp code_047c 

        code_0452
  0452:78               push1 
  0453:74 0761          lofss $0bb7 // /carpet
  0456:43 25 02         callk Said 2 

  0459:31 0d              bnt code_0468 
  045b:7a               push2 
  045c:39 23            pushi 23 // $23 window
  045e:39 05            pushi 5 // $5 view
  0460:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0466:33 14              jmp code_047c 

        code_0468
  0468:78               push1 
  0469:74 0757          lofss $0bc3 // <(dans,below)/nightstand
  046c:43 25 02         callk Said 2 

  046f:31 0b              bnt code_047c 
  0471:7a               push2 
  0472:39 23            pushi 23 // $23 window
  0474:39 06            pushi 6 // $6 loop
  0476:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_047c
  047c:33 3f              jmp code_04bd 

        code_047e
  047e:78               push1 
  047f:74 087b          lofss $0cfd // gommer/deliver
  0482:43 25 02         callk Said 2 

  0485:31 0d              bnt code_0494 
  0487:7a               push2 
  0488:39 23            pushi 23 // $23 window
  048a:39 07            pushi 7 // $7 cel
  048c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0492:33 29              jmp code_04bd 

        code_0494
  0494:78               push1 
  0495:74 07c3          lofss $0c5b // get/dish
  0498:43 25 02         callk Said 2 

  049b:31 20              bnt code_04bd 
  049d:88 00a5            lsg gAct 
  04a0:35 00              ldi 0 
  04a2:1a                 eq? 
  04a3:31 0d              bnt code_04b2 
  04a5:7a               push2 
  04a6:39 23            pushi 23 // $23 window
  04a8:39 08            pushi 8 // $8 underBits
  04aa:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04b0:33 0b              jmp code_04bd 

        code_04b2
  04b2:7a               push2 
  04b3:39 23            pushi 23 // $23 window
  04b5:39 03            pushi 3 // $3 y
  04b7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_04bd
  04bd:48                 ret 
    )

)

// 0d5a
(instance shadowWalk 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_04be
  04be:87 01              lap param1 
  04c0:65 0a             aTop state 
  04c2:36                push 
  04c3:3c                 dup 
  04c4:35 00              ldi 0 
  04c6:1a                 eq? 
  04c7:31 06              bnt code_04cf 
  04c9:35 08              ldi 8 
  04cb:65 12             aTop seconds 
  04cd:33 31              jmp code_0500 

        code_04cf
  04cf:3c                 dup 
  04d0:35 01              ldi 1 
  04d2:1a                 eq? 
  04d3:31 15              bnt code_04ea 
  04d5:38 00d3          pushi d3 // $d3 setMotion
  04d8:39 04            pushi 4 // $4 x
  04da:51 1d            class MoveTo 
  04dc:36                push 
  04dd:38 0127          pushi 127 // $127 intermediate
  04e0:39 52            pushi 52 // $52 icon
  04e2:7c            pushSelf 
  04e3:72 0c42          lofsa $1128 // Shadow
  04e6:4a 0c             send c 

  04e8:33 16              jmp code_0500 

        code_04ea
  04ea:3c                 dup 
  04eb:35 02              ldi 2 
  04ed:1a                 eq? 
  04ee:31 10              bnt code_0500 
  04f0:39 58            pushi 58 // $58 dispose
  04f2:76               push0 
  04f3:72 0c32          lofsa $1128 // Shadow
  04f6:4a 04             send 4 

  04f8:39 7a            pushi 7a // $7a setScript
  04fa:78               push1 
  04fb:76               push0 
  04fc:63 08             pToa client 
  04fe:4a 06             send 6 


        code_0500
  0500:3a                toss 
  0501:48                 ret 
    )

)

// 0d8a
(instance myDoor of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0502
  0502:87 01              lap param1 
  0504:65 0a             aTop state 
  0506:36                push 
  0507:3c                 dup 
  0508:35 00              ldi 0 
  050a:1a                 eq? 
  050b:31 07              bnt code_0514 
  050d:35 02              ldi 2 
  050f:65 10             aTop cycles 
  0511:32 009c            jmp code_05b0 

        code_0514
  0514:3c                 dup 
  0515:35 01              ldi 1 
  0517:1a                 eq? 
  0518:31 36              bnt code_0550 
  051a:39 12            pushi 12 // $12 illegalBits
  051c:78               push1 
  051d:76               push0 
  051e:81 00              lag gEgo 
  0520:4a 06             send 6 

  0522:39 04            pushi 4 // $4 x
  0524:76               push0 
  0525:81 00              lag gEgo 
  0527:4a 04             send 4 

  0529:36                push 
  052a:34 00e5            ldi e5 
  052d:1e                 gt? 
  052e:31 1a              bnt code_054a 
  0530:38 00d3          pushi d3 // $d3 setMotion
  0533:39 04            pushi 4 // $4 x
  0535:51 1d            class MoveTo 
  0537:36                push 
  0538:38 00e5          pushi e5 // $e5 prevDir
  053b:39 03            pushi 3 // $3 y
  053d:76               push0 
  053e:81 00              lag gEgo 
  0540:4a 04             send 4 

  0542:36                push 
  0543:7c            pushSelf 
  0544:81 00              lag gEgo 
  0546:4a 0c             send c 

  0548:33 04              jmp code_054e 

        code_054a
  054a:35 01              ldi 1 
  054c:65 10             aTop cycles 

        code_054e
  054e:33 60              jmp code_05b0 

        code_0550
  0550:3c                 dup 
  0551:35 02              ldi 2 
  0553:1a                 eq? 
  0554:31 3a              bnt code_0590 
  0556:38 00a4          pushi a4 // $a4 cycleSpeed
  0559:78               push1 
  055a:78               push1 
  055b:38 00c9          pushi c9 // $c9 ignoreActors
  055e:78               push1 
  055f:78               push1 
  0560:39 7e            pushi 7e // $7e setCycle
  0562:78               push1 
  0563:51 1a            class End 
  0565:36                push 
  0566:72 0b1b          lofsa $1084 // Bdoor
  0569:4a 12             send 12 

  056b:38 00a4          pushi a4 // $a4 cycleSpeed
  056e:78               push1 
  056f:78               push1 
  0570:38 00c9          pushi c9 // $c9 ignoreActors
  0573:78               push1 
  0574:78               push1 
  0575:39 7e            pushi 7e // $7e setCycle
  0577:7a               push2 
  0578:51 1a            class End 
  057a:36                push 
  057b:7c            pushSelf 
  057c:72 0ab3          lofsa $1032 // Fdoor
  057f:4a 14             send 14 

  0581:39 2b            pushi 2b // $2b number
  0583:78               push1 
  0584:39 2b            pushi 2b // $2b number
  0586:39 2a            pushi 2a // $2a play
  0588:76               push0 
  0589:72 0d24          lofsa $12b0 // mySound
  058c:4a 0a             send a 

  058e:33 20              jmp code_05b0 

        code_0590
  0590:3c                 dup 
  0591:35 03              ldi 3 
  0593:1a                 eq? 
  0594:31 1a              bnt code_05b0 
  0596:38 00d3          pushi d3 // $d3 setMotion
  0599:39 03            pushi 3 // $3 y
  059b:51 1d            class MoveTo 
  059d:36                push 
  059e:39 04            pushi 4 // $4 x
  05a0:76               push0 
  05a1:81 00              lag gEgo 
  05a3:4a 04             send 4 

  05a5:36                push 
  05a6:35 32              ldi 32 
  05a8:02                 add 
  05a9:36                push 
  05aa:39 7a            pushi 7a // $7a setScript
  05ac:81 00              lag gEgo 
  05ae:4a 0a             send a 


        code_05b0
  05b0:3a                toss 
  05b1:48                 ret 
    )

)

// 0dba
(instance frigDoor 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_05b2
  05b2:87 01              lap param1 
  05b4:65 0a             aTop state 
  05b6:36                push 
  05b7:3c                 dup 
  05b8:35 00              ldi 0 
  05ba:1a                 eq? 
  05bb:31 12              bnt code_05cf 
  05bd:76               push0 
  05be:45 03 00         callb procedure_0003 0 // HandsOff 

  05c1:39 7e            pushi 7e // $7e setCycle
  05c3:7a               push2 
  05c4:51 1a            class End 
  05c6:36                push 
  05c7:7c            pushSelf 
  05c8:72 0c45          lofsa $1210 // iceDoor
  05cb:4a 08             send 8 

  05cd:33 7f              jmp code_064e 

        code_05cf
  05cf:3c                 dup 
  05d0:35 01              ldi 1 
  05d2:1a                 eq? 
  05d3:31 4a              bnt code_061f 
  05d5:38 0082          pushi 82 // $82 owner
  05d8:76               push0 
  05d9:39 43            pushi 43 // $43 at
  05db:78               push1 
  05dc:39 0c            pushi c // $c nsRight
  05de:81 09              lag gInventory 
  05e0:4a 06             send 6 

  05e2:4a 04             send 4 

  05e4:36                push 
  05e5:35 23              ldi 23 
  05e7:1a                 eq? 
  05e8:31 24              bnt code_060e 
  05ea:7a               push2 
  05eb:39 23            pushi 23 // $23 window
  05ed:39 09            pushi 9 // $9 nsTop
  05ef:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05f5:35 01              ldi 1 
  05f7:a0 00b6            sag global182 
  05fa:38 00ec          pushi ec // $ec get
  05fd:78               push1 
  05fe:39 0c            pushi c // $c nsRight
  0600:81 00              lag gEgo 
  0602:4a 06             send 6 

  0604:39 58            pushi 58 // $58 dispose
  0606:76               push0 
  0607:72 0c54          lofsa $125e // Bone
  060a:4a 04             send 4 

  060c:33 0b              jmp code_0619 

        code_060e
  060e:7a               push2 
  060f:39 23            pushi 23 // $23 window
  0611:39 0a            pushi a // $a nsLeft
  0613:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0619
  0619:35 01              ldi 1 
  061b:65 10             aTop cycles 
  061d:33 2f              jmp code_064e 

        code_061f
  061f:3c                 dup 
  0620:35 02              ldi 2 
  0622:1a                 eq? 
  0623:31 0e              bnt code_0633 
  0625:39 7e            pushi 7e // $7e setCycle
  0627:7a               push2 
  0628:51 1b            class Beg 
  062a:36                push 
  062b:7c            pushSelf 
  062c:72 0be1          lofsa $1210 // iceDoor
  062f:4a 08             send 8 

  0631:33 1b              jmp code_064e 

        code_0633
  0633:3c                 dup 
  0634:35 03              ldi 3 
  0636:1a                 eq? 
  0637:31 15              bnt code_064e 
  0639:76               push0 
  063a:45 04 00         callb procedure_0004 0 // HandsOn 

  063d:38 00c6          pushi c6 // $c6 stopUpd
  0640:76               push0 
  0641:72 0bcc          lofsa $1210 // iceDoor
  0644:4a 04             send 4 

  0646:39 7a            pushi 7a // $7a setScript
  0648:78               push1 
  0649:76               push0 
  064a:63 08             pToa client 
  064c:4a 06             send 6 


        code_064e
  064e:3a                toss 
  064f:48                 ret 
    )

)

// 0dea
(instance closeDoor 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_0650
  0650:87 01              lap param1 
  0652:65 0a             aTop state 
  0654:36                push 
  0655:3c                 dup 
  0656:35 00              ldi 0 
  0658:1a                 eq? 
  0659:31 0a              bnt code_0665 
  065b:76               push0 
  065c:45 03 00         callb procedure_0003 0 // HandsOff 

  065f:35 03              ldi 3 
  0661:65 10             aTop cycles 
  0663:33 66              jmp code_06cb 

        code_0665
  0665:3c                 dup 
  0666:35 01              ldi 1 
  0668:1a                 eq? 
  0669:31 3c              bnt code_06a7 
  066b:38 00c9          pushi c9 // $c9 ignoreActors
  066e:78               push1 
  066f:76               push0 
  0670:38 00d3          pushi d3 // $d3 setMotion
  0673:39 04            pushi 4 // $4 x
  0675:51 1d            class MoveTo 
  0677:36                push 
  0678:38 00e2          pushi e2 // $e2 canInput
  067b:39 7a            pushi 7a // $7a setScript
  067d:7c            pushSelf 
  067e:81 00              lag gEgo 
  0680:4a 12             send 12 

  0682:39 7e            pushi 7e // $7e setCycle
  0684:78               push1 
  0685:51 1b            class Beg 
  0687:36                push 
  0688:72 09a7          lofsa $1032 // Fdoor
  068b:4a 06             send 6 

  068d:39 7e            pushi 7e // $7e setCycle
  068f:78               push1 
  0690:51 1b            class Beg 
  0692:36                push 
  0693:72 09ee          lofsa $1084 // Bdoor
  0696:4a 06             send 6 

  0698:39 2b            pushi 2b // $2b number
  069a:78               push1 
  069b:39 2c            pushi 2c // $2c handle
  069d:39 2a            pushi 2a // $2a play
  069f:76               push0 
  06a0:72 0c0d          lofsa $12b0 // mySound
  06a3:4a 0a             send a 

  06a5:33 24              jmp code_06cb 

        code_06a7
  06a7:3c                 dup 
  06a8:35 02              ldi 2 
  06aa:1a                 eq? 
  06ab:31 1e              bnt code_06cb 
  06ad:76               push0 
  06ae:45 04 00         callb procedure_0004 0 // HandsOn 

  06b1:38 00c6          pushi c6 // $c6 stopUpd
  06b4:76               push0 
  06b5:72 09cc          lofsa $1084 // Bdoor
  06b8:4a 04             send 4 

  06ba:38 00c6          pushi c6 // $c6 stopUpd
  06bd:76               push0 
  06be:72 0971          lofsa $1032 // Fdoor
  06c1:4a 04             send 4 

  06c3:39 7a            pushi 7a // $7a setScript
  06c5:78               push1 
  06c6:76               push0 
  06c7:63 08             pToa client 
  06c9:4a 06             send 6 


        code_06cb
  06cb:3a                toss 
  06cc:48                 ret 
    )

)

// 0e1a
(instance sink of RPicView
    (properties
        y $51
        x $d9
        z $0
        heading $0
        view $87
        loop $0
        cel $1
        priority $4
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_06cd
  06cd:39 03            pushi 3 // $3 y
  06cf:7c            pushSelf 
  06d0:8f 01              lsp param1 
  06d2:39 03            pushi 3 // $3 y
  06d4:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  06da:2f 09               bt code_06e5 
  06dc:78               push1 
  06dd:74 05ae          lofss $0c8e // look/evier
  06e0:43 25 02         callk Said 2 

  06e3:31 28              bnt code_070d 

        code_06e5
  06e5:39 4c            pushi 4c // $4c claimed
  06e7:78               push1 
  06e8:78               push1 
  06e9:87 01              lap param1 
  06eb:4a 06             send 6 

  06ed:88 00a5            lsg gAct 
  06f0:35 00              ldi 0 
  06f2:1a                 eq? 
  06f3:31 0d              bnt code_0702 
  06f5:7a               push2 
  06f6:39 23            pushi 23 // $23 window
  06f8:39 0b            pushi b // $b nsBottom
  06fa:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0700:33 0b              jmp code_070d 

        code_0702
  0702:7a               push2 
  0703:39 23            pushi 23 // $23 window
  0705:39 0c            pushi c // $c nsRight
  0707:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_070d
  070d:48                 ret 
    )

)

// 0e50
(instance butterchurn of RPicView
    (properties
        y $a6
        x $15
        z $0
        heading $0
        view $87
        loop $0
        cel $3
        priority $c
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_070e
  070e:78               push1 
  070f:74 05a4          lofss $0cb6 // open,(look<dans)/baratte
  0712:43 25 02         callk Said 2 

  0715:31 0d              bnt code_0724 
  0717:7a               push2 
  0718:39 23            pushi 23 // $23 window
  071a:39 0d            pushi d // $d lsTop
  071c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0722:33 2b              jmp code_074f 

        code_0724
  0724:39 03            pushi 3 // $3 y
  0726:7c            pushSelf 
  0727:8f 01              lsp param1 
  0729:39 03            pushi 3 // $3 y
  072b:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0731:2f 09               bt code_073c 
  0733:78               push1 
  0734:74 0530          lofss $0c67 // look/baratte
  0737:43 25 02         callk Said 2 

  073a:31 13              bnt code_074f 

        code_073c
  073c:39 4c            pushi 4c // $4c claimed
  073e:78               push1 
  073f:78               push1 
  0740:87 01              lap param1 
  0742:4a 06             send 6 

  0744:7a               push2 
  0745:39 23            pushi 23 // $23 window
  0747:39 0e            pushi e // $e lsLeft
  0749:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_074f
  074f:48                 ret 
    )

)

// 0e86
(instance stool of RPicView
    (properties
        y $98
        x $c6
        z $0
        heading $0
        view $87
        loop $0
        cel $2
        priority $a
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0750
  0750:39 03            pushi 3 // $3 y
  0752:7c            pushSelf 
  0753:8f 01              lsp param1 
  0755:39 03            pushi 3 // $3 y
  0757:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  075d:2f 09               bt code_0768 
  075f:78               push1 
  0760:74 050a          lofss $0c6d // look/chair,barstool
  0763:43 25 02         callk Said 2 

  0766:31 13              bnt code_077b 

        code_0768
  0768:39 4c            pushi 4c // $4c claimed
  076a:78               push1 
  076b:78               push1 
  076c:87 01              lap param1 
  076e:4a 06             send 6 

  0770:7a               push2 
  0771:39 23            pushi 23 // $23 window
  0773:39 0f            pushi f // $f lsBottom
  0775:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_077b
  077b:48                 ret 
    )

)

// 0ebc
(instance rack of RPicView
    (properties
        y $42
        x $dc
        z $0
        heading $0
        view $87
        loop $1
        cel $2
        priority $3
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_077c
  077c:39 03            pushi 3 // $3 y
  077e:7c            pushSelf 
  077f:8f 01              lsp param1 
  0781:39 03            pushi 3 // $3 y
  0783:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0789:2f 09               bt code_0794 
  078b:78               push1 
  078c:74 04f9          lofss $0c88 // look/pan
  078f:43 25 02         callk Said 2 

  0792:31 13              bnt code_07a7 

        code_0794
  0794:39 4c            pushi 4c // $4c claimed
  0796:78               push1 
  0797:78               push1 
  0798:87 01              lap param1 
  079a:4a 06             send 6 

  079c:7a               push2 
  079d:39 23            pushi 23 // $23 window
  079f:39 10            pushi 10 // $10 lsRight
  07a1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_07a7
  07a7:48                 ret 
    )

)

// 0ef2
(instance icebox of RPicView
    (properties
        y $5b
        x $1b
        z $0
        heading $0
        view $87
        loop $0
        cel $0
        priority $3
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_07a8
  07a8:78               push1 
  07a9:74 0526          lofss $0cd2 // open,(look<dans)/congelateur
  07ac:43 25 02         callk Said 2 

  07af:2f 1e               bt code_07cf 
  07b1:38 0082          pushi 82 // $82 owner
  07b4:76               push0 
  07b5:39 43            pushi 43 // $43 at
  07b7:78               push1 
  07b8:39 0c            pushi c // $c nsRight
  07ba:81 09              lag gInventory 
  07bc:4a 06             send 6 

  07be:4a 04             send 4 

  07c0:36                push 
  07c1:35 23              ldi 23 
  07c3:1a                 eq? 
  07c4:31 2f              bnt code_07f5 
  07c6:78               push1 
  07c7:74 0485          lofss $0c4f // get/bone
  07ca:43 25 02         callk Said 2 

  07cd:31 26              bnt code_07f5 

        code_07cf
  07cf:38 00da          pushi da // $da inRect
  07d2:39 04            pushi 4 // $4 x
  07d4:39 09            pushi 9 // $9 nsTop
  07d6:39 54            pushi 54 // $54 delete
  07d8:39 2b            pushi 2b // $2b number
  07da:39 64            pushi 64 // $64 allTrue
  07dc:81 00              lag gEgo 
  07de:4a 0c             send c 

  07e0:31 0c              bnt code_07ee 
  07e2:39 7a            pushi 7a // $7a setScript
  07e4:78               push1 
  07e5:74 05d8          lofss $0dc0 // frigDoor
  07e8:81 00              lag gEgo 
  07ea:4a 06             send 6 

  07ec:33 04              jmp code_07f2 

        code_07ee
  07ee:76               push0 
  07ef:45 09 00         callb procedure_0009 0 // NotClose 


        code_07f2
  07f2:32 00f4            jmp code_08e9 

        code_07f5
  07f5:80 00d0            lag global208 
  07f8:31 14              bnt code_080e 
  07fa:78               push1 
  07fb:74 03df          lofss $0bdd // ask,raconter
  07fe:43 25 02         callk Said 2 

  0801:31 0b              bnt code_080e 
  0803:39 4c            pushi 4c // $4c claimed
  0805:78               push1 
  0806:76               push0 
  0807:87 01              lap param1 
  0809:4a 06             send 6 

  080b:32 00db            jmp code_08e9 

        code_080e
  080e:88 00a5            lsg gAct 
  0811:35 00              ldi 0 
  0813:1c                 ne? 
  0814:31 20              bnt code_0836 
  0816:78               push1 
  0817:74 0399          lofss $0bb3 // /beauregard
  081a:43 25 02         callk Said 2 

  081d:2f 09               bt code_0828 
  081f:78               push1 
  0820:74 038b          lofss $0bae // //beauregard
  0823:43 25 02         callk Said 2 

  0826:31 0e              bnt code_0836 

        code_0828
  0828:7a               push2 
  0829:39 23            pushi 23 // $23 window
  082b:39 11            pushi 11 // $11 signal
  082d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0833:32 00b3            jmp code_08e9 

        code_0836
  0836:88 00a5            lsg gAct 
  0839:35 00              ldi 0 
  083b:1a                 eq? 
  083c:31 3d              bnt code_087b 
  083e:38 0082          pushi 82 // $82 owner
  0841:76               push0 
  0842:39 43            pushi 43 // $43 at
  0844:78               push1 
  0845:39 0c            pushi c // $c nsRight
  0847:81 09              lag gInventory 
  0849:4a 06             send 6 

  084b:4a 04             send 4 

  084d:36                push 
  084e:35 00              ldi 0 
  0850:1a                 eq? 
  0851:31 28              bnt code_087b 
  0853:78               push1 
  0854:74 03ea          lofss $0c41 // get/arriere<bone[<de]
  0857:43 25 02         callk Said 2 

  085a:2f 12               bt code_086e 
  085c:78               push1 
  085d:74 03d8          lofss $0c38 // get/*/beauregard
  0860:43 25 02         callk Said 2 

  0863:2f 09               bt code_086e 
  0865:78               push1 
  0866:74 03e6          lofss $0c4f // get/bone
  0869:43 25 02         callk Said 2 

  086c:31 0d              bnt code_087b 

        code_086e
  086e:7a               push2 
  086f:39 23            pushi 23 // $23 window
  0871:39 12            pushi 12 // $12 illegalBits
  0873:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0879:33 6e              jmp code_08e9 

        code_087b
  087b:78               push1 
  087c:74 03d0          lofss $0c4f // get/bone
  087f:43 25 02         callk Said 2 

  0882:31 3a              bnt code_08be 
  0884:38 00ee          pushi ee // $ee has
  0887:78               push1 
  0888:39 0c            pushi c // $c nsRight
  088a:81 00              lag gEgo 
  088c:4a 06             send 6 

  088e:31 06              bnt code_0896 
  0890:76               push0 
  0891:45 0a 00         callb procedure_000a 0 // AlreadyTook 

  0894:33 26              jmp code_08bc 

        code_0896
  0896:38 0082          pushi 82 // $82 owner
  0899:76               push0 
  089a:39 43            pushi 43 // $43 at
  089c:78               push1 
  089d:39 0c            pushi c // $c nsRight
  089f:81 09              lag gInventory 
  08a1:4a 06             send 6 

  08a3:4a 04             send 4 

  08a5:36                push 
  08a6:35 23              ldi 23 
  08a8:1a                 eq? 
  08a9:31 06              bnt code_08b1 
  08ab:76               push0 
  08ac:45 0d 00         callb procedure_000d 0 // DontHave 

  08af:33 0b              jmp code_08bc 

        code_08b1
  08b1:7a               push2 
  08b2:39 23            pushi 23 // $23 window
  08b4:39 13            pushi 13 // $13 brTop
  08b6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_08bc
  08bc:33 2b              jmp code_08e9 

        code_08be
  08be:39 03            pushi 3 // $3 y
  08c0:7c            pushSelf 
  08c1:8f 01              lsp param1 
  08c3:39 03            pushi 3 // $3 y
  08c5:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  08cb:2f 09               bt code_08d6 
  08cd:78               push1 
  08ce:74 03a5          lofss $0c76 // look/congelateur
  08d1:43 25 02         callk Said 2 

  08d4:31 13              bnt code_08e9 

        code_08d6
  08d6:39 4c            pushi 4c // $4c claimed
  08d8:78               push1 
  08d9:78               push1 
  08da:87 01              lap param1 
  08dc:4a 06             send 6 

  08de:7a               push2 
  08df:39 23            pushi 23 // $23 window
  08e1:39 14            pushi 14 // $14 brLeft
  08e3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_08e9
  08e9:48                 ret 
    )

)

// 0f28
(instance shelves of RPicView
    (properties
        y $90
        x $117
        z $0
        heading $0
        view $87
        loop $1
        cel $0
        priority $a
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_08ea
  08ea:78               push1 
  08eb:74 03ba          lofss $0ca8 // open,(look<dans)/armoire
  08ee:43 25 02         callk Said 2 

  08f1:31 0d              bnt code_0900 
  08f3:7a               push2 
  08f4:39 23            pushi 23 // $23 window
  08f6:39 15            pushi 15 // $15 brBottom
  08f8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  08fe:33 2b              jmp code_092b 

        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:2f 09               bt code_0918 
  090f:78               push1 
  0910:74 034e          lofss $0c61 // look/armoire
  0913:43 25 02         callk Said 2 

  0916:31 13              bnt code_092b 

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

  0920:7a               push2 
  0921:39 23            pushi 23 // $23 window
  0923:39 16            pushi 16 // $16 brRight
  0925:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_092b
  092b:48                 ret 
    )

)

// 0f5e
(instance shelf of PV
    (properties
        y $85
        x $96
        z $0
        heading $0
        view $87
        loop $1
        cel $1
        priority $a
        signal $4000
    )
)

// 0f88
(instance lamp1 of Prop
    (properties
        y $38
        x $e7
        z $0
        heading $0
        yStep $2
        view $87
        loop $4
        cel $1
        priority $6
        underBits $0
        signal $10
        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_092c
  092c:39 03            pushi 3 // $3 y
  092e:7c            pushSelf 
  092f:8f 01              lsp param1 
  0931:39 03            pushi 3 // $3 y
  0933:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0939:31 0f              bnt code_094a 
  093b:39 4c            pushi 4c // $4c claimed
  093d:78               push1 
  093e:78               push1 
  093f:87 01              lap param1 
  0941:4a 06             send 6 

  0943:78               push1 
  0944:74 0a6c          lofss $13b3 // lamp
  0947:45 19 02         callb procedure_0019 2 // DoLook 


        code_094a
  094a:48                 ret 
    )

)

// 0fda
(instance lamp2 of Prop
    (properties
        y $42
        x $ff
        z $0
        heading $0
        yStep $2
        view $87
        loop $4
        cel $0
        priority $b
        underBits $0
        signal $10
        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_094b
  094b:39 03            pushi 3 // $3 y
  094d:7c            pushSelf 
  094e:8f 01              lsp param1 
  0950:39 03            pushi 3 // $3 y
  0952:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0958:31 0f              bnt code_0969 
  095a:39 4c            pushi 4c // $4c claimed
  095c:78               push1 
  095d:78               push1 
  095e:87 01              lap param1 
  0960:4a 06             send 6 

  0962:78               push1 
  0963:74 0a4d          lofss $13b3 // lamp
  0966:45 19 02         callb procedure_0019 2 // DoLook 


        code_0969
  0969:48                 ret 
    )

)

// 102c
(instance Fdoor of Prop
    (properties
        y $71
        x $f2
        z $0
        heading $0
        yStep $2
        view $c9
        loop $1
        cel $0
        priority $7
        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_096a
  096a:39 03            pushi 3 // $3 y
  096c:7c            pushSelf 
  096d:8f 01              lsp param1 
  096f:39 03            pushi 3 // $3 y
  0971:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0977:31 0f              bnt code_0988 
  0979:39 4c            pushi 4c // $4c claimed
  097b:78               push1 
  097c:78               push1 
  097d:87 01              lap param1 
  097f:4a 06             send 6 

  0981:78               push1 
  0982:74 0a0a          lofss $138f // door
  0985:45 19 02         callb procedure_0019 2 // DoLook 


        code_0988
  0988:48                 ret 
    )

)

// 107e
(instance Bdoor of Prop
    (properties
        y $7d
        x $fd
        z $0
        heading $0
        yStep $2
        view $c9
        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_0989
  0989:39 03            pushi 3 // $3 y
  098b:7c            pushSelf 
  098c:8f 01              lsp param1 
  098e:39 03            pushi 3 // $3 y
  0990:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0996:31 0f              bnt code_09a7 
  0998:39 4c            pushi 4c // $4c claimed
  099a:78               push1 
  099b:78               push1 
  099c:87 01              lap param1 
  099e:4a 06             send 6 

  09a0:78               push1 
  09a1:74 09eb          lofss $138f // door
  09a4:45 19 02         callb procedure_0019 2 // DoLook 


        code_09a7
  09a7:48                 ret 
    )

)

// 10d0
(instance kettle of Prop
    (properties
        y $3f
        x $76
        z $0
        heading $0
        yStep $2
        view $eb
        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_09a8
  09a8:78               push1 
  09a9:74 0318          lofss $0cc4 // open,(look<dans)/caldron
  09ac:43 25 02         callk Said 2 

  09af:31 38              bnt code_09e9 
  09b1:88 00a5            lsg gAct 
  09b4:35 02              ldi 2 
  09b6:22                 lt? 
  09b7:31 0d              bnt code_09c6 
  09b9:7a               push2 
  09ba:39 23            pushi 23 // $23 window
  09bc:39 17            pushi 17 // $17 name
  09be:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09c4:33 20              jmp code_09e6 

        code_09c6
  09c6:88 00a5            lsg gAct 
  09c9:35 04              ldi 4 
  09cb:24                 le? 
  09cc:31 0d              bnt code_09db 
  09ce:7a               push2 
  09cf:39 23            pushi 23 // $23 window
  09d1:39 18            pushi 18 // $18 key
  09d3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09d9:33 0b              jmp code_09e6 

        code_09db
  09db:7a               push2 
  09dc:39 23            pushi 23 // $23 window
  09de:39 19            pushi 19 // $19 time
  09e0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_09e6
  09e6:32 0081            jmp code_0a6a 

        code_09e9
  09e9:78               push1 
  09ea:74 0268          lofss $0c55 // get/caldron
  09ed:43 25 02         callk Said 2 

  09f0:31 22              bnt code_0a14 
  09f2:88 00a5            lsg gAct 
  09f5:35 02              ldi 2 
  09f7:22                 lt? 
  09f8:31 0d              bnt code_0a07 
  09fa:7a               push2 
  09fb:39 23            pushi 23 // $23 window
  09fd:39 1a            pushi 1a // $1a text
  09ff:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a05:33 0b              jmp code_0a12 

        code_0a07
  0a07:7a               push2 
  0a08:39 23            pushi 23 // $23 window
  0a0a:39 1b            pushi 1b // $1b elements
  0a0c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0a12
  0a12:33 56              jmp code_0a6a 

        code_0a14
  0a14:78               push1 
  0a15:74 02d6          lofss $0cee // for,get,boire/coupe,cafe
  0a18:43 25 02         callk Said 2 

  0a1b:31 0d              bnt code_0a2a 
  0a1d:7a               push2 
  0a1e:39 23            pushi 23 // $23 window
  0a20:39 1c            pushi 1c // $1c color
  0a22:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a28:33 40              jmp code_0a6a 

        code_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:2f 09               bt code_0a42 
  0a39:78               push1 
  0a3a:74 025b          lofss $0c98 // look[<at]/caldron[<cafe]
  0a3d:43 25 02         callk Said 2 

  0a40:31 28              bnt code_0a6a 

        code_0a42
  0a42:88 00a5            lsg gAct 
  0a45:35 02              ldi 2 
  0a47:22                 lt? 
  0a48:31 0d              bnt code_0a57 
  0a4a:7a               push2 
  0a4b:39 23            pushi 23 // $23 window
  0a4d:39 1d            pushi 1d // $1d back
  0a4f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a55:33 0b              jmp code_0a62 

        code_0a57
  0a57:7a               push2 
  0a58:39 23            pushi 23 // $23 window
  0a5a:39 1e            pushi 1e // $1e mode
  0a5c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0a62
  0a62:39 4c            pushi 4c // $4c claimed
  0a64:78               push1 
  0a65:78               push1 
  0a66:87 01              lap param1 
  0a68:4a 06             send 6 


        code_0a6a
  0a6a:48                 ret 
    )

)

// 1122
(instance Shadow of Act
    (properties
        y $0
        x $0
        z $0
        heading $0
        yStep $2
        view $6e
        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 $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)

// 1186
(instance Stove of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $20
        nsLeft $5a
        nsBottom $58
        nsRight $85
    )
    (method (handleEvent) // method_0a6b
  0a6b:78               push1 
  0a6c:74 0271          lofss $0ce0 // open,(look<dans)/cuisiniere
  0a6f:43 25 02         callk Said 2 

  0a72:31 0d              bnt code_0a81 
  0a74:7a               push2 
  0a75:39 23            pushi 23 // $23 window
  0a77:39 1f            pushi 1f // $1f style
  0a79:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a7f:33 40              jmp code_0ac1 

        code_0a81
  0a81:39 03            pushi 3 // $3 y
  0a83:7c            pushSelf 
  0a84:8f 01              lsp param1 
  0a86:39 03            pushi 3 // $3 y
  0a88:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a8e:2f 09               bt code_0a99 
  0a90:78               push1 
  0a91:74 01ee          lofss $0c82 // look/cuisiniere
  0a94:43 25 02         callk Said 2 

  0a97:31 28              bnt code_0ac1 

        code_0a99
  0a99:88 00a5            lsg gAct 
  0a9c:35 02              ldi 2 
  0a9e:22                 lt? 
  0a9f:31 0d              bnt code_0aae 
  0aa1:7a               push2 
  0aa2:39 23            pushi 23 // $23 window
  0aa4:39 20            pushi 20 // $20 state
  0aa6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0aac:33 0b              jmp code_0ab9 

        code_0aae
  0aae:7a               push2 
  0aaf:39 23            pushi 23 // $23 window
  0ab1:39 1e            pushi 1e // $1e mode
  0ab3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ab9
  0ab9:39 4c            pushi 4c // $4c claimed
  0abb:78               push1 
  0abc:78               push1 
  0abd:87 01              lap param1 
  0abf:4a 06             send 6 


        code_0ac1
  0ac1:48                 ret 
    )

)

// 11b2
(instance Window1 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $14
        nsLeft $2e
        nsBottom $55
        nsRight $48
    )
    (method (handleEvent) // method_0ac2
  0ac2:39 03            pushi 3 // $3 y
  0ac4:7c            pushSelf 
  0ac5:8f 01              lsp param1 
  0ac7:39 03            pushi 3 // $3 y
  0ac9:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0acf:31 0f              bnt code_0ae0 
  0ad1:39 4c            pushi 4c // $4c claimed
  0ad3:78               push1 
  0ad4:78               push1 
  0ad5:87 01              lap param1 
  0ad7:4a 06             send 6 

  0ad9:78               push1 
  0ada:74 091f          lofss $13fc // window
  0add:45 19 02         callb procedure_0019 2 // DoLook 


        code_0ae0
  0ae0:48                 ret 
    )

)

// 11de
(instance Window2 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $14
        nsLeft $91
        nsBottom $55
        nsRight $ac
    )
    (method (handleEvent) // method_0ae1
  0ae1:39 03            pushi 3 // $3 y
  0ae3:7c            pushSelf 
  0ae4:8f 01              lsp param1 
  0ae6:39 03            pushi 3 // $3 y
  0ae8:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0aee:31 0f              bnt code_0aff 
  0af0:39 4c            pushi 4c // $4c claimed
  0af2:78               push1 
  0af3:78               push1 
  0af4:87 01              lap param1 
  0af6:4a 06             send 6 

  0af8:78               push1 
  0af9:74 0900          lofss $13fc // window
  0afc:45 19 02         callb procedure_0019 2 // DoLook 


        code_0aff
  0aff:48                 ret 
    )

)

// 120a
(instance iceDoor of Prop
    (properties
        y $54
        x $12
        z $0
        heading $0
        yStep $2
        view $87
        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
    )
)

// 1258
(instance Bone of Prop
    (properties
        y $52
        x $1b
        z $0
        heading $0
        yStep $2
        view $87
        loop $2
        cel $1
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0b00
  0b00:88 00a5            lsg gAct 
  0b03:35 02              ldi 2 
  0b05:22                 lt? 
  0b06:31 1c              bnt code_0b24 
  0b08:78               push1 
  0b09:74 00f6          lofss $0c02 // ask/celie/bone<for
  0b0c:43 25 02         callk Said 2 

  0b0f:31 13              bnt code_0b24 
  0b11:35 02              ldi 2 
  0b13:a0 00d5            sag global213 
  0b16:c3 03              +al local3 
  0b18:39 03            pushi 3 // $3 y
  0b1a:78               push1 
  0b1b:39 23            pushi 23 // $23 window
  0b1d:39 21            pushi 21 // $21 font
  0b1f:45 01 06         callb procedure_0001 6 // Say 

  0b22:33 20              jmp code_0b44 

        code_0b24
  0b24:88 00a5            lsg gAct 
  0b27:35 01              ldi 1 
  0b29:1a                 eq? 
  0b2a:31 18              bnt code_0b44 
  0b2c:78               push1 
  0b2d:74 00de          lofss $0c0e // ask/lil/bone<for
  0b30:43 25 02         callk Said 2 

  0b33:31 0f              bnt code_0b44 
  0b35:35 06              ldi 6 
  0b37:a0 00d5            sag global213 
  0b3a:39 03            pushi 3 // $3 y
  0b3c:78               push1 
  0b3d:39 23            pushi 23 // $23 window
  0b3f:39 21            pushi 21 // $21 font
  0b41:45 01 06         callb procedure_0001 6 // Say 


        code_0b44
  0b44:48                 ret 
    )

)

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

// 12d4
(instance Table of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $6a
        nsLeft $6e
        nsBottom $c
        nsRight $af
    )
    (method (handleEvent) // method_0b45
  0b45:39 03            pushi 3 // $3 y
  0b47:7c            pushSelf 
  0b48:8f 01              lsp param1 
  0b4a:39 03            pushi 3 // $3 y
  0b4c:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b52:2f 09               bt code_0b5d 
  0b54:78               push1 
  0b55:74 0124          lofss $0c7c // look/nightstand
  0b58:43 25 02         callk Said 2 

  0b5b:31 28              bnt code_0b85 

        code_0b5d
  0b5d:88 00a5            lsg gAct 
  0b60:35 01              ldi 1 
  0b62:1a                 eq? 
  0b63:31 0d              bnt code_0b72 
  0b65:7a               push2 
  0b66:39 23            pushi 23 // $23 window
  0b68:39 22            pushi 22 // $22 type
  0b6a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0b70:33 0b              jmp code_0b7d 

        code_0b72
  0b72:7a               push2 
  0b73:39 23            pushi 23 // $23 window
  0b75:39 23            pushi 23 // $23 window
  0b77:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0b7d
  0b7d:39 4c            pushi 4c // $4c claimed
  0b7f:78               push1 
  0b80:78               push1 
  0b81:87 01              lap param1 
  0b83:4a 06             send 6 


        code_0b85
  0b85:48                 ret 
    )

)

// 1300
(instance Cabinet of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $21
        nsLeft $b0
        nsBottom $34
        nsRight $d2
    )
    (method (handleEvent) // method_0b86
  0b86:39 03            pushi 3 // $3 y
  0b88:7c            pushSelf 
  0b89:8f 01              lsp param1 
  0b8b:39 03            pushi 3 // $3 y
  0b8d:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b93:31 13              bnt code_0ba8 
  0b95:7a               push2 
  0b96:39 23            pushi 23 // $23 window
  0b98:39 16            pushi 16 // $16 brRight
  0b9a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0ba0:39 4c            pushi 4c // $4c claimed
  0ba2:78               push1 
  0ba3:78               push1 
  0ba4:87 01              lap param1 
  0ba6:4a 06             send 6 


        code_0ba8
  0ba8:48                 ret 
  0ba9:00                bnot 
    )

)



(procedure proc_0016
  0016:39 58            pushi 58 // $58 dispose
  0018:76               push0 
  0019:81 0a              lag gAddToPics 
  001b:4a 04             send 4 

  001d:39 62            pushi 62 // $62 eachElementDo
  001f:78               push1 
  0020:38 0089          pushi 89 // $89 hide
  0023:81 05              lag gCast 
  0025:4a 06             send 6 

  0027:39 04            pushi 4 // $4 x
  0029:38 03e0          pushi 3e0 // $3e0 sel_992
  002c:39 06            pushi 6 // $6 loop
  002e:78               push1 
  002f:76               push0 
  0030:43 08 08         callk DrawPic 8 

  0033:48                 ret 
)

(procedure proc_0034
  0034:76               push0 
  0035:45 0f 00         callb procedure_000f 0 // cls 

  0038:39 04            pushi 4 // $4 x
  003a:39 23            pushi 23 // $23 window
  003c:39 07            pushi 7 // $7 cel
  003e:78               push1 
  003f:76               push0 
  0040:43 08 08         callk DrawPic 8 

  0043:39 61            pushi 61 // $61 add
  0045:39 07            pushi 7 // $7 cel
  0047:74 0dd6          lofss $0e20 // sink
  004a:74 0e09          lofss $0e56 // butterchurn
  004d:74 0e3c          lofss $0e8c // stool
  0050:74 0e6f          lofss $0ec2 // rack
  0053:74 0ea2          lofss $0ef8 // icebox
  0056:74 0ed5          lofss $0f2e // shelves
  0059:74 0f08          lofss $0f64 // shelf
  005c:39 62            pushi 62 // $62 eachElementDo
  005e:78               push1 
  005f:39 57            pushi 57 // $57 init
  0061:39 3c            pushi 3c // $3c doit
  0063:76               push0 
  0064:81 0a              lag gAddToPics 
  0066:4a 1c             send 1c 

  0068:39 62            pushi 62 // $62 eachElementDo
  006a:78               push1 
  006b:38 00ca          pushi ca // $ca show
  006e:81 05              lag gCast 
  0070:4a 06             send 6 

  0072:48                 ret 
)

