(script 59)

(string
    string_0f26 "Bed"
    string_0f2a "Room59"
    string_0f31 "Rug"
    string_0f35 "Window1"
    string_0f3d "Window2"
    string_0f45 "boil"
    string_0f4a "carrot"
    string_0f51 "chair1"
    string_0f58 "chair2"
    string_0f5f "dresser"
    string_0f67 "fire"
    string_0f6c "herb1"
    string_0f72 "herb2"
    string_0f78 "herb3"
    string_0f7e "mirror"
    string_0f85 "pillow"
    string_0f8c "portrait"
    string_0f95 "shelf"
    string_0f9b "sitDown"
    string_0fa3 "standUp"
    string_0fab "stove"
    string_0fb1 "table"
    string_0fb7 ""
)

(said
    said_08d2 (look<dans),chercher,open/commode,drawer
    said_08e6 /ceiling
    said_08ea /curtain
    said_08ee /dirt
    said_08f2 /painting
    said_08f6 /mur
    said_08fa <bas
    said_08fe <haut
    said_0902 [<around,at][/room]
    said_0910 ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
    said_092f ask[/celie]/carotte<for
    said_093d break/fenetre
    said_0943 avaler[/gumbo,aliments]
    said_094e get/bottle
    said_0954 get/caldron
    said_095a get/caldron,gumbo
    said_0963 get/carotte
    said_0969 get/gumbo
    said_096f get/miroir
    said_0975 get/painting
    said_097b aller/bed,dormir
    said_0984 lay/bed<bas
    said_098d lay<bas
    said_0993 look/bed
    said_0999 look/bottle
    said_099f look/caldron,pan,gumbo
    said_09ab look/carpet
    said_09b1 look/carotte
    said_09b7 look/chair
    said_09bd look/commode
    said_09c3 look/buche,arbre
    said_09cc look/miroir
    said_09d2 look/nightstand
    said_09d8 look/cuisiniere
    said_09de look/oreiller
    said_09e4 look/reflection
    said_09ea look/etagere
    said_09f0 look/fenetre
    said_09f6 look<(exterieur,through)/fenetre
    said_0a04 look<below/bed
    said_0a0d look<below/oreiller
    said_0a16 look<dans/miroir
    said_0a1f look>
    said_0a23 bouger,(look<below)/carpet
    said_0a31 open/fenetre
    said_0a37 asseoir[/bas,*]
    said_0a42 dormir
    said_0a45 debout[/haut,*]
)

(synonym
    acquire | carry | get | grab | grasp | obtenir | obtain | pick | prendre | saisir | take = detach | detacher | enlever | remove | retirer
)

(local
    local0 = $0000
    local1 = $0000
)

