(script 73)

(string
    string_17ae "Cabinet"
    string_17b6 "Lilian"
    string_17bd "Mirror"
    string_17c4 "Room73"
    string_17cb "Window1"
    string_17d3 "basket"
    string_17da "bathtub"
    string_17e2 "bra"
    string_17e6 "flushing"
    string_17ef "mySound"
    string_17f7 "perfume"
    string_17ff "pickUp"
    string_1806 "rope"
    string_180b "settie"
    string_1812 "shower"
    string_1819 "sink"
    string_181e "toilet"
    string_1825 "towel"
    string_182b "wash"
    string_1830 "window"
    string_1837 ""
)

(said
    said_1134 (etudier,look)<actionner<monocle/bottle,etiquette
    said_1148 /bottle>
    said_114d /chair,banc
    said_1154 /curtain<douche
    said_115b /door
    said_115f /savon
    said_1163 [<around,at][/room]
    said_1171 boire
    said_1174 boire/eau[<evier,douche]
    said_1182 flush,attirer/chain,toilet
    said_118e get
    said_1191 get,(get<dans)/douche,douche
    said_11a2 get,look,detach/poudre
    said_11ae get/(basket[<wastepaper,dechet]),(bidon[<dechet])
    said_11c8 get/miroir
    said_11ce get/savon
    said_11d4 get/serviette,(cloth<gommer)
    said_11e2 look
    said_11e5 look/(basket[<wastepaper,dechet]),(bidon[<dechet])
    said_11ff look/armoire[<medicament,lin]
    said_120d look/chair,banc
    said_1216 look/lil
    said_121c look/miroir
    said_1222 look/reflection
    said_1228 look/douche
    said_122e look/evier
    said_1234 look/toilet
    said_123a look/serviette,(cloth<gommer)
    said_1248 look<(behind,below)/miroir
    said_1256 look<behind/armoire[<medicament,lin]
    said_1267 look<dans/(basket[<wastepaper,dechet]),(bidon[<dechet])
    said_1284 look<dans/miroir
    said_128d look<dans/douche
    said_1296 look<dans/evier
    said_129f look>
    said_12a3 open,(look<dans)
    said_12ae open,(look<dans)/armoire[<medicament,lin]
    said_12c4 open,(look<dans)/banc
    said_12d2 open,(look<dans)/toilet
    said_12e0 etudier
    said_12e3 etudier,look/bottle,etiquette/monocle
    said_12f2 etudier,look/etiquette,impression
    said_12fe rotate<on/eau
    said_1307 gommer/face
    said_130d gommer/deliver
    said_1313 gommer[<!*]
    said_131b hold,deliver,get,abattre,embrasser,embrace,draguer>
    said_1331 asseoir,aller,actionner/room,toilet
    said_1340 bonjour,ask,raconter
)

(synonym
    room = bathroom | salledebain
    lil | lill | lillian | lilly = person | personne
    lil | lill | lillian | lilly = dame | femme | fille | girl | lady | maiden | woman
    douche | shower = baignoire | bain | bath | bathtub | tub | wringer
)

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

