(script 37)

(string
    string_202e "Armor"
    string_2034 "Axe"
    string_2038 "Can"
    string_203c "Carpet"
    string_2043 "Couch"
    string_2049 "Crash"
    string_204f "Fall"
    string_2054 "Room37"
    string_205b "Visor"
    string_2061 "carpet"
    string_2068 "chand"
    string_206e "clock"
    string_2074 "crush"
    string_207a "knight"
    string_2081 "lamp"
    string_2086 "lampL"
    string_208c "lampR"
    string_2092 "leftBotPath"
    string_209e "leftTopPath"
    string_20aa "mirror"
    string_20b1 "myIcon"
    string_20b8 "note"
    string_20bd "oiling"
    string_20c4 "openVisor"
    string_20ce "phone"
    string_20d4 "postL"
    string_20da "postR"
    string_20e0 "rightBotPath"
    string_20ed "rightTopPath"
    string_20fa "sofa"
    string_20ff "table"
    string_2105 "valve"
    string_210b ""
)

(said
    said_1694 (look,etudier,get)/letter
    said_16a2 (appuyer,bouger,rotate,open,lift,break,(look<dans))>
    said_16bf (appuyer,attirer)[<open,on]/miroir
    said_16d2 (attirer,appuyer)[<open,on]/clock
    said_16e5 /arm
    said_16e9 /arm,jambe,casque,casque
    said_16f6 /arm<left
    said_16fd /arm<right
    said_1704 /armor,cloth
    said_170b /ax
    said_170f /ax[<bataille]
    said_1718 /aigle,post[<newel]
    said_1724 /body
    said_1728 /chandelier,ceiling
    said_172f /door
    said_1733 /door<arriere
    said_173a /downstair
    said_173e /coude
    said_1742 /coude<left
    said_1749 /coude<right
    said_1750 /deliver
    said_1754 /deliver<left
    said_175b /deliver<right
    said_1762 /casque,casque
    said_1769 /cachoterie<door
    said_1770 /genou
    said_1774 /genou<left
    said_177b /genou<right
    said_1782 /jambe
    said_1786 /jambe<left
    said_178d /jambe<right
    said_1794 /letter
    said_1798 /cou
    said_179c /temps
    said_17a0 <(dans,behind)/clock
    said_17ac <(dans,behind)/miroir
    said_17b8 <below/escalier
    said_17bf <haut
    said_17c3 [<*][/*]
    said_17ce [<around,at][/room]
    said_17dc climb[<haut]/escalier
    said_17e7 clock,temps
    said_17ed clore/casque
    said_17f3 detach/ax[<bataille]
    said_17fe enter,porter,((get,cacher,aller,climb)<dans),(attach<on)/armor,cloth
    said_1825 arracher>
    said_1829 get,arracher,rotate,detach,rotate/aigle,post[<newel]
    said_1843 get/letter
    said_1849 get/valve,fontainier
    said_1852 get>
    said_1856 lift,arracher,open,lift,(look<dans)/casque
    said_186d ecouter/clock
    said_1873 look/armor,cloth>
    said_187d look/ax[<bataille]
    said_1888 look<dans>
    said_188f look>
    said_1893 look[<at]/clock
    said_189e look[<at]/miroir
    said_18a9 huile>
    said_18ad rotate,bouger/miroir,clock
    said_18b9 rotate,rotate/miroir
    said_18c2 porter,attach<on>
)

(synonym
    escalier | stair | staircase | stairway | step = upstair
    casque | helmet = head | tete
    casque | helmet = mask | masque | visiere | visor
    body | corps | corpse = chest | malle | poitrine | torse | torso | trunk
    balcon | balcony | railing = balcon | balcony | railing
    balcon | balcony | railing = banister | rail | rampe
    room = hall | hallway
)

(local
    local0 = $0000
    local1 = $0096
    local2 = $0041
    local3 = $00ad
    local4 = $005b
    local5 = $00ab
    local6 = $0060
    local7 = $009c
    local8 = $0052
    local9 = $00af
    local10 = $007a
    local11 = $00d2
    local12 = $0068
    local13 = $00a3
    local14 = $009d
    local15 = $0091
    local16 = $005c
    local17 = $008e
    local18 = $0080
    local19 = $0091
    local20 = $009a
    local21 = $00ab
    local22 = $00ae
    local23 = $00a2
    local24 = $00b3
    local25 = $00ae
    local26 = $009d
    local27 = $0067
    local28 = $00b2
    local29 = $0038
    local30 = $0096
    local31 = $001e
    local32 = $0094
    local33 = $8000
    local34 = $00da
    local35 = $00b1
    local36 = $010d
    local37 = $0094
    local38 = $0122
    local39 = $0094
    local40 = $8000
    local41 = $0107
    local42 = $0098
    local43 = $00cd
    local44 = $00b7
    local45 = $8000
    local46 = $0039
    local47 = $0099
    local48 = $0075
    local49 = $00b6
    local50 = $8000
    local51 = $0000
    local52 = $0000
    local53 = $0000
    local54 = $0000
    local55 = $0000
    local56 = $0000
    local57 = $0000
    local58 = $0000
    local59 = $0000
    local60 = $0000
)

// 18d2
(instance public Room37 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $25
        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_0169
  0169:35 50              ldi 50 
  016b:65 16             aTop horizon 
  016d:35 10              ldi 10 
  016f:65 1e             aTop south 
  0171:35 00              ldi 0 
  0173:a1 66              sag global102 
  0175:39 57            pushi 57 // $57 init
  0177:76               push0 
  0178:57 37 04         super Rm 4 

  017b:7a               push2 
  017c:38 0087          pushi 87 // $87 clean
  017f:39 04            pushi 4 // $4 x
  0181:43 00 04         callk Load 4 

  0184:7a               push2 
  0185:38 0081          pushi 81 // $81 prevSignal
  0188:39 31            pushi 31 // $31 b-i1
  018a:43 00 04         callk Load 4 

  018d:39 03            pushi 3 // $3 y
  018f:38 0080          pushi 80 // $80 timeLeft
  0192:39 0a            pushi a // $a nsLeft
  0194:39 0c            pushi c // $c nsRight
  0196:45 15 06         callb procedure_0015 6 // LoadMany 

  0199:39 05            pushi 5 // $5 view
  019b:38 0084          pushi 84 // $84 stop
  019e:39 09            pushi 9 // $9 nsTop
  01a0:39 24            pushi 24 // $24 cursor
  01a2:39 53            pushi 53 // $53 draw
  01a4:39 49            pushi 49 // $49 semanticFail
  01a6:45 15 0a         callb procedure_0015 a // LoadMany 

  01a9:7a               push2 
  01aa:38 0082          pushi 82 // $82 owner
  01ad:38 03d9          pushi 3d9 // $3d9 sel_985
  01b0:43 00 04         callk Load 4 

  01b3:78               push1 
  01b4:39 29            pushi 29 // $29 edit
  01b6:45 07 02         callb procedure_0007 2 // IsFlag 

  01b9:18                 not 
  01ba:2f 12               bt code_01ce 
  01bc:78               push1 
  01bd:39 2a            pushi 2a // $2a play
  01bf:45 07 02         callb procedure_0007 2 // IsFlag 

  01c2:18                 not 
  01c3:2f 09               bt code_01ce 
  01c5:78               push1 
  01c6:39 2b            pushi 2b // $2b number
  01c8:45 07 02         callb procedure_0007 2 // IsFlag 

  01cb:18                 not 
  01cc:31 20              bnt code_01ee 

        code_01ce
  01ce:88 00a5            lsg gAct 
  01d1:35 00              ldi 0 
  01d3:1e                 gt? 
  01d4:31 18              bnt code_01ee 
  01d6:7a               push2 
  01d7:38 0080          pushi 80 // $80 timeLeft
  01da:38 039d          pushi 39d // $39d sel_925
  01dd:43 00 04         callk Load 4 

  01e0:7a               push2 
  01e1:38 008f          pushi 8f // $8f moveTo
  01e4:38 019c          pushi 19c // $19c sel_412
  01e7:45 15 04         callb procedure_0015 4 // LoadMany 

  01ea:35 01              ldi 1 
  01ec:a3 3c              sal local60 

        code_01ee
  01ee:39 61            pushi 61 // $61 add
  01f0:39 06            pushi 6 // $6 loop
  01f2:74 17cb          lofss $19c0 // postR
  01f5:74 17f2          lofss $19ea // postL
  01f8:74 1819          lofss $1a14 // phone
  01fb:74 184c          lofss $1a4a // lamp
  01fe:74 187f          lofss $1a80 // clock
  0201:74 18b2          lofss $1ab6 // mirror
  0204:39 62            pushi 62 // $62 eachElementDo
  0206:78               push1 
  0207:39 57            pushi 57 // $57 init
  0209:39 3c            pushi 3c // $3c doit
  020b:76               push0 
  020c:81 0a              lag gAddToPics 
  020e:4a 1a             send 1a 

  0210:38 010a          pushi 10a // $10a setRegions
  0213:78               push1 
  0214:38 00d3          pushi d3 // $d3 setMotion
  0217:38 010b          pushi 10b // $10b setFeatures
  021a:39 08            pushi 8 // $8 underBits
  021c:74 17f5          lofss $1a14 // phone
  021f:74 1828          lofss $1a4a // lamp
  0222:74 185b          lofss $1a80 // clock
  0225:74 188e          lofss $1ab6 // mirror
  0228:74 1b69          lofss $1d94 // Armor
  022b:74 1b92          lofss $1dc0 // Axe
  022e:74 1bbb          lofss $1dec // Carpet
  0231:74 1be4          lofss $1e18 // Couch
  0234:54 1a             self 1a 

  0236:39 42            pushi 42 // $42 setPri
  0238:78               push1 
  0239:78               push1 
  023a:39 57            pushi 57 // $57 init
  023c:76               push0 
  023d:38 0089          pushi 89 // $89 hide
  0240:76               push0 
  0241:72 19ec          lofsa $1c30 // note
  0244:4a 0e             send e 

  0246:39 42            pushi 42 // $42 setPri
  0248:78               push1 
  0249:39 07            pushi 7 // $7 cel
  024b:39 57            pushi 57 // $57 init
  024d:76               push0 
  024e:38 00c6          pushi c6 // $c6 stopUpd
  0251:76               push0 
  0252:72 18e9          lofsa $1b3e // lampL
  0255:4a 0e             send e 

  0257:39 42            pushi 42 // $42 setPri
  0259:78               push1 
  025a:39 07            pushi 7 // $7 cel
  025c:39 57            pushi 57 // $57 init
  025e:76               push0 
  025f:38 00c6          pushi c6 // $c6 stopUpd
  0262:76               push0 
  0263:72 192a          lofsa $1b90 // lampR
  0266:4a 0e             send e 

  0268:80 00df            lag gDetailLevel 
  026b:31 1e              bnt code_028b 
  026d:38 00a3          pushi a3 // $a3 startUpd
  0270:76               push0 
  0271:39 7e            pushi 7e // $7e setCycle
  0273:78               push1 
  0274:51 16            class Fwd 
  0276:36                push 
  0277:72 1916          lofsa $1b90 // lampR
  027a:4a 0a             send a 

  027c:38 00a3          pushi a3 // $a3 startUpd
  027f:76               push0 
  0280:39 7e            pushi 7e // $7e setCycle
  0282:78               push1 
  0283:51 16            class Fwd 
  0285:36                push 
  0286:72 18b5          lofsa $1b3e // lampL
  0289:4a 0a             send a 


        code_028b
  028b:38 00dc          pushi dc // $dc setStep
  028e:7a               push2 
  028f:39 05            pushi 5 // $5 view
  0291:39 05            pushi 5 // $5 view
  0293:38 00d5          pushi d5 // $d5 ignoreHorizon
  0296:78               push1 
  0297:78               push1 
  0298:39 57            pushi 57 // $57 init
  029a:76               push0 
  029b:38 0089          pushi 89 // $89 hide
  029e:76               push0 
  029f:72 1a8e          lofsa $1d30 // Can
  02a2:4a 16             send 16 

  02a4:39 42            pushi 42 // $42 setPri
  02a6:78               push1 
  02a7:7a               push2 
  02a8:39 57            pushi 57 // $57 init
  02aa:76               push0 
  02ab:38 0089          pushi 89 // $89 hide
  02ae:76               push0 
  02af:72 19cc          lofsa $1c7e // Visor
  02b2:4a 0e             send e 

  02b4:38 00c9          pushi c9 // $c9 ignoreActors
  02b7:78               push1 
  02b8:78               push1 
  02b9:39 57            pushi 57 // $57 init
  02bb:76               push0 
  02bc:38 00c6          pushi c6 // $c6 stopUpd
  02bf:76               push0 
  02c0:72 1829          lofsa $1aec // knight
  02c3:4a 0e             send e 

  02c5:38 00c8          pushi c8 // $c8 setLoop
  02c8:78               push1 
  02c9:7a               push2 
  02ca:38 00d5          pushi d5 // $d5 ignoreHorizon
  02cd:76               push0 
  02ce:39 12            pushi 12 // $12 illegalBits
  02d0:78               push1 
  02d1:76               push0 
  02d2:39 42            pushi 42 // $42 setPri
  02d4:78               push1 
  02d5:39 0f            pushi f // $f lsBottom
  02d7:39 37            pushi 37 // $37 yStep
  02d9:78               push1 
  02da:39 0a            pushi a // $a nsLeft
  02dc:39 57            pushi 57 // $57 init
  02de:76               push0 
  02df:38 00c6          pushi c6 // $c6 stopUpd
  02e2:76               push0 
  02e3:72 19e6          lofsa $1ccc // chand
  02e6:4a 24             send 24 

  02e8:80 00b7            lag gConMusic 
  02eb:a3 3b              sal local59 
  02ed:89 0c              lsg gPrevRoomNum 
  02ef:35 21              ldi 21 
  02f1:1c                 ne? 
  02f2:31 11              bnt code_0305 
  02f4:39 2b            pushi 2b // $2b number
  02f6:78               push1 
  02f7:39 1c            pushi 1c // $1c color
  02f9:39 06            pushi 6 // $6 loop
  02fb:78               push1 
  02fc:39 ff            pushi ff // $ff checkAni
  02fe:39 2a            pushi 2a // $2a play
  0300:76               push0 
  0301:83 3b              lal local59 
  0303:4a 10             send 10 


        code_0305
  0305:89 0c              lsg gPrevRoomNum 
  0307:3c                 dup 
  0308:35 24              ldi 24 
  030a:1a                 eq? 
  030b:31 1a              bnt code_0327 
  030d:39 12            pushi 12 // $12 illegalBits
  030f:78               push1 
  0310:38 4000          pushi 4000 // $4000 sel_16384
  0313:39 42            pushi 42 // $42 setPri
  0315:78               push1 
  0316:39 ff            pushi ff // $ff checkAni
  0318:38 00c5          pushi c5 // $c5 posn
  031b:7a               push2 
  031c:39 5c            pushi 5c // $5c isKindOf
  031e:39 58            pushi 58 // $58 dispose
  0320:81 00              lag gEgo 
  0322:4a 14             send 14 

  0324:32 00b8            jmp code_03df 

        code_0327
  0327:3c                 dup 
  0328:35 26              ldi 26 
  032a:1a                 eq? 
  032b:31 1b              bnt code_0348 
  032d:39 12            pushi 12 // $12 illegalBits
  032f:78               push1 
  0330:38 4000          pushi 4000 // $4000 sel_16384
  0333:39 42            pushi 42 // $42 setPri
  0335:78               push1 
  0336:39 ff            pushi ff // $ff checkAni
  0338:38 00c5          pushi c5 // $c5 posn
  033b:7a               push2 
  033c:38 00e5          pushi e5 // $e5 prevDir
  033f:39 58            pushi 58 // $58 dispose
  0341:81 00              lag gEgo 
  0343:4a 14             send 14 

  0345:32 0097            jmp code_03df 

        code_0348
  0348:3c                 dup 
  0349:35 2f              ldi 2f 
  034b:1a                 eq? 
  034c:31 3a              bnt code_0388 
  034e:76               push0 
  034f:45 03 00         callb procedure_0003 0 // HandsOff 

  0352:35 01              ldi 1 
  0354:a3 36              sal local54 
  0356:39 12            pushi 12 // $12 illegalBits
  0358:78               push1 
  0359:38 2000          pushi 2000 // $2000 sel_8192
  035c:39 42            pushi 42 // $42 setPri
  035e:78               push1 
  035f:39 0e            pushi e // $e lsLeft
  0361:38 00d3          pushi d3 // $d3 setMotion
  0364:39 03            pushi 3 // $3 y
  0366:51 1d            class MoveTo 
  0368:36                push 
  0369:39 04            pushi 4 // $4 x
  036b:76               push0 
  036c:81 00              lag gEgo 
  036e:4a 04             send 4 

  0370:36                push 
  0371:34 00a0            ldi a0 
  0374:22                 lt? 
  0375:31 04              bnt code_037b 
  0377:35 1e              ldi 1e 
  0379:33 03              jmp code_037e 

        code_037b
  037b:34 0122            ldi 122 

        code_037e
  037e:36                push 
  037f:38 0096          pushi 96 // $96 busy
  0382:81 00              lag gEgo 
  0384:4a 16             send 16 

  0386:33 57              jmp code_03df 

        code_0388
  0388:3c                 dup 
  0389:35 21              ldi 21 
  038b:1a                 eq? 
  038c:31 42              bnt code_03d0 
  038e:39 04            pushi 4 // $4 x
  0390:76               push0 
  0391:81 00              lag gEgo 
  0393:4a 04             send 4 

  0395:36                push 
  0396:35 63              ldi 63 
  0398:22                 lt? 
  0399:31 12              bnt code_03ad 
  039b:38 00c5          pushi c5 // $c5 posn
  039e:7a               push2 
  039f:39 6e            pushi 6e // $6e indexOf
  03a1:39 03            pushi 3 // $3 y
  03a3:76               push0 
  03a4:81 00              lag gEgo 
  03a6:4a 04             send 4 

  03a8:36                push 
  03a9:81 00              lag gEgo 
  03ab:4a 08             send 8 


        code_03ad
  03ad:39 04            pushi 4 // $4 x
  03af:76               push0 
  03b0:81 00              lag gEgo 
  03b2:4a 04             send 4 

  03b4:36                push 
  03b5:34 00de            ldi de 
  03b8:1e                 gt? 
  03b9:31 13              bnt code_03ce 
  03bb:38 00c5          pushi c5 // $c5 posn
  03be:7a               push2 
  03bf:38 00cd          pushi cd // $cd xLast
  03c2:39 03            pushi 3 // $3 y
  03c4:76               push0 
  03c5:81 00              lag gEgo 
  03c7:4a 04             send 4 

  03c9:36                push 
  03ca:81 00              lag gEgo 
  03cc:4a 08             send 8 


        code_03ce
  03ce:33 0f              jmp code_03df 

        code_03d0
  03d0:39 12            pushi 12 // $12 illegalBits
  03d2:78               push1 
  03d3:38 4000          pushi 4000 // $4000 sel_16384
  03d6:39 42            pushi 42 // $42 setPri
  03d8:78               push1 
  03d9:39 ff            pushi ff // $ff checkAni
  03db:81 00              lag gEgo 
  03dd:4a 0c             send c 


        code_03df
  03df:3a                toss 
  03e0:39 05            pushi 5 // $5 view
  03e2:78               push1 
  03e3:76               push0 
  03e4:39 57            pushi 57 // $57 init
  03e6:76               push0 
  03e7:81 00              lag gEgo 
  03e9:4a 0a             send a 

  03eb:48                 ret 
    )

    (method (doit) // method_03ec
  03ec:38 00db          pushi db // $db onControl
  03ef:78               push1 
  03f0:78               push1 
  03f1:81 00              lag gEgo 
  03f3:4a 06             send 6 

  03f5:36                push 
  03f6:3c                 dup 
  03f7:34 0100            ldi 100 
  03fa:1a                 eq? 
  03fb:31 4a              bnt code_0447 
  03fd:39 06            pushi 6 // $6 loop
  03ff:76               push0 
  0400:81 00              lag gEgo 
  0402:4a 04             send 4 

  0404:36                push 
  0405:35 00              ldi 0 
  0407:1a                 eq? 
  0408:31 3a              bnt code_0444 
  040a:83 36              lal local54 
  040c:18                 not 
  040d:31 35              bnt code_0444 
  040f:35 01              ldi 1 
  0411:a3 36              sal local54 
  0413:35 00              ldi 0 
  0415:a3 38              sal local56 
  0417:35 01              ldi 1 
  0419:a1 65              sag global101 
  041b:35 32              ldi 32 
  041d:65 16             aTop horizon 
  041f:35 01              ldi 1 
  0421:a3 3a              sal local58 
  0423:35 2f              ldi 2f 
  0425:65 1a             aTop north 
  0427:76               push0 
  0428:45 03 00         callb procedure_0003 0 // HandsOff 

  042b:38 00c9          pushi c9 // $c9 ignoreActors
  042e:78               push1 
  042f:78               push1 
  0430:39 12            pushi 12 // $12 illegalBits
  0432:78               push1 
  0433:76               push0 
  0434:39 42            pushi 42 // $42 setPri
  0436:78               push1 
  0437:39 0e            pushi e // $e lsLeft
  0439:38 00d3          pushi d3 // $d3 setMotion
  043c:78               push1 
  043d:74 1a3e          lofss $1e7e // rightBotPath
  0440:81 00              lag gEgo 
  0442:4a 18             send 18 


        code_0444
  0444:32 01d3            jmp code_061a 

        code_0447
  0447:3c                 dup 
  0448:34 1000            ldi 1000 
  044b:1a                 eq? 
  044c:31 49              bnt code_0497 
  044e:39 06            pushi 6 // $6 loop
  0450:76               push0 
  0451:81 00              lag gEgo 
  0453:4a 04             send 4 

  0455:36                push 
  0456:35 01              ldi 1 
  0458:1a                 eq? 
  0459:31 39              bnt code_0494 
  045b:83 36              lal local54 
  045d:18                 not 
  045e:31 34              bnt code_0494 
  0460:35 01              ldi 1 
  0462:a3 36              sal local54 
  0464:35 01              ldi 1 
  0466:a3 3a              sal local58 
  0468:35 00              ldi 0 
  046a:a3 38              sal local56 
  046c:35 32              ldi 32 
  046e:65 16             aTop horizon 
  0470:35 2f              ldi 2f 
  0472:65 1a             aTop north 
  0474:35 01              ldi 1 
  0476:a1 65              sag global101 
  0478:39 12            pushi 12 // $12 illegalBits
  047a:78               push1 
  047b:76               push0 
  047c:39 42            pushi 42 // $42 setPri
  047e:78               push1 
  047f:39 0e            pushi e // $e lsLeft
  0481:81 00              lag gEgo 
  0483:4a 0c             send c 

  0485:76               push0 
  0486:45 03 00         callb procedure_0003 0 // HandsOff 

  0489:38 00d3          pushi d3 // $d3 setMotion
  048c:78               push1 
  048d:74 19b4          lofss $1e44 // leftBotPath
  0490:81 00              lag gEgo 
  0492:4a 06             send 6 


        code_0494
  0494:32 0183            jmp code_061a 

        code_0497
  0497:3c                 dup 
  0498:35 01              ldi 1 
  049a:1a                 eq? 
  049b:31 2f              bnt code_04cc 
  049d:83 38              lal local56 
  049f:18                 not 
  04a0:31 27              bnt code_04c9 
  04a2:35 01              ldi 1 
  04a4:a3 38              sal local56 
  04a6:76               push0 
  04a7:45 04 00         callb procedure_0004 0 // HandsOn 

  04aa:35 00              ldi 0 
  04ac:a1 65              sag global101 
  04ae:39 12            pushi 12 // $12 illegalBits
  04b0:78               push1 
  04b1:38 4000          pushi 4000 // $4000 sel_16384
  04b4:39 42            pushi 42 // $42 setPri
  04b6:78               push1 
  04b7:39 ff            pushi ff // $ff checkAni
  04b9:81 00              lag gEgo 
  04bb:4a 0c             send c 

  04bd:35 50              ldi 50 
  04bf:65 16             aTop horizon 
  04c1:35 21              ldi 21 
  04c3:65 1a             aTop north 
  04c5:35 00              ldi 0 
  04c7:a3 36              sal local54 

        code_04c9
  04c9:32 014e            jmp code_061a 

        code_04cc
  04cc:3c                 dup 
  04cd:35 04              ldi 4 
  04cf:1a                 eq? 
  04d0:31 0d              bnt code_04df 
  04d2:38 00f8          pushi f8 // $f8 newRoom
  04d5:78               push1 
  04d6:39 24            pushi 24 // $24 cursor
  04d8:81 02              lag gCurRoom 
  04da:4a 06             send 6 

  04dc:32 013b            jmp code_061a 

        code_04df
  04df:3c                 dup 
  04e0:35 02              ldi 2 
  04e2:1a                 eq? 
  04e3:31 0d              bnt code_04f2 
  04e5:38 00f8          pushi f8 // $f8 newRoom
  04e8:78               push1 
  04e9:39 26            pushi 26 // $26 mark
  04eb:81 02              lag gCurRoom 
  04ed:4a 06             send 6 

  04ef:32 0128            jmp code_061a 

        code_04f2
  04f2:3c                 dup 
  04f3:35 20              ldi 20 
  04f5:1a                 eq? 
  04f6:31 27              bnt code_051f 
  04f8:83 37              lal local55 
  04fa:18                 not 
  04fb:31 1f              bnt code_051c 
  04fd:35 00              ldi 0 
  04ff:a3 3a              sal local58 
  0501:35 00              ldi 0 
  0503:a1 65              sag global101 
  0505:35 01              ldi 1 
  0507:a3 37              sal local55 
  0509:76               push0 
  050a:45 04 00         callb procedure_0004 0 // HandsOn 

  050d:38 00c9          pushi c9 // $c9 ignoreActors
  0510:78               push1 
  0511:76               push0 
  0512:39 12            pushi 12 // $12 illegalBits
  0514:78               push1 
  0515:38 2000          pushi 2000 // $2000 sel_8192
  0518:81 00              lag gEgo 
  051a:4a 0c             send c 


        code_051c
  051c:32 00fb            jmp code_061a 

        code_051f
  051f:3c                 dup 
  0520:35 40              ldi 40 
  0522:1a                 eq? 
  0523:31 27              bnt code_054c 
  0525:83 37              lal local55 
  0527:18                 not 
  0528:31 1f              bnt code_0549 
  052a:35 01              ldi 1 
  052c:a3 37              sal local55 
  052e:35 00              ldi 0 
  0530:a3 3a              sal local58 
  0532:35 00              ldi 0 
  0534:a1 65              sag global101 
  0536:76               push0 
  0537:45 04 00         callb procedure_0004 0 // HandsOn 

  053a:38 00c9          pushi c9 // $c9 ignoreActors
  053d:78               push1 
  053e:76               push0 
  053f:39 12            pushi 12 // $12 illegalBits
  0541:78               push1 
  0542:38 2000          pushi 2000 // $2000 sel_8192
  0545:81 00              lag gEgo 
  0547:4a 0c             send c 


        code_0549
  0549:32 00ce            jmp code_061a 

        code_054c
  054c:3c                 dup 
  054d:34 0080            ldi 80 
  0550:1a                 eq? 
  0551:31 23              bnt code_0576 
  0553:83 37              lal local55 
  0555:31 1c              bnt code_0573 
  0557:76               push0 
  0558:45 03 00         callb procedure_0003 0 // HandsOff 

  055b:35 00              ldi 0 
  055d:a3 37              sal local55 
  055f:39 12            pushi 12 // $12 illegalBits
  0561:78               push1 
  0562:76               push0 
  0563:38 00d3          pushi d3 // $d3 setMotion
  0566:39 03            pushi 3 // $3 y
  0568:51 1d            class MoveTo 
  056a:36                push 
  056b:39 34            pushi 34 // $34 b-xAxis
  056d:39 21            pushi 21 // $21 font
  056f:81 00              lag gEgo 
  0571:4a 10             send 10 


        code_0573
  0573:32 00a4            jmp code_061a 

        code_0576
  0576:3c                 dup 
  0577:34 0400            ldi 400 
  057a:1a                 eq? 
  057b:31 23              bnt code_05a0 
  057d:83 37              lal local55 
  057f:31 1d              bnt code_059e 
  0581:76               push0 
  0582:45 03 00         callb procedure_0003 0 // HandsOff 

  0585:35 00              ldi 0 
  0587:a3 37              sal local55 
  0589:39 12            pushi 12 // $12 illegalBits
  058b:78               push1 
  058c:76               push0 
  058d:38 00d3          pushi d3 // $d3 setMotion
  0590:39 03            pushi 3 // $3 y
  0592:51 1d            class MoveTo 
  0594:36                push 
  0595:38 0108          pushi 108 // $108 west
  0598:39 11            pushi 11 // $11 signal
  059a:81 00              lag gEgo 
  059c:4a 10             send 10 


        code_059e
  059e:33 7a              jmp code_061a 

        code_05a0
  05a0:3c                 dup 
  05a1:34 0200            ldi 200 
  05a4:1a                 eq? 
  05a5:31 1d              bnt code_05c4 
  05a7:83 37              lal local55 
  05a9:31 17              bnt code_05c2 
  05ab:35 00              ldi 0 
  05ad:a3 37              sal local55 
  05af:35 01              ldi 1 
  05b1:a3 3a              sal local58 
  05b3:76               push0 
  05b4:45 03 00         callb procedure_0003 0 // HandsOff 

  05b7:38 00d3          pushi d3 // $d3 setMotion
  05ba:78               push1 
  05bb:74 18fa          lofss $1eb8 // leftTopPath
  05be:81 00              lag gEgo 
  05c0:4a 06             send 6 


        code_05c2
  05c2:33 56              jmp code_061a 

        code_05c4
  05c4:3c                 dup 
  05c5:35 08              ldi 8 
  05c7:1a                 eq? 
  05c8:31 1d              bnt code_05e7 
  05ca:83 37              lal local55 
  05cc:31 17              bnt code_05e5 
  05ce:35 00              ldi 0 
  05d0:a3 37              sal local55 
  05d2:35 01              ldi 1 
  05d4:a3 3a              sal local58 
  05d6:76               push0 
  05d7:45 03 00         callb procedure_0003 0 // HandsOff 

  05da:38 00d3          pushi d3 // $d3 setMotion
  05dd:78               push1 
  05de:74 1911          lofss $1ef2 // rightTopPath
  05e1:81 00              lag gEgo 
  05e3:4a 06             send 6 


        code_05e5
  05e5:33 33              jmp code_061a 

        code_05e7
  05e7:3c                 dup 
  05e8:34 4000            ldi 4000 
  05eb:1a                 eq? 
  05ec:31 0a              bnt code_05f8 
  05ee:35 2f              ldi 2f 
  05f0:65 1a             aTop north 
  05f2:35 32              ldi 32 
  05f4:65 16             aTop horizon 
  05f6:33 22              jmp code_061a 

        code_05f8
  05f8:3c                 dup 
  05f9:35 10              ldi 10 
  05fb:1a                 eq? 
  05fc:31 1c              bnt code_061a 
  05fe:39 06            pushi 6 // $6 loop
  0600:76               push0 
  0601:81 00              lag gEgo 
  0603:4a 04             send 4 

  0605:36                push 
  0606:35 02              ldi 2 
  0608:1a                 eq? 
  0609:31 0f              bnt code_061a 
  060b:67 08             pTos script 
  060d:35 00              ldi 0 
  060f:1a                 eq? 
  0610:31 08              bnt code_061a 
  0612:39 7a            pushi 7a // $7a setScript
  0614:78               push1 
  0615:74 1310          lofss $1928 // crush
  0618:54 06             self 6 


        code_061a
  061a:3a                toss 
  061b:39 04            pushi 4 // $4 x
  061d:76               push0 
  061e:81 00              lag gEgo 
  0620:4a 04             send 4 

  0622:36                push 
  0623:34 0082            ldi 82 
  0626:22                 lt? 
  0627:31 06              bnt code_062f 
  0629:35 0a              ldi a 
  062b:65 2a             aTop vertAngle 
  062d:33 19              jmp code_0648 

        code_062f
  062f:39 04            pushi 4 // $4 x
  0631:76               push0 
  0632:81 00              lag gEgo 
  0634:4a 04             send 4 

  0636:36                push 
  0637:34 00be            ldi be 
  063a:22                 lt? 
  063b:31 06              bnt code_0643 
  063d:35 00              ldi 0 
  063f:65 2a             aTop vertAngle 
  0641:33 05              jmp code_0648 

        code_0643
  0643:34 00aa            ldi aa 
  0646:65 2a             aTop vertAngle 

        code_0648
  0648:39 3c            pushi 3c // $3c doit
  064a:76               push0 
  064b:57 37 04         super Rm 4 

  064e:76               push0 
  064f:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0652:31 0a              bnt code_065e 
  0654:7a               push2 
  0655:39 25            pushi 25 // $25 max
  0657:7a               push2 
  0658:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_065e
  065e:83 3c              lal local60 
  0660:31 25              bnt code_0687 
  0662:38 00db          pushi db // $db onControl
  0665:78               push1 
  0666:78               push1 
  0667:81 00              lag gEgo 
  0669:4a 06             send 6 

  066b:36                push 
  066c:35 01              ldi 1 
  066e:12                 and 
  066f:31 16              bnt code_0687 
  0671:76               push0 
  0672:45 03 00         callb procedure_0003 0 // HandsOff 

  0675:35 00              ldi 0 
  0677:a3 3c              sal local60 
  0679:39 7a            pushi 7a // $7a setScript
  067b:78               push1 
  067c:7a               push2 
  067d:38 019c          pushi 19c // $19c sel_412
  0680:76               push0 
  0681:43 02 04         callk ScriptID 4 

  0684:36                push 
  0685:54 06             self 6 


        code_0687
  0687:48                 ret 
    )

    (method (dispose) // method_0688
  0688:78               push1 
  0689:38 03d7          pushi 3d7 // $3d7 sel_983
  068c:43 03 02         callk DisposeScript 2 

  068f:78               push1 
  0690:38 03d9          pushi 3d9 // $3d9 sel_985
  0693:43 03 02         callk DisposeScript 2 

  0696:39 58            pushi 58 // $58 dispose
  0698:76               push0 
  0699:57 37 04         super Rm 4 

  069c:48                 ret 
    )

    (method (newRoom) // method_069d
  069d:8b 3b              lsl local59 
  069f:80 00b7            lag gConMusic 
  06a2:1a                 eq? 
  06a3:31 0f              bnt code_06b4 
  06a5:8f 01              lsp param1 
  06a7:35 21              ldi 21 
  06a9:1c                 ne? 
  06aa:31 08              bnt code_06b4 
  06ac:38 0084          pushi 84 // $84 stop
  06af:76               push0 
  06b0:83 3b              lal local59 
  06b2:4a 04             send 4 


        code_06b4
  06b4:38 00f8          pushi f8 // $f8 newRoom
  06b7:78               push1 
  06b8:8f 01              lsp param1 
  06ba:57 37 06         super Rm 6 

  06bd:48                 ret 
    )

    (method (handleEvent) // method_06be
  06be:3f 01             link 1 // (var $1)
  06c0:39 4c            pushi 4c // $4c claimed
  06c2:76               push0 
  06c3:87 01              lap param1 
  06c5:4a 04             send 4 

  06c7:31 03              bnt code_06cc 
  06c9:35 01              ldi 1 
  06cb:48                 ret 

        code_06cc
  06cc:83 39              lal local57 
  06ce:31 62              bnt code_0732 
  06d0:39 28            pushi 28 // $28 message
  06d2:76               push0 
  06d3:87 01              lap param1 
  06d5:4a 04             send 4 

  06d7:36                push 
  06d8:35 45              ldi 45 
  06da:1a                 eq? 
  06db:2f 0d               bt code_06ea 
  06dd:39 28            pushi 28 // $28 message
  06df:76               push0 
  06e0:87 01              lap param1 
  06e2:4a 04             send 4 

  06e4:36                push 
  06e5:35 65              ldi 65 
  06e7:1a                 eq? 
  06e8:31 48              bnt code_0732 

        code_06ea
  06ea:39 04            pushi 4 // $4 x
  06ec:39 22            pushi 22 // $22 type
  06ee:76               push0 
  06ef:87 01              lap param1 
  06f1:4a 04             send 4 

  06f3:1a                 eq? 
  06f4:31 3c              bnt code_0732 
  06f6:8b 35              lsl local53 
  06f8:35 01              ldi 1 
  06fa:1a                 eq? 
  06fb:31 35              bnt code_0732 
  06fd:39 4c            pushi 4c // $4c claimed
  06ff:78               push1 
  0700:78               push1 
  0701:87 01              lap param1 
  0703:4a 06             send 6 

  0705:83 35              lal local53 
  0707:2f 04               bt code_070d 
  0709:83 39              lal local57 
  070b:31 25              bnt code_0732 

        code_070d
  070d:38 0084          pushi 84 // $84 stop
  0710:76               push0 
  0711:72 1818          lofsa $1f2c // Crash
  0714:4a 04             send 4 

  0716:76               push0 
  0717:40 f9b1 00        call proc_00cc 0 

  071b:83 39              lal local57 
  071d:31 13              bnt code_0732 
  071f:39 7a            pushi 7a // $7a setScript
  0721:78               push1 
  0722:76               push0 
  0723:54 06             self 6 

  0725:38 00d4          pushi d4 // $d4 setAvoider
  0728:78               push1 
  0729:76               push0 
  072a:81 00              lag gEgo 
  072c:4a 06             send 6 

  072e:35 00              ldi 0 
  0730:a3 39              sal local57 

        code_0732
  0732:39 22            pushi 22 // $22 type
  0734:76               push0 
  0735:87 01              lap param1 
  0737:4a 04             send 4 

  0739:36                push 
  073a:3c                 dup 
  073b:34 0080            ldi 80 
  073e:1a                 eq? 
  073f:30 054a            bnt code_0c8c 
  0742:78               push1 
  0743:74 10e3          lofss $1829 // get,arracher,rotate,detach,rotate/aigle,post[<newel]
  0746:43 25 02         callk Said 2 

  0749:31 0e              bnt code_0759 
  074b:7a               push2 
  074c:39 25            pushi 25 // $25 max
  074e:39 03            pushi 3 // $3 y
  0750:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0756:32 0528            jmp code_0c81 

        code_0759
  0759:78               push1 
  075a:74 10f5          lofss $1852 // get>
  075d:43 25 02         callk Said 2 

  0760:31 43              bnt code_07a5 
  0762:78               push1 
  0763:74 0f9e          lofss $1704 // /armor,cloth
  0766:43 25 02         callk Said 2 

  0769:31 0d              bnt code_0778 
  076b:7a               push2 
  076c:39 25            pushi 25 // $25 max
  076e:39 04            pushi 4 // $4 x
  0770:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0776:33 2a              jmp code_07a2 

        code_0778
  0778:78               push1 
  0779:74 0f93          lofss $170f // /ax[<bataille]
  077c:43 25 02         callk Said 2 

  077f:31 0d              bnt code_078e 
  0781:7a               push2 
  0782:39 25            pushi 25 // $25 max
  0784:39 05            pushi 5 // $5 view
  0786:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  078c:33 14              jmp code_07a2 

        code_078e
  078e:78               push1 
  078f:74 1002          lofss $1794 // /letter
  0792:43 25 02         callk Said 2 

  0795:31 0b              bnt code_07a2 
  0797:7a               push2 
  0798:39 25            pushi 25 // $25 max
  079a:39 06            pushi 6 // $6 loop
  079c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_07a2
  07a2:32 04dc            jmp code_0c81 

        code_07a5
  07a5:78               push1 
  07a6:74 104a          lofss $17f3 // detach/ax[<bataille]
  07a9:43 25 02         callk Said 2 

  07ac:31 0e              bnt code_07bc 
  07ae:7a               push2 
  07af:39 25            pushi 25 // $25 max
  07b1:39 05            pushi 5 // $5 view
  07b3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  07b9:32 04c5            jmp code_0c81 

        code_07bc
  07bc:78               push1 
  07bd:74 1096          lofss $1856 // lift,arracher,open,lift,(look<dans)/casque
  07c0:43 25 02         callk Said 2 

  07c3:31 20              bnt code_07e5 
  07c5:88 008e            lsg global142 
  07c8:35 02              ldi 2 
  07ca:12                 and 
  07cb:31 0a              bnt code_07d7 
  07cd:39 7a            pushi 7a // $7a setScript
  07cf:78               push1 
  07d0:74 1189          lofss $195c // openVisor
  07d3:54 06             self 6 

  07d5:33 0b              jmp code_07e2 

        code_07d7
  07d7:7a               push2 
  07d8:39 25            pushi 25 // $25 max
  07da:39 07            pushi 7 // $7 cel
  07dc:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_07e2
  07e2:32 049c            jmp code_0c81 

        code_07e5
  07e5:78               push1 
  07e6:74 0eb9          lofss $16a2 // (appuyer,bouger,rotate,open,lift,break,(look<dans))>
  07e9:43 25 02         callk Said 2 

  07ec:30 0152            bnt code_0941 
  07ef:35 00              ldi 0 
  07f1:a3 34              sal local52 
  07f3:78               push1 
  07f4:74 0f0d          lofss $1704 // /armor,cloth
  07f7:43 25 02         callk Said 2 

  07fa:31 0e              bnt code_080a 
  07fc:7a               push2 
  07fd:39 25            pushi 25 // $25 max
  07ff:39 07            pushi 7 // $7 cel
  0801:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0807:32 010e            jmp code_0918 

        code_080a
  080a:78               push1 
  080b:74 0f8a          lofss $1798 // /cou
  080e:43 25 02         callk Said 2 

  0811:31 07              bnt code_081a 
  0813:35 04              ldi 4 
  0815:a3 34              sal local52 
  0817:32 00fe            jmp code_0918 

        code_081a
  081a:78               push1 
  081b:74 0f06          lofss $1724 // /body
  081e:43 25 02         callk Said 2 

  0821:31 07              bnt code_082a 
  0823:35 03              ldi 3 
  0825:a3 34              sal local52 
  0827:32 00ee            jmp code_0918 

        code_082a
  082a:78               push1 
  082b:74 0f4d          lofss $177b // /genou<right
  082e:43 25 02         callk Said 2 

  0831:31 07              bnt code_083a 
  0833:35 0c              ldi c 
  0835:a3 34              sal local52 
  0837:32 00de            jmp code_0918 

        code_083a
  083a:78               push1 
  083b:74 0f36          lofss $1774 // /genou<left
  083e:43 25 02         callk Said 2 

  0841:31 07              bnt code_084a 
  0843:35 0b              ldi b 
  0845:a3 34              sal local52 
  0847:32 00ce            jmp code_0918 

        code_084a
  084a:78               push1 
  084b:74 0f22          lofss $1770 // /genou
  084e:43 25 02         callk Said 2 

  0851:31 07              bnt code_085a 
  0853:35 0b              ldi b 
  0855:a3 34              sal local52 
  0857:32 00be            jmp code_0918 

        code_085a
  085a:78               push1 
  085b:74 0f2f          lofss $178d // /jambe<right
  085e:43 25 02         callk Said 2 

  0861:31 07              bnt code_086a 
  0863:35 07              ldi 7 
  0865:a3 34              sal local52 
  0867:32 00ae            jmp code_0918 

        code_086a
  086a:78               push1 
  086b:74 0f18          lofss $1786 // /jambe<left
  086e:43 25 02         callk Said 2 

  0871:31 07              bnt code_087a 
  0873:35 0d              ldi d 
  0875:a3 34              sal local52 
  0877:32 009e            jmp code_0918 

        code_087a
  087a:78               push1 
  087b:74 0f04          lofss $1782 // /jambe
  087e:43 25 02         callk Said 2 

  0881:31 07              bnt code_088a 
  0883:35 0d              ldi d 
  0885:a3 34              sal local52 
  0887:32 008e            jmp code_0918 

        code_088a
  088a:78               push1 
  088b:74 0ecd          lofss $175b // /deliver<right
  088e:43 25 02         callk Said 2 

  0891:31 06              bnt code_0899 
  0893:35 0a              ldi a 
  0895:a3 34              sal local52 
  0897:33 7f              jmp code_0918 

        code_0899
  0899:78               push1 
  089a:74 0eb7          lofss $1754 // /deliver<left
  089d:43 25 02         callk Said 2 

  08a0:2f 09               bt code_08ab 
  08a2:78               push1 
  08a3:74 0e69          lofss $170f // /ax[<bataille]
  08a6:43 25 02         callk Said 2 

  08a9:31 06              bnt code_08b1 

        code_08ab
  08ab:35 06              ldi 6 
  08ad:a3 34              sal local52 
  08af:33 67              jmp code_0918 

        code_08b1
  08b1:78               push1 
  08b2:74 0e9b          lofss $1750 // /deliver
  08b5:43 25 02         callk Said 2 

  08b8:31 06              bnt code_08c0 
  08ba:35 06              ldi 6 
  08bc:a3 34              sal local52 
  08be:33 58              jmp code_0918 

        code_08c0
  08c0:78               push1 
  08c1:74 0e85          lofss $1749 // /coude<right
  08c4:43 25 02         callk Said 2 

  08c7:31 06              bnt code_08cf 
  08c9:35 09              ldi 9 
  08cb:a3 34              sal local52 
  08cd:33 49              jmp code_0918 

        code_08cf
  08cf:78               push1 
  08d0:74 0e6f          lofss $1742 // /coude<left
  08d3:43 25 02         callk Said 2 

  08d6:31 06              bnt code_08de 
  08d8:35 05              ldi 5 
  08da:a3 34              sal local52 
  08dc:33 3a              jmp code_0918 

        code_08de
  08de:78               push1 
  08df:74 0e5c          lofss $173e // /coude
  08e2:43 25 02         callk Said 2 

  08e5:31 06              bnt code_08ed 
  08e7:35 05              ldi 5 
  08e9:a3 34              sal local52 
  08eb:33 2b              jmp code_0918 

        code_08ed
  08ed:78               push1 
  08ee:74 0e0c          lofss $16fd // /arm<right
  08f1:43 25 02         callk Said 2 

  08f4:31 06              bnt code_08fc 
  08f6:35 08              ldi 8 
  08f8:a3 34              sal local52 
  08fa:33 1c              jmp code_0918 

        code_08fc
  08fc:78               push1 
  08fd:74 0df6          lofss $16f6 // /arm<left
  0900:43 25 02         callk Said 2 

  0903:31 06              bnt code_090b 
  0905:35 02              ldi 2 
  0907:a3 34              sal local52 
  0909:33 0d              jmp code_0918 

        code_090b
  090b:78               push1 
  090c:74 0dd6          lofss $16e5 // /arm
  090f:43 25 02         callk Said 2 

  0912:31 04              bnt code_0918 
  0914:35 02              ldi 2 
  0916:a3 34              sal local52 

        code_0918
  0918:83 34              lal local52 
  091a:31 22              bnt code_093e 
  091c:88 008e            lsg global142 
  091f:78               push1 
  0920:83 34              lal local52 
  0922:0e                 shl 
  0923:12                 and 
  0924:31 0d              bnt code_0933 
  0926:7a               push2 
  0927:39 25            pushi 25 // $25 max
  0929:39 08            pushi 8 // $8 underBits
  092b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0931:33 0b              jmp code_093e 

        code_0933
  0933:7a               push2 
  0934:39 25            pushi 25 // $25 max
  0936:39 09            pushi 9 // $9 nsTop
  0938:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_093e
  093e:32 0340            jmp code_0c81 

        code_0941
  0941:78               push1 
  0942:74 0f4a          lofss $188f // look>
  0945:43 25 02         callk Said 2 

  0948:30 00f4            bnt code_0a3f 
  094b:78               push1 
  094c:74 0e7f          lofss $17ce // [<around,at][/room]
  094f:43 25 02         callk Said 2 

  0952:31 0d              bnt code_0961 
  0954:7a               push2 
  0955:39 25            pushi 25 // $25 max
  0957:7a               push2 
  0958:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  095e:32 00db            jmp code_0a3c 

        code_0961
  0961:78               push1 
  0962:74 0dc3          lofss $1728 // /chandelier,ceiling
  0965:43 25 02         callk Said 2 

  0968:2f 09               bt code_0973 
  096a:78               push1 
  096b:74 0e51          lofss $17bf // <haut
  096e:43 25 02         callk Said 2 

  0971:31 0e              bnt code_0981 

        code_0973
  0973:7a               push2 
  0974:39 25            pushi 25 // $25 max
  0976:39 0a            pushi a // $a nsLeft
  0978:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  097e:32 00bb            jmp code_0a3c 

        code_0981
  0981:78               push1 
  0982:74 0de4          lofss $1769 // /cachoterie<door
  0985:43 25 02         callk Said 2 

  0988:31 0e              bnt code_0998 
  098a:7a               push2 
  098b:39 25            pushi 25 // $25 max
  098d:39 0b            pushi b // $b nsBottom
  098f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0995:32 00a4            jmp code_0a3c 

        code_0998
  0998:78               push1 
  0999:74 0d97          lofss $1733 // /door<arriere
  099c:43 25 02         callk Said 2 

  099f:31 0e              bnt code_09af 
  09a1:7a               push2 
  09a2:39 25            pushi 25 // $25 max
  09a4:39 0c            pushi c // $c nsRight
  09a6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09ac:32 008d            jmp code_0a3c 

        code_09af
  09af:78               push1 
  09b0:74 0ded          lofss $17a0 // <(dans,behind)/clock
  09b3:43 25 02         callk Said 2 

  09b6:2f 12               bt code_09ca 
  09b8:78               push1 
  09b9:74 0df0          lofss $17ac // <(dans,behind)/miroir
  09bc:43 25 02         callk Said 2 

  09bf:2f 09               bt code_09ca 
  09c1:78               push1 
  09c2:74 0dd7          lofss $179c // /temps
  09c5:43 25 02         callk Said 2 

  09c8:31 06              bnt code_09d0 

        code_09ca
  09ca:76               push0 
  09cb:45 09 00         callb procedure_0009 0 // NotClose 

  09ce:33 6c              jmp code_0a3c 

        code_09d0
  09d0:78               push1 
  09d1:74 0d3b          lofss $170f // /ax[<bataille]
  09d4:43 25 02         callk Said 2 

  09d7:31 0d              bnt code_09e6 
  09d9:7a               push2 
  09da:39 25            pushi 25 // $25 max
  09dc:39 0d            pushi d // $d lsTop
  09de:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09e4:33 56              jmp code_0a3c 

        code_09e6
  09e6:78               push1 
  09e7:74 0d45          lofss $172f // /door
  09ea:43 25 02         callk Said 2 

  09ed:31 0d              bnt code_09fc 
  09ef:7a               push2 
  09f0:39 25            pushi 25 // $25 max
  09f2:39 0e            pushi e // $e lsLeft
  09f4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09fa:33 40              jmp code_0a3c 

        code_09fc
  09fc:78               push1 
  09fd:74 0d18          lofss $1718 // /aigle,post[<newel]
  0a00:43 25 02         callk Said 2 

  0a03:31 0d              bnt code_0a12 
  0a05:7a               push2 
  0a06:39 25            pushi 25 // $25 max
  0a08:39 0f            pushi f // $f lsBottom
  0a0a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a10:33 2a              jmp code_0a3c 

        code_0a12
  0a12:78               push1 
  0a13:74 0da2          lofss $17b8 // <below/escalier
  0a16:43 25 02         callk Said 2 

  0a19:31 0d              bnt code_0a28 
  0a1b:7a               push2 
  0a1c:39 25            pushi 25 // $25 max
  0a1e:39 10            pushi 10 // $10 lsRight
  0a20:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a26:33 14              jmp code_0a3c 

        code_0a28
  0a28:78               push1 
  0a29:74 0d0e          lofss $173a // /downstair
  0a2c:43 25 02         callk Said 2 

  0a2f:31 0b              bnt code_0a3c 
  0a31:7a               push2 
  0a32:39 25            pushi 25 // $25 max
  0a34:39 11            pushi 11 // $11 signal
  0a36:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0a3c
  0a3c:32 0242            jmp code_0c81 

        code_0a3f
  0a3f:78               push1 
  0a40:74 0e66          lofss $18a9 // huile>
  0a43:43 25 02         callk Said 2 

  0a46:30 0199            bnt code_0be2 
  0a49:38 00ee          pushi ee // $ee has
  0a4c:78               push1 
  0a4d:39 03            pushi 3 // $3 y
  0a4f:81 00              lag gEgo 
  0a51:4a 06             send 6 

  0a53:30 0175            bnt code_0bcb 
  0a56:38 00db          pushi db // $db onControl
  0a59:78               push1 
  0a5a:78               push1 
  0a5b:81 00              lag gEgo 
  0a5d:4a 06             send 6 

  0a5f:36                push 
  0a60:35 01              ldi 1 
  0a62:12                 and 
  0a63:30 0157            bnt code_0bbd 
  0a66:35 00              ldi 0 
  0a68:a3 34              sal local52 
  0a6a:78               push1 
  0a6b:74 0cf4          lofss $1762 // /casque,casque
  0a6e:43 25 02         callk Said 2 

  0a71:31 07              bnt code_0a7a 
  0a73:35 01              ldi 1 
  0a75:a3 34              sal local52 
  0a77:32 012a            jmp code_0ba4 

        code_0a7a
  0a7a:78               push1 
  0a7b:74 0d1a          lofss $1798 // /cou
  0a7e:43 25 02         callk Said 2 

  0a81:31 07              bnt code_0a8a 
  0a83:35 04              ldi 4 
  0a85:a3 34              sal local52 
  0a87:32 011a            jmp code_0ba4 

        code_0a8a
  0a8a:78               push1 
  0a8b:74 0c96          lofss $1724 // /body
  0a8e:43 25 02         callk Said 2 

  0a91:31 07              bnt code_0a9a 
  0a93:35 03              ldi 3 
  0a95:a3 34              sal local52 
  0a97:32 010a            jmp code_0ba4 

        code_0a9a
  0a9a:78               push1 
  0a9b:74 0cdd          lofss $177b // /genou<right
  0a9e:43 25 02         callk Said 2 

  0aa1:31 07              bnt code_0aaa 
  0aa3:35 0c              ldi c 
  0aa5:a3 34              sal local52 
  0aa7:32 00fa            jmp code_0ba4 

        code_0aaa
  0aaa:78               push1 
  0aab:74 0cc6          lofss $1774 // /genou<left
  0aae:43 25 02         callk Said 2 

  0ab1:31 07              bnt code_0aba 
  0ab3:35 0b              ldi b 
  0ab5:a3 34              sal local52 
  0ab7:32 00ea            jmp code_0ba4 

        code_0aba
  0aba:78               push1 
  0abb:74 0cb2          lofss $1770 // /genou
  0abe:43 25 02         callk Said 2 

  0ac1:31 07              bnt code_0aca 
  0ac3:35 0b              ldi b 
  0ac5:a3 34              sal local52 
  0ac7:32 00da            jmp code_0ba4 

        code_0aca
  0aca:78               push1 
  0acb:74 0cbf          lofss $178d // /jambe<right
  0ace:43 25 02         callk Said 2 

  0ad1:31 07              bnt code_0ada 
  0ad3:35 07              ldi 7 
  0ad5:a3 34              sal local52 
  0ad7:32 00ca            jmp code_0ba4 

        code_0ada
  0ada:78               push1 
  0adb:74 0ca8          lofss $1786 // /jambe<left
  0ade:43 25 02         callk Said 2 

  0ae1:31 07              bnt code_0aea 
  0ae3:35 0d              ldi d 
  0ae5:a3 34              sal local52 
  0ae7:32 00ba            jmp code_0ba4 

        code_0aea
  0aea:78               push1 
  0aeb:74 0c94          lofss $1782 // /jambe
  0aee:43 25 02         callk Said 2 

  0af1:31 07              bnt code_0afa 
  0af3:35 0d              ldi d 
  0af5:a3 34              sal local52 
  0af7:32 00aa            jmp code_0ba4 

        code_0afa
  0afa:78               push1 
  0afb:74 0c5d          lofss $175b // /deliver<right
  0afe:43 25 02         callk Said 2 

  0b01:31 07              bnt code_0b0a 
  0b03:35 0a              ldi a 
  0b05:a3 34              sal local52 
  0b07:32 009a            jmp code_0ba4 

        code_0b0a
  0b0a:78               push1 
  0b0b:74 0c46          lofss $1754 // /deliver<left
  0b0e:43 25 02         callk Said 2 

  0b11:2f 09               bt code_0b1c 
  0b13:78               push1 
  0b14:74 0bf8          lofss $170f // /ax[<bataille]
  0b17:43 25 02         callk Said 2 

  0b1a:31 07              bnt code_0b23 

        code_0b1c
  0b1c:35 06              ldi 6 
  0b1e:a3 34              sal local52 
  0b20:32 0081            jmp code_0ba4 

        code_0b23
  0b23:78               push1 
  0b24:74 0c29          lofss $1750 // /deliver
  0b27:43 25 02         callk Said 2 

  0b2a:31 06              bnt code_0b32 
  0b2c:35 06              ldi 6 
  0b2e:a3 34              sal local52 
  0b30:33 72              jmp code_0ba4 

        code_0b32
  0b32:78               push1 
  0b33:74 0c13          lofss $1749 // /coude<right
  0b36:43 25 02         callk Said 2 

  0b39:31 06              bnt code_0b41 
  0b3b:35 09              ldi 9 
  0b3d:a3 34              sal local52 
  0b3f:33 63              jmp code_0ba4 

        code_0b41
  0b41:78               push1 
  0b42:74 0bfd          lofss $1742 // /coude<left
  0b45:43 25 02         callk Said 2 

  0b48:31 06              bnt code_0b50 
  0b4a:35 05              ldi 5 
  0b4c:a3 34              sal local52 
  0b4e:33 54              jmp code_0ba4 

        code_0b50
  0b50:78               push1 
  0b51:74 0bea          lofss $173e // /coude
  0b54:43 25 02         callk Said 2 

  0b57:31 06              bnt code_0b5f 
  0b59:35 05              ldi 5 
  0b5b:a3 34              sal local52 
  0b5d:33 45              jmp code_0ba4 

        code_0b5f
  0b5f:78               push1 
  0b60:74 0b9a          lofss $16fd // /arm<right
  0b63:43 25 02         callk Said 2 

  0b66:31 06              bnt code_0b6e 
  0b68:35 08              ldi 8 
  0b6a:a3 34              sal local52 
  0b6c:33 36              jmp code_0ba4 

        code_0b6e
  0b6e:78               push1 
  0b6f:74 0b84          lofss $16f6 // /arm<left
  0b72:43 25 02         callk Said 2 

  0b75:31 06              bnt code_0b7d 
  0b77:35 02              ldi 2 
  0b79:a3 34              sal local52 
  0b7b:33 27              jmp code_0ba4 

        code_0b7d
  0b7d:78               push1 
  0b7e:74 0b64          lofss $16e5 // /arm
  0b81:43 25 02         callk Said 2 

  0b84:31 06              bnt code_0b8c 
  0b86:35 02              ldi 2 
  0b88:a3 34              sal local52 
  0b8a:33 18              jmp code_0ba4 

        code_0b8c
  0b8c:78               push1 
  0b8d:74 0b74          lofss $1704 // /armor,cloth
  0b90:43 25 02         callk Said 2 

  0b93:31 0f              bnt code_0ba4 
  0b95:7a               push2 
  0b96:39 25            pushi 25 // $25 max
  0b98:39 12            pushi 12 // $12 illegalBits
  0b9a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0ba0:35 00              ldi 0 
  0ba2:a3 34              sal local52 

        code_0ba4
  0ba4:83 34              lal local52 
  0ba6:31 13              bnt code_0bbb 
  0ba8:88 008e            lsg global142 
  0bab:78               push1 
  0bac:83 34              lal local52 
  0bae:0e                 shl 
  0baf:14                  or 
  0bb0:a0 008e            sag global142 
  0bb3:39 7a            pushi 7a // $7a setScript
  0bb5:78               push1 
  0bb6:74 0dd7          lofss $1990 // oiling
  0bb9:54 06             self 6 


        code_0bbb
  0bbb:33 0c              jmp code_0bc9 

        code_0bbd
  0bbd:76               push0 
  0bbe:45 09 00         callb procedure_0009 0 // NotClose 

  0bc1:39 4c            pushi 4c // $4c claimed
  0bc3:78               push1 
  0bc4:78               push1 
  0bc5:87 01              lap param1 
  0bc7:4a 06             send 6 


        code_0bc9
  0bc9:33 14              jmp code_0bdf 

        code_0bcb
  0bcb:78               push1 
  0bcc:74 0bf4          lofss $17c3 // [<*][/*]
  0bcf:43 25 02         callk Said 2 

  0bd2:31 0b              bnt code_0bdf 
  0bd4:7a               push2 
  0bd5:39 25            pushi 25 // $25 max
  0bd7:39 13            pushi 13 // $13 brTop
  0bd9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0bdf
  0bdf:32 009f            jmp code_0c81 

        code_0be2
  0be2:78               push1 
  0be3:74 0c3f          lofss $1825 // arracher>
  0be6:43 25 02         callk Said 2 

  0be9:31 35              bnt code_0c20 
  0beb:78               push1 
  0bec:74 0b1c          lofss $170b // /ax
  0bef:43 25 02         callk Said 2 

  0bf2:31 0d              bnt code_0c01 
  0bf4:7a               push2 
  0bf5:39 25            pushi 25 // $25 max
  0bf7:39 06            pushi 6 // $6 loop
  0bf9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0bff:33 1d              jmp code_0c1e 

        code_0c01
  0c01:78               push1 
  0c02:74 0ae4          lofss $16e9 // /arm,jambe,casque,casque
  0c05:43 25 02         callk Said 2 

  0c08:2f 09               bt code_0c13 
  0c0a:78               push1 
  0c0b:74 0af6          lofss $1704 // /armor,cloth
  0c0e:43 25 02         callk Said 2 

  0c11:31 0b              bnt code_0c1e 

        code_0c13
  0c13:7a               push2 
  0c14:39 25            pushi 25 // $25 max
  0c16:39 07            pushi 7 // $7 cel
  0c18:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0c1e
  0c1e:33 61              jmp code_0c81 

        code_0c20
  0c20:78               push1 
  0c21:74 0c9e          lofss $18c2 // porter,attach<on>
  0c24:43 25 02         callk Said 2 

  0c27:31 1f              bnt code_0c48 
  0c29:78               push1 
  0c2a:74 0abc          lofss $16e9 // /arm,jambe,casque,casque
  0c2d:43 25 02         callk Said 2 

  0c30:2f 09               bt code_0c3b 
  0c32:78               push1 
  0c33:74 0ace          lofss $1704 // /armor,cloth
  0c36:43 25 02         callk Said 2 

  0c39:31 0b              bnt code_0c46 

        code_0c3b
  0c3b:7a               push2 
  0c3c:39 25            pushi 25 // $25 max
  0c3e:39 14            pushi 14 // $14 brLeft
  0c40:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0c46
  0c46:33 39              jmp code_0c81 

        code_0c48
  0c48:78               push1 
  0c49:74 0b90          lofss $17dc // climb[<haut]/escalier
  0c4c:43 25 02         callk Said 2 

  0c4f:31 0d              bnt code_0c5e 
  0c51:7a               push2 
  0c52:39 25            pushi 25 // $25 max
  0c54:39 15            pushi 15 // $15 brBottom
  0c56:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c5c:33 23              jmp code_0c81 

        code_0c5e
  0c5e:78               push1 
  0c5f:74 0b85          lofss $17e7 // clock,temps
  0c62:43 25 02         callk Said 2 

  0c65:31 06              bnt code_0c6d 
  0c67:76               push0 
  0c68:45 09 00         callb procedure_0009 0 // NotClose 

  0c6b:33 14              jmp code_0c81 

        code_0c6d
  0c6d:78               push1 
  0c6e:74 0bfc          lofss $186d // ecouter/clock
  0c71:43 25 02         callk Said 2 

  0c74:31 0b              bnt code_0c81 
  0c76:7a               push2 
  0c77:39 25            pushi 25 // $25 max
  0c79:39 16            pushi 16 // $16 brRight
  0c7b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0c81
  0c81:39 6f            pushi 6f // $6f handleEvent
  0c83:78               push1 
  0c84:8f 01              lsp param1 
  0c86:57 37 06         super Rm 6 

  0c89:32 01c5            jmp code_0e51 

        code_0c8c
  0c8c:3c                 dup 
  0c8d:35 01              ldi 1 
  0c8f:2f 04               bt code_0c95 
  0c91:35 02              ldi 2 
  0c93:31 02              bnt code_0c97 

        code_0c95
  0c95:35 01              ldi 1 

        code_0c97
  0c97:1a                 eq? 
  0c98:30 00fe            bnt code_0d99 
  0c9b:83 3a              lal local58 
  0c9d:2f 05               bt code_0ca4 
  0c9f:83 36              lal local54 
  0ca1:18                 not 
  0ca2:31 01              bnt code_0ca5 

        code_0ca4
  0ca4:48                 ret 

        code_0ca5
  0ca5:38 00db          pushi db // $db onControl
  0ca8:78               push1 
  0ca9:78               push1 
  0caa:81 00              lag gEgo 
  0cac:4a 06             send 6 

  0cae:36                push 
  0caf:34 4000            ldi 4000 
  0cb2:12                 and 
  0cb3:30 00e0            bnt code_0d96 
  0cb6:39 04            pushi 4 // $4 x
  0cb8:76               push0 
  0cb9:81 00              lag gEgo 
  0cbb:4a 04             send 4 

  0cbd:36                push 
  0cbe:34 00a0            ldi a0 
  0cc1:22                 lt? 
  0cc2:31 65              bnt code_0d29 
  0cc4:38 00d3          pushi d3 // $d3 setMotion
  0cc7:39 03            pushi 3 // $3 y
  0cc9:51 1d            class MoveTo 
  0ccb:36                push 
  0ccc:39 03            pushi 3 // $3 y
  0cce:76               push0 
  0ccf:87 01              lap param1 
  0cd1:4a 04             send 4 

  0cd3:36                push 
  0cd4:39 03            pushi 3 // $3 y
  0cd6:76               push0 
  0cd7:81 00              lag gEgo 
  0cd9:4a 04             send 4 

  0cdb:22                 lt? 
  0cdc:31 04              bnt code_0ce2 
  0cde:35 34              ldi 34 
  0ce0:33 14              jmp code_0cf6 

        code_0ce2
  0ce2:39 03            pushi 3 // $3 y
  0ce4:76               push0 
  0ce5:87 01              lap param1 
  0ce7:4a 04             send 4 

  0ce9:36                push 
  0cea:39 03            pushi 3 // $3 y
  0cec:76               push0 
  0ced:81 00              lag gEgo 
  0cef:4a 04             send 4 

  0cf1:1e                 gt? 
  0cf2:31 02              bnt code_0cf6 
  0cf4:35 1e              ldi 1e 

        code_0cf6
  0cf6:36                push 
  0cf7:39 03            pushi 3 // $3 y
  0cf9:76               push0 
  0cfa:87 01              lap param1 
  0cfc:4a 04             send 4 

  0cfe:36                push 
  0cff:39 03            pushi 3 // $3 y
  0d01:76               push0 
  0d02:81 00              lag gEgo 
  0d04:4a 04             send 4 

  0d06:1e                 gt? 
  0d07:31 05              bnt code_0d0e 
  0d09:34 0094            ldi 94 
  0d0c:33 14              jmp code_0d22 

        code_0d0e
  0d0e:39 03            pushi 3 // $3 y
  0d10:76               push0 
  0d11:87 01              lap param1 
  0d13:4a 04             send 4 

  0d15:36                push 
  0d16:39 03            pushi 3 // $3 y
  0d18:76               push0 
  0d19:81 00              lag gEgo 
  0d1b:4a 04             send 4 

  0d1d:22                 lt? 
  0d1e:31 02              bnt code_0d22 
  0d20:35 21              ldi 21 

        code_0d22
  0d22:36                push 
  0d23:81 00              lag gEgo 
  0d25:4a 0a             send a 

  0d27:33 65              jmp code_0d8e 

        code_0d29
  0d29:38 00d3          pushi d3 // $d3 setMotion
  0d2c:39 03            pushi 3 // $3 y
  0d2e:51 1d            class MoveTo 
  0d30:36                push 
  0d31:39 03            pushi 3 // $3 y
  0d33:76               push0 
  0d34:87 01              lap param1 
  0d36:4a 04             send 4 

  0d38:36                push 
  0d39:39 03            pushi 3 // $3 y
  0d3b:76               push0 
  0d3c:81 00              lag gEgo 
  0d3e:4a 04             send 4 

  0d40:22                 lt? 
  0d41:31 05              bnt code_0d48 
  0d43:34 0105            ldi 105 
  0d46:33 15              jmp code_0d5d 

        code_0d48
  0d48:39 03            pushi 3 // $3 y
  0d4a:76               push0 
  0d4b:87 01              lap param1 
  0d4d:4a 04             send 4 

  0d4f:36                push 
  0d50:39 03            pushi 3 // $3 y
  0d52:76               push0 
  0d53:81 00              lag gEgo 
  0d55:4a 04             send 4 

  0d57:1e                 gt? 
  0d58:31 03              bnt code_0d5d 
  0d5a:34 0122            ldi 122 

        code_0d5d
  0d5d:36                push 
  0d5e:39 03            pushi 3 // $3 y
  0d60:76               push0 
  0d61:87 01              lap param1 
  0d63:4a 04             send 4 

  0d65:36                push 
  0d66:39 03            pushi 3 // $3 y
  0d68:76               push0 
  0d69:81 00              lag gEgo 
  0d6b:4a 04             send 4 

  0d6d:22                 lt? 
  0d6e:31 04              bnt code_0d74 
  0d70:35 11              ldi 11 
  0d72:33 15              jmp code_0d89 

        code_0d74
  0d74:39 03            pushi 3 // $3 y
  0d76:76               push0 
  0d77:87 01              lap param1 
  0d79:4a 04             send 4 

  0d7b:36                push 
  0d7c:39 03            pushi 3 // $3 y
  0d7e:76               push0 
  0d7f:81 00              lag gEgo 
  0d81:4a 04             send 4 

  0d83:1e                 gt? 
  0d84:31 03              bnt code_0d89 
  0d86:34 0094            ldi 94 

        code_0d89
  0d89:36                push 
  0d8a:81 00              lag gEgo 
  0d8c:4a 0a             send a 


        code_0d8e
  0d8e:39 4c            pushi 4c // $4c claimed
  0d90:78               push1 
  0d91:78               push1 
  0d92:87 01              lap param1 
  0d94:4a 06             send 6 


        code_0d96
  0d96:32 00b8            jmp code_0e51 

        code_0d99
  0d99:3c                 dup 
  0d9a:35 40              ldi 40 
  0d9c:1a                 eq? 
  0d9d:30 00b1            bnt code_0e51 
  0da0:83 36              lal local54 
  0da2:18                 not 
  0da3:2f 04               bt code_0da9 
  0da5:83 3a              lal local58 
  0da7:31 01              bnt code_0daa 

        code_0da9
  0da9:48                 ret 

        code_0daa
  0daa:38 00db          pushi db // $db onControl
  0dad:78               push1 
  0dae:78               push1 
  0daf:81 00              lag gEgo 
  0db1:4a 06             send 6 

  0db3:36                push 
  0db4:34 4000            ldi 4000 
  0db7:12                 and 
  0db8:30 0096            bnt code_0e51 
  0dbb:39 28            pushi 28 // $28 message
  0dbd:76               push0 
  0dbe:87 01              lap param1 
  0dc0:4a 04             send 4 

  0dc2:36                push 
  0dc3:3c                 dup 
  0dc4:35 01              ldi 1 
  0dc6:1a                 eq? 
  0dc7:31 3b              bnt code_0e04 
  0dc9:39 04            pushi 4 // $4 x
  0dcb:76               push0 
  0dcc:81 00              lag gEgo 
  0dce:4a 04             send 4 

  0dd0:36                push 
  0dd1:34 00a0            ldi a0 
  0dd4:22                 lt? 
  0dd5:31 12              bnt code_0de9 
  0dd7:38 00d3          pushi d3 // $d3 setMotion
  0dda:39 03            pushi 3 // $3 y
  0ddc:51 1d            class MoveTo 
  0dde:36                push 
  0ddf:39 34            pushi 34 // $34 b-xAxis
  0de1:39 21            pushi 21 // $21 font
  0de3:81 00              lag gEgo 
  0de5:4a 0a             send a 

  0de7:33 11              jmp code_0dfa 

        code_0de9
  0de9:38 00d3          pushi d3 // $d3 setMotion
  0dec:39 03            pushi 3 // $3 y
  0dee:51 1d            class MoveTo 
  0df0:36                push 
  0df1:38 0108          pushi 108 // $108 west
  0df4:39 11            pushi 11 // $11 signal
  0df6:81 00              lag gEgo 
  0df8:4a 0a             send a 


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

  0e02:33 4c              jmp code_0e50 

        code_0e04
  0e04:3c                 dup 
  0e05:35 05              ldi 5 
  0e07:1a                 eq? 
  0e08:31 3d              bnt code_0e47 
  0e0a:39 04            pushi 4 // $4 x
  0e0c:76               push0 
  0e0d:81 00              lag gEgo 
  0e0f:4a 04             send 4 

  0e11:36                push 
  0e12:34 00a0            ldi a0 
  0e15:22                 lt? 
  0e16:31 13              bnt code_0e2b 
  0e18:38 00d3          pushi d3 // $d3 setMotion
  0e1b:39 03            pushi 3 // $3 y
  0e1d:51 1d            class MoveTo 
  0e1f:36                push 
  0e20:39 1e            pushi 1e // $1e mode
  0e22:38 0094          pushi 94 // $94 retreat
  0e25:81 00              lag gEgo 
  0e27:4a 0a             send a 

  0e29:33 12              jmp code_0e3d 

        code_0e2b
  0e2b:38 00d3          pushi d3 // $d3 setMotion
  0e2e:39 03            pushi 3 // $3 y
  0e30:51 1d            class MoveTo 
  0e32:36                push 
  0e33:38 0122          pushi 122 // $122 xTilt
  0e36:38 0094          pushi 94 // $94 retreat
  0e39:81 00              lag gEgo 
  0e3b:4a 0a             send a 


        code_0e3d
  0e3d:39 4c            pushi 4c // $4c claimed
  0e3f:78               push1 
  0e40:78               push1 
  0e41:87 01              lap param1 
  0e43:4a 06             send 6 

  0e45:33 09              jmp code_0e50 

        code_0e47
  0e47:39 4c            pushi 4c // $4c claimed
  0e49:78               push1 
  0e4a:78               push1 
  0e4b:87 01              lap param1 
  0e4d:4a 06             send 6 

  0e4f:48                 ret 

        code_0e50
  0e50:3a                toss 

        code_0e51
  0e51:3a                toss 
  0e52:48                 ret 
    )

)

// 1922
(instance crush of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (doit) // method_0e53
  0e53:39 3c            pushi 3c // $3c doit
  0e55:76               push0 
  0e56:57 05 04         super Script 4 

  0e59:38 00ae          pushi ae // $ae distanceTo
  0e5c:78               push1 
  0e5d:74 0e6c          lofss $1ccc // chand
  0e60:81 00              lag gEgo 
  0e62:4a 06             send 6 

  0e64:36                push 
  0e65:35 50              ldi 50 
  0e67:22                 lt? 
  0e68:31 29              bnt code_0e93 
  0e6a:8b 33              lsl local51 
  0e6c:35 00              ldi 0 
  0e6e:1a                 eq? 
  0e6f:31 22              bnt code_0e93 
  0e71:67 0a             pTos state 
  0e73:35 00              ldi 0 
  0e75:1a                 eq? 
  0e76:31 1b              bnt code_0e93 
  0e78:35 01              ldi 1 
  0e7a:a3 33              sal local51 
  0e7c:39 05            pushi 5 // $5 view
  0e7e:78               push1 
  0e7f:39 0a            pushi a // $a nsLeft
  0e81:39 06            pushi 6 // $6 loop
  0e83:78               push1 
  0e84:76               push0 
  0e85:39 07            pushi 7 // $7 cel
  0e87:78               push1 
  0e88:76               push0 
  0e89:39 7e            pushi 7e // $7e setCycle
  0e8b:78               push1 
  0e8c:51 1a            class End 
  0e8e:36                push 
  0e8f:81 00              lag gEgo 
  0e91:4a 18             send 18 


        code_0e93
  0e93:48                 ret 
    )

    (method (changeState) // method_0e94
  0e94:87 01              lap param1 
  0e96:65 0a             aTop state 
  0e98:36                push 
  0e99:3c                 dup 
  0e9a:35 00              ldi 0 
  0e9c:1a                 eq? 
  0e9d:31 2e              bnt code_0ecd 
  0e9f:76               push0 
  0ea0:45 03 00         callb procedure_0003 0 // HandsOff 

  0ea3:38 00d3          pushi d3 // $d3 setMotion
  0ea6:39 04            pushi 4 // $4 x
  0ea8:51 1d            class MoveTo 
  0eaa:36                push 
  0eab:38 009e          pushi 9e // $9e completed
  0eae:39 66            pushi 66 // $66 isEmpty
  0eb0:7c            pushSelf 
  0eb1:72 0e18          lofsa $1ccc // chand
  0eb4:4a 0c             send c 

  0eb6:38 0084          pushi 84 // $84 stop
  0eb9:76               push0 
  0eba:83 3b              lal local59 
  0ebc:4a 04             send 4 

  0ebe:39 3f            pushi 3f // $3f priority
  0ec0:78               push1 
  0ec1:7a               push2 
  0ec2:39 2a            pushi 2a // $2a play
  0ec4:76               push0 
  0ec5:72 108e          lofsa $1f56 // Fall
  0ec8:4a 0a             send a 

  0eca:32 0086            jmp code_0f53 

        code_0ecd
  0ecd:3c                 dup 
  0ece:35 01              ldi 1 
  0ed0:1a                 eq? 
  0ed1:31 2b              bnt code_0efe 
  0ed3:39 2b            pushi 2b // $2b number
  0ed5:78               push1 
  0ed6:39 24            pushi 24 // $24 cursor
  0ed8:39 2a            pushi 2a // $2a play
  0eda:76               push0 
  0edb:72 104e          lofsa $1f2c // Crash
  0ede:4a 0a             send a 

  0ee0:38 0089          pushi 89 // $89 hide
  0ee3:76               push0 
  0ee4:72 0de5          lofsa $1ccc // chand
  0ee7:4a 04             send 4 

  0ee9:39 06            pushi 6 // $6 loop
  0eeb:78               push1 
  0eec:78               push1 
  0eed:39 07            pushi 7 // $7 cel
  0eef:78               push1 
  0ef0:76               push0 
  0ef1:39 7e            pushi 7e // $7e setCycle
  0ef3:7a               push2 
  0ef4:51 1a            class End 
  0ef6:36                push 
  0ef7:7c            pushSelf 
  0ef8:81 00              lag gEgo 
  0efa:4a 14             send 14 

  0efc:33 55              jmp code_0f53 

        code_0efe
  0efe:3c                 dup 
  0eff:35 02              ldi 2 
  0f01:1a                 eq? 
  0f02:31 17              bnt code_0f1b 
  0f04:38 0084          pushi 84 // $84 stop
  0f07:76               push0 
  0f08:72 104b          lofsa $1f56 // Fall
  0f0b:4a 04             send 4 

  0f0d:7a               push2 
  0f0e:39 05            pushi 5 // $5 view
  0f10:39 05            pushi 5 // $5 view
  0f12:43 6a 04         callk ShakeScreen 4 

  0f15:35 03              ldi 3 
  0f17:65 12             aTop seconds 
  0f19:33 38              jmp code_0f53 

        code_0f1b
  0f1b:3c                 dup 
  0f1c:35 03              ldi 3 
  0f1e:1a                 eq? 
  0f1f:31 32              bnt code_0f53 
  0f21:39 05            pushi 5 // $5 view
  0f23:78               push1 
  0f24:39 0a            pushi a // $a nsLeft
  0f26:39 06            pushi 6 // $6 loop
  0f28:78               push1 
  0f29:39 03            pushi 3 // $3 y
  0f2b:38 00a4          pushi a4 // $a4 cycleSpeed
  0f2e:78               push1 
  0f2f:39 08            pushi 8 // $8 underBits
  0f31:72 104c          lofsa $1f80 // myIcon
  0f34:4a 12             send 12 

  0f36:72 1047          lofsa $1f80 // myIcon
  0f39:a0 0080            sag global128 
  0f3c:35 03              ldi 3 
  0f3e:a0 0081            sag global129 
  0f41:35 00              ldi 0 
  0f43:a0 0082            sag global130 
  0f46:35 01              ldi 1 
  0f48:a0 0084            sag global132 
  0f4b:7a               push2 
  0f4c:39 25            pushi 25 // $25 max
  0f4e:39 17            pushi 17 // $17 name
  0f50:45 13 04         callb procedure_0013 4 // EgoDead 


        code_0f53
  0f53:3a                toss 
  0f54:48                 ret 
    )

)

// 1956
(instance openVisor of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (handleEvent) // method_0f55
  0f55:39 4c            pushi 4c // $4c claimed
  0f57:76               push0 
  0f58:87 01              lap param1 
  0f5a:4a 04             send 4 

  0f5c:31 03              bnt code_0f61 
  0f5e:35 01              ldi 1 
  0f60:48                 ret 

        code_0f61
  0f61:39 22            pushi 22 // $22 type
  0f63:76               push0 
  0f64:87 01              lap param1 
  0f66:4a 04             send 4 

  0f68:36                push 
  0f69:34 0080            ldi 80 
  0f6c:1a                 eq? 
  0f6d:31 34              bnt code_0fa3 
  0f6f:78               push1 
  0f70:74 0721          lofss $1694 // (look,etudier,get)/letter
  0f73:43 25 02         callk Said 2 

  0f76:31 1a              bnt code_0f92 
  0f78:67 0a             pTos state 
  0f7a:35 03              ldi 3 
  0f7c:1a                 eq? 
  0f7d:31 06              bnt code_0f85 
  0f7f:35 01              ldi 1 
  0f81:65 10             aTop cycles 
  0f83:33 0b              jmp code_0f90 

        code_0f85
  0f85:7a               push2 
  0f86:39 25            pushi 25 // $25 max
  0f88:39 18            pushi 18 // $18 key
  0f8a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0f90
  0f90:33 11              jmp code_0fa3 

        code_0f92
  0f92:78               push1 
  0f93:74 0857          lofss $17ed // clore/casque
  0f96:43 25 02         callk Said 2 

  0f99:31 08              bnt code_0fa3 
  0f9b:35 06              ldi 6 
  0f9d:65 0a             aTop state 
  0f9f:35 01              ldi 1 
  0fa1:65 10             aTop cycles 

        code_0fa3
  0fa3:48                 ret 
    )

    (method (changeState) // method_0fa4
  0fa4:87 01              lap param1 
  0fa6:65 0a             aTop state 
  0fa8:36                push 
  0fa9:3c                 dup 
  0faa:35 00              ldi 0 
  0fac:1a                 eq? 
  0fad:31 40              bnt code_0fef 
  0faf:76               push0 
  0fb0:45 03 00         callb procedure_0003 0 // HandsOff 

  0fb3:38 00da          pushi da // $da inRect
  0fb6:39 04            pushi 4 // $4 x
  0fb8:39 6a            pushi 6a // $6a prev
  0fba:38 0096          pushi 96 // $96 busy
  0fbd:39 6c            pushi 6c // $6c addToEnd
  0fbf:38 0098          pushi 98 // $98 center
  0fc2:81 00              lag gEgo 
  0fc4:4a 0c             send c 

  0fc6:31 06              bnt code_0fce 
  0fc8:35 01              ldi 1 
  0fca:65 10             aTop cycles 
  0fcc:33 1e              jmp code_0fec 

        code_0fce
  0fce:38 00d4          pushi d4 // $d4 setAvoider
  0fd1:78               push1 
  0fd2:39 56            pushi 56 // $56 new
  0fd4:76               push0 
  0fd5:51 21            class Avoid 
  0fd7:4a 04             send 4 

  0fd9:36                push 
  0fda:38 00d3          pushi d3 // $d3 setMotion
  0fdd:39 04            pushi 4 // $4 x
  0fdf:51 1d            class MoveTo 
  0fe1:36                push 
  0fe2:39 6b            pushi 6b // $6b addToFront
  0fe4:38 0098          pushi 98 // $98 center
  0fe7:7c            pushSelf 
  0fe8:81 00              lag gEgo 
  0fea:4a 12             send 12 


        code_0fec
  0fec:32 01b0            jmp code_119f 

        code_0fef
  0fef:3c                 dup 
  0ff0:35 01              ldi 1 
  0ff2:1a                 eq? 
  0ff3:31 0f              bnt code_1004 
  0ff5:39 06            pushi 6 // $6 loop
  0ff7:78               push1 
  0ff8:78               push1 
  0ff9:81 00              lag gEgo 
  0ffb:4a 06             send 6 

  0ffd:35 03              ldi 3 
  0fff:65 10             aTop cycles 
  1001:32 019b            jmp code_119f 

        code_1004
  1004:3c                 dup 
  1005:35 02              ldi 2 
  1007:1a                 eq? 
  1008:31 0c              bnt code_1016 
  100a:76               push0 
  100b:40 f042 00        call proc_0051 0 

  100f:35 07              ldi 7 
  1011:65 10             aTop cycles 
  1013:32 0189            jmp code_119f 

        code_1016
  1016:3c                 dup 
  1017:35 03              ldi 3 
  1019:1a                 eq? 
  101a:31 15              bnt code_1031 
  101c:38 00a4          pushi a4 // $a4 cycleSpeed
  101f:78               push1 
  1020:39 03            pushi 3 // $3 y
  1022:39 7e            pushi 7e // $7e setCycle
  1024:7a               push2 
  1025:51 1a            class End 
  1027:36                push 
  1028:7c            pushSelf 
  1029:72 0c52          lofsa $1c7e // Visor
  102c:4a 0e             send e 

  102e:32 016e            jmp code_119f 

        code_1031
  1031:3c                 dup 
  1032:35 04              ldi 4 
  1034:1a                 eq? 
  1035:31 2e              bnt code_1065 
  1037:38 0082          pushi 82 // $82 owner
  103a:76               push0 
  103b:39 43            pushi 43 // $43 at
  103d:78               push1 
  103e:39 0d            pushi d // $d lsTop
  1040:81 09              lag gInventory 
  1042:4a 06             send 6 

  1044:4a 04             send 4 

  1046:36                push 
  1047:35 25              ldi 25 
  1049:1a                 eq? 
  104a:31 12              bnt code_105e 
  104c:39 05            pushi 5 // $5 view
  104e:39 25            pushi 25 // $25 max
  1050:39 19            pushi 19 // $19 time
  1052:39 43            pushi 43 // $43 at
  1054:39 3c            pushi 3c // $3c doit
  1056:39 3c            pushi 3c // $3c doit
  1058:46 00ff 0000 0a  calle ff procedure_0000 a // Print 


        code_105e
  105e:35 01              ldi 1 
  1060:65 10             aTop cycles 
  1062:32 013a            jmp code_119f 

        code_1065
  1065:3c                 dup 
  1066:35 05              ldi 5 
  1068:1a                 eq? 
  1069:31 36              bnt code_10a1 
  106b:38 0082          pushi 82 // $82 owner
  106e:76               push0 
  106f:39 43            pushi 43 // $43 at
  1071:78               push1 
  1072:39 0d            pushi d // $d lsTop
  1074:81 09              lag gInventory 
  1076:4a 06             send 6 

  1078:4a 04             send 4 

  107a:36                push 
  107b:35 25              ldi 25 
  107d:1a                 eq? 
  107e:31 1a              bnt code_109a 
  1080:39 05            pushi 5 // $5 view
  1082:39 25            pushi 25 // $25 max
  1084:39 1a            pushi 1a // $1a text
  1086:39 43            pushi 43 // $43 at
  1088:39 3c            pushi 3c // $3c doit
  108a:39 3c            pushi 3c // $3c doit
  108c:46 00ff 0000 0a  calle ff procedure_0000 a // Print 

  1092:39 58            pushi 58 // $58 dispose
  1094:76               push0 
  1095:72 0b4a          lofsa $1be2 // valve
  1098:4a 04             send 4 


        code_109a
  109a:35 01              ldi 1 
  109c:65 10             aTop cycles 
  109e:32 00fe            jmp code_119f 

        code_10a1
  10a1:3c                 dup 
  10a2:35 06              ldi 6 
  10a4:1a                 eq? 
  10a5:31 42              bnt code_10e9 
  10a7:38 0082          pushi 82 // $82 owner
  10aa:76               push0 
  10ab:39 43            pushi 43 // $43 at
  10ad:78               push1 
  10ae:39 0d            pushi d // $d lsTop
  10b0:81 09              lag gInventory 
  10b2:4a 06             send 6 

  10b4:4a 04             send 4 

  10b6:36                push 
  10b7:35 25              ldi 25 
  10b9:1a                 eq? 
  10ba:31 14              bnt code_10d0 
  10bc:39 05            pushi 5 // $5 view
  10be:39 25            pushi 25 // $25 max
  10c0:39 1b            pushi 1b // $1b elements
  10c2:39 43            pushi 43 // $43 at
  10c4:39 3c            pushi 3c // $3c doit
  10c6:39 3c            pushi 3c // $3c doit
  10c8:46 00ff 0000 0a  calle ff procedure_0000 a // Print 

  10ce:33 12              jmp code_10e2 

        code_10d0
  10d0:39 05            pushi 5 // $5 view
  10d2:39 25            pushi 25 // $25 max
  10d4:39 0b            pushi b // $b nsBottom
  10d6:39 43            pushi 43 // $43 at
  10d8:39 3c            pushi 3c // $3c doit
  10da:39 3c            pushi 3c // $3c doit
  10dc:46 00ff 0000 0a  calle ff procedure_0000 a // Print 


        code_10e2
  10e2:35 01              ldi 1 
  10e4:65 10             aTop cycles 
  10e6:32 00b6            jmp code_119f 

        code_10e9
  10e9:3c                 dup 
  10ea:35 07              ldi 7 
  10ec:1a                 eq? 
  10ed:31 59              bnt code_1148 
  10ef:38 00e2          pushi e2 // $e2 canInput
  10f2:78               push1 
  10f3:76               push0 
  10f4:51 2b            class User 
  10f6:4a 06             send 6 

  10f8:38 0082          pushi 82 // $82 owner
  10fb:76               push0 
  10fc:39 43            pushi 43 // $43 at
  10fe:78               push1 
  10ff:39 0d            pushi d // $d lsTop
  1101:81 09              lag gInventory 
  1103:4a 06             send 6 

  1105:4a 04             send 4 

  1107:36                push 
  1108:35 25              ldi 25 
  110a:1a                 eq? 
  110b:31 23              bnt code_1130 
  110d:39 05            pushi 5 // $5 view
  110f:39 25            pushi 25 // $25 max
  1111:39 1c            pushi 1c // $1c color
  1113:39 43            pushi 43 // $43 at
  1115:39 3c            pushi 3c // $3c doit
  1117:39 5a            pushi 5a // $5a showSelf
  1119:46 00ff 0000 0a  calle ff procedure_0000 a // Print 

  111f:35 01              ldi 1 
  1121:a0 00b6            sag global182 
  1124:38 00ec          pushi ec // $ec get
  1127:78               push1 
  1128:39 0d            pushi d // $d lsTop
  112a:81 00              lag gEgo 
  112c:4a 06             send 6 

  112e:33 12              jmp code_1142 

        code_1130
  1130:39 05            pushi 5 // $5 view
  1132:39 25            pushi 25 // $25 max
  1134:39 1d            pushi 1d // $1d back
  1136:39 43            pushi 43 // $43 at
  1138:39 46            pushi 46 // $46 width
  113a:39 5a            pushi 5a // $5a showSelf
  113c:46 00ff 0000 0a  calle ff procedure_0000 a // Print 


        code_1142
  1142:35 01              ldi 1 
  1144:65 10             aTop cycles 
  1146:33 57              jmp code_119f 

        code_1148
  1148:3c                 dup 
  1149:35 08              ldi 8 
  114b:1a                 eq? 
  114c:31 11              bnt code_115f 
  114e:7a               push2 
  114f:39 25            pushi 25 // $25 max
  1151:39 1e            pushi 1e // $1e mode
  1153:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1159:35 01              ldi 1 
  115b:65 10             aTop cycles 
  115d:33 40              jmp code_119f 

        code_115f
  115f:3c                 dup 
  1160:35 09              ldi 9 
  1162:1a                 eq? 
  1163:31 0e              bnt code_1173 
  1165:39 7e            pushi 7e // $7e setCycle
  1167:7a               push2 
  1168:51 1b            class Beg 
  116a:36                push 
  116b:7c            pushSelf 
  116c:72 0b0f          lofsa $1c7e // Visor
  116f:4a 08             send 8 

  1171:33 2c              jmp code_119f 

        code_1173
  1173:3c                 dup 
  1174:35 0a              ldi a 
  1176:1a                 eq? 
  1177:31 14              bnt code_118d 
  1179:76               push0 
  117a:40 ef4e 00        call proc_00cc 0 

  117e:38 00d4          pushi d4 // $d4 setAvoider
  1181:78               push1 
  1182:76               push0 
  1183:81 00              lag gEgo 
  1185:4a 06             send 6 

  1187:35 01              ldi 1 
  1189:65 10             aTop cycles 
  118b:33 12              jmp code_119f 

        code_118d
  118d:3c                 dup 
  118e:35 0b              ldi b 
  1190:1a                 eq? 
  1191:31 0c              bnt code_119f 
  1193:76               push0 
  1194:45 04 00         callb procedure_0004 0 // HandsOn 

  1197:39 7a            pushi 7a // $7a setScript
  1199:78               push1 
  119a:76               push0 
  119b:63 08             pToa client 
  119d:4a 06             send 6 


        code_119f
  119f:3a                toss 
  11a0:48                 ret 
    )

)

// 198a
(instance oiling 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_11a1
  11a1:87 01              lap param1 
  11a3:65 0a             aTop state 
  11a5:36                push 
  11a6:3c                 dup 
  11a7:35 00              ldi 0 
  11a9:1a                 eq? 
  11aa:31 4a              bnt code_11f6 
  11ac:76               push0 
  11ad:45 03 00         callb procedure_0003 0 // HandsOff 

  11b0:35 01              ldi 1 
  11b2:a3 39              sal local57 
  11b4:38 00da          pushi da // $da inRect
  11b7:39 04            pushi 4 // $4 x
  11b9:39 68            pushi 68 // $68 release
  11bb:38 0094          pushi 94 // $94 retreat
  11be:39 6f            pushi 6f // $6f handleEvent
  11c0:38 009a          pushi 9a // $9a left
  11c3:81 00              lag gEgo 
  11c5:4a 0c             send c 

  11c7:31 06              bnt code_11cf 
  11c9:35 01              ldi 1 
  11cb:65 10             aTop cycles 
  11cd:33 24              jmp code_11f3 

        code_11cf
  11cf:35 00              ldi 0 
  11d1:65 10             aTop cycles 
  11d3:65 12             aTop seconds 
  11d5:38 00d4          pushi d4 // $d4 setAvoider
  11d8:78               push1 
  11d9:39 56            pushi 56 // $56 new
  11db:76               push0 
  11dc:51 21            class Avoid 
  11de:4a 04             send 4 

  11e0:36                push 
  11e1:38 00d3          pushi d3 // $d3 setMotion
  11e4:39 04            pushi 4 // $4 x
  11e6:51 1d            class MoveTo 
  11e8:36                push 
  11e9:39 6b            pushi 6b // $6b addToFront
  11eb:38 0098          pushi 98 // $98 center
  11ee:7c            pushSelf 
  11ef:81 00              lag gEgo 
  11f1:4a 12             send 12 


        code_11f3
  11f3:32 01d3            jmp code_13c9 

        code_11f6
  11f6:3c                 dup 
  11f7:35 01              ldi 1 
  11f9:1a                 eq? 
  11fa:31 0f              bnt code_120b 
  11fc:39 06            pushi 6 // $6 loop
  11fe:78               push1 
  11ff:78               push1 
  1200:81 00              lag gEgo 
  1202:4a 06             send 6 

  1204:35 03              ldi 3 
  1206:65 10             aTop cycles 
  1208:32 01be            jmp code_13c9 

        code_120b
  120b:3c                 dup 
  120c:35 02              ldi 2 
  120e:1a                 eq? 
  120f:31 55              bnt code_1266 
  1211:76               push0 
  1212:40 ee3b 00        call proc_0051 0 

  1216:38 00c5          pushi c5 // $c5 posn
  1219:7a               push2 
  121a:38 00e1          pushi e1 // $e1 alterEgo
  121d:39 64            pushi 64 // $64 allTrue
  121f:38 00ca          pushi ca // $ca show
  1222:76               push0 
  1223:72 0b0a          lofsa $1d30 // Can
  1226:4a 0c             send c 

  1228:83 34              lal local52 
  122a:31 2f              bnt code_125b 
  122c:38 00d3          pushi d3 // $d3 setMotion
  122f:39 04            pushi 4 // $4 x
  1231:51 1d            class MoveTo 
  1233:36                push 
  1234:8b 34              lsl local52 
  1236:35 01              ldi 1 
  1238:04                 sub 
  1239:36                push 
  123a:35 01              ldi 1 
  123c:0e                 shl 
  123d:9b 01             lsli local1 
  123f:8b 34              lsl local52 
  1241:35 01              ldi 1 
  1243:04                 sub 
  1244:36                push 
  1245:35 01              ldi 1 
  1247:0e                 shl 
  1248:9b 02             lsli local2 
  124a:7c            pushSelf 
  124b:72 0ae2          lofsa $1d30 // Can
  124e:4a 0c             send c 

  1250:7a               push2 
  1251:39 25            pushi 25 // $25 max
  1253:39 1f            pushi 1f // $1f style
  1255:40 edd5 04        call proc_002e 4 

  1259:33 08              jmp code_1263 

        code_125b
  125b:35 05              ldi 5 
  125d:65 0a             aTop state 
  125f:35 01              ldi 1 
  1261:65 10             aTop cycles 

        code_1263
  1263:32 0163            jmp code_13c9 

        code_1266
  1266:3c                 dup 
  1267:35 03              ldi 3 
  1269:1a                 eq? 
  126a:31 1f              bnt code_128b 
  126c:76               push0 
  126d:45 0f 00         callb procedure_000f 0 // cls 

  1270:83 34              lal local52 
  1272:31 10              bnt code_1284 
  1274:38 00c8          pushi c8 // $c8 setLoop
  1277:78               push1 
  1278:7a               push2 
  1279:39 7e            pushi 7e // $7e setCycle
  127b:78               push1 
  127c:51 16            class Fwd 
  127e:36                push 
  127f:72 0aae          lofsa $1d30 // Can
  1282:4a 0c             send c 


        code_1284
  1284:35 01              ldi 1 
  1286:65 10             aTop cycles 
  1288:32 013e            jmp code_13c9 

        code_128b
  128b:3c                 dup 
  128c:35 04              ldi 4 
  128e:1a                 eq? 
  128f:31 19              bnt code_12aa 
  1291:39 2b            pushi 2b // $2b number
  1293:78               push1 
  1294:39 49            pushi 49 // $49 semanticFail
  1296:39 06            pushi 6 // $6 loop
  1298:78               push1 
  1299:39 ff            pushi ff // $ff checkAni
  129b:39 2a            pushi 2a // $2a play
  129d:76               push0 
  129e:72 0c8b          lofsa $1f2c // Crash
  12a1:4a 10             send 10 

  12a3:35 03              ldi 3 
  12a5:65 12             aTop seconds 
  12a7:32 011f            jmp code_13c9 

        code_12aa
  12aa:3c                 dup 
  12ab:35 05              ldi 5 
  12ad:1a                 eq? 
  12ae:31 4d              bnt code_12fd 
  12b0:38 0084          pushi 84 // $84 stop
  12b3:76               push0 
  12b4:72 0c75          lofsa $1f2c // Crash
  12b7:4a 04             send 4 

  12b9:83 34              lal local52 
  12bb:31 39              bnt code_12f6 
  12bd:38 00c8          pushi c8 // $c8 setLoop
  12c0:78               push1 
  12c1:78               push1 
  12c2:38 00d3          pushi d3 // $d3 setMotion
  12c5:39 04            pushi 4 // $4 x
  12c7:51 1d            class MoveTo 
  12c9:36                push 
  12ca:38 00e1          pushi e1 // $e1 alterEgo
  12cd:39 64            pushi 64 // $64 allTrue
  12cf:7c            pushSelf 
  12d0:72 0a5d          lofsa $1d30 // Can
  12d3:4a 12             send 12 

  12d5:8b 34              lsl local52 
  12d7:35 02              ldi 2 
  12d9:1a                 eq? 
  12da:2f 0e               bt code_12ea 
  12dc:8b 34              lsl local52 
  12de:35 05              ldi 5 
  12e0:1a                 eq? 
  12e1:2f 07               bt code_12ea 
  12e3:8b 34              lsl local52 
  12e5:35 06              ldi 6 
  12e7:1a                 eq? 
  12e8:31 06              bnt code_12f0 

        code_12ea
  12ea:35 06              ldi 6 
  12ec:65 0a             aTop state 
  12ee:33 04              jmp code_12f4 

        code_12f0
  12f0:35 00              ldi 0 
  12f2:a3 34              sal local52 

        code_12f4
  12f4:33 04              jmp code_12fa 

        code_12f6
  12f6:35 01              ldi 1 
  12f8:65 10             aTop cycles 

        code_12fa
  12fa:32 00cc            jmp code_13c9 

        code_12fd
  12fd:3c                 dup 
  12fe:35 06              ldi 6 
  1300:1a                 eq? 
  1301:31 14              bnt code_1317 
  1303:38 00e2          pushi e2 // $e2 canInput
  1306:78               push1 
  1307:78               push1 
  1308:51 2b            class User 
  130a:4a 06             send 6 

  130c:39 7a            pushi 7a // $7a setScript
  130e:78               push1 
  130f:76               push0 
  1310:63 08             pToa client 
  1312:4a 06             send 6 

  1314:32 00b2            jmp code_13c9 

        code_1317
  1317:3c                 dup 
  1318:35 07              ldi 7 
  131a:1a                 eq? 
  131b:31 10              bnt code_132d 
  131d:76               push0 
  131e:40 edaa 00        call proc_00cc 0 

  1322:76               push0 
  1323:45 03 00         callb procedure_0003 0 // HandsOff 

  1326:35 07              ldi 7 
  1328:65 10             aTop cycles 
  132a:32 009c            jmp code_13c9 

        code_132d
  132d:3c                 dup 
  132e:35 08              ldi 8 
  1330:1a                 eq? 
  1331:31 28              bnt code_135b 
  1333:39 42            pushi 42 // $42 setPri
  1335:78               push1 
  1336:39 0c            pushi c // $c nsRight
  1338:81 00              lag gEgo 
  133a:4a 06             send 6 

  133c:39 7e            pushi 7e // $7e setCycle
  133e:7a               push2 
  133f:51 1a            class End 
  1341:36                push 
  1342:7c            pushSelf 
  1343:72 07a6          lofsa $1aec // knight
  1346:4a 08             send 8 

  1348:39 2b            pushi 2b // $2b number
  134a:78               push1 
  134b:39 53            pushi 53 // $53 draw
  134d:39 06            pushi 6 // $6 loop
  134f:78               push1 
  1350:78               push1 
  1351:39 2a            pushi 2a // $2a play
  1353:76               push0 
  1354:72 0bd5          lofsa $1f2c // Crash
  1357:4a 10             send 10 

  1359:33 6e              jmp code_13c9 

        code_135b
  135b:3c                 dup 
  135c:35 09              ldi 9 
  135e:1a                 eq? 
  135f:31 32              bnt code_1393 
  1361:39 05            pushi 5 // $5 view
  1363:78               push1 
  1364:39 0c            pushi c // $c nsRight
  1366:39 06            pushi 6 // $6 loop
  1368:78               push1 
  1369:7a               push2 
  136a:39 07            pushi 7 // $7 cel
  136c:78               push1 
  136d:76               push0 
  136e:39 42            pushi 42 // $42 setPri
  1370:78               push1 
  1371:39 ff            pushi ff // $ff checkAni
  1373:39 12            pushi 12 // $12 illegalBits
  1375:78               push1 
  1376:76               push0 
  1377:38 00c5          pushi c5 // $c5 posn
  137a:7a               push2 
  137b:39 68            pushi 68 // $68 release
  137d:38 0099          pushi 99 // $99 top
  1380:38 00a4          pushi a4 // $a4 cycleSpeed
  1383:78               push1 
  1384:39 03            pushi 3 // $3 y
  1386:39 7e            pushi 7e // $7e setCycle
  1388:7a               push2 
  1389:51 1a            class End 
  138b:36                push 
  138c:7c            pushSelf 
  138d:81 00              lag gEgo 
  138f:4a 34             send 34 

  1391:33 36              jmp code_13c9 

        code_1393
  1393:3c                 dup 
  1394:35 0a              ldi a 
  1396:1a                 eq? 
  1397:31 30              bnt code_13c9 
  1399:39 7a            pushi 7a // $7a setScript
  139b:78               push1 
  139c:76               push0 
  139d:63 08             pToa client 
  139f:4a 06             send 6 

  13a1:39 05            pushi 5 // $5 view
  13a3:78               push1 
  13a4:38 028d          pushi 28d // $28d sel_653
  13a7:72 0bd6          lofsa $1f80 // myIcon
  13aa:4a 06             send 6 

  13ac:72 0bd1          lofsa $1f80 // myIcon
  13af:a0 0080            sag global128 
  13b2:35 00              ldi 0 
  13b4:a0 0081            sag global129 
  13b7:35 00              ldi 0 
  13b9:a0 0082            sag global130 
  13bc:35 01              ldi 1 
  13be:a0 0084            sag global132 
  13c1:7a               push2 
  13c2:39 25            pushi 25 // $25 max
  13c4:39 20            pushi 20 // $20 state
  13c6:45 13 04         callb procedure_0013 4 // EgoDead 


        code_13c9
  13c9:3a                toss 
  13ca:48                 ret 
    )

)

// 19ba
(instance postR of PV
    (properties
        y $8e
        x $db
        z $0
        heading $0
        view $89
        loop $0
        cel $1
        priority $d
        signal $0
    )
)

// 19e4
(instance postL of PV
    (properties
        y $91
        x $67
        z $0
        heading $0
        view $89
        loop $0
        cel $0
        priority $d
        signal $0
    )
)

// 1a0e
(instance phone of RPicView
    (properties
        y $4b
        x $db
        z $0
        heading $0
        view $89
        loop $1
        cel $1
        priority $3
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_13cb
  13cb:83 35              lal local53 
  13cd:18                 not 
  13ce:31 1e              bnt code_13ee 
  13d0:39 03            pushi 3 // $3 y
  13d2:7c            pushSelf 
  13d3:8f 01              lsp param1 
  13d5:39 03            pushi 3 // $3 y
  13d7:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  13dd:31 0f              bnt code_13ee 
  13df:39 4c            pushi 4c // $4c claimed
  13e1:78               push1 
  13e2:78               push1 
  13e3:87 01              lap param1 
  13e5:4a 06             send 6 

  13e7:78               push1 
  13e8:74 0d14          lofss $20ff // table
  13eb:45 19 02         callb procedure_0019 2 // DoLook 


        code_13ee
  13ee:48                 ret 
    )

)

// 1a44
(instance lamp of RPicView
    (properties
        y $4b
        x $65
        z $0
        heading $0
        view $89
        loop $1
        cel $0
        priority $3
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_13ef
  13ef:83 35              lal local53 
  13f1:18                 not 
  13f2:31 1e              bnt code_1412 
  13f4:39 03            pushi 3 // $3 y
  13f6:7c            pushSelf 
  13f7:8f 01              lsp param1 
  13f9:39 03            pushi 3 // $3 y
  13fb:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  1401:31 0f              bnt code_1412 
  1403:39 4c            pushi 4c // $4c claimed
  1405:78               push1 
  1406:78               push1 
  1407:87 01              lap param1 
  1409:4a 06             send 6 

  140b:78               push1 
  140c:74 0cf0          lofss $20ff // table
  140f:45 19 02         callb procedure_0019 2 // DoLook 


        code_1412
  1412:48                 ret 
    )

)

// 1a7a
(instance clock of RPicView
    (properties
        y $43
        x $6c
        z $0
        heading $0
        view $89
        loop $2
        cel $0
        priority $3
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_1413
  1413:3e 00fa           link fa // (var $fa)
  1416:83 35              lal local53 
  1418:18                 not 
  1419:31 39              bnt code_1454 
  141b:39 03            pushi 3 // $3 y
  141d:7c            pushSelf 
  141e:8f 01              lsp param1 
  1420:39 03            pushi 3 // $3 y
  1422:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  1428:2f 09               bt code_1433 
  142a:78               push1 
  142b:74 0465          lofss $1893 // look[<at]/clock
  142e:43 25 02         callk Said 2 

  1431:31 21              bnt code_1454 

        code_1433
  1433:39 4c            pushi 4c // $4c claimed
  1435:78               push1 
  1436:78               push1 
  1437:87 01              lap param1 
  1439:4a 06             send 6 

  143b:78               push1 
  143c:39 05            pushi 5 // $5 view
  143e:5b 04 00           lea 4 0 
  1441:36                push 
  1442:39 25            pushi 25 // $25 max
  1444:39 21            pushi 21 // $21 font
  1446:39 25            pushi 25 // $25 max
  1448:39 22            pushi 22 // $22 type
  144a:43 4c 0a         callk Format a 

  144d:36                push 
  144e:46 00ff 0000 02  calle ff procedure_0000 2 // Print 


        code_1454
  1454:48                 ret 
    )

)

// 1ab0
(instance mirror of RPicView
    (properties
        y $48
        x $dc
        z $0
        heading $0
        view $89
        loop $2
        cel $1
        priority $3
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_1455
  1455:3f 23             link 23 // (var $23)
  1457:78               push1 
  1458:74 0452          lofss $18ad // rotate,bouger/miroir,clock
  145b:43 25 02         callk Said 2 

  145e:2f 12               bt code_1472 
  1460:78               push1 
  1461:74 026e          lofss $16d2 // (attirer,appuyer)[<open,on]/clock
  1464:43 25 02         callk Said 2 

  1467:2f 09               bt code_1472 
  1469:78               push1 
  146a:74 0252          lofss $16bf // (appuyer,attirer)[<open,on]/miroir
  146d:43 25 02         callk Said 2 

  1470:31 06              bnt code_1478 

        code_1472
  1472:76               push0 
  1473:45 09 00         callb procedure_0009 0 // NotClose 

  1476:33 4d              jmp code_14c5 

        code_1478
  1478:78               push1 
  1479:74 043d          lofss $18b9 // rotate,rotate/miroir
  147c:43 25 02         callk Said 2 

  147f:31 06              bnt code_1487 
  1481:76               push0 
  1482:45 09 00         callb procedure_0009 0 // NotClose 

  1485:33 3e              jmp code_14c5 

        code_1487
  1487:83 35              lal local53 
  1489:18                 not 
  148a:31 39              bnt code_14c5 
  148c:39 03            pushi 3 // $3 y
  148e:7c            pushSelf 
  148f:8f 01              lsp param1 
  1491:39 03            pushi 3 // $3 y
  1493:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  1499:2f 09               bt code_14a4 
  149b:78               push1 
  149c:74 03ff          lofss $189e // look[<at]/miroir
  149f:43 25 02         callk Said 2 

  14a2:31 21              bnt code_14c5 

        code_14a4
  14a4:39 4c            pushi 4c // $4c claimed
  14a6:78               push1 
  14a7:78               push1 
  14a8:87 01              lap param1 
  14aa:4a 06             send 6 

  14ac:78               push1 
  14ad:39 05            pushi 5 // $5 view
  14af:5b 04 00           lea 4 0 
  14b2:36                push 
  14b3:39 25            pushi 25 // $25 max
  14b5:39 21            pushi 21 // $21 font
  14b7:39 25            pushi 25 // $25 max
  14b9:39 23            pushi 23 // $23 window
  14bb:43 4c 0a         callk Format a 

  14be:36                push 
  14bf:46 00ff 0000 02  calle ff procedure_0000 2 // Print 


        code_14c5
  14c5:48                 ret 
    )

)

// 1ae6
(instance knight of Prop
    (properties
        y $99
        x $51
        z $0
        heading $0
        yStep $2
        view $c
        loop $3
        cel $0
        priority $b
        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_14c6
  14c6:78               push1 
  14c7:74 0334          lofss $17fe // enter,porter,((get,cacher,aller,climb)<dans),(attach<on)/armor,cloth
  14ca:43 25 02         callk Said 2 

  14cd:31 0e              bnt code_14dd 
  14cf:7a               push2 
  14d0:39 25            pushi 25 // $25 max
  14d2:39 24            pushi 24 // $24 cursor
  14d4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  14da:32 00ba            jmp code_1597 

        code_14dd
  14dd:78               push1 
  14de:74 0362          lofss $1843 // get/letter
  14e1:43 25 02         callk Said 2 

  14e4:31 30              bnt code_1516 
  14e6:38 0082          pushi 82 // $82 owner
  14e9:76               push0 
  14ea:39 43            pushi 43 // $43 at
  14ec:78               push1 
  14ed:39 0d            pushi d // $d lsTop
  14ef:81 09              lag gInventory 
  14f1:4a 06             send 6 

  14f3:4a 04             send 4 

  14f5:36                push 
  14f6:35 25              ldi 25 
  14f8:1a                 eq? 
  14f9:31 0d              bnt code_1508 
  14fb:7a               push2 
  14fc:39 25            pushi 25 // $25 max
  14fe:39 25            pushi 25 // $25 max
  1500:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1506:33 0b              jmp code_1513 

        code_1508
  1508:7a               push2 
  1509:39 25            pushi 25 // $25 max
  150b:39 26            pushi 26 // $26 mark
  150d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_1513
  1513:32 0081            jmp code_1597 

        code_1516
  1516:78               push1 
  1517:74 032f          lofss $1849 // get/valve,fontainier
  151a:43 25 02         callk Said 2 

  151d:31 28              bnt code_1547 
  151f:38 0082          pushi 82 // $82 owner
  1522:76               push0 
  1523:39 43            pushi 43 // $43 at
  1525:78               push1 
  1526:39 0d            pushi d // $d lsTop
  1528:81 09              lag gInventory 
  152a:4a 06             send 6 

  152c:4a 04             send 4 

  152e:36                push 
  152f:35 25              ldi 25 
  1531:1a                 eq? 
  1532:31 0d              bnt code_1541 
  1534:7a               push2 
  1535:39 25            pushi 25 // $25 max
  1537:39 25            pushi 25 // $25 max
  1539:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  153f:33 04              jmp code_1545 

        code_1541
  1541:76               push0 
  1542:45 0a 00         callb procedure_000a 0 // AlreadyTook 


        code_1545
  1545:33 50              jmp code_1597 

        code_1547
  1547:39 03            pushi 3 // $3 y
  1549:7c            pushSelf 
  154a:8f 01              lsp param1 
  154c:39 03            pushi 3 // $3 y
  154e:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  1554:2f 13               bt code_1569 
  1556:78               push1 
  1557:74 0319          lofss $1873 // look/armor,cloth>
  155a:43 25 02         callk Said 2 

  155d:31 38              bnt code_1597 
  155f:78               push1 
  1560:74 0325          lofss $1888 // look<dans>
  1563:43 25 02         callk Said 2 

  1566:18                 not 
  1567:31 2e              bnt code_1597 

        code_1569
  1569:39 4c            pushi 4c // $4c claimed
  156b:78               push1 
  156c:78               push1 
  156d:87 01              lap param1 
  156f:4a 06             send 6 

  1571:83 35              lal local53 
  1573:18                 not 
  1574:31 05              bnt code_157b 
  1576:76               push0 
  1577:40 ead6 00        call proc_0051 0 


        code_157b
  157b:39 05            pushi 5 // $5 view
  157d:39 25            pushi 25 // $25 max
  157f:39 27            pushi 27 // $27 who
  1581:39 43            pushi 43 // $43 at
  1583:39 6e            pushi 6e // $6e indexOf
  1585:39 6e            pushi 6e // $6e indexOf
  1587:46 00ff 0000 0a  calle ff procedure_0000 a // Print 

  158d:83 39              lal local57 
  158f:18                 not 
  1590:31 05              bnt code_1597 
  1592:76               push0 
  1593:40 eb35 00        call proc_00cc 0 


        code_1597
  1597:48                 ret 
    )

)

// 1b38
(instance lampL of Prop
    (properties
        y $3c
        x $59
        z $0
        heading $0
        yStep $2
        view $ed
        loop $1
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_1598
  1598:83 35              lal local53 
  159a:18                 not 
  159b:31 1e              bnt code_15bb 
  159d:39 03            pushi 3 // $3 y
  159f:7c            pushSelf 
  15a0:8f 01              lsp param1 
  15a2:39 03            pushi 3 // $3 y
  15a4:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  15aa:31 0f              bnt code_15bb 
  15ac:39 4c            pushi 4c // $4c claimed
  15ae:78               push1 
  15af:78               push1 
  15b0:87 01              lap param1 
  15b2:4a 06             send 6 

  15b4:78               push1 
  15b5:74 0ac9          lofss $2081 // lamp
  15b8:45 19 02         callb procedure_0019 2 // DoLook 


        code_15bb
  15bb:48                 ret 
    )

)

// 1b8a
(instance lampR of Prop
    (properties
        y $3c
        x $ea
        z $0
        heading $0
        yStep $2
        view $ed
        loop $2
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_15bc
  15bc:83 35              lal local53 
  15be:18                 not 
  15bf:31 1e              bnt code_15df 
  15c1:39 03            pushi 3 // $3 y
  15c3:7c            pushSelf 
  15c4:8f 01              lsp param1 
  15c6:39 03            pushi 3 // $3 y
  15c8:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  15ce:31 0f              bnt code_15df 
  15d0:39 4c            pushi 4c // $4c claimed
  15d2:78               push1 
  15d3:78               push1 
  15d4:87 01              lap param1 
  15d6:4a 06             send 6 

  15d8:78               push1 
  15d9:74 0aa5          lofss $2081 // lamp
  15dc:45 19 02         callb procedure_0019 2 // DoLook 


        code_15df
  15df:48                 ret 
    )

)

// 1bdc
(instance valve of Prop
    (properties
        y $2e
        x $96
        z $0
        heading $0
        yStep $2
        view $89
        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
    )
)

// 1c2a
(instance note of Prop
    (properties
        y $2a
        x $97
        z $0
        heading $0
        yStep $2
        view $89
        loop $3
        cel $1
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 1c78
(instance Visor of Prop
    (properties
        y $23
        x $86
        z $0
        heading $0
        yStep $2
        view $95
        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
    )
)

// 1cc6
(instance chand of Act
    (properties
        y $ffff
        x $9e
        z $0
        heading $0
        yStep $2
        view $a
        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
    )
)

// 1d2a
(instance Can of Act
    (properties
        y $64
        x $e1
        z $0
        heading $0
        yStep $2
        view $95
        loop $1
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
        illegalBits $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)

// 1d8e
(instance Armor of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $18
        nsLeft $65
        nsBottom $bd
        nsRight $a2
    )
    (method (handleEvent) // method_15e0
  15e0:83 35              lal local53 
  15e2:31 29              bnt code_160d 
  15e4:39 03            pushi 3 // $3 y
  15e6:7c            pushSelf 
  15e7:8f 01              lsp param1 
  15e9:39 03            pushi 3 // $3 y
  15eb:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  15f1:31 1a              bnt code_160d 
  15f3:39 4c            pushi 4c // $4c claimed
  15f5:78               push1 
  15f6:78               push1 
  15f7:87 01              lap param1 
  15f9:4a 06             send 6 

  15fb:39 05            pushi 5 // $5 view
  15fd:39 25            pushi 25 // $25 max
  15ff:39 27            pushi 27 // $27 who
  1601:39 43            pushi 43 // $43 at
  1603:39 6e            pushi 6e // $6e indexOf
  1605:39 6e            pushi 6e // $6e indexOf
  1607:46 00ff 0000 0a  calle ff procedure_0000 a // Print 


        code_160d
  160d:48                 ret 
    )

)

// 1dba
(instance Axe of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $19
        nsLeft $a7
        nsBottom $74
        nsRight $d7
    )
    (method (handleEvent) // method_160e
  160e:83 35              lal local53 
  1610:31 0f              bnt code_1621 
  1612:39 03            pushi 3 // $3 y
  1614:7c            pushSelf 
  1615:8f 01              lsp param1 
  1617:39 03            pushi 3 // $3 y
  1619:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  161f:2f 09               bt code_162a 

        code_1621
  1621:78               push1 
  1622:74 0258          lofss $187d // look/ax[<bataille]
  1625:43 25 02         callk Said 2 

  1628:31 13              bnt code_163d 

        code_162a
  162a:7a               push2 
  162b:39 25            pushi 25 // $25 max
  162d:39 0d            pushi d // $d lsTop
  162f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  1635:39 4c            pushi 4c // $4c claimed
  1637:78               push1 
  1638:78               push1 
  1639:87 01              lap param1 
  163b:4a 06             send 6 


        code_163d
  163d:48                 ret 
    )

)

// 1de6
(instance Carpet of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $22
        nsLeft $83
        nsBottom $94
        nsRight $bd
    )
    (method (handleEvent) // method_163e
  163e:39 03            pushi 3 // $3 y
  1640:7c            pushSelf 
  1641:8f 01              lsp param1 
  1643:39 03            pushi 3 // $3 y
  1645:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  164b:31 0f              bnt code_165c 
  164d:39 4c            pushi 4c // $4c claimed
  164f:78               push1 
  1650:78               push1 
  1651:87 01              lap param1 
  1653:4a 06             send 6 

  1655:78               push1 
  1656:74 0a08          lofss $2061 // carpet
  1659:45 19 02         callb procedure_0019 2 // DoLook 


        code_165c
  165c:48                 ret 
    )

)

// 1e12
(instance Couch of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $5f
        nsLeft $e3
        nsBottom $75
        nsRight $105
    )
    (method (handleEvent) // method_165d
  165d:39 03            pushi 3 // $3 y
  165f:7c            pushSelf 
  1660:8f 01              lsp param1 
  1662:39 03            pushi 3 // $3 y
  1664:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  166a:31 0f              bnt code_167b 
  166c:39 4c            pushi 4c // $4c claimed
  166e:78               push1 
  166f:78               push1 
  1670:87 01              lap param1 
  1672:4a 06             send 6 

  1674:78               push1 
  1675:74 0a82          lofss $20fa // sofa
  1678:45 19 02         callb procedure_0019 2 // DoLook 


        code_167b
  167b:48                 ret 
    )

)

// 1e3e
(instance leftBotPath of Path
    (properties
        client $0
        caller $0
        x $0
        y $0
        dx $0
        dy $0
        b-moveCnt $0
        b-i1 $0
        b-i2 $0
        b-di $0
        b-xAxis $0
        b-incr $0
        completed $0
        intermediate $0
        value $0
    )
    (method (at) // method_167c
  167c:87 01              lap param1 
  167e:93 1b             lali local27 
  1680:48                 ret 
    )

)

// 1e78
(instance rightBotPath of Path
    (properties
        client $0
        caller $0
        x $0
        y $0
        dx $0
        dy $0
        b-moveCnt $0
        b-i1 $0
        b-i2 $0
        b-di $0
        b-xAxis $0
        b-incr $0
        completed $0
        intermediate $0
        value $0
    )
    (method (at) // method_1681
  1681:87 01              lap param1 
  1683:93 22             lali local34 
  1685:48                 ret 
    )

)

// 1eb2
(instance leftTopPath of Path
    (properties
        client $0
        caller $0
        x $0
        y $0
        dx $0
        dy $0
        b-moveCnt $0
        b-i1 $0
        b-i2 $0
        b-di $0
        b-xAxis $0
        b-incr $0
        completed $0
        intermediate $0
        value $0
    )
    (method (at) // method_1686
  1686:87 01              lap param1 
  1688:93 29             lali local41 
  168a:48                 ret 
    )

)

// 1eec
(instance rightTopPath of Path
    (properties
        client $0
        caller $0
        x $0
        y $0
        dx $0
        dy $0
        b-moveCnt $0
        b-i1 $0
        b-i2 $0
        b-di $0
        b-xAxis $0
        b-incr $0
        completed $0
        intermediate $0
        value $0
    )
    (method (at) // method_168b
  168b:87 01              lap param1 
  168d:93 2e             lali local46 
  168f:48                 ret 
    )

)

// 1f26
(instance Crash of Sound
    (properties
        state $0
        number $24
        priority $5
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 1f50
(instance Fall of Sound
    (properties
        state $0
        number $9
        priority $5
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 1f7a
(instance myIcon of DCIcon
    (properties
        type $4
        state $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        key $0
        said $0
        value $0
        view $0
        loop $0
        cel $0
        cycler $0
        cycleSpeed $10
        signal $0
        count $ffff
    )
)



(procedure proc_002e
  002e:39 0b            pushi b // $b nsBottom
  0030:59 01            &rest 1 
  0032:39 43            pushi 43 // $43 at
  0034:38 00a0          pushi a0 // $a0 cycleDone
  0037:38 0096          pushi 96 // $96 busy
  003a:39 21            pushi 21 // $21 font
  003c:39 04            pushi 4 // $4 x
  003e:39 46            pushi 46 // $46 width
  0040:38 008c          pushi 8c // $8c track
  0043:39 1e            pushi 1e // $1e mode
  0045:78               push1 
  0046:39 53            pushi 53 // $53 draw
  0048:39 58            pushi 58 // $58 dispose
  004a:46 00ff 0000 16  calle ff procedure_0000 16 // Print 

  0050:48                 ret 
)

(procedure proc_0051
  0051:83 35              lal local53 
  0053:18                 not 
  0054:31 75              bnt code_00cb 
  0056:35 01              ldi 1 
  0058:a3 35              sal local53 
  005a:38 00e9          pushi e9 // $e9 canControl
  005d:78               push1 
  005e:76               push0 
  005f:51 2b            class User 
  0061:4a 06             send 6 

  0063:38 010d          pushi 10d // $10d drawPic
  0066:7a               push2 
  0067:39 31            pushi 31 // $31 b-i1
  0069:39 07            pushi 7 // $7 cel
  006b:72 186a          lofsa $18d8 // Room37
  006e:4a 08             send 8 

  0070:39 62            pushi 62 // $62 eachElementDo
  0072:78               push1 
  0073:38 0089          pushi 89 // $89 hide
  0076:81 05              lag gCast 
  0078:4a 06             send 6 

  007a:38 00ca          pushi ca // $ca show
  007d:76               push0 
  007e:72 1bfd          lofsa $1c7e // Visor
  0081:4a 04             send 4 

  0083:38 00ca          pushi ca // $ca show
  0086:76               push0 
  0087:72 1ba6          lofsa $1c30 // note
  008a:4a 04             send 4 

  008c:38 00ee          pushi ee // $ee has
  008f:78               push1 
  0090:39 0d            pushi d // $d lsTop
  0092:81 00              lag gEgo 
  0094:4a 06             send 6 

  0096:18                 not 
  0097:31 0c              bnt code_00a5 
  0099:39 42            pushi 42 // $42 setPri
  009b:78               push1 
  009c:78               push1 
  009d:39 57            pushi 57 // $57 init
  009f:76               push0 
  00a0:72 1b3f          lofsa $1be2 // valve
  00a3:4a 0a             send a 


        code_00a5
  00a5:83 39              lal local57 
  00a7:31 22              bnt code_00cb 
  00a9:39 0e            pushi e // $e lsLeft
  00ab:39 25            pushi 25 // $25 max
  00ad:76               push0 
  00ae:39 64            pushi 64 // $64 allTrue
  00b0:39 30            pushi 30 // $30 b-moveCnt
  00b2:39 08            pushi 8 // $8 underBits
  00b4:39 6a            pushi 6a // $6a prev
  00b6:38 0100          pushi 100 // $100 notify
  00b9:39 66            pushi 66 // $66 isEmpty
  00bb:39 0f            pushi f // $f lsBottom
  00bd:39 67            pushi 67 // $67 first
  00bf:39 ff            pushi ff // $ff checkAni
  00c1:39 69            pushi 69 // $69 last
  00c3:76               push0 
  00c4:39 6b            pushi 6b // $6b addToFront
  00c6:43 1b 1c         callk Display 1c 

  00c9:a3 00              sal local0 

        code_00cb
  00cb:48                 ret 
)

(procedure proc_00cc
  00cc:83 35              lal local53 
  00ce:30 0097            bnt code_0168 
  00d1:76               push0 
  00d2:45 0f 00         callb procedure_000f 0 // cls 

  00d5:35 00              ldi 0 
  00d7:a3 35              sal local53 
  00d9:38 00e9          pushi e9 // $e9 canControl
  00dc:78               push1 
  00dd:78               push1 
  00de:51 2b            class User 
  00e0:4a 06             send 6 

  00e2:83 39              lal local57 
  00e4:31 0c              bnt code_00f2 
  00e6:39 04            pushi 4 // $4 x
  00e8:39 25            pushi 25 // $25 max
  00ea:78               push1 
  00eb:39 6c            pushi 6c // $6c addToEnd
  00ed:8b 00              lsl local0 
  00ef:43 1b 08         callk Display 8 


        code_00f2
  00f2:38 010d          pushi 10d // $10d drawPic
  00f5:7a               push2 
  00f6:89 0b              lsg gCurRoomNum 
  00f8:39 06            pushi 6 // $6 loop
  00fa:72 17db          lofsa $18d8 // Room37
  00fd:4a 08             send 8 

  00ff:39 62            pushi 62 // $62 eachElementDo
  0101:78               push1 
  0102:38 00ca          pushi ca // $ca show
  0105:81 05              lag gCast 
  0107:4a 06             send 6 

  0109:39 61            pushi 61 // $61 add
  010b:39 06            pushi 6 // $6 loop
  010d:74 18b0          lofss $19c0 // postR
  0110:74 18d7          lofss $19ea // postL
  0113:74 18fe          lofss $1a14 // phone
  0116:74 1931          lofss $1a4a // lamp
  0119:74 1964          lofss $1a80 // clock
  011c:74 1997          lofss $1ab6 // mirror
  011f:39 62            pushi 62 // $62 eachElementDo
  0121:78               push1 
  0122:39 57            pushi 57 // $57 init
  0124:39 3c            pushi 3c // $3c doit
  0126:76               push0 
  0127:81 0a              lag gAddToPics 
  0129:4a 1a             send 1a 

  012b:38 0089          pushi 89 // $89 hide
  012e:76               push0 
  012f:72 1bfe          lofsa $1d30 // Can
  0132:4a 04             send 4 

  0134:38 0089          pushi 89 // $89 hide
  0137:76               push0 
  0138:72 1b43          lofsa $1c7e // Visor
  013b:4a 04             send 4 

  013d:38 0089          pushi 89 // $89 hide
  0140:76               push0 
  0141:72 1aec          lofsa $1c30 // note
  0144:4a 04             send 4 

  0146:38 0089          pushi 89 // $89 hide
  0149:76               push0 
  014a:72 1a95          lofsa $1be2 // valve
  014d:4a 04             send 4 

  014f:8b 34              lsl local52 
  0151:35 02              ldi 2 
  0153:1c                 ne? 
  0154:31 12              bnt code_0168 
  0156:8b 34              lsl local52 
  0158:35 05              ldi 5 
  015a:1c                 ne? 
  015b:31 0b              bnt code_0168 
  015d:8b 34              lsl local52 
  015f:35 06              ldi 6 
  0161:1c                 ne? 
  0162:31 04              bnt code_0168 
  0164:76               push0 
  0165:45 04 00         callb procedure_0004 0 // HandsOn 


        code_0168
  0168:48                 ret 
)