// 0a56
(instance public Room59 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $3b
        style $ffff
        horizon $0
        controls $0
        north $0
        east $0
        south $0
        west $0
        curPic $0
        picAngle $0
        vanishingX $a0
        vanishingY $8ad0
        vertAngle $0
    )
    (method (init) // method_0016
  0016:39 57            pushi 57 // $57 init
  0018:76               push0 
  0019:57 37 04         super Rm 4 

  001c:39 61            pushi 61 // $61 add
  001e:39 0c            pushi c // $c nsRight
  0020:74 0ae9          lofss $0b0c // stove
  0023:74 0b1c          lofss $0b42 // dresser
  0026:74 0b85          lofss $0bae // mirror
  0029:74 0bb8          lofss $0be4 // portrait
  002c:74 0be7          lofss $0c16 // shelf
  002f:74 0c1a          lofss $0c4c // herb1
  0032:74 0c49          lofss $0c7e // herb2
  0035:74 0caa          lofss $0ce2 // table
  0038:74 0c75          lofss $0cb0 // herb3
  003b:74 0cda          lofss $0d18 // chair1
  003e:74 0d0d          lofss $0d4e // chair2
  0041:74 0b34          lofss $0b78 // pillow
  0044:39 62            pushi 62 // $62 eachElementDo
  0046:78               push1 
  0047:39 57            pushi 57 // $57 init
  0049:39 3c            pushi 3c // $3c doit
  004b:76               push0 
  004c:81 0a              lag gAddToPics 
  004e:4a 26             send 26 

  0050:7a               push2 
  0051:38 0082          pushi 82 // $82 owner
  0054:38 03d9          pushi 3d9 // $3d9 sel_985
  0057:43 00 04         callk Load 4 

  005a:7a               push2 
  005b:38 0080          pushi 80 // $80 timeLeft
  005e:7a               push2 
  005f:43 00 04         callk Load 4 

  0062:38 0082          pushi 82 // $82 owner
  0065:76               push0 
  0066:39 43            pushi 43 // $43 at
  0068:78               push1 
  0069:39 11            pushi 11 // $11 signal
  006b:81 09              lag gInventory 
  006d:4a 06             send 6 

  006f:4a 04             send 4 

  0071:36                push 
  0072:35 3b              ldi 3b 
  0074:1a                 eq? 
  0075:31 11              bnt code_0088 
  0077:39 42            pushi 42 // $42 setPri
  0079:78               push1 
  007a:39 08            pushi 8 // $8 underBits
  007c:39 57            pushi 57 // $57 init
  007e:76               push0 
  007f:38 00c6          pushi c6 // $c6 stopUpd
  0082:76               push0 
  0083:72 0d4c          lofsa $0dd2 // carrot
  0086:4a 0e             send e 


        code_0088
  0088:38 010b          pushi 10b // $10b setFeatures
  008b:39 10            pushi 10 // $10 lsRight
  008d:74 0cbe          lofss $0d4e // chair2
  0090:74 0c4f          lofss $0ce2 // table
  0093:74 0c82          lofss $0d18 // chair1
  0096:74 0a73          lofss $0b0c // stove
  0099:74 0aa6          lofss $0b42 // dresser
  009c:74 0b0f          lofss $0bae // mirror
  009f:74 0b42          lofss $0be4 // portrait
  00a2:74 0b71          lofss $0c16 // shelf
  00a5:74 0ba4          lofss $0c4c // herb1
  00a8:74 0bd3          lofss $0c7e // herb2
  00ab:74 0c02          lofss $0cb0 // herb3
  00ae:74 0ac7          lofss $0b78 // pillow
  00b1:74 0dc2          lofss $0e76 // Window1
  00b4:74 0deb          lofss $0ea2 // Window2
  00b7:74 0e14          lofss $0ece // Rug
  00ba:74 0e3d          lofss $0efa // Bed
  00bd:54 24             self 24 

  00bf:80 00df            lag gDetailLevel 
  00c2:31 2d              bnt code_00f1 
  00c4:39 06            pushi 6 // $6 loop
  00c6:78               push1 
  00c7:39 07            pushi 7 // $7 cel
  00c9:39 42            pushi 42 // $42 setPri
  00cb:78               push1 
  00cc:39 08            pushi 8 // $8 underBits
  00ce:39 7e            pushi 7e // $7e setCycle
  00d0:78               push1 
  00d1:51 16            class Fwd 
  00d3:36                push 
  00d4:39 57            pushi 57 // $57 init
  00d6:76               push0 
  00d7:72 0d4a          lofsa $0e24 // boil
  00da:4a 16             send 16 

  00dc:39 42            pushi 42 // $42 setPri
  00de:78               push1 
  00df:39 09            pushi 9 // $9 nsTop
  00e1:39 7e            pushi 7e // $7e setCycle
  00e3:78               push1 
  00e4:51 16            class Fwd 
  00e6:36                push 
  00e7:39 57            pushi 57 // $57 init
  00e9:76               push0 
  00ea:72 0c97          lofsa $0d84 // fire
  00ed:4a 10             send 10 

  00ef:33 27              jmp code_0118 

        code_00f1
  00f1:39 42            pushi 42 // $42 setPri
  00f3:78               push1 
  00f4:39 09            pushi 9 // $9 nsTop
  00f6:39 57            pushi 57 // $57 init
  00f8:76               push0 
  00f9:38 00c6          pushi c6 // $c6 stopUpd
  00fc:76               push0 
  00fd:72 0c84          lofsa $0d84 // fire
  0100:4a 0e             send e 

  0102:39 06            pushi 6 // $6 loop
  0104:78               push1 
  0105:39 07            pushi 7 // $7 cel
  0107:39 42            pushi 42 // $42 setPri
  0109:78               push1 
  010a:39 08            pushi 8 // $8 underBits
  010c:39 57            pushi 57 // $57 init
  010e:76               push0 
  010f:38 00c6          pushi c6 // $c6 stopUpd
  0112:76               push0 
  0113:72 0d0e          lofsa $0e24 // boil
  0116:4a 14             send 14 


        code_0118
  0118:72 0d09          lofsa $0e24 // boil
  011b:a0 0175            sag global373 
  011e:88 00a5            lsg gAct 
  0121:35 02              ldi 2 
  0123:20                 ge? 
  0124:31 11              bnt code_0137 
  0126:88 00a5            lsg gAct 
  0129:35 05              ldi 5 
  012b:24                 le? 
  012c:31 09              bnt code_0137 
  012e:38 010a          pushi 10a // $10a setRegions
  0131:78               push1 
  0132:38 0106          pushi 106 // $106 east
  0135:54 06             self 6 


        code_0137
  0137:7a               push2 
  0138:38 008f          pushi 8f // $8f moveTo
  013b:38 00f3          pushi f3 // $f3 close
  013e:45 15 04         callb procedure_0015 4 // LoadMany 

  0141:7a               push2 
  0142:38 0080          pushi 80 // $80 timeLeft
  0145:38 0385          pushi 385 // $385 sel_901
  0148:43 00 04         callk Load 4 

  014b:35 02              ldi 2 
  014d:a0 00d0            sag global208 
  0150:88 00a5            lsg gAct 
  0153:3c                 dup 
  0154:35 02              ldi 2 
  0156:1a                 eq? 
  0157:31 12              bnt code_016b 
  0159:7a               push2 
  015a:38 008f          pushi 8f // $8f moveTo
  015d:38 011b          pushi 11b // $11b lower
  0160:45 15 04         callb procedure_0015 4 // LoadMany 

  0163:34 011b            ldi 11b 
  0166:a0 017a            sag global378 
  0169:33 2e              jmp code_0199 

        code_016b
  016b:3c                 dup 
  016c:35 03              ldi 3 
  016e:1a                 eq? 
  016f:31 12              bnt code_0183 
  0171:7a               push2 
  0172:38 008f          pushi 8f // $8f moveTo
  0175:38 011b          pushi 11b // $11b lower
  0178:45 15 04         callb procedure_0015 4 // LoadMany 

  017b:34 011b            ldi 11b 
  017e:a0 017a            sag global378 
  0181:33 16              jmp code_0199 

        code_0183
  0183:3c                 dup 
  0184:35 04              ldi 4 
  0186:1a                 eq? 
  0187:31 10              bnt code_0199 
  0189:7a               push2 
  018a:38 008f          pushi 8f // $8f moveTo
  018d:38 012b          pushi 12b // $12b erase
  0190:45 15 04         callb procedure_0015 4 // LoadMany 

  0193:34 012b            ldi 12b 
  0196:a0 017a            sag global378 

        code_0199
  0199:3a                toss 
  019a:88 00a5            lsg gAct 
  019d:35 05              ldi 5 
  019f:1a                 eq? 
  01a0:31 07              bnt code_01a9 
  01a2:89 76              lsg gMustDos 
  01a4:35 01              ldi 1 
  01a6:14                  or 
  01a7:a1 76              sag gMustDos 

        code_01a9
  01a9:39 05            pushi 5 // $5 view
  01ab:78               push1 
  01ac:76               push0 
  01ad:38 00c5          pushi c5 // $c5 posn
  01b0:7a               push2 
  01b1:39 73            pushi 73 // $73 seconds
  01b3:38 00a0          pushi a0 // $a0 cycleDone
  01b6:39 57            pushi 57 // $57 init
  01b8:76               push0 
  01b9:81 00              lag gEgo 
  01bb:4a 12             send 12 

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

  01c1:48                 ret 
    )

    (method (newRoom) // method_01c2
  01c2:38 00f8          pushi f8 // $f8 newRoom
  01c5:78               push1 
  01c6:8f 01              lsp param1 
  01c8:57 37 06         super Rm 6 

  01cb:48                 ret 
    )

    (method (doit) // method_01cc
  01cc:76               push0 
  01cd:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  01d0:31 0a              bnt code_01dc 
  01d2:7a               push2 
  01d3:39 3b            pushi 3b // $3b mover
  01d5:76               push0 
  01d6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_01dc
  01dc:38 00db          pushi db // $db onControl
  01df:78               push1 
  01e0:76               push0 
  01e1:81 00              lag gEgo 
  01e3:4a 06             send 6 

  01e5:36                push 
  01e6:35 02              ldi 2 
  01e8:12                 and 
  01e9:31 0a              bnt code_01f5 
  01eb:38 00f8          pushi f8 // $f8 newRoom
  01ee:78               push1 
  01ef:39 06            pushi 6 // $6 loop
  01f1:81 02              lag gCurRoom 
  01f3:4a 06             send 6 


        code_01f5
  01f5:39 3c            pushi 3c // $3c doit
  01f7:76               push0 
  01f8:57 37 04         super Rm 4 

  01fb:48                 ret 
    )

    (method (dispose) // method_01fc
  01fc:78               push1 
  01fd:38 03d9          pushi 3d9 // $3d9 sel_985
  0200:43 03 02         callk DisposeScript 2 

  0203:35 01              ldi 1 
  0205:a1 6c              sag global108 
  0207:39 58            pushi 58 // $58 dispose
  0209:76               push0 
  020a:57 37 04         super Rm 4 

  020d:48                 ret 
    )

    (method (handleEvent) // method_020e
  020e:39 4c            pushi 4c // $4c claimed
  0210:76               push0 
  0211:87 01              lap param1 
  0213:4a 04             send 4 

  0215:31 03              bnt code_021a 
  0217:35 01              ldi 1 
  0219:48                 ret 

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

  0221:36                push 
  0222:34 0080            ldi 80 
  0225:1a                 eq? 
  0226:30 01b7            bnt code_03e0 
  0229:80 00d0            lag global208 
  022c:31 34              bnt code_0262 
  022e:78               push1 
  022f:74 06de          lofss $0910 // ask,raconter,hold,deliver,look,get,abattre,embrasser,embrace,draguer>
  0232:43 25 02         callk Said 2 

  0235:31 2b              bnt code_0262 
  0237:78               push1 
  0238:38 03de          pushi 3de // $3de sel_990
  023b:43 03 02         callk DisposeScript 2 

  023e:39 7a            pushi 7a // $7a setScript
  0240:78               push1 
  0241:7a               push2 
  0242:38 00f3          pushi f3 // $f3 close
  0245:76               push0 
  0246:43 02 04         callk ScriptID 4 

  0249:36                push 
  024a:54 06             self 6 

  024c:39 6f            pushi 6f // $6f handleEvent
  024e:78               push1 
  024f:8f 01              lsp param1 
  0251:39 76            pushi 76 // $76 script
  0253:76               push0 
  0254:54 04             self 4 

  0256:4a 06             send 6 

  0258:39 4c            pushi 4c // $4c claimed
  025a:76               push0 
  025b:87 01              lap param1 
  025d:4a 04             send 4 

  025f:31 01              bnt code_0262 
  0261:48                 ret 

        code_0262
  0262:78               push1 
  0263:74 07b9          lofss $0a1f // look>
  0266:43 25 02         callk Said 2 

  0269:30 0094            bnt code_0300 
  026c:78               push1 
  026d:74 0692          lofss $0902 // [<around,at][/room]
  0270:43 25 02         callk Said 2 

  0273:31 0c              bnt code_0281 
  0275:7a               push2 
  0276:39 3b            pushi 3b // $3b mover
  0278:76               push0 
  0279:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  027f:33 7c              jmp code_02fd 

        code_0281
  0281:78               push1 
  0282:74 066d          lofss $08f2 // /painting
  0285:43 25 02         callk Said 2 

  0288:31 0c              bnt code_0296 
  028a:7a               push2 
  028b:39 3b            pushi 3b // $3b mover
  028d:78               push1 
  028e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0294:33 67              jmp code_02fd 

        code_0296
  0296:78               push1 
  0297:74 065c          lofss $08f6 // /mur
  029a:43 25 02         callk Said 2 

  029d:31 0c              bnt code_02ab 
  029f:7a               push2 
  02a0:39 3b            pushi 3b // $3b mover
  02a2:7a               push2 
  02a3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02a9:33 52              jmp code_02fd 

        code_02ab
  02ab:78               push1 
  02ac:74 063b          lofss $08ea // /curtain
  02af:43 25 02         callk Said 2 

  02b2:31 0d              bnt code_02c1 
  02b4:7a               push2 
  02b5:39 3b            pushi 3b // $3b mover
  02b7:39 03            pushi 3 // $3 y
  02b9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02bf:33 3c              jmp code_02fd 

        code_02c1
  02c1:78               push1 
  02c2:74 0621          lofss $08e6 // /ceiling
  02c5:43 25 02         callk Said 2 

  02c8:2f 09               bt code_02d3 
  02ca:78               push1 
  02cb:74 0630          lofss $08fe // <haut
  02ce:43 25 02         callk Said 2 

  02d1:31 0d              bnt code_02e0 

        code_02d3
  02d3:7a               push2 
  02d4:39 3b            pushi 3b // $3b mover
  02d6:39 04            pushi 4 // $4 x
  02d8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02de:33 1d              jmp code_02fd 

        code_02e0
  02e0:78               push1 
  02e1:74 060a          lofss $08ee // /dirt
  02e4:43 25 02         callk Said 2 

  02e7:2f 09               bt code_02f2 
  02e9:78               push1 
  02ea:74 060d          lofss $08fa // <bas
  02ed:43 25 02         callk Said 2 

  02f0:31 0b              bnt code_02fd 

        code_02f2
  02f2:7a               push2 
  02f3:39 3b            pushi 3b // $3b mover
  02f5:39 05            pushi 5 // $5 view
  02f7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_02fd
  02fd:32 00e0            jmp code_03e0 

        code_0300
  0300:78               push1 
  0301:74 0671          lofss $0975 // get/painting
  0304:43 25 02         callk Said 2 

  0307:31 0e              bnt code_0317 
  0309:7a               push2 
  030a:39 3b            pushi 3b // $3b mover
  030c:39 06            pushi 6 // $6 loop
  030e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0314:32 00c9            jmp code_03e0 

        code_0317
  0317:78               push1 
  0318:74 064e          lofss $0969 // get/gumbo
  031b:43 25 02         callk Said 2 

  031e:2f 09               bt code_0329 
  0320:78               push1 
  0321:74 061f          lofss $0943 // avaler[/gumbo,aliments]
  0324:43 25 02         callk Said 2 

  0327:31 0e              bnt code_0337 

        code_0329
  0329:7a               push2 
  032a:39 3b            pushi 3b // $3b mover
  032c:39 07            pushi 7 // $7 cel
  032e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0334:32 00a9            jmp code_03e0 

        code_0337
  0337:78               push1 
  0338:74 06fc          lofss $0a37 // asseoir[/bas,*]
  033b:43 25 02         callk Said 2 

  033e:31 43              bnt code_0383 
  0340:38 00da          pushi da // $da inRect
  0343:39 04            pushi 4 // $4 x
  0345:38 00b4          pushi b4 // $b4 escaping
  0348:38 0091          pushi 91 // $91 isType
  034b:38 00de          pushi de // $de horizon
  034e:38 00b9          pushi b9 // $b9 nonBumps
  0351:81 00              lag gEgo 
  0353:4a 0c             send c 

  0355:31 26              bnt code_037d 
  0357:83 00              lal local0 
  0359:18                 not 
  035a:31 14              bnt code_0370 
  035c:35 01              ldi 1 
  035e:a3 00              sal local0 
  0360:76               push0 
  0361:45 03 00         callb procedure_0003 0 // HandsOff 

  0364:39 7a            pushi 7a // $7a setScript
  0366:78               push1 
  0367:74 0742          lofss $0aac // sitDown
  036a:81 00              lag gEgo 
  036c:4a 06             send 6 

  036e:33 0b              jmp code_037b 

        code_0370
  0370:7a               push2 
  0371:39 3b            pushi 3b // $3b mover
  0373:39 08            pushi 8 // $8 underBits
  0375:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_037b
  037b:33 04              jmp code_0381 

        code_037d
  037d:76               push0 
  037e:45 09 00         callb procedure_0009 0 // NotClose 


        code_0381
  0381:33 5d              jmp code_03e0 

        code_0383
  0383:78               push1 
  0384:74 06be          lofss $0a45 // debout[/haut,*]
  0387:43 25 02         callk Said 2 

  038a:31 25              bnt code_03b1 
  038c:83 00              lal local0 
  038e:31 14              bnt code_03a4 
  0390:35 00              ldi 0 
  0392:a3 00              sal local0 
  0394:76               push0 
  0395:45 03 00         callb procedure_0003 0 // HandsOff 

  0398:39 7a            pushi 7a // $7a setScript
  039a:78               push1 
  039b:74 073e          lofss $0adc // standUp
  039e:81 00              lag gEgo 
  03a0:4a 06             send 6 

  03a2:33 0b              jmp code_03af 

        code_03a4
  03a4:7a               push2 
  03a5:39 3b            pushi 3b // $3b mover
  03a7:39 09            pushi 9 // $9 nsTop
  03a9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03af
  03af:33 2f              jmp code_03e0 

        code_03b1
  03b1:78               push1 
  03b2:74 05c6          lofss $097b // aller/bed,dormir
  03b5:43 25 02         callk Said 2 

  03b8:2f 1b               bt code_03d5 
  03ba:78               push1 
  03bb:74 0684          lofss $0a42 // dormir
  03be:43 25 02         callk Said 2 

  03c1:2f 12               bt code_03d5 
  03c3:78               push1 
  03c4:74 05c6          lofss $098d // lay<bas
  03c7:43 25 02         callk Said 2 

  03ca:2f 09               bt code_03d5 
  03cc:78               push1 
  03cd:74 05b4          lofss $0984 // lay/bed<bas
  03d0:43 25 02         callk Said 2 

  03d3:31 0b              bnt code_03e0 

        code_03d5
  03d5:7a               push2 
  03d6:39 3b            pushi 3b // $3b mover
  03d8:39 0a            pushi a // $a nsLeft
  03da:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03e0
  03e0:48                 ret 
    )

)