// 1350
(instance public Room73 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $49
        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_0022
  0022:35 2b              ldi 2b 
  0024:65 1e             aTop south 
  0026:39 57            pushi 57 // $57 init
  0028:76               push0 
  0029:57 37 04         super Rm 4 

  002c:39 08            pushi 8 // $8 underBits
  002e:38 0080          pushi 80 // $80 timeLeft
  0031:39 11            pushi 11 // $11 signal
  0033:39 13            pushi 13 // $13 brTop
  0035:39 15            pushi 15 // $15 brBottom
  0037:39 28            pushi 28 // $28 message
  0039:39 29            pushi 29 // $29 edit
  003b:38 0281          pushi 281 // $281 sel_641
  003e:38 0389          pushi 389 // $389 sel_905
  0041:45 15 10         callb procedure_0015 10 // LoadMany 

  0044:39 03            pushi 3 // $3 y
  0046:38 0084          pushi 84 // $84 stop
  0049:39 1a            pushi 1a // $1a text
  004b:39 4c            pushi 4c // $4c claimed
  004d:45 15 06         callb procedure_0015 6 // LoadMany 

  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:39 61            pushi 61 // $61 add
  005c:39 05            pushi 5 // $5 view
  005e:74 1435          lofss $1496 // sink
  0061:74 1468          lofss $14cc // toilet
  0064:74 149b          lofss $1502 // bathtub
  0067:74 1504          lofss $156e // basket
  006a:74 14cb          lofss $1538 // settie
  006d:39 62            pushi 62 // $62 eachElementDo
  006f:78               push1 
  0070:39 57            pushi 57 // $57 init
  0072:39 3c            pushi 3c // $3c doit
  0074:76               push0 
  0075:81 0a              lag gAddToPics 
  0077:4a 18             send 18 

  0079:38 010b          pushi 10b // $10b setFeatures
  007c:39 08            pushi 8 // $8 underBits
  007e:74 14ed          lofss $156e // basket
  0081:74 1412          lofss $1496 // sink
  0084:74 1445          lofss $14cc // toilet
  0087:74 1478          lofss $1502 // bathtub
  008a:74 166d          lofss $16fa // Cabinet
  008d:74 14a8          lofss $1538 // settie
  0090:74 16bf          lofss $1752 // Window1
  0093:74 1690          lofss $1726 // Mirror
  0096:54 14             self 14 

  0098:39 42            pushi 42 // $42 setPri
  009a:78               push1 
  009b:39 09            pushi 9 // $9 nsTop
  009d:39 57            pushi 57 // $57 init
  009f:76               push0 
  00a0:38 00c6          pushi c6 // $c6 stopUpd
  00a3:76               push0 
  00a4:72 154b          lofsa $15f2 // towel
  00a7:4a 0e             send e 

  00a9:39 42            pushi 42 // $42 setPri
  00ab:78               push1 
  00ac:39 0d            pushi d // $d lsTop
  00ae:39 57            pushi 57 // $57 init
  00b0:76               push0 
  00b1:38 00c6          pushi c6 // $c6 stopUpd
  00b4:76               push0 
  00b5:72 158c          lofsa $1644 // rope
  00b8:4a 0e             send e 

  00ba:88 00cb            lsg global203 
  00bd:35 01              ldi 1 
  00bf:1a                 eq? 
  00c0:31 5d              bnt code_011f 
  00c2:88 0174            lsg global372 
  00c5:35 01              ldi 1 
  00c7:1e                 gt? 
  00c8:31 51              bnt code_011b 
  00ca:39 04            pushi 4 // $4 x
  00cc:38 0080          pushi 80 // $80 timeLeft
  00cf:38 01f4          pushi 1f4 // $1f4 sel_500
  00d2:38 01f9          pushi 1f9 // $1f9 sel_505
  00d5:38 0389          pushi 389 // $389 sel_905
  00d8:45 15 08         callb procedure_0015 8 // LoadMany 

  00db:39 03            pushi 3 // $3 y
  00dd:38 008f          pushi 8f // $8f moveTo
  00e0:38 00f3          pushi f3 // $f3 close
  00e3:38 00e2          pushi e2 // $e2 canInput
  00e6:45 15 06         callb procedure_0015 6 // LoadMany 

  00e9:34 00e2            ldi e2 
  00ec:a0 017e            sag global382 
  00ef:88 00d0            lsg global208 
  00f2:35 20              ldi 20 
  00f4:14                  or 
  00f5:a0 00d0            sag global208 
  00f8:38 00d4          pushi d4 // $d4 setAvoider
  00fb:78               push1 
  00fc:38 00be          pushi be // $be offScreenOK
  00ff:78               push1 
  0100:78               push1 
  0101:39 56            pushi 56 // $56 new
  0103:76               push0 
  0104:51 21            class Avoid 
  0106:4a 04             send 4 

  0108:4a 06             send 6 

  010a:36                push 
  010b:39 57            pushi 57 // $57 init
  010d:76               push0 
  010e:39 7a            pushi 7a // $7a setScript
  0110:78               push1 
  0111:74 1292          lofss $13a6 // perfume
  0114:72 157b          lofsa $1692 // Lilian
  0117:4a 10             send 10 

  0119:33 04              jmp code_011f 

        code_011b
  011b:35 01              ldi 1 
  011d:a1 7d              sag global125 

        code_011f
  011f:88 00a5            lsg gAct 
  0122:35 06              ldi 6 
  0124:20                 ge? 
  0125:31 55              bnt code_017c 
  0127:89 7b              lsg gCorpseFlags 
  0129:35 20              ldi 20 
  012b:12                 and 
  012c:18                 not 
  012d:31 4d              bnt code_017c 
  012f:89 7b              lsg gCorpseFlags 
  0131:35 40              ldi 40 
  0133:12                 and 
  0134:18                 not 
  0135:31 45              bnt code_017c 
  0137:89 6a              lsg global106 
  0139:35 49              ldi 49 
  013b:1a                 eq? 
  013c:31 0f              bnt code_014d 
  013e:38 010a          pushi 10a // $10a setRegions
  0141:78               push1 
  0142:38 0116          pushi 116 // $116 minCycles
  0145:54 06             self 6 

  0147:35 01              ldi 1 
  0149:a3 03              sal local3 
  014b:33 2f              jmp code_017c 

        code_014d
  014d:89 6a              lsg global106 
  014f:35 29              ldi 29 
  0151:1a                 eq? 
  0152:18                 not 
  0153:31 27              bnt code_017c 
  0155:7a               push2 
  0156:78               push1 
  0157:7a               push2 
  0158:43 40 04         callk Random 4 

  015b:36                push 
  015c:3c                 dup 
  015d:35 01              ldi 1 
  015f:1a                 eq? 
  0160:31 0f              bnt code_0171 
  0162:38 010a          pushi 10a // $10a setRegions
  0165:78               push1 
  0166:38 0116          pushi 116 // $116 minCycles
  0169:54 06             self 6 

  016b:35 01              ldi 1 
  016d:a3 03              sal local3 
  016f:33 0a              jmp code_017b 

        code_0171
  0171:3c                 dup 
  0172:35 02              ldi 2 
  0174:1a                 eq? 
  0175:31 04              bnt code_017b 
  0177:35 29              ldi 29 
  0179:a1 6a              sag global106 

        code_017b
  017b:3a                toss 

        code_017c
  017c:39 05            pushi 5 // $5 view
  017e:78               push1 
  017f:76               push0 
  0180:38 00c5          pushi c5 // $c5 posn
  0183:7a               push2 
  0184:38 00b2          pushi b2 // $b2 lastBumped
  0187:38 00bc          pushi bc // $bc motionInited
  018a:38 00d6          pushi d6 // $d6 observeControl
  018d:78               push1 
  018e:38 4000          pushi 4000 // $4000 sel_16384
  0191:39 57            pushi 57 // $57 init
  0193:76               push0 
  0194:81 00              lag gEgo 
  0196:4a 18             send 18 

  0198:80 0099            lag global153 
  019b:31 25              bnt code_01c2 
  019d:39 05            pushi 5 // $5 view
  019f:78               push1 
  01a0:39 28            pushi 28 // $28 message
  01a2:39 06            pushi 6 // $6 loop
  01a4:78               push1 
  01a5:76               push0 
  01a6:39 07            pushi 7 // $7 cel
  01a8:78               push1 
  01a9:76               push0 
  01aa:39 12            pushi 12 // $12 illegalBits
  01ac:78               push1 
  01ad:76               push0 
  01ae:38 00c5          pushi c5 // $c5 posn
  01b1:7a               push2 
  01b2:38 0105          pushi 105 // $105 north
  01b5:38 00a8          pushi a8 // $a8 endCel
  01b8:39 7a            pushi 7a // $7a setScript
  01ba:78               push1 
  01bb:74 1278          lofss $1436 // wash
  01be:81 00              lag gEgo 
  01c0:4a 26             send 26 


        code_01c2
  01c2:48                 ret 
    )

    (method (doit) // method_01c3
  01c3:76               push0 
  01c4:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  01c7:31 0e              bnt code_01d7 
  01c9:7a               push2 
  01ca:39 49            pushi 49 // $49 semanticFail
  01cc:76               push0 
  01cd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  01d3:35 01              ldi 1 
  01d5:a3 02              sal local2 

        code_01d7
  01d7:39 04            pushi 4 // $4 x
  01d9:76               push0 
  01da:81 00              lag gEgo 
  01dc:4a 04             send 4 

  01de:36                push 
  01df:34 0082            ldi 82 
  01e2:22                 lt? 
  01e3:31 06              bnt code_01eb 
  01e5:35 14              ldi 14 
  01e7:65 2a             aTop vertAngle 
  01e9:33 19              jmp code_0204 

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

  01f2:36                push 
  01f3:34 00be            ldi be 
  01f6:22                 lt? 
  01f7:31 06              bnt code_01ff 
  01f9:35 00              ldi 0 
  01fb:65 2a             aTop vertAngle 
  01fd:33 05              jmp code_0204 

        code_01ff
  01ff:34 00a0            ldi a0 
  0202:65 2a             aTop vertAngle 

        code_0204
  0204:39 3c            pushi 3c // $3c doit
  0206:76               push0 
  0207:57 37 04         super Rm 4 

  020a:48                 ret 
    )

    (method (dispose) // method_020b
  020b:78               push1 
  020c:38 03d9          pushi 3d9 // $3d9 sel_985
  020f:43 03 02         callk DisposeScript 2 

  0212:39 58            pushi 58 // $58 dispose
  0214:76               push0 
  0215:57 37 04         super Rm 4 

  0218:48                 ret 
    )

    (method (newRoom) // method_0219
  0219:76               push0 
  021a:45 03 00         callb procedure_0003 0 // HandsOff 

  021d:38 00f8          pushi f8 // $f8 newRoom
  0220:78               push1 
  0221:8f 01              lsp param1 
  0223:57 37 06         super Rm 6 

  0226:48                 ret 
    )

    (method (handleEvent) // method_0227
  0227:3f 01             link 1 // (var $1)
  0229:39 4c            pushi 4c // $4c claimed
  022b:76               push0 
  022c:87 01              lap param1 
  022e:4a 04             send 4 

  0230:31 01              bnt code_0233 
  0232:48                 ret 

        code_0233
  0233:39 22            pushi 22 // $22 type
  0235:76               push0 
  0236:87 01              lap param1 
  0238:4a 04             send 4 

  023a:36                push 
  023b:34 0080            ldi 80 
  023e:1a                 eq? 
  023f:30 038f            bnt code_05d1 
  0242:88 00a5            lsg gAct 
  0245:35 05              ldi 5 
  0247:20                 ge? 
  0248:30 0117            bnt code_0362 
  024b:78               push1 
  024c:74 1094          lofss $12e3 // etudier,look/bottle,etiquette/monocle
  024f:43 25 02         callk Said 2 

  0252:2f 09               bt code_025d 
  0254:78               push1 
  0255:74 0edc          lofss $1134 // (etudier,look)<actionner<monocle/bottle,etiquette
  0258:43 25 02         callk Said 2 

  025b:31 3d              bnt code_029a 

        code_025d
  025d:38 00ee          pushi ee // $ee has
  0260:78               push1 
  0261:78               push1 
  0262:81 00              lag gEgo 
  0264:4a 06             send 6 

  0266:31 2b              bnt code_0293 
  0268:38 00ae          pushi ae // $ae distanceTo
  026b:78               push1 
  026c:74 12ff          lofss $156e // basket
  026f:81 00              lag gEgo 
  0271:4a 06             send 6 

  0273:36                push 
  0274:35 1e              ldi 1e 
  0276:22                 lt? 
  0277:31 14              bnt code_028d 
  0279:78               push1 
  027a:39 05            pushi 5 // $5 view
  027c:45 05 02         callb procedure_0005 2 // SetFlag 

  027f:35 01              ldi 1 
  0281:a3 04              sal local4 
  0283:39 7a            pushi 7a // $7a setScript
  0285:78               push1 
  0286:74 11dd          lofss $1466 // pickUp
  0289:54 06             self 6 

  028b:33 04              jmp code_0291 

        code_028d
  028d:76               push0 
  028e:45 09 00         callb procedure_0009 0 // NotClose 


        code_0291
  0291:33 04              jmp code_0297 

        code_0293
  0293:76               push0 
  0294:45 0d 00         callb procedure_000d 0 // DontHave 


        code_0297
  0297:32 00c8            jmp code_0362 

        code_029a
  029a:78               push1 
  029b:74 0eaa          lofss $1148 // /bottle>
  029e:43 25 02         callk Said 2 

  02a1:30 0096            bnt code_033a 
  02a4:78               push1 
  02a5:74 1038          lofss $12e0 // etudier
  02a8:43 25 02         callk Said 2 

  02ab:31 0c              bnt code_02b9 
  02ad:7a               push2 
  02ae:39 49            pushi 49 // $49 semanticFail
  02b0:78               push1 
  02b1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02b7:33 7f              jmp code_0338 

        code_02b9
  02b9:78               push1 
  02ba:74 0fe6          lofss $12a3 // open,(look<dans)
  02bd:43 25 02         callk Said 2 

  02c0:31 0c              bnt code_02ce 
  02c2:7a               push2 
  02c3:39 49            pushi 49 // $49 semanticFail
  02c5:7a               push2 
  02c6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02cc:33 6a              jmp code_0338 

        code_02ce
  02ce:78               push1 
  02cf:74 0f10          lofss $11e2 // look
  02d2:43 25 02         callk Said 2 

  02d5:31 39              bnt code_0310 
  02d7:38 00ae          pushi ae // $ae distanceTo
  02da:78               push1 
  02db:74 1290          lofss $156e // basket
  02de:81 00              lag gEgo 
  02e0:4a 06             send 6 

  02e2:36                push 
  02e3:35 14              ldi 14 
  02e5:22                 lt? 
  02e6:31 22              bnt code_030a 
  02e8:88 00a5            lsg gAct 
  02eb:35 05              ldi 5 
  02ed:20                 ge? 
  02ee:31 0d              bnt code_02fd 
  02f0:7a               push2 
  02f1:39 49            pushi 49 // $49 semanticFail
  02f3:39 03            pushi 3 // $3 y
  02f5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02fb:33 0b              jmp code_0308 

        code_02fd
  02fd:7a               push2 
  02fe:39 49            pushi 49 // $49 semanticFail
  0300:39 04            pushi 4 // $4 x
  0302:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0308
  0308:33 04              jmp code_030e 

        code_030a
  030a:76               push0 
  030b:45 09 00         callb procedure_0009 0 // NotClose 


        code_030e
  030e:33 28              jmp code_0338 

        code_0310
  0310:78               push1 
  0311:74 0e7a          lofss $118e // get
  0314:43 25 02         callk Said 2 

  0317:31 1f              bnt code_0338 
  0319:38 00ae          pushi ae // $ae distanceTo
  031c:78               push1 
  031d:74 124e          lofss $156e // basket
  0320:81 00              lag gEgo 
  0322:4a 06             send 6 

  0324:36                push 
  0325:35 1e              ldi 1e 
  0327:22                 lt? 
  0328:31 0a              bnt code_0334 
  032a:39 7a            pushi 7a // $7a setScript
  032c:78               push1 
  032d:74 1136          lofss $1466 // pickUp
  0330:54 06             self 6 

  0332:33 04              jmp code_0338 

        code_0334
  0334:76               push0 
  0335:45 09 00         callb procedure_0009 0 // NotClose 


        code_0338
  0338:33 28              jmp code_0362 

        code_033a
  033a:78               push1 
  033b:74 0fb4          lofss $12f2 // etudier,look/etiquette,impression
  033e:43 25 02         callk Said 2 

  0341:31 0c              bnt code_034f 
  0343:7a               push2 
  0344:39 49            pushi 49 // $49 semanticFail
  0346:78               push1 
  0347:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  034d:33 13              jmp code_0362 

        code_034f
  034f:78               push1 
  0350:74 0e4f          lofss $11a2 // get,look,detach/poudre
  0353:43 25 02         callk Said 2 

  0356:31 0a              bnt code_0362 
  0358:7a               push2 
  0359:39 49            pushi 49 // $49 semanticFail
  035b:7a               push2 
  035c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0362
  0362:39 4c            pushi 4c // $4c claimed
  0364:76               push0 
  0365:87 01              lap param1 
  0367:4a 04             send 4 

  0369:31 01              bnt code_036c 
  036b:48                 ret 

        code_036c
  036c:78               push1 
  036d:74 0f2f          lofss $129f // look>
  0370:43 25 02         callk Said 2 

  0373:31 6e              bnt code_03e3 
  0375:78               push1 
  0376:74 0dea          lofss $1163 // [<around,at][/room]
  0379:43 25 02         callk Said 2 

  037c:31 0c              bnt code_038a 
  037e:7a               push2 
  037f:39 49            pushi 49 // $49 semanticFail
  0381:76               push0 
  0382:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0388:33 56              jmp code_03e0 

        code_038a
  038a:78               push1 
  038b:74 0dc6          lofss $1154 // /curtain<douche
  038e:43 25 02         callk Said 2 

  0391:31 0d              bnt code_03a0 
  0393:7a               push2 
  0394:39 49            pushi 49 // $49 semanticFail
  0396:39 05            pushi 5 // $5 view
  0398:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  039e:33 40              jmp code_03e0 

        code_03a0
  03a0:78               push1 
  03a1:74 0dbb          lofss $115f // /savon
  03a4:43 25 02         callk Said 2 

  03a7:31 0d              bnt code_03b6 
  03a9:7a               push2 
  03aa:39 49            pushi 49 // $49 semanticFail
  03ac:39 06            pushi 6 // $6 loop
  03ae:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03b4:33 2a              jmp code_03e0 

        code_03b6
  03b6:78               push1 
  03b7:74 0d93          lofss $114d // /chair,banc
  03ba:43 25 02         callk Said 2 

  03bd:31 0d              bnt code_03cc 
  03bf:7a               push2 
  03c0:39 49            pushi 49 // $49 semanticFail
  03c2:39 07            pushi 7 // $7 cel
  03c4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03ca:33 14              jmp code_03e0 

        code_03cc
  03cc:78               push1 
  03cd:74 0d8b          lofss $115b // /door
  03d0:43 25 02         callk Said 2 

  03d3:31 0b              bnt code_03e0 
  03d5:7a               push2 
  03d6:39 49            pushi 49 // $49 semanticFail
  03d8:39 08            pushi 8 // $8 underBits
  03da:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03e0
  03e0:32 01ee            jmp code_05d1 

        code_03e3
  03e3:78               push1 
  03e4:74 0de1          lofss $11c8 // get/miroir
  03e7:43 25 02         callk Said 2 

  03ea:31 0e              bnt code_03fa 
  03ec:7a               push2 
  03ed:39 49            pushi 49 // $49 semanticFail
  03ef:39 09            pushi 9 // $9 nsTop
  03f1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03f7:32 01d7            jmp code_05d1 

        code_03fa
  03fa:78               push1 
  03fb:74 0dd0          lofss $11ce // get/savon
  03fe:43 25 02         callk Said 2 

  0401:31 0e              bnt code_0411 
  0403:7a               push2 
  0404:39 49            pushi 49 // $49 semanticFail
  0406:39 0a            pushi a // $a nsLeft
  0408:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  040e:32 01c0            jmp code_05d1 

        code_0411
  0411:78               push1 
  0412:74 0d7c          lofss $1191 // get,(get<dans)/douche,douche
  0415:43 25 02         callk Said 2 

  0418:31 55              bnt code_046f 
  041a:39 65            pushi 65 // $65 contains
  041c:78               push1 
  041d:74 1272          lofss $1692 // Lilian
  0420:81 05              lag gCast 
  0422:4a 06             send 6 

  0424:31 0d              bnt code_0433 
  0426:7a               push2 
  0427:39 49            pushi 49 // $49 semanticFail
  0429:39 0b            pushi b // $b nsBottom
  042b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0431:33 39              jmp code_046c 

        code_0433
  0433:83 03              lal local3 
  0435:31 0d              bnt code_0444 
  0437:7a               push2 
  0438:39 49            pushi 49 // $49 semanticFail
  043a:39 0c            pushi c // $c nsRight
  043c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0442:33 28              jmp code_046c 

        code_0444
  0444:88 00a5            lsg gAct 
  0447:35 07              ldi 7 
  0449:1a                 eq? 
  044a:31 0d              bnt code_0459 
  044c:7a               push2 
  044d:39 49            pushi 49 // $49 semanticFail
  044f:39 0d            pushi d // $d lsTop
  0451:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0457:33 13              jmp code_046c 

        code_0459
  0459:7a               push2 
  045a:39 49            pushi 49 // $49 semanticFail
  045c:39 0e            pushi e // $e lsLeft
  045e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0464:39 7a            pushi 7a // $7a setScript
  0466:78               push1 
  0467:74 0f6c          lofss $13d6 // shower
  046a:54 06             self 6 


        code_046c
  046c:32 0162            jmp code_05d1 

        code_046f
  046f:78               push1 
  0470:74 0d0f          lofss $1182 // flush,attirer/chain,toilet
  0473:43 25 02         callk Said 2 

  0476:31 37              bnt code_04af 
  0478:38 00da          pushi da // $da inRect
  047b:39 04            pushi 4 // $4 x
  047d:38 00e6          pushi e6 // $e6 prompt
  0480:38 00a0          pushi a0 // $a0 cycleDone
  0483:38 0119          pushi 119 // $119 startExtra
  0486:38 00aa          pushi aa // $aa triedToMove
  0489:81 00              lag gEgo 
  048b:4a 0c             send c 

  048d:31 19              bnt code_04a8 
  048f:7a               push2 
  0490:39 49            pushi 49 // $49 semanticFail
  0492:39 0f            pushi f // $f lsBottom
  0494:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  049a:35 01              ldi 1 
  049c:a3 01              sal local1 
  049e:39 7a            pushi 7a // $7a setScript
  04a0:78               push1 
  04a1:74 0f62          lofss $1406 // flushing
  04a4:54 06             self 6 

  04a6:33 04              jmp code_04ac 

        code_04a8
  04a8:76               push0 
  04a9:45 09 00         callb procedure_0009 0 // NotClose 


        code_04ac
  04ac:32 0122            jmp code_05d1 

        code_04af
  04af:78               push1 
  04b0:74 0e54          lofss $1307 // gommer/face
  04b3:43 25 02         callk Said 2 

  04b6:31 0e              bnt code_04c6 
  04b8:7a               push2 
  04b9:39 49            pushi 49 // $49 semanticFail
  04bb:39 10            pushi 10 // $10 lsRight
  04bd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04c3:32 010b            jmp code_05d1 

        code_04c6
  04c6:78               push1 
  04c7:74 0e34          lofss $12fe // rotate<on/eau
  04ca:43 25 02         callk Said 2 

  04cd:2f 13               bt code_04e2 
  04cf:78               push1 
  04d0:74 0e3a          lofss $130d // gommer/deliver
  04d3:43 25 02         callk Said 2 

  04d6:2f 0a               bt code_04e2 
  04d8:78               push1 
  04d9:74 0e37          lofss $1313 // gommer[<!*]
  04dc:43 25 02         callk Said 2 

  04df:30 008c            bnt code_056e 

        code_04e2
  04e2:38 00da          pushi da // $da inRect
  04e5:39 04            pushi 4 // $4 x
  04e7:39 3d            pushi 3d // $3d isBlocked
  04e9:39 79            pushi 79 // $79 cue
  04eb:39 79            pushi 79 // $79 cue
  04ed:38 0097          pushi 97 // $97 open
  04f0:81 00              lag gEgo 
  04f2:4a 0c             send c 

  04f4:31 2e              bnt code_0524 
  04f6:39 65            pushi 65 // $65 contains
  04f8:78               push1 
  04f9:74 1196          lofss $1692 // Lilian
  04fc:81 05              lag gCast 
  04fe:4a 06             send 6 

  0500:31 0d              bnt code_050f 
  0502:7a               push2 
  0503:39 49            pushi 49 // $49 semanticFail
  0505:39 11            pushi 11 // $11 signal
  0507:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  050d:33 13              jmp code_0522 

        code_050f
  050f:7a               push2 
  0510:39 49            pushi 49 // $49 semanticFail
  0512:39 0f            pushi f // $f lsBottom
  0514:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  051a:39 7a            pushi 7a // $7a setScript
  051c:78               push1 
  051d:74 0f16          lofss $1436 // wash
  0520:54 06             self 6 


        code_0522
  0522:33 48              jmp code_056c 

        code_0524
  0524:38 00da          pushi da // $da inRect
  0527:39 04            pushi 4 // $4 x
  0529:38 00c5          pushi c5 // $c5 posn
  052c:39 7f            pushi 7f // $7f setReal
  052e:38 0108          pushi 108 // $108 west
  0531:38 009a          pushi 9a // $9a left
  0534:81 00              lag gEgo 
  0536:4a 0c             send c 

  0538:31 2e              bnt code_0568 
  053a:39 65            pushi 65 // $65 contains
  053c:78               push1 
  053d:74 1152          lofss $1692 // Lilian
  0540:81 05              lag gCast 
  0542:4a 06             send 6 

  0544:31 0d              bnt code_0553 
  0546:7a               push2 
  0547:39 49            pushi 49 // $49 semanticFail
  0549:39 0b            pushi b // $b nsBottom
  054b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0551:33 13              jmp code_0566 

        code_0553
  0553:7a               push2 
  0554:39 49            pushi 49 // $49 semanticFail
  0556:39 0e            pushi e // $e lsLeft
  0558:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  055e:39 7a            pushi 7a // $7a setScript
  0560:78               push1 
  0561:74 0e72          lofss $13d6 // shower
  0564:54 06             self 6 


        code_0566
  0566:33 04              jmp code_056c 

        code_0568
  0568:76               push0 
  0569:45 09 00         callb procedure_0009 0 // NotClose 


        code_056c
  056c:33 63              jmp code_05d1 

        code_056e
  056e:78               push1 
  056f:74 0bff          lofss $1171 // boire
  0572:43 25 02         callk Said 2 

  0575:2f 09               bt code_0580 
  0577:78               push1 
  0578:74 0bf9          lofss $1174 // boire/eau[<evier,douche]
  057b:43 25 02         callk Said 2 

  057e:31 0d              bnt code_058d 

        code_0580
  0580:7a               push2 
  0581:39 49            pushi 49 // $49 semanticFail
  0583:39 12            pushi 12 // $12 illegalBits
  0585:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  058b:33 44              jmp code_05d1 

        code_058d
  058d:78               push1 
  058e:74 0da0          lofss $1331 // asseoir,aller,actionner/room,toilet
  0591:43 25 02         callk Said 2 

  0594:31 3b              bnt code_05d1 
  0596:39 65            pushi 65 // $65 contains
  0598:78               push1 
  0599:74 10f6          lofss $1692 // Lilian
  059c:81 05              lag gCast 
  059e:4a 06             send 6 

  05a0:31 0d              bnt code_05af 
  05a2:7a               push2 
  05a3:39 49            pushi 49 // $49 semanticFail
  05a5:39 13            pushi 13 // $13 brTop
  05a7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05ad:33 22              jmp code_05d1 

        code_05af
  05af:39 06            pushi 6 // $6 loop
  05b1:78               push1 
  05b2:7a               push2 
  05b3:81 00              lag gEgo 
  05b5:4a 06             send 6 

  05b7:7a               push2 
  05b8:39 49            pushi 49 // $49 semanticFail
  05ba:39 14            pushi 14 // $14 brLeft
  05bc:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05c2:35 01              ldi 1 
  05c4:a0 0099            sag global153 
  05c7:38 00f8          pushi f8 // $f8 newRoom
  05ca:78               push1 
  05cb:39 2b            pushi 2b // $2b number
  05cd:81 02              lag gCurRoom 
  05cf:4a 06             send 6 


        code_05d1
  05d1:48                 ret 
    )

)