// 0aa6
(instance sitDown 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_03e1
  03e1:87 01              lap param1 
  03e3:65 0a             aTop state 
  03e5:36                push 
  03e6:3c                 dup 
  03e7:35 00              ldi 0 
  03e9:1a                 eq? 
  03ea:31 21              bnt code_040d 
  03ec:38 00d4          pushi d4 // $d4 setAvoider
  03ef:78               push1 
  03f0:39 56            pushi 56 // $56 new
  03f2:76               push0 
  03f3:51 21            class Avoid 
  03f5:4a 04             send 4 

  03f7:36                push 
  03f8:38 00d3          pushi d3 // $d3 setMotion
  03fb:39 04            pushi 4 // $4 x
  03fd:51 1d            class MoveTo 
  03ff:36                push 
  0400:38 00ca          pushi ca // $ca show
  0403:38 00a5          pushi a5 // $a5 cycler
  0406:7c            pushSelf 
  0407:81 00              lag gEgo 
  0409:4a 12             send 12 

  040b:33 3b              jmp code_0448 

        code_040d
  040d:3c                 dup 
  040e:35 01              ldi 1 
  0410:1a                 eq? 
  0411:31 1e              bnt code_0431 
  0413:39 05            pushi 5 // $5 view
  0415:78               push1 
  0416:7a               push2 
  0417:39 42            pushi 42 // $42 setPri
  0419:78               push1 
  041a:39 0d            pushi d // $d lsTop
  041c:39 06            pushi 6 // $6 loop
  041e:78               push1 
  041f:7a               push2 
  0420:39 07            pushi 7 // $7 cel
  0422:78               push1 
  0423:76               push0 
  0424:39 7e            pushi 7e // $7e setCycle
  0426:7a               push2 
  0427:51 1a            class End 
  0429:36                push 
  042a:7c            pushSelf 
  042b:81 00              lag gEgo 
  042d:4a 20             send 20 

  042f:33 17              jmp code_0448 

        code_0431
  0431:3c                 dup 
  0432:35 02              ldi 2 
  0434:1a                 eq? 
  0435:31 11              bnt code_0448 
  0437:38 00e2          pushi e2 // $e2 canInput
  043a:78               push1 
  043b:78               push1 
  043c:51 2b            class User 
  043e:4a 06             send 6 

  0440:39 7a            pushi 7a // $7a setScript
  0442:78               push1 
  0443:76               push0 
  0444:63 08             pToa client 
  0446:4a 06             send 6 


        code_0448
  0448:3a                toss 
  0449:48                 ret 
    )

)

// 0ad6
(instance standUp 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_044a
  044a:87 01              lap param1 
  044c:65 0a             aTop state 
  044e:36                push 
  044f:3c                 dup 
  0450:35 00              ldi 0 
  0452:1a                 eq? 
  0453:31 17              bnt code_046c 
  0455:38 00d4          pushi d4 // $d4 setAvoider
  0458:78               push1 
  0459:76               push0 
  045a:39 42            pushi 42 // $42 setPri
  045c:78               push1 
  045d:39 ff            pushi ff // $ff checkAni
  045f:39 7e            pushi 7e // $7e setCycle
  0461:7a               push2 
  0462:51 1b            class Beg 
  0464:36                push 
  0465:7c            pushSelf 
  0466:81 00              lag gEgo 
  0468:4a 14             send 14 

  046a:33 25              jmp code_0491 

        code_046c
  046c:3c                 dup 
  046d:35 01              ldi 1 
  046f:1a                 eq? 
  0470:31 1f              bnt code_0491 
  0472:39 05            pushi 5 // $5 view
  0474:78               push1 
  0475:76               push0 
  0476:39 06            pushi 6 // $6 loop
  0478:78               push1 
  0479:39 03            pushi 3 // $3 y
  047b:39 7e            pushi 7e // $7e setCycle
  047d:78               push1 
  047e:51 17            class Walk 
  0480:36                push 
  0481:81 00              lag gEgo 
  0483:4a 12             send 12 

  0485:76               push0 
  0486:45 04 00         callb procedure_0004 0 // HandsOn 

  0489:39 7a            pushi 7a // $7a setScript
  048b:78               push1 
  048c:76               push0 
  048d:63 08             pToa client 
  048f:4a 06             send 6 


        code_0491
  0491:3a                toss 
  0492:48                 ret 
    )

)