// 13a0
(instance perfume 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_05d2
  05d2:87 01              lap param1 
  05d4:65 0a             aTop state 
  05d6:36                push 
  05d7:3c                 dup 
  05d8:35 00              ldi 0 
  05da:1a                 eq? 
  05db:31 31              bnt code_060e 
  05dd:39 06            pushi 6 // $6 loop
  05df:78               push1 
  05e0:39 07            pushi 7 // $7 cel
  05e2:39 07            pushi 7 // $7 cel
  05e4:78               push1 
  05e5:76               push0 
  05e6:38 00a4          pushi a4 // $a4 cycleSpeed
  05e9:78               push1 
  05ea:78               push1 
  05eb:39 7e            pushi 7e // $7e setCycle
  05ed:78               push1 
  05ee:51 16            class Fwd 
  05f0:36                push 
  05f1:72 109e          lofsa $1692 // Lilian
  05f4:4a 18             send 18 

  05f6:39 2b            pushi 2b // $2b number
  05f8:78               push1 
  05f9:39 4c            pushi 4c // $4c claimed
  05fb:39 06            pushi 6 // $6 loop
  05fd:78               push1 
  05fe:78               push1 
  05ff:39 2a            pushi 2a // $2a play
  0601:76               push0 
  0602:72 1179          lofsa $177e // mySound
  0605:4a 10             send 10 

  0607:35 02              ldi 2 
  0609:65 10             aTop cycles 
  060b:32 025d            jmp code_086b 

        code_060e
  060e:3c                 dup 
  060f:35 01              ldi 1 
  0611:1a                 eq? 
  0612:31 1a              bnt code_062e 
  0614:83 02              lal local2 
  0616:31 0f              bnt code_0627 
  0618:35 06              ldi 6 
  061a:a0 00d5            sag global213 
  061d:39 03            pushi 3 // $3 y
  061f:78               push1 
  0620:39 49            pushi 49 // $49 semanticFail
  0622:39 15            pushi 15 // $15 brBottom
  0624:45 01 06         callb procedure_0001 6 // Say 


        code_0627
  0627:35 14              ldi 14 
  0629:65 10             aTop cycles 
  062b:32 023d            jmp code_086b 

        code_062e
  062e:3c                 dup 
  062f:35 02              ldi 2 
  0631:1a                 eq? 
  0632:31 2a              bnt code_065e 
  0634:38 0089          pushi 89 // $89 hide
  0637:76               push0 
  0638:72 0fb7          lofsa $15f2 // towel
  063b:4a 04             send 4 

  063d:38 0084          pushi 84 // $84 stop
  0640:76               push0 
  0641:72 113a          lofsa $177e // mySound
  0644:4a 04             send 4 

  0646:39 06            pushi 6 // $6 loop
  0648:78               push1 
  0649:39 04            pushi 4 // $4 x
  064b:39 07            pushi 7 // $7 cel
  064d:78               push1 
  064e:76               push0 
  064f:39 7e            pushi 7e // $7e setCycle
  0651:7a               push2 
  0652:51 1a            class End 
  0654:36                push 
  0655:7c            pushSelf 
  0656:72 1039          lofsa $1692 // Lilian
  0659:4a 14             send 14 

  065b:32 020d            jmp code_086b 

        code_065e
  065e:3c                 dup 
  065f:35 03              ldi 3 
  0661:1a                 eq? 
  0662:31 18              bnt code_067c 
  0664:39 06            pushi 6 // $6 loop
  0666:78               push1 
  0667:39 08            pushi 8 // $8 underBits
  0669:39 07            pushi 7 // $7 cel
  066b:78               push1 
  066c:76               push0 
  066d:39 7e            pushi 7e // $7e setCycle
  066f:7a               push2 
  0670:51 1a            class End 
  0672:36                push 
  0673:7c            pushSelf 
  0674:72 101b          lofsa $1692 // Lilian
  0677:4a 14             send 14 

  0679:32 01ef            jmp code_086b 

        code_067c
  067c:3c                 dup 
  067d:35 04              ldi 4 
  067f:1a                 eq? 
  0680:31 17              bnt code_0699 
  0682:39 06            pushi 6 // $6 loop
  0684:78               push1 
  0685:39 09            pushi 9 // $9 nsTop
  0687:39 7e            pushi 7e // $7e setCycle
  0689:78               push1 
  068a:51 16            class Fwd 
  068c:36                push 
  068d:72 1002          lofsa $1692 // Lilian
  0690:4a 0c             send c 

  0692:35 1e              ldi 1e 
  0694:65 10             aTop cycles 
  0696:32 01d2            jmp code_086b 

        code_0699
  0699:3c                 dup 
  069a:35 05              ldi 5 
  069c:1a                 eq? 
  069d:31 23              bnt code_06c2 
  069f:39 06            pushi 6 // $6 loop
  06a1:78               push1 
  06a2:39 08            pushi 8 // $8 underBits
  06a4:39 07            pushi 7 // $7 cel
  06a6:78               push1 
  06a7:78               push1 
  06a8:74 0fe7          lofss $1692 // Lilian
  06ab:43 0e 02         callk NumCels 2 

  06ae:36                push 
  06af:35 01              ldi 1 
  06b1:04                 sub 
  06b2:36                push 
  06b3:39 7e            pushi 7e // $7e setCycle
  06b5:7a               push2 
  06b6:51 1b            class Beg 
  06b8:36                push 
  06b9:7c            pushSelf 
  06ba:72 0fd5          lofsa $1692 // Lilian
  06bd:4a 14             send 14 

  06bf:32 01a9            jmp code_086b 

        code_06c2
  06c2:3c                 dup 
  06c3:35 06              ldi 6 
  06c5:1a                 eq? 
  06c6:31 18              bnt code_06e0 
  06c8:39 06            pushi 6 // $6 loop
  06ca:78               push1 
  06cb:39 06            pushi 6 // $6 loop
  06cd:39 07            pushi 7 // $7 cel
  06cf:78               push1 
  06d0:76               push0 
  06d1:39 7e            pushi 7e // $7e setCycle
  06d3:7a               push2 
  06d4:51 1a            class End 
  06d6:36                push 
  06d7:7c            pushSelf 
  06d8:72 0fb7          lofsa $1692 // Lilian
  06db:4a 14             send 14 

  06dd:32 018b            jmp code_086b 

        code_06e0
  06e0:3c                 dup 
  06e1:35 07              ldi 7 
  06e3:1a                 eq? 
  06e4:31 14              bnt code_06fa 
  06e6:39 06            pushi 6 // $6 loop
  06e8:78               push1 
  06e9:39 06            pushi 6 // $6 loop
  06eb:39 7e            pushi 7e // $7e setCycle
  06ed:7a               push2 
  06ee:51 1b            class Beg 
  06f0:36                push 
  06f1:7c            pushSelf 
  06f2:72 0f9d          lofsa $1692 // Lilian
  06f5:4a 0e             send e 

  06f7:32 0171            jmp code_086b 

        code_06fa
  06fa:3c                 dup 
  06fb:35 08              ldi 8 
  06fd:1a                 eq? 
  06fe:31 18              bnt code_0718 
  0700:39 06            pushi 6 // $6 loop
  0702:78               push1 
  0703:39 05            pushi 5 // $5 view
  0705:39 07            pushi 7 // $7 cel
  0707:78               push1 
  0708:76               push0 
  0709:39 7e            pushi 7e // $7e setCycle
  070b:7a               push2 
  070c:51 1a            class End 
  070e:36                push 
  070f:7c            pushSelf 
  0710:72 0f7f          lofsa $1692 // Lilian
  0713:4a 14             send 14 

  0715:32 0153            jmp code_086b 

        code_0718
  0718:3c                 dup 
  0719:35 09              ldi 9 
  071b:1a                 eq? 
  071c:31 26              bnt code_0744 
  071e:38 00ca          pushi ca // $ca show
  0721:76               push0 
  0722:72 0ecd          lofsa $15f2 // towel
  0725:4a 04             send 4 

  0727:39 05            pushi 5 // $5 view
  0729:78               push1 
  072a:38 01f9          pushi 1f9 // $1f9 sel_505
  072d:39 06            pushi 6 // $6 loop
  072f:78               push1 
  0730:76               push0 
  0731:39 07            pushi 7 // $7 cel
  0733:78               push1 
  0734:76               push0 
  0735:39 7e            pushi 7e // $7e setCycle
  0737:7a               push2 
  0738:51 1a            class End 
  073a:36                push 
  073b:7c            pushSelf 
  073c:72 0f53          lofsa $1692 // Lilian
  073f:4a 1a             send 1a 

  0741:32 0127            jmp code_086b 

        code_0744
  0744:3c                 dup 
  0745:35 0a              ldi a 
  0747:1a                 eq? 
  0748:31 1a              bnt code_0764 
  074a:39 06            pushi 6 // $6 loop
  074c:78               push1 
  074d:78               push1 
  074e:39 07            pushi 7 // $7 cel
  0750:78               push1 
  0751:76               push0 
  0752:39 7e            pushi 7e // $7e setCycle
  0754:78               push1 
  0755:51 16            class Fwd 
  0757:36                push 
  0758:72 0f37          lofsa $1692 // Lilian
  075b:4a 12             send 12 

  075d:35 1e              ldi 1e 
  075f:65 10             aTop cycles 
  0761:32 0107            jmp code_086b 

        code_0764
  0764:3c                 dup 
  0765:35 0b              ldi b 
  0767:1a                 eq? 
  0768:31 17              bnt code_0781 
  076a:39 06            pushi 6 // $6 loop
  076c:78               push1 
  076d:7a               push2 
  076e:39 07            pushi 7 // $7 cel
  0770:78               push1 
  0771:76               push0 
  0772:39 7e            pushi 7e // $7e setCycle
  0774:7a               push2 
  0775:51 1a            class End 
  0777:36                push 
  0778:7c            pushSelf 
  0779:72 0f16          lofsa $1692 // Lilian
  077c:4a 14             send 14 

  077e:32 00ea            jmp code_086b 

        code_0781
  0781:3c                 dup 
  0782:35 0c              ldi c 
  0784:1a                 eq? 
  0785:31 1b              bnt code_07a2 
  0787:39 06            pushi 6 // $6 loop
  0789:78               push1 
  078a:39 03            pushi 3 // $3 y
  078c:39 07            pushi 7 // $7 cel
  078e:78               push1 
  078f:76               push0 
  0790:39 7e            pushi 7e // $7e setCycle
  0792:78               push1 
  0793:51 16            class Fwd 
  0795:36                push 
  0796:72 0ef9          lofsa $1692 // Lilian
  0799:4a 12             send 12 

  079b:35 1e              ldi 1e 
  079d:65 10             aTop cycles 
  079f:32 00c9            jmp code_086b 

        code_07a2
  07a2:3c                 dup 
  07a3:35 0d              ldi d 
  07a5:1a                 eq? 
  07a6:31 18              bnt code_07c0 
  07a8:39 06            pushi 6 // $6 loop
  07aa:78               push1 
  07ab:76               push0 
  07ac:39 07            pushi 7 // $7 cel
  07ae:78               push1 
  07af:39 03            pushi 3 // $3 y
  07b1:39 7e            pushi 7e // $7e setCycle
  07b3:7a               push2 
  07b4:51 1b            class Beg 
  07b6:36                push 
  07b7:7c            pushSelf 
  07b8:72 0ed7          lofsa $1692 // Lilian
  07bb:4a 14             send 14 

  07bd:32 00ab            jmp code_086b 

        code_07c0
  07c0:3c                 dup 
  07c1:35 0e              ldi e 
  07c3:1a                 eq? 
  07c4:31 63              bnt code_0829 
  07c6:76               push0 
  07c7:45 03 00         callb procedure_0003 0 // HandsOff 

  07ca:39 05            pushi 5 // $5 view
  07cc:78               push1 
  07cd:38 01f4          pushi 1f4 // $1f4 sel_500
  07d0:39 7e            pushi 7e // $7e setCycle
  07d2:78               push1 
  07d3:51 17            class Walk 
  07d5:36                push 
  07d6:38 00a4          pushi a4 // $a4 cycleSpeed
  07d9:78               push1 
  07da:76               push0 
  07db:72 0eb4          lofsa $1692 // Lilian
  07de:4a 12             send 12 

  07e0:38 00da          pushi da // $da inRect
  07e3:39 04            pushi 4 // $4 x
  07e5:38 008c          pushi 8c // $8c track
  07e8:38 0082          pushi 82 // $82 owner
  07eb:38 00a0          pushi a0 // $a0 cycleDone
  07ee:38 008c          pushi 8c // $8c track
  07f1:81 00              lag gEgo 
  07f3:4a 0c             send c 

  07f5:31 16              bnt code_080d 
  07f7:38 00d3          pushi d3 // $d3 setMotion
  07fa:39 04            pushi 4 // $4 x
  07fc:51 1d            class MoveTo 
  07fe:36                push 
  07ff:38 0093          pushi 93 // $93 advance
  0802:38 00a0          pushi a0 // $a0 cycleDone
  0805:7c            pushSelf 
  0806:72 0e89          lofsa $1692 // Lilian
  0809:4a 0c             send c 

  080b:33 1a              jmp code_0827 

        code_080d
  080d:38 00d3          pushi d3 // $d3 setMotion
  0810:39 04            pushi 4 // $4 x
  0812:51 1d            class MoveTo 
  0814:36                push 
  0815:38 0093          pushi 93 // $93 advance
  0818:39 03            pushi 3 // $3 y
  081a:76               push0 
  081b:72 0e74          lofsa $1692 // Lilian
  081e:4a 04             send 4 

  0820:36                push 
  0821:7c            pushSelf 
  0822:72 0e6d          lofsa $1692 // Lilian
  0825:4a 0c             send c 


        code_0827
  0827:33 42              jmp code_086b 

        code_0829
  0829:3c                 dup 
  082a:35 0f              ldi f 
  082c:1a                 eq? 
  082d:31 16              bnt code_0845 
  082f:38 00d3          pushi d3 // $d3 setMotion
  0832:39 04            pushi 4 // $4 x
  0834:51 1d            class MoveTo 
  0836:36                push 
  0837:38 0093          pushi 93 // $93 advance
  083a:38 00f0          pushi f0 // $f0 targetObj
  083d:7c            pushSelf 
  083e:72 0e51          lofsa $1692 // Lilian
  0841:4a 0c             send c 

  0843:33 26              jmp code_086b 

        code_0845
  0845:3c                 dup 
  0846:35 10              ldi 10 
  0848:1a                 eq? 
  0849:31 20              bnt code_086b 
  084b:76               push0 
  084c:45 04 00         callb procedure_0004 0 // HandsOn 

  084f:c0 00cb            +ag global203 
  0852:35 01              ldi 1 
  0854:a0 0174            sag global372 
  0857:39 58            pushi 58 // $58 dispose
  0859:76               push0 
  085a:72 0e35          lofsa $1692 // Lilian
  085d:4a 04             send 4 

  085f:35 01              ldi 1 
  0861:a1 7d              sag global125 
  0863:39 7a            pushi 7a // $7a setScript
  0865:78               push1 
  0866:76               push0 
  0867:63 08             pToa client 
  0869:4a 06             send 6 


        code_086b
  086b:3a                toss 
  086c:48                 ret 
    )

)