// 0b06
(instance stove of RPicView
    (properties
        y $7f
        x $d4
        z $0
        heading $0
        view $9f
        loop $0
        cel $0
        priority $8
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0493
  0493:39 03            pushi 3 // $3 y
  0495:7c            pushSelf 
  0496:8f 01              lsp param1 
  0498:39 03            pushi 3 // $3 y
  049a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  04a0:2f 09               bt code_04ab 
  04a2:78               push1 
  04a3:74 0532          lofss $09d8 // look/cuisiniere
  04a6:43 25 02         callk Said 2 

  04a9:31 15              bnt code_04c0 

        code_04ab
  04ab:39 4c            pushi 4c // $4c claimed
  04ad:78               push1 
  04ae:78               push1 
  04af:87 01              lap param1 
  04b1:4a 06             send 6 

  04b3:7a               push2 
  04b4:39 3b            pushi 3b // $3b mover
  04b6:39 0b            pushi b // $b nsBottom
  04b8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04be:33 14              jmp code_04d4 

        code_04c0
  04c0:78               push1 
  04c1:74 04ff          lofss $09c3 // look/buche,arbre
  04c4:43 25 02         callk Said 2 

  04c7:31 0b              bnt code_04d4 
  04c9:7a               push2 
  04ca:39 3b            pushi 3b // $3b mover
  04cc:39 0c            pushi c // $c nsRight
  04ce:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_04d4
  04d4:48                 ret 
    )

)

// 0b3c
(instance dresser of RPicView
    (properties
        y $98
        x $39
        z $0
        heading $0
        view $9f
        loop $1
        cel $0
        priority $b
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_04d5
  04d5:78               push1 
  04d6:74 03f9          lofss $08d2 // (look<dans),chercher,open/commode,drawer
  04d9:43 25 02         callk Said 2 

  04dc:31 0d              bnt code_04eb 
  04de:7a               push2 
  04df:39 3b            pushi 3b // $3b mover
  04e1:39 0d            pushi d // $d lsTop
  04e3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04e9:33 2b              jmp code_0516 

        code_04eb
  04eb:39 03            pushi 3 // $3 y
  04ed:7c            pushSelf 
  04ee:8f 01              lsp param1 
  04f0:39 03            pushi 3 // $3 y
  04f2:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  04f8:2f 09               bt code_0503 
  04fa:78               push1 
  04fb:74 04bf          lofss $09bd // look/commode
  04fe:43 25 02         callk Said 2 

  0501:31 13              bnt code_0516 

        code_0503
  0503:39 4c            pushi 4c // $4c claimed
  0505:78               push1 
  0506:78               push1 
  0507:87 01              lap param1 
  0509:4a 06             send 6 

  050b:7a               push2 
  050c:39 3b            pushi 3b // $3b mover
  050e:39 0e            pushi e // $e lsLeft
  0510:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0516
  0516:48                 ret 
    )

)

// 0b72
(instance pillow of RPicView
    (properties
        y $66
        x $a0
        z $0
        heading $0
        view $9f
        loop $2
        cel $0
        priority $6
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0517
  0517:78               push1 
  0518:74 04f2          lofss $0a0d // look<below/oreiller
  051b:43 25 02         callk Said 2 

  051e:31 0d              bnt code_052d 
  0520:7a               push2 
  0521:39 3b            pushi 3b // $3b mover
  0523:39 0f            pushi f // $f lsBottom
  0525:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  052b:33 2b              jmp code_0558 

        code_052d
  052d:39 03            pushi 3 // $3 y
  052f:7c            pushSelf 
  0530:8f 01              lsp param1 
  0532:39 03            pushi 3 // $3 y
  0534:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  053a:2f 09               bt code_0545 
  053c:78               push1 
  053d:74 049e          lofss $09de // look/oreiller
  0540:43 25 02         callk Said 2 

  0543:31 13              bnt code_0558 

        code_0545
  0545:39 4c            pushi 4c // $4c claimed
  0547:78               push1 
  0548:78               push1 
  0549:87 01              lap param1 
  054b:4a 06             send 6 

  054d:7a               push2 
  054e:39 3b            pushi 3b // $3b mover
  0550:39 10            pushi 10 // $10 lsRight
  0552:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0558
  0558:48                 ret 
    )

)

// 0ba8
(instance mirror of RPicView
    (properties
        y $6a
        x $31
        z $0
        heading $0
        view $9f
        loop $1
        cel $1
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0559
  0559:78               push1 
  055a:74 0412          lofss $096f // get/miroir
  055d:43 25 02         callk Said 2 

  0560:31 0d              bnt code_056f 
  0562:7a               push2 
  0563:39 3b            pushi 3b // $3b mover
  0565:39 11            pushi 11 // $11 signal
  0567:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  056d:33 65              jmp code_05d4 

        code_056f
  056f:78               push1 
  0570:74 04a3          lofss $0a16 // look<dans/miroir
  0573:43 25 02         callk Said 2 

  0576:2f 09               bt code_0581 
  0578:78               push1 
  0579:74 0468          lofss $09e4 // look/reflection
  057c:43 25 02         callk Said 2 

  057f:31 28              bnt code_05a9 

        code_0581
  0581:38 00ae          pushi ae // $ae distanceTo
  0584:78               push1 
  0585:74 0626          lofss $0bae // mirror
  0588:81 00              lag gEgo 
  058a:4a 06             send 6 

  058c:36                push 
  058d:35 32              ldi 32 
  058f:22                 lt? 
  0590:31 11              bnt code_05a3 
  0592:35 0c              ldi c 
  0594:a0 00d5            sag global213 
  0597:39 03            pushi 3 // $3 y
  0599:76               push0 
  059a:39 3b            pushi 3b // $3b mover
  059c:39 12            pushi 12 // $12 illegalBits
  059e:45 01 06         callb procedure_0001 6 // Say 

  05a1:33 04              jmp code_05a7 

        code_05a3
  05a3:76               push0 
  05a4:45 09 00         callb procedure_0009 0 // NotClose 


        code_05a7
  05a7:33 2b              jmp code_05d4 

        code_05a9
  05a9:39 03            pushi 3 // $3 y
  05ab:7c            pushSelf 
  05ac:8f 01              lsp param1 
  05ae:39 03            pushi 3 // $3 y
  05b0:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  05b6:2f 09               bt code_05c1 
  05b8:78               push1 
  05b9:74 0410          lofss $09cc // look/miroir
  05bc:43 25 02         callk Said 2 

  05bf:31 13              bnt code_05d4 

        code_05c1
  05c1:39 4c            pushi 4c // $4c claimed
  05c3:78               push1 
  05c4:78               push1 
  05c5:87 01              lap param1 
  05c7:4a 06             send 6 

  05c9:7a               push2 
  05ca:39 3b            pushi 3b // $3b mover
  05cc:39 13            pushi 13 // $13 brTop
  05ce:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_05d4
  05d4:48                 ret 
    )

)