// 13d0
(instance shower 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_086d
  086d:87 01              lap param1 
  086f:65 0a             aTop state 
  0871:36                push 
  0872:3c                 dup 
  0873:35 00              ldi 0 
  0875:1a                 eq? 
  0876:31 26              bnt code_089e 
  0878:76               push0 
  0879:45 03 00         callb procedure_0003 0 // HandsOff 

  087c:38 00d4          pushi d4 // $d4 setAvoider
  087f:78               push1 
  0880:39 56            pushi 56 // $56 new
  0882:76               push0 
  0883:51 21            class Avoid 
  0885:4a 04             send 4 

  0887:36                push 
  0888:38 00d3          pushi d3 // $d3 setMotion
  088b:39 04            pushi 4 // $4 x
  088d:51 1d            class MoveTo 
  088f:36                push 
  0890:38 00cd          pushi cd // $cd xLast
  0893:38 0094          pushi 94 // $94 retreat
  0896:7c            pushSelf 
  0897:81 00              lag gEgo 
  0899:4a 12             send 12 

  089b:32 008d            jmp code_092b 

        code_089e
  089e:3c                 dup 
  089f:35 01              ldi 1 
  08a1:1a                 eq? 
  08a2:31 16              bnt code_08ba 
  08a4:39 05            pushi 5 // $5 view
  08a6:78               push1 
  08a7:39 13            pushi 13 // $13 brTop
  08a9:39 06            pushi 6 // $6 loop
  08ab:78               push1 
  08ac:76               push0 
  08ad:39 7e            pushi 7e // $7e setCycle
  08af:7a               push2 
  08b0:51 1a            class End 
  08b2:36                push 
  08b3:7c            pushSelf 
  08b4:81 00              lag gEgo 
  08b6:4a 14             send 14 

  08b8:33 71              jmp code_092b 

        code_08ba
  08ba:3c                 dup 
  08bb:35 02              ldi 2 
  08bd:1a                 eq? 
  08be:31 11              bnt code_08d1 
  08c0:39 06            pushi 6 // $6 loop
  08c2:78               push1 
  08c3:78               push1 
  08c4:39 7e            pushi 7e // $7e setCycle
  08c6:7a               push2 
  08c7:51 1a            class End 
  08c9:36                push 
  08ca:7c            pushSelf 
  08cb:81 00              lag gEgo 
  08cd:4a 0e             send e 

  08cf:33 5a              jmp code_092b 

        code_08d1
  08d1:3c                 dup 
  08d2:35 03              ldi 3 
  08d4:1a                 eq? 
  08d5:31 11              bnt code_08e8 
  08d7:39 06            pushi 6 // $6 loop
  08d9:78               push1 
  08da:7a               push2 
  08db:39 7e            pushi 7e // $7e setCycle
  08dd:7a               push2 
  08de:51 1a            class End 
  08e0:36                push 
  08e1:7c            pushSelf 
  08e2:81 00              lag gEgo 
  08e4:4a 0e             send e 

  08e6:33 43              jmp code_092b 

        code_08e8
  08e8:3c                 dup 
  08e9:35 04              ldi 4 
  08eb:1a                 eq? 
  08ec:31 24              bnt code_0912 
  08ee:39 7e            pushi 7e // $7e setCycle
  08f0:78               push1 
  08f1:51 1a            class End 
  08f3:36                push 
  08f4:39 57            pushi 57 // $57 init
  08f6:76               push0 
  08f7:72 0caa          lofsa $15a4 // bra
  08fa:4a 0a             send a 

  08fc:39 05            pushi 5 // $5 view
  08fe:78               push1 
  08ff:39 15            pushi 15 // $15 brBottom
  0901:39 06            pushi 6 // $6 loop
  0903:78               push1 
  0904:76               push0 
  0905:39 7e            pushi 7e // $7e setCycle
  0907:7a               push2 
  0908:51 1a            class End 
  090a:36                push 
  090b:7c            pushSelf 
  090c:81 00              lag gEgo 
  090e:4a 14             send 14 

  0910:33 19              jmp code_092b 

        code_0912
  0912:3c                 dup 
  0913:35 05              ldi 5 
  0915:1a                 eq? 
  0916:31 13              bnt code_092b 
  0918:38 00f8          pushi f8 // $f8 newRoom
  091b:78               push1 
  091c:38 00d7          pushi d7 // $d7 ignoreControl
  091f:81 02              lag gCurRoom 
  0921:4a 06             send 6 

  0923:39 7a            pushi 7a // $7a setScript
  0925:78               push1 
  0926:76               push0 
  0927:63 08             pToa client 
  0929:4a 06             send 6 


        code_092b
  092b:3a                toss 
  092c:48                 ret 
    )

)

// 1400
(instance flushing 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_092d
  092d:87 01              lap param1 
  092f:65 0a             aTop state 
  0931:36                push 
  0932:3c                 dup 
  0933:35 00              ldi 0 
  0935:1a                 eq? 
  0936:31 1e              bnt code_0956 
  0938:76               push0 
  0939:45 03 00         callb procedure_0003 0 // HandsOff 

  093c:39 12            pushi 12 // $12 illegalBits
  093e:78               push1 
  093f:76               push0 
  0940:38 00d3          pushi d3 // $d3 setMotion
  0943:39 04            pushi 4 // $4 x
  0945:51 1d            class MoveTo 
  0947:36                push 
  0948:38 0105          pushi 105 // $105 north
  094b:38 00a5          pushi a5 // $a5 cycler
  094e:7c            pushSelf 
  094f:81 00              lag gEgo 
  0951:4a 12             send 12 

  0953:32 00f3            jmp code_0a49 

        code_0956
  0956:3c                 dup 
  0957:35 01              ldi 1 
  0959:1a                 eq? 
  095a:31 25              bnt code_0981 
  095c:83 01              lal local1 
  095e:18                 not 
  095f:31 19              bnt code_097a 
  0961:35 01              ldi 1 
  0963:a0 0099            sag global153 
  0966:39 7a            pushi 7a // $7a setScript
  0968:78               push1 
  0969:74 0aca          lofss $1436 // wash
  096c:81 00              lag gEgo 
  096e:4a 06             send 6 

  0970:39 7a            pushi 7a // $7a setScript
  0972:78               push1 
  0973:76               push0 
  0974:63 08             pToa client 
  0976:4a 06             send 6 

  0978:33 04              jmp code_097e 

        code_097a
  097a:35 01              ldi 1 
  097c:65 10             aTop cycles 

        code_097e
  097e:32 00c8            jmp code_0a49 

        code_0981
  0981:3c                 dup 
  0982:35 02              ldi 2 
  0984:1a                 eq? 
  0985:31 17              bnt code_099e 
  0987:39 05            pushi 5 // $5 view
  0989:78               push1 
  098a:39 28            pushi 28 // $28 message
  098c:39 06            pushi 6 // $6 loop
  098e:78               push1 
  098f:7a               push2 
  0990:39 7e            pushi 7e // $7e setCycle
  0992:7a               push2 
  0993:51 1a            class End 
  0995:36                push 
  0996:7c            pushSelf 
  0997:81 00              lag gEgo 
  0999:4a 14             send 14 

  099b:32 00ab            jmp code_0a49 

        code_099e
  099e:3c                 dup 
  099f:35 03              ldi 3 
  09a1:1a                 eq? 
  09a2:31 30              bnt code_09d4 
  09a4:38 0089          pushi 89 // $89 hide
  09a7:76               push0 
  09a8:72 0c99          lofsa $1644 // rope
  09ab:4a 04             send 4 

  09ad:39 2b            pushi 2b // $2b number
  09af:78               push1 
  09b0:39 1a            pushi 1a // $1a text
  09b2:39 06            pushi 6 // $6 loop
  09b4:78               push1 
  09b5:78               push1 
  09b6:39 2a            pushi 2a // $2a play
  09b8:76               push0 
  09b9:72 0dc2          lofsa $177e // mySound
  09bc:4a 10             send 10 

  09be:39 06            pushi 6 // $6 loop
  09c0:78               push1 
  09c1:39 03            pushi 3 // $3 y
  09c3:39 07            pushi 7 // $7 cel
  09c5:78               push1 
  09c6:76               push0 
  09c7:39 7e            pushi 7e // $7e setCycle
  09c9:7a               push2 
  09ca:51 1a            class End 
  09cc:36                push 
  09cd:7c            pushSelf 
  09ce:81 00              lag gEgo 
  09d0:4a 14             send 14 

  09d2:33 75              jmp code_0a49 

        code_09d4
  09d4:3c                 dup 
  09d5:35 04              ldi 4 
  09d7:1a                 eq? 
  09d8:31 0d              bnt code_09e7 
  09da:39 7e            pushi 7e // $7e setCycle
  09dc:7a               push2 
  09dd:51 1b            class Beg 
  09df:36                push 
  09e0:7c            pushSelf 
  09e1:81 00              lag gEgo 
  09e3:4a 08             send 8 

  09e5:33 62              jmp code_0a49 

        code_09e7
  09e7:3c                 dup 
  09e8:35 05              ldi 5 
  09ea:1a                 eq? 
  09eb:31 1e              bnt code_0a0b 
  09ed:38 00ca          pushi ca // $ca show
  09f0:76               push0 
  09f1:72 0c50          lofsa $1644 // rope
  09f4:4a 04             send 4 

  09f6:39 06            pushi 6 // $6 loop
  09f8:78               push1 
  09f9:7a               push2 
  09fa:39 07            pushi 7 // $7 cel
  09fc:78               push1 
  09fd:7a               push2 
  09fe:39 7e            pushi 7e // $7e setCycle
  0a00:7a               push2 
  0a01:51 1b            class Beg 
  0a03:36                push 
  0a04:7c            pushSelf 
  0a05:81 00              lag gEgo 
  0a07:4a 14             send 14 

  0a09:33 3e              jmp code_0a49 

        code_0a0b
  0a0b:3c                 dup 
  0a0c:35 06              ldi 6 
  0a0e:1a                 eq? 
  0a0f:31 38              bnt code_0a49 
  0a11:39 05            pushi 5 // $5 view
  0a13:78               push1 
  0a14:76               push0 
  0a15:39 06            pushi 6 // $6 loop
  0a17:78               push1 
  0a18:76               push0 
  0a19:39 7e            pushi 7e // $7e setCycle
  0a1b:78               push1 
  0a1c:51 17            class Walk 
  0a1e:36                push 
  0a1f:38 00c5          pushi c5 // $c5 posn
  0a22:7a               push2 
  0a23:39 04            pushi 4 // $4 x
  0a25:76               push0 
  0a26:81 00              lag gEgo 
  0a28:4a 04             send 4 

  0a2a:36                push 
  0a2b:35 02              ldi 2 
  0a2d:04                 sub 
  0a2e:36                push 
  0a2f:39 03            pushi 3 // $3 y
  0a31:76               push0 
  0a32:81 00              lag gEgo 
  0a34:4a 04             send 4 

  0a36:36                push 
  0a37:39 12            pushi 12 // $12 illegalBits
  0a39:78               push1 
  0a3a:38 8000          pushi 8000 // $8000 sel_32768
  0a3d:39 7a            pushi 7a // $7a setScript
  0a3f:78               push1 
  0a40:76               push0 
  0a41:81 00              lag gEgo 
  0a43:4a 26             send 26 

  0a45:76               push0 
  0a46:45 04 00         callb procedure_0004 0 // HandsOn 


        code_0a49
  0a49:3a                toss 
  0a4a:48                 ret 
    )

)