// 0bde
(instance portrait of RPicView
    (properties
        y $63
        x $4f
        z $0
        heading $0
        view $9f
        loop $1
        cel $2
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
)

// 0c10
(instance shelf of RPicView
    (properties
        y $60
        x $ff
        z $0
        heading $0
        view $9f
        loop $4
        cel $0
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_05d5
  05d5:78               push1 
  05d6:74 0375          lofss $094e // get/bottle
  05d9:43 25 02         callk Said 2 

  05dc:31 0d              bnt code_05eb 
  05de:7a               push2 
  05df:39 3b            pushi 3b // $3b mover
  05e1:39 14            pushi 14 // $14 brLeft
  05e3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05e9:33 41              jmp code_062c 

        code_05eb
  05eb:78               push1 
  05ec:74 03aa          lofss $0999 // look/bottle
  05ef:43 25 02         callk Said 2 

  05f2:31 0d              bnt code_0601 
  05f4:7a               push2 
  05f5:39 3b            pushi 3b // $3b mover
  05f7:39 15            pushi 15 // $15 brBottom
  05f9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05ff:33 2b              jmp code_062c 

        code_0601
  0601:39 03            pushi 3 // $3 y
  0603:7c            pushSelf 
  0604:8f 01              lsp param1 
  0606:39 03            pushi 3 // $3 y
  0608:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  060e:2f 09               bt code_0619 
  0610:78               push1 
  0611:74 03d6          lofss $09ea // look/etagere
  0614:43 25 02         callk Said 2 

  0617:31 13              bnt code_062c 

        code_0619
  0619:39 4c            pushi 4c // $4c claimed
  061b:78               push1 
  061c:78               push1 
  061d:87 01              lap param1 
  061f:4a 06             send 6 

  0621:7a               push2 
  0622:39 3b            pushi 3b // $3b mover
  0624:39 16            pushi 16 // $16 brRight
  0626:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_062c
  062c:48                 ret 
    )

)

// 0c46
(instance herb1 of RPicView
    (properties
        y $64
        x $e7
        z $0
        heading $0
        view $9f
        loop $2
        cel $3
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
)

// 0c78
(instance herb2 of RPicView
    (properties
        y $68
        x $f7
        z $0
        heading $0
        view $9f
        loop $2
        cel $4
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
)

// 0caa
(instance herb3 of RPicView
    (properties
        y $6b
        x $10c
        z $0
        heading $0
        view $9f
        loop $2
        cel $5
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
)

// 0cdc
(instance table of RPicView
    (properties
        y $89
        x $101
        z $0
        heading $0
        view $9f
        loop $1
        cel $3
        priority $8
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_062d
  062d:39 03            pushi 3 // $3 y
  062f:7c            pushSelf 
  0630:8f 01              lsp param1 
  0632:39 03            pushi 3 // $3 y
  0634:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  063a:2f 09               bt code_0645 
  063c:78               push1 
  063d:74 0392          lofss $09d2 // look/nightstand
  0640:43 25 02         callk Said 2 

  0643:31 35              bnt code_067a 

        code_0645
  0645:39 4c            pushi 4c // $4c claimed
  0647:78               push1 
  0648:78               push1 
  0649:87 01              lap param1 
  064b:4a 06             send 6 

  064d:38 0082          pushi 82 // $82 owner
  0650:76               push0 
  0651:39 43            pushi 43 // $43 at
  0653:78               push1 
  0654:39 11            pushi 11 // $11 signal
  0656:81 09              lag gInventory 
  0658:4a 06             send 6 

  065a:4a 04             send 4 

  065c:36                push 
  065d:35 3b              ldi 3b 
  065f:1a                 eq? 
  0660:31 0d              bnt code_066f 
  0662:7a               push2 
  0663:39 3b            pushi 3b // $3b mover
  0665:39 17            pushi 17 // $17 name
  0667:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  066d:33 0b              jmp code_067a 

        code_066f
  066f:7a               push2 
  0670:39 3b            pushi 3b // $3b mover
  0672:39 18            pushi 18 // $18 key
  0674:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_067a
  067a:48                 ret 
    )

)

// 0d12
(instance chair1 of RPicView
    (properties
        y $8c
        x $e0
        z $0
        heading $0
        view $9f
        loop $0
        cel $2
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_067b
  067b:39 03            pushi 3 // $3 y
  067d:7c            pushSelf 
  067e:8f 01              lsp param1 
  0680:39 03            pushi 3 // $3 y
  0682:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0688:31 13              bnt code_069d 
  068a:39 4c            pushi 4c // $4c claimed
  068c:78               push1 
  068d:78               push1 
  068e:87 01              lap param1 
  0690:4a 06             send 6 

  0692:7a               push2 
  0693:39 3b            pushi 3b // $3b mover
  0695:39 19            pushi 19 // $19 time
  0697:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_069d
  069d:48                 ret 
    )

)

// 0d48
(instance chair2 of RPicView
    (properties
        y $ac
        x $c2
        z $0
        heading $0
        view $9f
        loop $0
        cel $1
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_069e
  069e:39 03            pushi 3 // $3 y
  06a0:7c            pushSelf 
  06a1:8f 01              lsp param1 
  06a3:39 03            pushi 3 // $3 y
  06a5:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  06ab:2f 09               bt code_06b6 
  06ad:78               push1 
  06ae:74 0306          lofss $09b7 // look/chair
  06b1:43 25 02         callk Said 2 

  06b4:31 13              bnt code_06c9 

        code_06b6
  06b6:39 4c            pushi 4c // $4c claimed
  06b8:78               push1 
  06b9:78               push1 
  06ba:87 01              lap param1 
  06bc:4a 06             send 6 

  06be:7a               push2 
  06bf:39 3b            pushi 3b // $3b mover
  06c1:39 19            pushi 19 // $19 time
  06c3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_06c9
  06c9:48                 ret 
    )

)

// 0d7e
(instance fire of Prop
    (properties
        y $6f
        x $ce
        z $0
        heading $0
        yStep $2
        view $9f
        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
    )
)

// 0dcc
(instance carrot of Prop
    (properties
        y $69
        x $f2
        z $0
        heading $0
        yStep $2
        view $9f
        loop $2
        cel $6
        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_06ca
  06ca:78               push1 
  06cb:74 0261          lofss $092f // ask[/celie]/carotte<for
  06ce:43 25 02         callk Said 2 

  06d1:31 13              bnt code_06e6 
  06d3:35 02              ldi 2 
  06d5:a0 00d5            sag global213 
  06d8:39 03            pushi 3 // $3 y
  06da:78               push1 
  06db:39 3b            pushi 3b // $3b mover
  06dd:39 1a            pushi 1a // $1a text
  06df:45 01 06         callb procedure_0001 6 // Say 

  06e2:c3 01              +al local1 
  06e4:33 7a              jmp code_0760 

        code_06e6
  06e6:78               push1 
  06e7:74 0279          lofss $0963 // get/carotte
  06ea:43 25 02         callk Said 2 

  06ed:31 46              bnt code_0735 
  06ef:38 00ae          pushi ae // $ae distanceTo
  06f2:78               push1 
  06f3:74 06dc          lofss $0dd2 // carrot
  06f6:81 00              lag gEgo 
  06f8:4a 06             send 6 

  06fa:36                push 
  06fb:35 28              ldi 28 
  06fd:22                 lt? 
  06fe:31 2f              bnt code_072f 
  0700:83 01              lal local1 
  0702:18                 not 
  0703:31 0d              bnt code_0712 
  0705:7a               push2 
  0706:39 3b            pushi 3b // $3b mover
  0708:39 1b            pushi 1b // $1b elements
  070a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0710:33 04              jmp code_0716 

        code_0712
  0712:76               push0 
  0713:45 16 00         callb procedure_0016 0 // Ok 


        code_0716
  0716:39 58            pushi 58 // $58 dispose
  0718:76               push0 
  0719:72 06b6          lofsa $0dd2 // carrot
  071c:4a 04             send 4 

  071e:35 01              ldi 1 
  0720:a0 00b6            sag global182 
  0723:38 00ec          pushi ec // $ec get
  0726:78               push1 
  0727:39 11            pushi 11 // $11 signal
  0729:81 00              lag gEgo 
  072b:4a 06             send 6 

  072d:33 04              jmp code_0733 

        code_072f
  072f:76               push0 
  0730:45 09 00         callb procedure_0009 0 // NotClose 


        code_0733
  0733:33 2b              jmp code_0760 

        code_0735
  0735:39 03            pushi 3 // $3 y
  0737:7c            pushSelf 
  0738:8f 01              lsp param1 
  073a:39 03            pushi 3 // $3 y
  073c:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0742:2f 09               bt code_074d 
  0744:78               push1 
  0745:74 0269          lofss $09b1 // look/carotte
  0748:43 25 02         callk Said 2 

  074b:31 13              bnt code_0760 

        code_074d
  074d:39 4c            pushi 4c // $4c claimed
  074f:78               push1 
  0750:78               push1 
  0751:87 01              lap param1 
  0753:4a 06             send 6 

  0755:7a               push2 
  0756:39 3b            pushi 3b // $3b mover
  0758:39 17            pushi 17 // $17 name
  075a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0760
  0760:48                 ret 
    )

)

// 0e1e
(instance boil of Prop
    (properties
        y $5e
        x $cd
        z $0
        heading $0
        yStep $2
        view $9f
        loop $7
        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_0761
  0761:78               push1 
  0762:74 01f5          lofss $095a // get/caldron,gumbo
  0765:43 25 02         callk Said 2 

  0768:31 0d              bnt code_0777 
  076a:7a               push2 
  076b:39 3b            pushi 3b // $3b mover
  076d:39 07            pushi 7 // $7 cel
  076f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0775:33 41              jmp code_07b8 

        code_0777
  0777:78               push1 
  0778:74 01d9          lofss $0954 // get/caldron
  077b:43 25 02         callk Said 2 

  077e:31 0d              bnt code_078d 
  0780:7a               push2 
  0781:39 3b            pushi 3b // $3b mover
  0783:39 07            pushi 7 // $7 cel
  0785:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  078b:33 2b              jmp code_07b8 

        code_078d
  078d:39 03            pushi 3 // $3 y
  078f:7c            pushSelf 
  0790:8f 01              lsp param1 
  0792:39 03            pushi 3 // $3 y
  0794:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  079a:2f 09               bt code_07a5 
  079c:78               push1 
  079d:74 01ff          lofss $099f // look/caldron,pan,gumbo
  07a0:43 25 02         callk Said 2 

  07a3:31 13              bnt code_07b8 

        code_07a5
  07a5:39 4c            pushi 4c // $4c claimed
  07a7:78               push1 
  07a8:78               push1 
  07a9:87 01              lap param1 
  07ab:4a 06             send 6 

  07ad:7a               push2 
  07ae:39 3b            pushi 3b // $3b mover
  07b0:39 1c            pushi 1c // $1c color
  07b2:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_07b8
  07b8:48                 ret 
    )

)

// 0e70
(instance Window1 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $3a
        nsLeft $63
        nsBottom $55
        nsRight $85
    )
    (method (handleEvent) // method_07b9
  07b9:78               push1 
  07ba:74 0274          lofss $0a31 // open/fenetre
  07bd:43 25 02         callk Said 2 

  07c0:31 0d              bnt code_07cf 
  07c2:7a               push2 
  07c3:39 3b            pushi 3b // $3b mover
  07c5:39 1d            pushi 1d // $1d back
  07c7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  07cd:33 57              jmp code_0826 

        code_07cf
  07cf:78               push1 
  07d0:74 016a          lofss $093d // break/fenetre
  07d3:43 25 02         callk Said 2 

  07d6:31 0d              bnt code_07e5 
  07d8:7a               push2 
  07d9:39 3b            pushi 3b // $3b mover
  07db:39 1e            pushi 1e // $1e mode
  07dd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  07e3:33 41              jmp code_0826 

        code_07e5
  07e5:78               push1 
  07e6:74 020d          lofss $09f6 // look<(exterieur,through)/fenetre
  07e9:43 25 02         callk Said 2 

  07ec:31 0d              bnt code_07fb 
  07ee:7a               push2 
  07ef:39 3b            pushi 3b // $3b mover
  07f1:39 1f            pushi 1f // $1f style
  07f3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  07f9:33 2b              jmp code_0826 

        code_07fb
  07fb:39 03            pushi 3 // $3 y
  07fd:7c            pushSelf 
  07fe:8f 01              lsp param1 
  0800:39 03            pushi 3 // $3 y
  0802:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0808:2f 09               bt code_0813 
  080a:78               push1 
  080b:74 01e2          lofss $09f0 // look/fenetre
  080e:43 25 02         callk Said 2 

  0811:31 13              bnt code_0826 

        code_0813
  0813:39 4c            pushi 4c // $4c claimed
  0815:78               push1 
  0816:78               push1 
  0817:87 01              lap param1 
  0819:4a 06             send 6 

  081b:7a               push2 
  081c:39 3b            pushi 3b // $3b mover
  081e:39 20            pushi 20 // $20 state
  0820:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0826
  0826:48                 ret 
    )

)

// 0e9c
(instance Window2 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $31
        nsLeft $f
        nsBottom $51
        nsRight $be
    )
    (method (handleEvent) // method_0827
  0827:39 03            pushi 3 // $3 y
  0829:7c            pushSelf 
  082a:8f 01              lsp param1 
  082c:39 03            pushi 3 // $3 y
  082e:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0834:31 13              bnt code_0849 
  0836:39 4c            pushi 4c // $4c claimed
  0838:78               push1 
  0839:78               push1 
  083a:87 01              lap param1 
  083c:4a 06             send 6 

  083e:7a               push2 
  083f:39 3b            pushi 3b // $3b mover
  0841:39 20            pushi 20 // $20 state
  0843:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0849
  0849:48                 ret 
    )

)

// 0ec8
(instance Rug of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $93
        nsLeft $6d
        nsBottom $a2
        nsRight $a0
    )
    (method (handleEvent) // method_084a
  084a:78               push1 
  084b:74 01d5          lofss $0a23 // bouger,(look<below)/carpet
  084e:43 25 02         callk Said 2 

  0851:31 0d              bnt code_0860 
  0853:7a               push2 
  0854:39 3b            pushi 3b // $3b mover
  0856:39 21            pushi 21 // $21 font
  0858:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  085e:33 2b              jmp code_088b 

        code_0860
  0860:39 03            pushi 3 // $3 y
  0862:7c            pushSelf 
  0863:8f 01              lsp param1 
  0865:39 03            pushi 3 // $3 y
  0867:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  086d:2f 09               bt code_0878 
  086f:78               push1 
  0870:74 0138          lofss $09ab // look/carpet
  0873:43 25 02         callk Said 2 

  0876:31 13              bnt code_088b 

        code_0878
  0878:39 4c            pushi 4c // $4c claimed
  087a:78               push1 
  087b:78               push1 
  087c:87 01              lap param1 
  087e:4a 06             send 6 

  0880:7a               push2 
  0881:39 3b            pushi 3b // $3b mover
  0883:39 22            pushi 22 // $22 type
  0885:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_088b
  088b:48                 ret 
    )

)

// 0ef4
(instance Bed of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $6a
        nsLeft $60
        nsBottom $84
        nsRight $94
    )
    (method (handleEvent) // method_088c
  088c:78               push1 
  088d:74 0174          lofss $0a04 // look<below/bed
  0890:43 25 02         callk Said 2 

  0893:31 0d              bnt code_08a2 
  0895:7a               push2 
  0896:39 3b            pushi 3b // $3b mover
  0898:39 23            pushi 23 // $23 window
  089a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  08a0:33 2b              jmp code_08cd 

        code_08a2
  08a2:39 03            pushi 3 // $3 y
  08a4:7c            pushSelf 
  08a5:8f 01              lsp param1 
  08a7:39 03            pushi 3 // $3 y
  08a9:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  08af:2f 09               bt code_08ba 
  08b1:78               push1 
  08b2:74 00de          lofss $0993 // look/bed
  08b5:43 25 02         callk Said 2 

  08b8:31 13              bnt code_08cd 

        code_08ba
  08ba:39 4c            pushi 4c // $4c claimed
  08bc:78               push1 
  08bd:78               push1 
  08be:87 01              lap param1 
  08c0:4a 06             send 6 

  08c2:7a               push2 
  08c3:39 3b            pushi 3b // $3b mover
  08c5:39 24            pushi 24 // $24 cursor
  08c7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_08cd
  08cd:48                 ret 
    )

)