// 1430
(instance wash 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_0a4b
  0a4b:87 01              lap param1 
  0a4d:65 0a             aTop state 
  0a4f:36                push 
  0a50:3c                 dup 
  0a51:35 00              ldi 0 
  0a53:1a                 eq? 
  0a54:31 26              bnt code_0a7c 
  0a56:76               push0 
  0a57:45 03 00         callb procedure_0003 0 // HandsOff 

  0a5a:80 0099            lag global153 
  0a5d:31 16              bnt code_0a75 
  0a5f:39 05            pushi 5 // $5 view
  0a61:78               push1 
  0a62:39 28            pushi 28 // $28 message
  0a64:39 06            pushi 6 // $6 loop
  0a66:78               push1 
  0a67:76               push0 
  0a68:39 7e            pushi 7e // $7e setCycle
  0a6a:7a               push2 
  0a6b:51 1a            class End 
  0a6d:36                push 
  0a6e:7c            pushSelf 
  0a6f:81 00              lag gEgo 
  0a71:4a 14             send 14 

  0a73:33 04              jmp code_0a79 

        code_0a75
  0a75:35 01              ldi 1 
  0a77:65 10             aTop cycles 

        code_0a79
  0a79:32 023e            jmp code_0cba 

        code_0a7c
  0a7c:3c                 dup 
  0a7d:35 01              ldi 1 
  0a7f:1a                 eq? 
  0a80:31 3b              bnt code_0abd 
  0a82:80 0099            lag global153 
  0a85:31 2f              bnt code_0ab6 
  0a87:38 0089          pushi 89 // $89 hide
  0a8a:76               push0 
  0a8b:72 0bb6          lofsa $1644 // rope
  0a8e:4a 04             send 4 

  0a90:39 2b            pushi 2b // $2b number
  0a92:78               push1 
  0a93:39 1a            pushi 1a // $1a text
  0a95:39 06            pushi 6 // $6 loop
  0a97:78               push1 
  0a98:78               push1 
  0a99:39 2a            pushi 2a // $2a play
  0a9b:76               push0 
  0a9c:72 0cdf          lofsa $177e // mySound
  0a9f:4a 10             send 10 

  0aa1:39 06            pushi 6 // $6 loop
  0aa3:78               push1 
  0aa4:78               push1 
  0aa5:39 07            pushi 7 // $7 cel
  0aa7:78               push1 
  0aa8:76               push0 
  0aa9:39 7e            pushi 7e // $7e setCycle
  0aab:7a               push2 
  0aac:51 1a            class End 
  0aae:36                push 
  0aaf:7c            pushSelf 
  0ab0:81 00              lag gEgo 
  0ab2:4a 14             send 14 

  0ab4:33 04              jmp code_0aba 

        code_0ab6
  0ab6:35 01              ldi 1 
  0ab8:65 10             aTop cycles 

        code_0aba
  0aba:32 01fd            jmp code_0cba 

        code_0abd
  0abd:3c                 dup 
  0abe:35 02              ldi 2 
  0ac0:1a                 eq? 
  0ac1:31 19              bnt code_0adc 
  0ac3:80 0099            lag global153 
  0ac6:31 0d              bnt code_0ad5 
  0ac8:39 7e            pushi 7e // $7e setCycle
  0aca:7a               push2 
  0acb:51 1b            class Beg 
  0acd:36                push 
  0ace:7c            pushSelf 
  0acf:81 00              lag gEgo 
  0ad1:4a 08             send 8 

  0ad3:33 04              jmp code_0ad9 

        code_0ad5
  0ad5:35 01              ldi 1 
  0ad7:65 10             aTop cycles 

        code_0ad9
  0ad9:32 01de            jmp code_0cba 

        code_0adc
  0adc:3c                 dup 
  0add:35 03              ldi 3 
  0adf:1a                 eq? 
  0ae0:31 2a              bnt code_0b0c 
  0ae2:80 0099            lag global153 
  0ae5:31 1e              bnt code_0b05 
  0ae7:38 00ca          pushi ca // $ca show
  0aea:76               push0 
  0aeb:72 0b56          lofsa $1644 // rope
  0aee:4a 04             send 4 

  0af0:39 06            pushi 6 // $6 loop
  0af2:78               push1 
  0af3:76               push0 
  0af4:39 07            pushi 7 // $7 cel
  0af6:78               push1 
  0af7:7a               push2 
  0af8:39 7e            pushi 7e // $7e setCycle
  0afa:7a               push2 
  0afb:51 1b            class Beg 
  0afd:36                push 
  0afe:7c            pushSelf 
  0aff:81 00              lag gEgo 
  0b01:4a 14             send 14 

  0b03:33 04              jmp code_0b09 

        code_0b05
  0b05:35 01              ldi 1 
  0b07:65 10             aTop cycles 

        code_0b09
  0b09:32 01ae            jmp code_0cba 

        code_0b0c
  0b0c:3c                 dup 
  0b0d:35 04              ldi 4 
  0b0f:1a                 eq? 
  0b10:31 32              bnt code_0b44 
  0b12:39 05            pushi 5 // $5 view
  0b14:78               push1 
  0b15:76               push0 
  0b16:39 7e            pushi 7e // $7e setCycle
  0b18:78               push1 
  0b19:51 17            class Walk 
  0b1b:36                push 
  0b1c:38 00d4          pushi d4 // $d4 setAvoider
  0b1f:78               push1 
  0b20:39 56            pushi 56 // $56 new
  0b22:76               push0 
  0b23:51 21            class Avoid 
  0b25:4a 04             send 4 

  0b27:36                push 
  0b28:38 00d7          pushi d7 // $d7 ignoreControl
  0b2b:78               push1 
  0b2c:38 4000          pushi 4000 // $4000 sel_16384
  0b2f:38 00d3          pushi d3 // $d3 setMotion
  0b32:39 04            pushi 4 // $4 x
  0b34:51 1d            class MoveTo 
  0b36:36                push 
  0b37:39 64            pushi 64 // $64 allTrue
  0b39:38 0086          pushi 86 // $86 pause
  0b3c:7c            pushSelf 
  0b3d:81 00              lag gEgo 
  0b3f:4a 24             send 24 

  0b41:32 0176            jmp code_0cba 

        code_0b44
  0b44:3c                 dup 
  0b45:35 05              ldi 5 
  0b47:1a                 eq? 
  0b48:31 32              bnt code_0b7c 
  0b4a:39 42            pushi 42 // $42 setPri
  0b4c:78               push1 
  0b4d:39 0b            pushi b // $b nsBottom
  0b4f:39 05            pushi 5 // $5 view
  0b51:78               push1 
  0b52:39 29            pushi 29 // $29 edit
  0b54:39 06            pushi 6 // $6 loop
  0b56:78               push1 
  0b57:39 05            pushi 5 // $5 view
  0b59:39 7e            pushi 7e // $7e setCycle
  0b5b:78               push1 
  0b5c:51 16            class Fwd 
  0b5e:36                push 
  0b5f:81 00              lag gEgo 
  0b61:4a 18             send 18 

  0b63:39 2b            pushi 2b // $2b number
  0b65:78               push1 
  0b66:39 4c            pushi 4c // $4c claimed
  0b68:39 06            pushi 6 // $6 loop
  0b6a:78               push1 
  0b6b:39 ff            pushi ff // $ff checkAni
  0b6d:39 2a            pushi 2a // $2a play
  0b6f:76               push0 
  0b70:72 0c0b          lofsa $177e // mySound
  0b73:4a 10             send 10 

  0b75:35 05              ldi 5 
  0b77:65 12             aTop seconds 
  0b79:32 013e            jmp code_0cba 

        code_0b7c
  0b7c:3c                 dup 
  0b7d:35 06              ldi 6 
  0b7f:1a                 eq? 
  0b80:31 2d              bnt code_0baf 
  0b82:38 0084          pushi 84 // $84 stop
  0b85:76               push0 
  0b86:72 0bf5          lofsa $177e // mySound
  0b89:4a 04             send 4 

  0b8b:38 0089          pushi 89 // $89 hide
  0b8e:76               push0 
  0b8f:72 0a60          lofsa $15f2 // towel
  0b92:4a 04             send 4 

  0b94:39 42            pushi 42 // $42 setPri
  0b96:78               push1 
  0b97:39 ff            pushi ff // $ff checkAni
  0b99:39 06            pushi 6 // $6 loop
  0b9b:78               push1 
  0b9c:76               push0 
  0b9d:39 07            pushi 7 // $7 cel
  0b9f:78               push1 
  0ba0:76               push0 
  0ba1:39 7e            pushi 7e // $7e setCycle
  0ba3:7a               push2 
  0ba4:51 1a            class End 
  0ba6:36                push 
  0ba7:7c            pushSelf 
  0ba8:81 00              lag gEgo 
  0baa:4a 1a             send 1a 

  0bac:32 010b            jmp code_0cba 

        code_0baf
  0baf:3c                 dup 
  0bb0:35 07              ldi 7 
  0bb2:1a                 eq? 
  0bb3:31 16              bnt code_0bcb 
  0bb5:39 06            pushi 6 // $6 loop
  0bb7:78               push1 
  0bb8:7a               push2 
  0bb9:39 07            pushi 7 // $7 cel
  0bbb:78               push1 
  0bbc:76               push0 
  0bbd:39 7e            pushi 7e // $7e setCycle
  0bbf:7a               push2 
  0bc0:51 1a            class End 
  0bc2:36                push 
  0bc3:7c            pushSelf 
  0bc4:81 00              lag gEgo 
  0bc6:4a 14             send 14 

  0bc8:32 00ef            jmp code_0cba 

        code_0bcb
  0bcb:3c                 dup 
  0bcc:35 08              ldi 8 
  0bce:1a                 eq? 
  0bcf:31 17              bnt code_0be8 
  0bd1:39 06            pushi 6 // $6 loop
  0bd3:78               push1 
  0bd4:39 03            pushi 3 // $3 y
  0bd6:39 07            pushi 7 // $7 cel
  0bd8:78               push1 
  0bd9:76               push0 
  0bda:39 7e            pushi 7e // $7e setCycle
  0bdc:7a               push2 
  0bdd:51 1a            class End 
  0bdf:36                push 
  0be0:7c            pushSelf 
  0be1:81 00              lag gEgo 
  0be3:4a 14             send 14 

  0be5:32 00d2            jmp code_0cba 

        code_0be8
  0be8:3c                 dup 
  0be9:35 09              ldi 9 
  0beb:1a                 eq? 
  0bec:31 17              bnt code_0c05 
  0bee:39 06            pushi 6 // $6 loop
  0bf0:78               push1 
  0bf1:39 03            pushi 3 // $3 y
  0bf3:39 07            pushi 7 // $7 cel
  0bf5:78               push1 
  0bf6:76               push0 
  0bf7:39 7e            pushi 7e // $7e setCycle
  0bf9:7a               push2 
  0bfa:51 1b            class Beg 
  0bfc:36                push 
  0bfd:7c            pushSelf 
  0bfe:81 00              lag gEgo 
  0c00:4a 14             send 14 

  0c02:32 00b5            jmp code_0cba 

        code_0c05
  0c05:3c                 dup 
  0c06:35 0a              ldi a 
  0c08:1a                 eq? 
  0c09:31 20              bnt code_0c2b 
  0c0b:39 06            pushi 6 // $6 loop
  0c0d:78               push1 
  0c0e:7a               push2 
  0c0f:39 07            pushi 7 // $7 cel
  0c11:78               push1 
  0c12:78               push1 
  0c13:89 00              lsg gEgo 
  0c15:43 0e 02         callk NumCels 2 

  0c18:36                push 
  0c19:35 01              ldi 1 
  0c1b:04                 sub 
  0c1c:36                push 
  0c1d:39 7e            pushi 7e // $7e setCycle
  0c1f:7a               push2 
  0c20:51 1b            class Beg 
  0c22:36                push 
  0c23:7c            pushSelf 
  0c24:81 00              lag gEgo 
  0c26:4a 14             send 14 

  0c28:32 008f            jmp code_0cba 

        code_0c2b
  0c2b:3c                 dup 
  0c2c:35 0b              ldi b 
  0c2e:1a                 eq? 
  0c2f:31 16              bnt code_0c47 
  0c31:39 06            pushi 6 // $6 loop
  0c33:78               push1 
  0c34:39 04            pushi 4 // $4 x
  0c36:39 07            pushi 7 // $7 cel
  0c38:78               push1 
  0c39:76               push0 
  0c3a:39 7e            pushi 7e // $7e setCycle
  0c3c:7a               push2 
  0c3d:51 1a            class End 
  0c3f:36                push 
  0c40:7c            pushSelf 
  0c41:81 00              lag gEgo 
  0c43:4a 14             send 14 

  0c45:33 73              jmp code_0cba 

        code_0c47
  0c47:3c                 dup 
  0c48:35 0c              ldi c 
  0c4a:1a                 eq? 
  0c4b:31 12              bnt code_0c5f 
  0c4d:39 06            pushi 6 // $6 loop
  0c4f:78               push1 
  0c50:39 04            pushi 4 // $4 x
  0c52:39 7e            pushi 7e // $7e setCycle
  0c54:7a               push2 
  0c55:51 1b            class Beg 
  0c57:36                push 
  0c58:7c            pushSelf 
  0c59:81 00              lag gEgo 
  0c5b:4a 0e             send e 

  0c5d:33 5b              jmp code_0cba 

        code_0c5f
  0c5f:3c                 dup 
  0c60:35 0d              ldi d 
  0c62:1a                 eq? 
  0c63:31 15              bnt code_0c7a 
  0c65:39 06            pushi 6 // $6 loop
  0c67:78               push1 
  0c68:78               push1 
  0c69:39 07            pushi 7 // $7 cel
  0c6b:78               push1 
  0c6c:76               push0 
  0c6d:39 7e            pushi 7e // $7e setCycle
  0c6f:7a               push2 
  0c70:51 1a            class End 
  0c72:36                push 
  0c73:7c            pushSelf 
  0c74:81 00              lag gEgo 
  0c76:4a 14             send 14 

  0c78:33 40              jmp code_0cba 

        code_0c7a
  0c7a:3c                 dup 
  0c7b:35 0e              ldi e 
  0c7d:1a                 eq? 
  0c7e:31 3a              bnt code_0cba 
  0c80:38 00ca          pushi ca // $ca show
  0c83:76               push0 
  0c84:72 096b          lofsa $15f2 // towel
  0c87:4a 04             send 4 

  0c89:39 05            pushi 5 // $5 view
  0c8b:78               push1 
  0c8c:76               push0 
  0c8d:39 12            pushi 12 // $12 illegalBits
  0c8f:78               push1 
  0c90:38 8000          pushi 8000 // $8000 sel_32768
  0c93:38 00d6          pushi d6 // $d6 observeControl
  0c96:78               push1 
  0c97:38 4000          pushi 4000 // $4000 sel_16384
  0c9a:38 00d4          pushi d4 // $d4 setAvoider
  0c9d:78               push1 
  0c9e:76               push0 
  0c9f:39 7e            pushi 7e // $7e setCycle
  0ca1:78               push1 
  0ca2:51 17            class Walk 
  0ca4:36                push 
  0ca5:81 00              lag gEgo 
  0ca7:4a 1e             send 1e 

  0ca9:76               push0 
  0caa:45 04 00         callb procedure_0004 0 // HandsOn 

  0cad:35 00              ldi 0 
  0caf:a0 0099            sag global153 
  0cb2:39 7a            pushi 7a // $7a setScript
  0cb4:78               push1 
  0cb5:76               push0 
  0cb6:63 08             pToa client 
  0cb8:4a 06             send 6 


        code_0cba
  0cba:3a                toss 
  0cbb:48                 ret 
    )

)

// 1460
(instance pickUp of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_0cbc
  0cbc:87 01              lap param1 
  0cbe:65 0a             aTop state 
  0cc0:36                push 
  0cc1:3c                 dup 
  0cc2:35 00              ldi 0 
  0cc4:1a                 eq? 
  0cc5:31 19              bnt code_0ce0 
  0cc7:76               push0 
  0cc8:45 03 00         callb procedure_0003 0 // HandsOff 

  0ccb:38 00d3          pushi d3 // $d3 setMotion
  0cce:39 04            pushi 4 // $4 x
  0cd0:51 1d            class MoveTo 
  0cd2:36                push 
  0cd3:39 74            pushi 74 // $74 lastSeconds
  0cd5:38 0080          pushi 80 // $80 timeLeft
  0cd8:7c            pushSelf 
  0cd9:81 00              lag gEgo 
  0cdb:4a 0c             send c 

  0cdd:32 00db            jmp code_0dbb 

        code_0ce0
  0ce0:3c                 dup 
  0ce1:35 01              ldi 1 
  0ce3:1a                 eq? 
  0ce4:31 21              bnt code_0d07 
  0ce6:39 05            pushi 5 // $5 view
  0ce8:78               push1 
  0ce9:39 11            pushi 11 // $11 signal
  0ceb:39 07            pushi 7 // $7 cel
  0ced:78               push1 
  0cee:76               push0 
  0cef:39 06            pushi 6 // $6 loop
  0cf1:78               push1 
  0cf2:39 03            pushi 3 // $3 y
  0cf4:38 00d3          pushi d3 // $d3 setMotion
  0cf7:78               push1 
  0cf8:76               push0 
  0cf9:39 7e            pushi 7e // $7e setCycle
  0cfb:7a               push2 
  0cfc:51 1a            class End 
  0cfe:36                push 
  0cff:7c            pushSelf 
  0d00:81 00              lag gEgo 
  0d02:4a 20             send 20 

  0d04:32 00b4            jmp code_0dbb 

        code_0d07
  0d07:3c                 dup 
  0d08:35 02              ldi 2 
  0d0a:1a                 eq? 
  0d0b:31 0e              bnt code_0d1b 
  0d0d:39 7e            pushi 7e // $7e setCycle
  0d0f:7a               push2 
  0d10:51 1b            class Beg 
  0d12:36                push 
  0d13:7c            pushSelf 
  0d14:81 00              lag gEgo 
  0d16:4a 08             send 8 

  0d18:32 00a0            jmp code_0dbb 

        code_0d1b
  0d1b:3c                 dup 
  0d1c:35 03              ldi 3 
  0d1e:1a                 eq? 
  0d1f:31 4f              bnt code_0d70 
  0d21:83 04              lal local4 
  0d23:31 19              bnt code_0d3e 
  0d25:35 00              ldi 0 
  0d27:a3 04              sal local4 
  0d29:39 06            pushi 6 // $6 loop
  0d2b:39 49            pushi 49 // $49 semanticFail
  0d2d:39 16            pushi 16 // $16 brRight
  0d2f:39 52            pushi 52 // $52 icon
  0d31:38 0281          pushi 281 // $281 sel_641
  0d34:76               push0 
  0d35:76               push0 
  0d36:46 00ff 0000 0c  calle ff procedure_0000 c // Print 

  0d3c:33 2c              jmp code_0d6a 

        code_0d3e
  0d3e:7a               push2 
  0d3f:39 49            pushi 49 // $49 semanticFail
  0d41:39 17            pushi 17 // $17 name
  0d43:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0d49:7a               push2 
  0d4a:39 49            pushi 49 // $49 semanticFail
  0d4c:39 18            pushi 18 // $18 key
  0d4e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0d54:7a               push2 
  0d55:39 49            pushi 49 // $49 semanticFail
  0d57:39 19            pushi 19 // $19 time
  0d59:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0d5f:7a               push2 
  0d60:39 49            pushi 49 // $49 semanticFail
  0d62:39 1a            pushi 1a // $1a text
  0d64:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0d6a
  0d6a:35 02              ldi 2 
  0d6c:65 10             aTop cycles 
  0d6e:33 4b              jmp code_0dbb 

        code_0d70
  0d70:3c                 dup 
  0d71:35 04              ldi 4 
  0d73:1a                 eq? 
  0d74:31 0d              bnt code_0d83 
  0d76:39 7e            pushi 7e // $7e setCycle
  0d78:7a               push2 
  0d79:51 1a            class End 
  0d7b:36                push 
  0d7c:7c            pushSelf 
  0d7d:81 00              lag gEgo 
  0d7f:4a 08             send 8 

  0d81:33 38              jmp code_0dbb 

        code_0d83
  0d83:3c                 dup 
  0d84:35 05              ldi 5 
  0d86:1a                 eq? 
  0d87:31 0d              bnt code_0d96 
  0d89:39 7e            pushi 7e // $7e setCycle
  0d8b:7a               push2 
  0d8c:51 1b            class Beg 
  0d8e:36                push 
  0d8f:7c            pushSelf 
  0d90:81 00              lag gEgo 
  0d92:4a 08             send 8 

  0d94:33 25              jmp code_0dbb 

        code_0d96
  0d96:3c                 dup 
  0d97:35 06              ldi 6 
  0d99:1a                 eq? 
  0d9a:31 1f              bnt code_0dbb 
  0d9c:76               push0 
  0d9d:45 04 00         callb procedure_0004 0 // HandsOn 

  0da0:39 05            pushi 5 // $5 view
  0da2:78               push1 
  0da3:76               push0 
  0da4:39 06            pushi 6 // $6 loop
  0da6:78               push1 
  0da7:39 03            pushi 3 // $3 y
  0da9:39 7e            pushi 7e // $7e setCycle
  0dab:78               push1 
  0dac:51 17            class Walk 
  0dae:36                push 
  0daf:81 00              lag gEgo 
  0db1:4a 12             send 12 

  0db3:39 7a            pushi 7a // $7a setScript
  0db5:78               push1 
  0db6:76               push0 
  0db7:63 08             pToa client 
  0db9:4a 06             send 6 


        code_0dbb
  0dbb:3a                toss 
  0dbc:48                 ret 
    )

)

// 1490
(instance sink of RPicView
    (properties
        y $8d
        x $51
        z $0
        heading $0
        view $ad
        loop $0
        cel $0
        priority $9
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0dbd
  0dbd:78               push1 
  0dbe:74 04d5          lofss $1296 // look<dans/evier
  0dc1:43 25 02         callk Said 2 

  0dc4:31 0d              bnt code_0dd3 
  0dc6:7a               push2 
  0dc7:39 49            pushi 49 // $49 semanticFail
  0dc9:39 1b            pushi 1b // $1b elements
  0dcb:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0dd1:33 2b              jmp code_0dfe 

        code_0dd3
  0dd3:39 03            pushi 3 // $3 y
  0dd5:7c            pushSelf 
  0dd6:8f 01              lsp param1 
  0dd8:39 03            pushi 3 // $3 y
  0dda:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0de0:2f 09               bt code_0deb 
  0de2:78               push1 
  0de3:74 0448          lofss $122e // look/evier
  0de6:43 25 02         callk Said 2 

  0de9:31 13              bnt code_0dfe 

        code_0deb
  0deb:39 4c            pushi 4c // $4c claimed
  0ded:78               push1 
  0dee:78               push1 
  0def:87 01              lap param1 
  0df1:4a 06             send 6 

  0df3:7a               push2 
  0df4:39 49            pushi 49 // $49 semanticFail
  0df6:39 1c            pushi 1c // $1c color
  0df8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0dfe
  0dfe:48                 ret 
    )

)

// 14c6
(instance toilet of RPicView
    (properties
        y $ae
        x $10f
        z $0
        heading $0
        view $ad
        loop $0
        cel $2
        priority $d
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0dff
  0dff:78               push1 
  0e00:74 04cf          lofss $12d2 // open,(look<dans)/toilet
  0e03:43 25 02         callk Said 2 

  0e06:31 0d              bnt code_0e15 
  0e08:7a               push2 
  0e09:39 49            pushi 49 // $49 semanticFail
  0e0b:39 1d            pushi 1d // $1d back
  0e0d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0e13:33 2b              jmp code_0e40 

        code_0e15
  0e15:39 03            pushi 3 // $3 y
  0e17:7c            pushSelf 
  0e18:8f 01              lsp param1 
  0e1a:39 03            pushi 3 // $3 y
  0e1c:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0e22:2f 09               bt code_0e2d 
  0e24:78               push1 
  0e25:74 040c          lofss $1234 // look/toilet
  0e28:43 25 02         callk Said 2 

  0e2b:31 13              bnt code_0e40 

        code_0e2d
  0e2d:39 4c            pushi 4c // $4c claimed
  0e2f:78               push1 
  0e30:78               push1 
  0e31:87 01              lap param1 
  0e33:4a 06             send 6 

  0e35:7a               push2 
  0e36:39 49            pushi 49 // $49 semanticFail
  0e38:39 1e            pushi 1e // $1e mode
  0e3a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0e40
  0e40:48                 ret 
    )

)

// 14fc
(instance bathtub of RPicView
    (properties
        y $97
        x $f1
        z $0
        heading $0
        view $ad
        loop $0
        cel $1
        priority $a
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0e41
  0e41:78               push1 
  0e42:74 0448          lofss $128d // look<dans/douche
  0e45:43 25 02         callk Said 2 

  0e48:31 1e              bnt code_0e68 
  0e4a:83 03              lal local3 
  0e4c:31 0d              bnt code_0e5b 
  0e4e:7a               push2 
  0e4f:39 49            pushi 49 // $49 semanticFail
  0e51:39 1f            pushi 1f // $1f style
  0e53:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0e59:33 0b              jmp code_0e66 

        code_0e5b
  0e5b:7a               push2 
  0e5c:39 49            pushi 49 // $49 semanticFail
  0e5e:39 20            pushi 20 // $20 state
  0e60:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0e66
  0e66:33 3c              jmp code_0ea4 

        code_0e68
  0e68:39 03            pushi 3 // $3 y
  0e6a:7c            pushSelf 
  0e6b:8f 01              lsp param1 
  0e6d:39 03            pushi 3 // $3 y
  0e6f:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0e75:2f 09               bt code_0e80 
  0e77:78               push1 
  0e78:74 03ad          lofss $1228 // look/douche
  0e7b:43 25 02         callk Said 2 

  0e7e:31 24              bnt code_0ea4 

        code_0e80
  0e80:39 4c            pushi 4c // $4c claimed
  0e82:78               push1 
  0e83:78               push1 
  0e84:87 01              lap param1 
  0e86:4a 06             send 6 

  0e88:83 03              lal local3 
  0e8a:31 0d              bnt code_0e99 
  0e8c:7a               push2 
  0e8d:39 49            pushi 49 // $49 semanticFail
  0e8f:39 1f            pushi 1f // $1f style
  0e91:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0e97:33 0b              jmp code_0ea4 

        code_0e99
  0e99:7a               push2 
  0e9a:39 49            pushi 49 // $49 semanticFail
  0e9c:39 21            pushi 21 // $21 font
  0e9e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ea4
  0ea4:48                 ret 
    )

)

// 1532
(instance settie of RPicView
    (properties
        y $7d
        x $a1
        z $0
        heading $0
        view $ad
        loop $0
        cel $3
        priority $9
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0ea5
  0ea5:78               push1 
  0ea6:74 041b          lofss $12c4 // open,(look<dans)/banc
  0ea9:43 25 02         callk Said 2 

  0eac:31 0d              bnt code_0ebb 
  0eae:7a               push2 
  0eaf:39 49            pushi 49 // $49 semanticFail
  0eb1:39 22            pushi 22 // $22 type
  0eb3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0eb9:33 2b              jmp code_0ee6 

        code_0ebb
  0ebb:39 03            pushi 3 // $3 y
  0ebd:7c            pushSelf 
  0ebe:8f 01              lsp param1 
  0ec0:39 03            pushi 3 // $3 y
  0ec2:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0ec8:2f 09               bt code_0ed3 
  0eca:78               push1 
  0ecb:74 033f          lofss $120d // look/chair,banc
  0ece:43 25 02         callk Said 2 

  0ed1:31 13              bnt code_0ee6 

        code_0ed3
  0ed3:39 4c            pushi 4c // $4c claimed
  0ed5:78               push1 
  0ed6:78               push1 
  0ed7:87 01              lap param1 
  0ed9:4a 06             send 6 

  0edb:7a               push2 
  0edc:39 49            pushi 49 // $49 semanticFail
  0ede:39 07            pushi 7 // $7 cel
  0ee0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ee6
  0ee6:48                 ret 
    )

)

// 1568
(instance basket of RPicView
    (properties
        y $7a
        x $75
        z $0
        heading $0
        view $ad
        loop $0
        cel $6
        priority $ffff
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0ee7
  0ee7:78               push1 
  0ee8:74 02c3          lofss $11ae // get/(basket[<wastepaper,dechet]),(bidon[<dechet])
  0eeb:43 25 02         callk Said 2 

  0eee:31 0d              bnt code_0efd 
  0ef0:7a               push2 
  0ef1:39 49            pushi 49 // $49 semanticFail
  0ef3:39 23            pushi 23 // $23 window
  0ef5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0efb:33 6d              jmp code_0f6a 

        code_0efd
  0efd:78               push1 
  0efe:74 0366          lofss $1267 // look<dans/(basket[<wastepaper,dechet]),(bidon[<dechet])
  0f01:43 25 02         callk Said 2 

  0f04:31 39              bnt code_0f3f 
  0f06:38 00ae          pushi ae // $ae distanceTo
  0f09:78               push1 
  0f0a:74 0661          lofss $156e // basket
  0f0d:81 00              lag gEgo 
  0f0f:4a 06             send 6 

  0f11:36                push 
  0f12:35 14              ldi 14 
  0f14:22                 lt? 
  0f15:31 22              bnt code_0f39 
  0f17:88 00a5            lsg gAct 
  0f1a:35 05              ldi 5 
  0f1c:20                 ge? 
  0f1d:31 0d              bnt code_0f2c 
  0f1f:7a               push2 
  0f20:39 49            pushi 49 // $49 semanticFail
  0f22:39 03            pushi 3 // $3 y
  0f24:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0f2a:33 0b              jmp code_0f37 

        code_0f2c
  0f2c:7a               push2 
  0f2d:39 49            pushi 49 // $49 semanticFail
  0f2f:39 04            pushi 4 // $4 x
  0f31:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0f37
  0f37:33 04              jmp code_0f3d 

        code_0f39
  0f39:76               push0 
  0f3a:45 09 00         callb procedure_0009 0 // NotClose 


        code_0f3d
  0f3d:33 2b              jmp code_0f6a 

        code_0f3f
  0f3f:39 03            pushi 3 // $3 y
  0f41:7c            pushSelf 
  0f42:8f 01              lsp param1 
  0f44:39 03            pushi 3 // $3 y
  0f46:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0f4c:2f 09               bt code_0f57 
  0f4e:78               push1 
  0f4f:74 0293          lofss $11e5 // look/(basket[<wastepaper,dechet]),(bidon[<dechet])
  0f52:43 25 02         callk Said 2 

  0f55:31 13              bnt code_0f6a 

        code_0f57
  0f57:39 4c            pushi 4c // $4c claimed
  0f59:78               push1 
  0f5a:78               push1 
  0f5b:87 01              lap param1 
  0f5d:4a 06             send 6 

  0f5f:7a               push2 
  0f60:39 49            pushi 49 // $49 semanticFail
  0f62:39 24            pushi 24 // $24 cursor
  0f64:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0f6a
  0f6a:48                 ret 
    )

)

// 159e
(instance bra of Prop
    (properties
        y $94
        x $d2
        z $0
        heading $0
        yStep $2
        view $13
        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
    )
)

// 15ec
(instance towel of Prop
    (properties
        y $5f
        x $5b
        z $0
        heading $0
        yStep $2
        view $ad
        loop $0
        cel $4
        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_0f6b
  0f6b:78               push1 
  0f6c:74 0265          lofss $11d4 // get/serviette,(cloth<gommer)
  0f6f:43 25 02         callk Said 2 

  0f72:31 0d              bnt code_0f81 
  0f74:7a               push2 
  0f75:39 49            pushi 49 // $49 semanticFail
  0f77:39 25            pushi 25 // $25 max
  0f79:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0f7f:33 2b              jmp code_0fac 

        code_0f81
  0f81:39 03            pushi 3 // $3 y
  0f83:7c            pushSelf 
  0f84:8f 01              lsp param1 
  0f86:39 03            pushi 3 // $3 y
  0f88:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0f8e:2f 09               bt code_0f99 
  0f90:78               push1 
  0f91:74 02a6          lofss $123a // look/serviette,(cloth<gommer)
  0f94:43 25 02         callk Said 2 

  0f97:31 13              bnt code_0fac 

        code_0f99
  0f99:39 4c            pushi 4c // $4c claimed
  0f9b:78               push1 
  0f9c:78               push1 
  0f9d:87 01              lap param1 
  0f9f:4a 06             send 6 

  0fa1:7a               push2 
  0fa2:39 49            pushi 49 // $49 semanticFail
  0fa4:39 26            pushi 26 // $26 mark
  0fa6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0fac
  0fac:48                 ret 
    )

)

// 163e
(instance rope of Prop
    (properties
        y $86
        x $10d
        z $0
        heading $0
        yStep $2
        view $ad
        loop $0
        cel $5
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 168c
(instance Lilian of Act
    (properties
        y $86
        x $61
        z $0
        heading $0
        yStep $2
        view $1f9
        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
    )
    (method (handleEvent) // method_0fad
  0fad:39 03            pushi 3 // $3 y
  0faf:7c            pushSelf 
  0fb0:8f 01              lsp param1 
  0fb2:39 03            pushi 3 // $3 y
  0fb4:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0fba:2f 09               bt code_0fc5 
  0fbc:78               push1 
  0fbd:74 0256          lofss $1216 // look/lil
  0fc0:43 25 02         callk Said 2 

  0fc3:31 38              bnt code_0ffd 

        code_0fc5
  0fc5:88 00cf            lsg global207 
  0fc8:35 20              ldi 20 
  0fca:12                 and 
  0fcb:18                 not 
  0fcc:31 1a              bnt code_0fe8 
  0fce:88 00cf            lsg global207 
  0fd1:35 20              ldi 20 
  0fd3:14                  or 
  0fd4:a0 00cf            sag global207 
  0fd7:35 06              ldi 6 
  0fd9:a0 00d5            sag global213 
  0fdc:39 03            pushi 3 // $3 y
  0fde:76               push0 
  0fdf:39 49            pushi 49 // $49 semanticFail
  0fe1:39 27            pushi 27 // $27 who
  0fe3:45 01 06         callb procedure_0001 6 // Say 

  0fe6:33 0b              jmp code_0ff3 

        code_0fe8
  0fe8:7a               push2 
  0fe9:39 49            pushi 49 // $49 semanticFail
  0feb:39 28            pushi 28 // $28 message
  0fed:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ff3
  0ff3:39 4c            pushi 4c // $4c claimed
  0ff5:78               push1 
  0ff6:78               push1 
  0ff7:87 01              lap param1 
  0ff9:4a 06             send 6 

  0ffb:33 3f              jmp code_103c 

        code_0ffd
  0ffd:78               push1 
  0ffe:74 033f          lofss $1340 // bonjour,ask,raconter
  1001:43 25 02         callk Said 2 

  1004:31 0d              bnt code_1013 
  1006:7a               push2 
  1007:39 49            pushi 49 // $49 semanticFail
  1009:39 29            pushi 29 // $29 edit
  100b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1011:33 29              jmp code_103c 

        code_1013
  1013:78               push1 
  1014:74 0304          lofss $131b // hold,deliver,get,abattre,embrasser,embrace,draguer>
  1017:43 25 02         callk Said 2 

  101a:31 20              bnt code_103c 
  101c:39 7a            pushi 7a // $7a setScript
  101e:78               push1 
  101f:7a               push2 
  1020:38 00f3          pushi f3 // $f3 close
  1023:76               push0 
  1024:43 02 04         callk ScriptID 4 

  1027:36                push 
  1028:72 032b          lofsa $1356 // Room73
  102b:4a 06             send 6 

  102d:39 6f            pushi 6f // $6f handleEvent
  102f:78               push1 
  1030:8f 01              lsp param1 
  1032:39 76            pushi 76 // $76 script
  1034:76               push0 
  1035:72 031e          lofsa $1356 // Room73
  1038:4a 04             send 4 

  103a:4a 06             send 6 


        code_103c
  103c:48                 ret 
    )

)

// 16f4
(instance Cabinet of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $5f
        nsLeft $33
        nsBottom $98
        nsRight $43
    )
    (method (handleEvent) // method_103d
  103d:78               push1 
  103e:74 026d          lofss $12ae // open,(look<dans)/armoire[<medicament,lin]
  1041:43 25 02         callk Said 2 

  1044:31 0d              bnt code_1053 
  1046:7a               push2 
  1047:39 49            pushi 49 // $49 semanticFail
  1049:39 2a            pushi 2a // $2a play
  104b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1051:33 41              jmp code_1094 

        code_1053
  1053:78               push1 
  1054:74 01ff          lofss $1256 // look<behind/armoire[<medicament,lin]
  1057:43 25 02         callk Said 2 

  105a:31 0d              bnt code_1069 
  105c:7a               push2 
  105d:39 49            pushi 49 // $49 semanticFail
  105f:39 2b            pushi 2b // $2b number
  1061:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1067:33 2b              jmp code_1094 

        code_1069
  1069:39 03            pushi 3 // $3 y
  106b:7c            pushSelf 
  106c:8f 01              lsp param1 
  106e:39 03            pushi 3 // $3 y
  1070:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  1076:2f 09               bt code_1081 
  1078:78               push1 
  1079:74 0183          lofss $11ff // look/armoire[<medicament,lin]
  107c:43 25 02         callk Said 2 

  107f:31 13              bnt code_1094 

        code_1081
  1081:39 4c            pushi 4c // $4c claimed
  1083:78               push1 
  1084:78               push1 
  1085:87 01              lap param1 
  1087:4a 06             send 6 

  1089:7a               push2 
  108a:39 49            pushi 49 // $49 semanticFail
  108c:39 2c            pushi 2c // $2c handle
  108e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_1094
  1094:48                 ret 
    )

)

// 1720
(instance Mirror of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $44
        nsLeft $44
        nsBottom $5e
        nsRight $54
    )
    (method (handleEvent) // method_1095
  1095:78               push1 
  1096:74 01eb          lofss $1284 // look<dans/miroir
  1099:43 25 02         callk Said 2 

  109c:2f 09               bt code_10a7 
  109e:78               push1 
  109f:74 0180          lofss $1222 // look/reflection
  10a2:43 25 02         callk Said 2 

  10a5:31 28              bnt code_10cf 

        code_10a7
  10a7:38 00ae          pushi ae // $ae distanceTo
  10aa:78               push1 
  10ab:74 03e8          lofss $1496 // sink
  10ae:81 00              lag gEgo 
  10b0:4a 06             send 6 

  10b2:36                push 
  10b3:35 28              ldi 28 
  10b5:22                 lt? 
  10b6:31 11              bnt code_10c9 
  10b8:35 0c              ldi c 
  10ba:a0 00d5            sag global213 
  10bd:39 03            pushi 3 // $3 y
  10bf:76               push0 
  10c0:39 49            pushi 49 // $49 semanticFail
  10c2:39 2d            pushi 2d // $2d client
  10c4:45 01 06         callb procedure_0001 6 // Say 

  10c7:33 04              jmp code_10cd 

        code_10c9
  10c9:76               push0 
  10ca:45 09 00         callb procedure_0009 0 // NotClose 


        code_10cd
  10cd:33 41              jmp code_1110 

        code_10cf
  10cf:78               push1 
  10d0:74 0175          lofss $1248 // look<(behind,below)/miroir
  10d3:43 25 02         callk Said 2 

  10d6:31 0d              bnt code_10e5 
  10d8:7a               push2 
  10d9:39 49            pushi 49 // $49 semanticFail
  10db:39 2e            pushi 2e // $2e dx
  10dd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  10e3:33 2b              jmp code_1110 

        code_10e5
  10e5:39 03            pushi 3 // $3 y
  10e7:7c            pushSelf 
  10e8:8f 01              lsp param1 
  10ea:39 03            pushi 3 // $3 y
  10ec:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  10f2:2f 09               bt code_10fd 
  10f4:78               push1 
  10f5:74 0124          lofss $121c // look/miroir
  10f8:43 25 02         callk Said 2 

  10fb:31 13              bnt code_1110 

        code_10fd
  10fd:39 4c            pushi 4c // $4c claimed
  10ff:78               push1 
  1100:78               push1 
  1101:87 01              lap param1 
  1103:4a 06             send 6 

  1105:7a               push2 
  1106:39 49            pushi 49 // $49 semanticFail
  1108:39 2f            pushi 2f // $2f dy
  110a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_1110
  1110:48                 ret 
    )

)

// 174c
(instance Window1 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $2b
        nsLeft $62
        nsBottom $61
        nsRight $e0
    )
    (method (handleEvent) // method_1111
  1111:39 03            pushi 3 // $3 y
  1113:7c            pushSelf 
  1114:8f 01              lsp param1 
  1116:39 03            pushi 3 // $3 y
  1118:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  111e:31 0f              bnt code_112f 
  1120:39 4c            pushi 4c // $4c claimed
  1122:78               push1 
  1123:78               push1 
  1124:87 01              lap param1 
  1126:4a 06             send 6 

  1128:78               push1 
  1129:74 0704          lofss $1830 // window
  112c:45 19 02         callb procedure_0019 2 // DoLook 


        code_112f
  112f:48                 ret 
    )

)

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



