(script 12)

(string
    string_1186 "Cellar"
    string_118d "Dish"
    string_1192 "Door"
    string_1197 "Lamp"
    string_119c "LookDog"
    string_11a4 "Room12"
    string_11ab "Splash1"
    string_11b3 "Splash2"
    string_11bb "Window1"
    string_11c3 "dHouse"
    string_11ca "dHouse2"
    string_11d2 "door"
    string_11d7 "knockDoor"
    string_11e1 "myDoor"
    string_11e8 "myDoor2"
    string_11f0 "myMusic"
    string_11f8 "window"
    string_11ff ""
)

(said
    said_0cb4 (look<dans),debloquer
    said_0cbf /(door<basement),basement>
    said_0ccc /door>
    said_0cd1 /barriere
    said_0cd5 /path
    said_0cd9 /escalier
    said_0cdd /haut
    said_0ce1 [<around,at][/room]
    said_0cef bang
    said_0cf2 bang/[<door,!*,*]
    said_0d01 bang/door<basement
    said_0d0a climb/barriere
    said_0d10 enter,(get,aller<dans)/cabin<beauregard
    said_0d24 enter,(get,aller<dans)/doghouse
    said_0d35 get/dish
    said_0d3b get/allumer
    said_0d41 look/(door<basement),basement
    said_0d4f look/cabin<beauregard
    said_0d58 look/dish
    said_0d5e look/doghouse
    said_0d64 look/allumer
    said_0d6a look<(below,behind)/doghouse
    said_0d78 look>
    said_0d7c open
    said_0d7f chercher,(look<dans)/cabin<beauregard
    said_0d90 chercher,(look<dans)/doghouse
)

(synonym
    allumer | ignite | illuminer | light = lamp | lampe
)

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

// 0da4
(instance public Room12 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $c
        style $ffff
        horizon $0
        controls $0
        north $0
        east $0
        south $0
        west $0
        curPic $0
        picAngle $0
        vanishingX $a0
        vanishingY $8ad0
        vertAngle $0
    )
    (method (init) // method_0016
  0016:35 17              ldi 17 
  0018:65 1e             aTop south 
  001a:35 11              ldi 11 
  001c:65 20             aTop west 
  001e:35 06              ldi 6 
  0020:65 1a             aTop north 
  0022:35 00              ldi 0 
  0024:a3 00              sal local0 
  0026:35 00              ldi 0 
  0028:a3 02              sal local2 
  002a:39 57            pushi 57 // $57 init
  002c:76               push0 
  002d:57 37 04         super Rm 4 

  0030:76               push0 
  0031:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0034:a3 06              sal local6 
  0036:80 00df            lag gDetailLevel 
  0039:31 37              bnt code_0072 
  003b:39 42            pushi 42 // $42 setPri
  003d:78               push1 
  003e:39 0e            pushi e // $e lsLeft
  0040:39 7e            pushi 7e // $7e setCycle
  0042:78               push1 
  0043:51 16            class Fwd 
  0045:36                push 
  0046:39 57            pushi 57 // $57 init
  0048:76               push0 
  0049:72 0f12          lofsa $0f5e // Lamp
  004c:4a 10             send 10 

  004e:38 00c9          pushi c9 // $c9 ignoreActors
  0051:78               push1 
  0052:78               push1 
  0053:39 57            pushi 57 // $57 init
  0055:76               push0 
  0056:38 0089          pushi 89 // $89 hide
  0059:76               push0 
  005a:72 0f53          lofsa $0fb0 // Splash1
  005d:4a 0e             send e 

  005f:38 00c9          pushi c9 // $c9 ignoreActors
  0062:78               push1 
  0063:78               push1 
  0064:39 57            pushi 57 // $57 init
  0066:76               push0 
  0067:38 0089          pushi 89 // $89 hide
  006a:76               push0 
  006b:72 0f90          lofsa $0ffe // Splash2
  006e:4a 0e             send e 

  0070:33 11              jmp code_0083 

        code_0072
  0072:39 42            pushi 42 // $42 setPri
  0074:78               push1 
  0075:39 0e            pushi e // $e lsLeft
  0077:39 57            pushi 57 // $57 init
  0079:76               push0 
  007a:38 00c6          pushi c6 // $c6 stopUpd
  007d:76               push0 
  007e:72 0edd          lofsa $0f5e // Lamp
  0081:4a 0e             send e 


        code_0083
  0083:39 61            pushi 61 // $61 add
  0085:78               push1 
  0086:74 1015          lofss $109e // dHouse
  0089:39 62            pushi 62 // $62 eachElementDo
  008b:78               push1 
  008c:39 57            pushi 57 // $57 init
  008e:39 3c            pushi 3c // $3c doit
  0090:76               push0 
  0091:81 0a              lag gAddToPics 
  0093:4a 10             send 10 

  0095:7a               push2 
  0096:38 0082          pushi 82 // $82 owner
  0099:38 03d9          pushi 3d9 // $3d9 sel_985
  009c:43 00 04         callk Load 4 

  009f:39 04            pushi 4 // $4 x
  00a1:38 0084          pushi 84 // $84 stop
  00a4:39 2b            pushi 2b // $2b number
  00a6:39 2c            pushi 2c // $2c handle
  00a8:39 30            pushi 30 // $30 b-moveCnt
  00aa:45 15 08         callb procedure_0015 8 // LoadMany 

  00ad:7a               push2 
  00ae:38 0080          pushi 80 // $80 timeLeft
  00b1:39 38            pushi 38 // $38 moveSpeed
  00b3:43 00 04         callk Load 4 

  00b6:38 010a          pushi 10a // $10a setRegions
  00b9:78               push1 
  00ba:38 00ce          pushi ce // $ce yLast
  00bd:38 010b          pushi 10b // $10b setFeatures
  00c0:7a               push2 
  00c1:74 0fda          lofss $109e // dHouse
  00c4:74 1037          lofss $10fe // Window1
  00c7:54 0e             self e 

  00c9:39 07            pushi 7 // $7 cel
  00cb:78               push1 
  00cc:89 0c              lsg gPrevRoomNum 
  00ce:35 23              ldi 23 
  00d0:1a                 eq? 
  00d1:31 04              bnt code_00d7 
  00d3:35 03              ldi 3 
  00d5:33 02              jmp code_00d9 

        code_00d7
  00d7:35 00              ldi 0 

        code_00d9
  00d9:36                push 
  00da:39 42            pushi 42 // $42 setPri
  00dc:78               push1 
  00dd:39 06            pushi 6 // $6 loop
  00df:38 00c9          pushi c9 // $c9 ignoreActors
  00e2:78               push1 
  00e3:78               push1 
  00e4:39 57            pushi 57 // $57 init
  00e6:76               push0 
  00e7:38 00c6          pushi c6 // $c6 stopUpd
  00ea:76               push0 
  00eb:72 0dcc          lofsa $0eba // Door
  00ee:4a 1a             send 1a 

  00f0:72 0dc7          lofsa $0eba // Door
  00f3:a0 0178            sag global376 
  00f6:39 07            pushi 7 // $7 cel
  00f8:78               push1 
  00f9:89 0c              lsg gPrevRoomNum 
  00fb:35 35              ldi 35 
  00fd:1a                 eq? 
  00fe:31 04              bnt code_0104 
  0100:35 03              ldi 3 
  0102:33 02              jmp code_0106 

        code_0104
  0104:35 00              ldi 0 

        code_0106
  0106:36                push 
  0107:38 00c9          pushi c9 // $c9 ignoreActors
  010a:78               push1 
  010b:78               push1 
  010c:39 57            pushi 57 // $57 init
  010e:76               push0 
  010f:38 00c6          pushi c6 // $c6 stopUpd
  0112:76               push0 
  0113:72 0df6          lofsa $0f0c // Cellar
  0116:4a 14             send 14 

  0118:72 0df1          lofsa $0f0c // Cellar
  011b:a0 01be            sag gCellar 
  011e:88 0172            lsg global370 
  0121:35 01              ldi 1 
  0123:1a                 eq? 
  0124:31 05              bnt code_012b 
  0126:35 11              ldi 11 
  0128:a0 009b            sag global155 

        code_012b
  012b:88 00a5            lsg gAct 
  012e:35 01              ldi 1 
  0130:20                 ge? 
  0131:31 08              bnt code_013b 
  0133:88 00a5            lsg gAct 
  0136:35 05              ldi 5 
  0138:22                 lt? 
  0139:2f 08               bt code_0143 

        code_013b
  013b:88 00a5            lsg gAct 
  013e:35 06              ldi 6 
  0140:1a                 eq? 
  0141:31 0f              bnt code_0152 

        code_0143
  0143:35 01              ldi 1 
  0145:a3 01              sal local1 
  0147:38 010a          pushi 10a // $10a setRegions
  014a:78               push1 
  014b:38 00ef          pushi ef // $ef ownedBy
  014e:54 06             self 6 

  0150:33 05              jmp code_0157 

        code_0152
  0152:35 00              ldi 0 
  0154:a0 00a2            sag global162 

        code_0157
  0157:88 00a5            lsg gAct 
  015a:35 05              ldi 5 
  015c:1a                 eq? 
  015d:2f 08               bt code_0167 
  015f:88 00a5            lsg gAct 
  0162:35 06              ldi 6 
  0164:1e                 gt? 
  0165:31 0c              bnt code_0173 

        code_0167
  0167:39 57            pushi 57 // $57 init
  0169:76               push0 
  016a:38 00c6          pushi c6 // $c6 stopUpd
  016d:76               push0 
  016e:72 0fb9          lofsa $112a // Dish
  0171:4a 08             send 8 


        code_0173
  0173:39 2b            pushi 2b // $2b number
  0175:78               push1 
  0176:39 2c            pushi 2c // $2c handle
  0178:39 06            pushi 6 // $6 loop
  017a:78               push1 
  017b:78               push1 
  017c:39 57            pushi 57 // $57 init
  017e:76               push0 
  017f:72 0f52          lofsa $10d4 // myMusic
  0182:4a 10             send 10 

  0184:38 00c9          pushi c9 // $c9 ignoreActors
  0187:78               push1 
  0188:78               push1 
  0189:39 42            pushi 42 // $42 setPri
  018b:78               push1 
  018c:39 0a            pushi a // $a nsLeft
  018e:39 57            pushi 57 // $57 init
  0190:76               push0 
  0191:72 0eb8          lofsa $104c // dHouse2
  0194:4a 10             send 10 

  0196:89 0c              lsg gPrevRoomNum 
  0198:3c                 dup 
  0199:35 06              ldi 6 
  019b:1a                 eq? 
  019c:31 10              bnt code_01ae 
  019e:38 00c5          pushi c5 // $c5 posn
  01a1:7a               push2 
  01a2:38 013e          pushi 13e // $13e elevY
  01a5:39 3c            pushi 3c // $3c doit
  01a7:81 00              lag gEgo 
  01a9:4a 08             send 8 

  01ab:32 00c6            jmp code_0274 

        code_01ae
  01ae:3c                 dup 
  01af:35 04              ldi 4 
  01b1:1a                 eq? 
  01b2:31 10              bnt code_01c4 
  01b4:38 00c5          pushi c5 // $c5 posn
  01b7:7a               push2 
  01b8:38 00eb          pushi eb // $eb edgeHit
  01bb:39 37            pushi 37 // $37 yStep
  01bd:81 00              lag gEgo 
  01bf:4a 08             send 8 

  01c1:32 00b0            jmp code_0274 

        code_01c4
  01c4:3c                 dup 
  01c5:35 11              ldi 11 
  01c7:1a                 eq? 
  01c8:31 0f              bnt code_01d9 
  01ca:38 00c5          pushi c5 // $c5 posn
  01cd:7a               push2 
  01ce:78               push1 
  01cf:38 00b2          pushi b2 // $b2 lastBumped
  01d2:81 00              lag gEgo 
  01d4:4a 08             send 8 

  01d6:32 009b            jmp code_0274 

        code_01d9
  01d9:3c                 dup 
  01da:35 23              ldi 23 
  01dc:1a                 eq? 
  01dd:31 4b              bnt code_022a 
  01df:76               push0 
  01e0:45 03 00         callb procedure_0003 0 // HandsOff 

  01e3:38 00c5          pushi c5 // $c5 posn
  01e6:7a               push2 
  01e7:38 00a4          pushi a4 // $a4 cycleSpeed
  01ea:39 7a            pushi 7a // $7a setScript
  01ec:81 00              lag gEgo 
  01ee:4a 08             send 8 

  01f0:83 06              lal local6 
  01f2:18                 not 
  01f3:31 33              bnt code_0228 
  01f5:38 00d3          pushi d3 // $d3 setMotion
  01f8:39 03            pushi 3 // $3 y
  01fa:51 1d            class MoveTo 
  01fc:36                push 
  01fd:38 00c4          pushi c4 // $c4 setTest
  0200:38 0091          pushi 91 // $91 isType
  0203:81 00              lag gEgo 
  0205:4a 0a             send a 

  0207:39 7e            pushi 7e // $7e setCycle
  0209:78               push1 
  020a:51 1b            class Beg 
  020c:36                push 
  020d:72 0caa          lofsa $0eba // Door
  0210:4a 06             send 6 

  0212:39 2b            pushi 2b // $2b number
  0214:78               push1 
  0215:39 2c            pushi 2c // $2c handle
  0217:39 06            pushi 6 // $6 loop
  0219:78               push1 
  021a:78               push1 
  021b:39 3f            pushi 3f // $3f priority
  021d:78               push1 
  021e:39 05            pushi 5 // $5 view
  0220:39 2a            pushi 2a // $2a play
  0222:76               push0 
  0223:72 0eae          lofsa $10d4 // myMusic
  0226:4a 16             send 16 


        code_0228
  0228:33 4a              jmp code_0274 

        code_022a
  022a:3c                 dup 
  022b:35 35              ldi 35 
  022d:1a                 eq? 
  022e:31 30              bnt code_0260 
  0230:38 00c5          pushi c5 // $c5 posn
  0233:7a               push2 
  0234:38 0110          pushi 110 // $110 disable
  0237:39 7b            pushi 7b // $7b cycleCnt
  0239:81 00              lag gEgo 
  023b:4a 08             send 8 

  023d:39 7e            pushi 7e // $7e setCycle
  023f:78               push1 
  0240:51 1b            class Beg 
  0242:36                push 
  0243:72 0cc6          lofsa $0f0c // Cellar
  0246:4a 06             send 6 

  0248:39 2b            pushi 2b // $2b number
  024a:78               push1 
  024b:39 2c            pushi 2c // $2c handle
  024d:39 06            pushi 6 // $6 loop
  024f:78               push1 
  0250:78               push1 
  0251:39 3f            pushi 3f // $3f priority
  0253:78               push1 
  0254:39 05            pushi 5 // $5 view
  0256:39 2a            pushi 2a // $2a play
  0258:76               push0 
  0259:72 0e78          lofsa $10d4 // myMusic
  025c:4a 16             send 16 

  025e:33 14              jmp code_0274 

        code_0260
  0260:3c                 dup 
  0261:35 17              ldi 17 
  0263:1a                 eq? 
  0264:31 0e              bnt code_0274 
  0266:38 00c5          pushi c5 // $c5 posn
  0269:7a               push2 
  026a:38 0127          pushi 127 // $127 intermediate
  026d:38 00b4          pushi b4 // $b4 escaping
  0270:81 00              lag gEgo 
  0272:4a 08             send 8 


        code_0274
  0274:3a                toss 
  0275:39 05            pushi 5 // $5 view
  0277:78               push1 
  0278:76               push0 
  0279:39 12            pushi 12 // $12 illegalBits
  027b:78               push1 
  027c:38 8012          pushi 8012 // $8012 sel_32786
  027f:39 57            pushi 57 // $57 init
  0281:76               push0 
  0282:81 00              lag gEgo 
  0284:4a 10             send 10 

  0286:72 0e4b          lofsa $10d4 // myMusic
  0289:a0 0083            sag global131 
  028c:48                 ret 
    )

    (method (doit) // method_028d
  028d:83 06              lal local6 
  028f:31 48              bnt code_02d9 
  0291:35 00              ldi 0 
  0293:a3 06              sal local6 
  0295:7a               push2 
  0296:39 0c            pushi c // $c nsRight
  0298:76               push0 
  0299:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  029f:89 0c              lsg gPrevRoomNum 
  02a1:35 23              ldi 23 
  02a3:1a                 eq? 
  02a4:31 33              bnt code_02d9 
  02a6:38 00d3          pushi d3 // $d3 setMotion
  02a9:39 03            pushi 3 // $3 y
  02ab:51 1d            class MoveTo 
  02ad:36                push 
  02ae:38 00c1          pushi c1 // $c1 gy
  02b1:38 0091          pushi 91 // $91 isType
  02b4:81 00              lag gEgo 
  02b6:4a 0a             send a 

  02b8:39 7e            pushi 7e // $7e setCycle
  02ba:78               push1 
  02bb:51 1b            class Beg 
  02bd:36                push 
  02be:72 0bf9          lofsa $0eba // Door
  02c1:4a 06             send 6 

  02c3:39 2b            pushi 2b // $2b number
  02c5:78               push1 
  02c6:39 2c            pushi 2c // $2c handle
  02c8:39 06            pushi 6 // $6 loop
  02ca:78               push1 
  02cb:78               push1 
  02cc:39 3f            pushi 3f // $3f priority
  02ce:78               push1 
  02cf:39 05            pushi 5 // $5 view
  02d1:39 2a            pushi 2a // $2a play
  02d3:76               push0 
  02d4:72 0dfd          lofsa $10d4 // myMusic
  02d7:4a 16             send 16 


        code_02d9
  02d9:83 03              lal local3 
  02db:18                 not 
  02dc:31 22              bnt code_0300 
  02de:89 0c              lsg gPrevRoomNum 
  02e0:35 23              ldi 23 
  02e2:1a                 eq? 
  02e3:31 1b              bnt code_0300 
  02e5:39 07            pushi 7 // $7 cel
  02e7:76               push0 
  02e8:72 0bcf          lofsa $0eba // Door
  02eb:4a 04             send 4 

  02ed:36                push 
  02ee:35 00              ldi 0 
  02f0:1a                 eq? 
  02f1:31 0d              bnt code_0300 
  02f3:35 01              ldi 1 
  02f5:a3 03              sal local3 
  02f7:38 00c6          pushi c6 // $c6 stopUpd
  02fa:76               push0 
  02fb:72 0bbc          lofsa $0eba // Door
  02fe:4a 04             send 4 


        code_0300
  0300:38 00db          pushi db // $db onControl
  0303:78               push1 
  0304:78               push1 
  0305:81 00              lag gEgo 
  0307:4a 06             send 6 

  0309:36                push 
  030a:35 01              ldi 1 
  030c:12                 and 
  030d:31 0d              bnt code_031c 
  030f:83 05              lal local5 
  0311:18                 not 
  0312:31 08              bnt code_031c 
  0314:35 01              ldi 1 
  0316:a3 05              sal local5 
  0318:76               push0 
  0319:45 04 00         callb procedure_0004 0 // HandsOn 


        code_031c
  031c:38 00db          pushi db // $db onControl
  031f:78               push1 
  0320:76               push0 
  0321:81 00              lag gEgo 
  0323:4a 06             send 6 

  0325:36                push 
  0326:35 08              ldi 8 
  0328:12                 and 
  0329:31 0a              bnt code_0335 
  032b:38 00f8          pushi f8 // $f8 newRoom
  032e:78               push1 
  032f:39 04            pushi 4 // $4 x
  0331:81 02              lag gCurRoom 
  0333:4a 06             send 6 


        code_0335
  0335:38 00db          pushi db // $db onControl
  0338:78               push1 
  0339:76               push0 
  033a:81 00              lag gEgo 
  033c:4a 06             send 6 

  033e:36                push 
  033f:35 20              ldi 20 
  0341:12                 and 
  0342:31 31              bnt code_0375 
  0344:83 04              lal local4 
  0346:18                 not 
  0347:31 2c              bnt code_0375 
  0349:39 06            pushi 6 // $6 loop
  034b:76               push0 
  034c:81 00              lag gEgo 
  034e:4a 04             send 4 

  0350:36                push 
  0351:35 01              ldi 1 
  0353:1a                 eq? 
  0354:2f 0d               bt code_0363 
  0356:39 06            pushi 6 // $6 loop
  0358:76               push0 
  0359:81 00              lag gEgo 
  035b:4a 04             send 4 

  035d:36                push 
  035e:35 03              ldi 3 
  0360:1a                 eq? 
  0361:31 12              bnt code_0375 

        code_0363
  0363:76               push0 
  0364:45 03 00         callb procedure_0003 0 // HandsOff 

  0367:35 01              ldi 1 
  0369:a3 04              sal local4 
  036b:39 7a            pushi 7a // $7a setScript
  036d:78               push1 
  036e:74 0ae9          lofss $0e5a // myDoor2
  0371:81 00              lag gEgo 
  0373:4a 06             send 6 


        code_0375
  0375:38 00db          pushi db // $db onControl
  0378:78               push1 
  0379:76               push0 
  037a:81 00              lag gEgo 
  037c:4a 06             send 6 

  037e:36                push 
  037f:35 02              ldi 2 
  0381:12                 and 
  0382:31 0a              bnt code_038e 
  0384:38 00f8          pushi f8 // $f8 newRoom
  0387:78               push1 
  0388:39 23            pushi 23 // $23 window
  038a:81 02              lag gCurRoom 
  038c:4a 06             send 6 


        code_038e
  038e:38 00eb          pushi eb // $eb edgeHit
  0391:76               push0 
  0392:81 00              lag gEgo 
  0394:4a 04             send 4 

  0396:36                push 
  0397:35 02              ldi 2 
  0399:1a                 eq? 
  039a:31 23              bnt code_03bf 
  039c:39 03            pushi 3 // $3 y
  039e:76               push0 
  039f:81 00              lag gEgo 
  03a1:4a 04             send 4 

  03a3:36                push 
  03a4:35 50              ldi 50 
  03a6:22                 lt? 
  03a7:31 0c              bnt code_03b5 
  03a9:38 00f8          pushi f8 // $f8 newRoom
  03ac:78               push1 
  03ad:39 06            pushi 6 // $6 loop
  03af:81 02              lag gCurRoom 
  03b1:4a 06             send 6 

  03b3:33 0a              jmp code_03bf 

        code_03b5
  03b5:38 00f8          pushi f8 // $f8 newRoom
  03b8:78               push1 
  03b9:39 12            pushi 12 // $12 illegalBits
  03bb:81 02              lag gCurRoom 
  03bd:4a 06             send 6 


        code_03bf
  03bf:38 00db          pushi db // $db onControl
  03c2:78               push1 
  03c3:78               push1 
  03c4:81 00              lag gEgo 
  03c6:4a 06             send 6 

  03c8:36                push 
  03c9:34 4000            ldi 4000 
  03cc:12                 and 
  03cd:30 0186            bnt code_0556 
  03d0:39 3b            pushi 3b // $3b mover
  03d2:76               push0 
  03d3:81 00              lag gEgo 
  03d5:4a 04             send 4 

  03d7:36                push 
  03d8:35 00              ldi 0 
  03da:1c                 ne? 
  03db:30 0178            bnt code_0556 
  03de:80 00df            lag gDetailLevel 
  03e1:30 0172            bnt code_0556 
  03e4:39 06            pushi 6 // $6 loop
  03e6:76               push0 
  03e7:81 00              lag gEgo 
  03e9:4a 04             send 4 

  03eb:36                push 
  03ec:3c                 dup 
  03ed:35 02              ldi 2 
  03ef:1a                 eq? 
  03f0:31 73              bnt code_0465 
  03f2:39 07            pushi 7 // $7 cel
  03f4:76               push0 
  03f5:81 00              lag gEgo 
  03f7:4a 04             send 4 

  03f9:36                push 
  03fa:35 02              ldi 2 
  03fc:1a                 eq? 
  03fd:31 2b              bnt code_042a 
  03ff:38 00c5          pushi c5 // $c5 posn
  0402:7a               push2 
  0403:39 04            pushi 4 // $4 x
  0405:76               push0 
  0406:81 00              lag gEgo 
  0408:4a 04             send 4 

  040a:36                push 
  040b:35 05              ldi 5 
  040d:02                 add 
  040e:36                push 
  040f:39 03            pushi 3 // $3 y
  0411:76               push0 
  0412:81 00              lag gEgo 
  0414:4a 04             send 4 

  0416:36                push 
  0417:39 07            pushi 7 // $7 cel
  0419:78               push1 
  041a:76               push0 
  041b:38 00ca          pushi ca // $ca show
  041e:76               push0 
  041f:39 7e            pushi 7e // $7e setCycle
  0421:78               push1 
  0422:51 1a            class End 
  0424:36                push 
  0425:72 0b88          lofsa $0fb0 // Splash1
  0428:4a 18             send 18 


        code_042a
  042a:39 07            pushi 7 // $7 cel
  042c:76               push0 
  042d:81 00              lag gEgo 
  042f:4a 04             send 4 

  0431:36                push 
  0432:35 05              ldi 5 
  0434:1a                 eq? 
  0435:31 2b              bnt code_0462 
  0437:38 00c5          pushi c5 // $c5 posn
  043a:7a               push2 
  043b:39 04            pushi 4 // $4 x
  043d:76               push0 
  043e:81 00              lag gEgo 
  0440:4a 04             send 4 

  0442:36                push 
  0443:35 05              ldi 5 
  0445:02                 add 
  0446:36                push 
  0447:39 03            pushi 3 // $3 y
  0449:76               push0 
  044a:81 00              lag gEgo 
  044c:4a 04             send 4 

  044e:36                push 
  044f:39 07            pushi 7 // $7 cel
  0451:78               push1 
  0452:76               push0 
  0453:38 00ca          pushi ca // $ca show
  0456:76               push0 
  0457:39 7e            pushi 7e // $7e setCycle
  0459:78               push1 
  045a:51 1a            class End 
  045c:36                push 
  045d:72 0b9e          lofsa $0ffe // Splash2
  0460:4a 18             send 18 


        code_0462
  0462:32 00f0            jmp code_0555 

        code_0465
  0465:3c                 dup 
  0466:35 03              ldi 3 
  0468:1a                 eq? 
  0469:31 72              bnt code_04dd 
  046b:39 07            pushi 7 // $7 cel
  046d:76               push0 
  046e:81 00              lag gEgo 
  0470:4a 04             send 4 

  0472:36                push 
  0473:35 02              ldi 2 
  0475:1a                 eq? 
  0476:31 2b              bnt code_04a3 
  0478:38 00c5          pushi c5 // $c5 posn
  047b:7a               push2 
  047c:39 04            pushi 4 // $4 x
  047e:76               push0 
  047f:81 00              lag gEgo 
  0481:4a 04             send 4 

  0483:36                push 
  0484:35 05              ldi 5 
  0486:02                 add 
  0487:36                push 
  0488:39 03            pushi 3 // $3 y
  048a:76               push0 
  048b:81 00              lag gEgo 
  048d:4a 04             send 4 

  048f:36                push 
  0490:39 07            pushi 7 // $7 cel
  0492:78               push1 
  0493:76               push0 
  0494:38 00ca          pushi ca // $ca show
  0497:76               push0 
  0498:39 7e            pushi 7e // $7e setCycle
  049a:78               push1 
  049b:51 1a            class End 
  049d:36                push 
  049e:72 0b0f          lofsa $0fb0 // Splash1
  04a1:4a 18             send 18 


        code_04a3
  04a3:39 07            pushi 7 // $7 cel
  04a5:76               push0 
  04a6:81 00              lag gEgo 
  04a8:4a 04             send 4 

  04aa:36                push 
  04ab:35 05              ldi 5 
  04ad:1a                 eq? 
  04ae:31 2b              bnt code_04db 
  04b0:38 00c5          pushi c5 // $c5 posn
  04b3:7a               push2 
  04b4:39 04            pushi 4 // $4 x
  04b6:76               push0 
  04b7:81 00              lag gEgo 
  04b9:4a 04             send 4 

  04bb:36                push 
  04bc:35 05              ldi 5 
  04be:02                 add 
  04bf:36                push 
  04c0:39 03            pushi 3 // $3 y
  04c2:76               push0 
  04c3:81 00              lag gEgo 
  04c5:4a 04             send 4 

  04c7:36                push 
  04c8:39 07            pushi 7 // $7 cel
  04ca:78               push1 
  04cb:76               push0 
  04cc:38 00ca          pushi ca // $ca show
  04cf:76               push0 
  04d0:39 7e            pushi 7e // $7e setCycle
  04d2:78               push1 
  04d3:51 1a            class End 
  04d5:36                push 
  04d6:72 0b25          lofsa $0ffe // Splash2
  04d9:4a 18             send 18 


        code_04db
  04db:33 78              jmp code_0555 

        code_04dd
  04dd:39 07            pushi 7 // $7 cel
  04df:76               push0 
  04e0:81 00              lag gEgo 
  04e2:4a 04             send 4 

  04e4:36                push 
  04e5:35 00              ldi 0 
  04e7:1a                 eq? 
  04e8:31 2f              bnt code_0519 
  04ea:38 00c5          pushi c5 // $c5 posn
  04ed:7a               push2 
  04ee:39 04            pushi 4 // $4 x
  04f0:76               push0 
  04f1:81 00              lag gEgo 
  04f3:4a 04             send 4 

  04f5:36                push 
  04f6:35 02              ldi 2 
  04f8:04                 sub 
  04f9:36                push 
  04fa:39 03            pushi 3 // $3 y
  04fc:76               push0 
  04fd:81 00              lag gEgo 
  04ff:4a 04             send 4 

  0501:36                push 
  0502:35 01              ldi 1 
  0504:02                 add 
  0505:36                push 
  0506:39 07            pushi 7 // $7 cel
  0508:78               push1 
  0509:76               push0 
  050a:38 00ca          pushi ca // $ca show
  050d:76               push0 
  050e:39 7e            pushi 7e // $7e setCycle
  0510:78               push1 
  0511:51 1a            class End 
  0513:36                push 
  0514:72 0a99          lofsa $0fb0 // Splash1
  0517:4a 18             send 18 


        code_0519
  0519:39 07            pushi 7 // $7 cel
  051b:76               push0 
  051c:81 00              lag gEgo 
  051e:4a 04             send 4 

  0520:36                push 
  0521:35 04              ldi 4 
  0523:1a                 eq? 
  0524:31 2f              bnt code_0555 
  0526:38 00c5          pushi c5 // $c5 posn
  0529:7a               push2 
  052a:39 04            pushi 4 // $4 x
  052c:76               push0 
  052d:81 00              lag gEgo 
  052f:4a 04             send 4 

  0531:36                push 
  0532:35 02              ldi 2 
  0534:04                 sub 
  0535:36                push 
  0536:39 03            pushi 3 // $3 y
  0538:76               push0 
  0539:81 00              lag gEgo 
  053b:4a 04             send 4 

  053d:36                push 
  053e:35 01              ldi 1 
  0540:02                 add 
  0541:36                push 
  0542:39 07            pushi 7 // $7 cel
  0544:78               push1 
  0545:76               push0 
  0546:38 00ca          pushi ca // $ca show
  0549:76               push0 
  054a:39 7e            pushi 7e // $7e setCycle
  054c:78               push1 
  054d:51 1a            class End 
  054f:36                push 
  0550:72 0aab          lofsa $0ffe // Splash2
  0553:4a 18             send 18 


        code_0555
  0555:3a                toss 

        code_0556
  0556:39 3c            pushi 3c // $3c doit
  0558:76               push0 
  0559:57 37 04         super Rm 4 

  055c:48                 ret 
    )

    (method (dispose) // method_055d
  055d:39 58            pushi 58 // $58 dispose
  055f:76               push0 
  0560:57 37 04         super Rm 4 

  0563:48                 ret 
    )

    (method (newRoom) // method_0564
  0564:8f 01              lsp param1 
  0566:35 23              ldi 23 
  0568:1a                 eq? 
  0569:2f 07               bt code_0572 
  056b:8f 01              lsp param1 
  056d:35 35              ldi 35 
  056f:1a                 eq? 
  0570:31 13              bnt code_0585 

        code_0572
  0572:38 0084          pushi 84 // $84 stop
  0575:76               push0 
  0576:80 00b7            lag gConMusic 
  0579:4a 04             send 4 

  057b:38 00c8          pushi c8 // $c8 setLoop
  057e:78               push1 
  057f:39 ff            pushi ff // $ff checkAni
  0581:81 00              lag gEgo 
  0583:4a 06             send 6 


        code_0585
  0585:38 00f8          pushi f8 // $f8 newRoom
  0588:78               push1 
  0589:8f 01              lsp param1 
  058b:57 37 06         super Rm 6 

  058e:48                 ret 
    )

    (method (handleEvent) // method_058f
  058f:3f 01             link 1 // (var $1)
  0591:39 4c            pushi 4c // $4c claimed
  0593:76               push0 
  0594:87 01              lap param1 
  0596:4a 04             send 4 

  0598:31 03              bnt code_059d 
  059a:35 01              ldi 1 
  059c:48                 ret 

        code_059d
  059d:39 22            pushi 22 // $22 type
  059f:76               push0 
  05a0:87 01              lap param1 
  05a2:4a 04             send 4 

  05a4:36                push 
  05a5:34 0080            ldi 80 
  05a8:1a                 eq? 
  05a9:30 00ee            bnt code_069a 
  05ac:78               push1 
  05ad:74 07c8          lofss $0d78 // look>
  05b0:43 25 02         callk Said 2 

  05b3:31 6b              bnt code_0620 
  05b5:78               push1 
  05b6:74 0728          lofss $0ce1 // [<around,at][/room]
  05b9:43 25 02         callk Said 2 

  05bc:31 0c              bnt code_05ca 
  05be:7a               push2 
  05bf:39 0c            pushi c // $c nsRight
  05c1:76               push0 
  05c2:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05c8:33 54              jmp code_061e 

        code_05ca
  05ca:78               push1 
  05cb:74 0703          lofss $0cd1 // /barriere
  05ce:43 25 02         callk Said 2 

  05d1:31 0c              bnt code_05df 
  05d3:7a               push2 
  05d4:39 0c            pushi c // $c nsRight
  05d6:78               push1 
  05d7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05dd:33 3f              jmp code_061e 

        code_05df
  05df:78               push1 
  05e0:74 06f2          lofss $0cd5 // /path
  05e3:43 25 02         callk Said 2 

  05e6:31 0c              bnt code_05f4 
  05e8:7a               push2 
  05e9:39 0c            pushi c // $c nsRight
  05eb:7a               push2 
  05ec:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05f2:33 2a              jmp code_061e 

        code_05f4
  05f4:78               push1 
  05f5:74 06e1          lofss $0cd9 // /escalier
  05f8:43 25 02         callk Said 2 

  05fb:31 0d              bnt code_060a 
  05fd:7a               push2 
  05fe:39 0c            pushi c // $c nsRight
  0600:39 03            pushi 3 // $3 y
  0602:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0608:33 14              jmp code_061e 

        code_060a
  060a:78               push1 
  060b:74 06cf          lofss $0cdd // /haut
  060e:43 25 02         callk Said 2 

  0611:31 0b              bnt code_061e 
  0613:7a               push2 
  0614:39 0c            pushi c // $c nsRight
  0616:39 04            pushi 4 // $4 x
  0618:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_061e
  061e:33 7a              jmp code_069a 

        code_0620
  0620:78               push1 
  0621:74 06e6          lofss $0d0a // climb/barriere
  0624:43 25 02         callk Said 2 

  0627:31 0d              bnt code_0636 
  0629:7a               push2 
  062a:39 0c            pushi c // $c nsRight
  062c:39 05            pushi 5 // $5 view
  062e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0634:33 64              jmp code_069a 

        code_0636
  0636:78               push1 
  0637:74 06c7          lofss $0d01 // bang/door<basement
  063a:43 25 02         callk Said 2 

  063d:31 22              bnt code_0661 
  063f:38 00db          pushi db // $db onControl
  0642:78               push1 
  0643:76               push0 
  0644:81 00              lag gEgo 
  0646:4a 06             send 6 

  0648:36                push 
  0649:34 0080            ldi 80 
  064c:12                 and 
  064d:31 0c              bnt code_065b 
  064f:39 7a            pushi 7a // $7a setScript
  0651:78               push1 
  0652:74 0835          lofss $0e8a // knockDoor
  0655:81 00              lag gEgo 
  0657:4a 06             send 6 

  0659:33 04              jmp code_065f 

        code_065b
  065b:76               push0 
  065c:45 09 00         callb procedure_0009 0 // NotClose 


        code_065f
  065f:33 39              jmp code_069a 

        code_0661
  0661:78               push1 
  0662:74 068d          lofss $0cf2 // bang/[<door,!*,*]
  0665:43 25 02         callk Said 2 

  0668:2f 09               bt code_0673 
  066a:78               push1 
  066b:74 0681          lofss $0cef // bang
  066e:43 25 02         callk Said 2 

  0671:31 27              bnt code_069a 

        code_0673
  0673:38 00db          pushi db // $db onControl
  0676:78               push1 
  0677:76               push0 
  0678:81 00              lag gEgo 
  067a:4a 06             send 6 

  067c:36                push 
  067d:34 0080            ldi 80 
  0680:12                 and 
  0681:31 0c              bnt code_068f 
  0683:39 7a            pushi 7a // $7a setScript
  0685:78               push1 
  0686:74 0801          lofss $0e8a // knockDoor
  0689:81 00              lag gEgo 
  068b:4a 06             send 6 

  068d:33 0b              jmp code_069a 

        code_068f
  068f:7a               push2 
  0690:39 0c            pushi c // $c nsRight
  0692:39 06            pushi 6 // $6 loop
  0694:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_069a
  069a:48                 ret 
    )

)

// 0df4
(instance LookDog 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_069b
  069b:87 01              lap param1 
  069d:65 0a             aTop state 
  069f:36                push 
  06a0:3c                 dup 
  06a1:35 00              ldi 0 
  06a3:1a                 eq? 
  06a4:31 1b              bnt code_06c1 
  06a6:38 00c9          pushi c9 // $c9 ignoreActors
  06a9:78               push1 
  06aa:78               push1 
  06ab:38 00d3          pushi d3 // $d3 setMotion
  06ae:39 04            pushi 4 // $4 x
  06b0:51 1d            class MoveTo 
  06b2:36                push 
  06b3:38 00ba          pushi ba // $ba targetX
  06b6:38 009e          pushi 9e // $9e completed
  06b9:7c            pushSelf 
  06ba:81 00              lag gEgo 
  06bc:4a 12             send 12 

  06be:32 0107            jmp code_07c8 

        code_06c1
  06c1:3c                 dup 
  06c2:35 01              ldi 1 
  06c4:1a                 eq? 
  06c5:31 17              bnt code_06de 
  06c7:39 05            pushi 5 // $5 view
  06c9:78               push1 
  06ca:39 16            pushi 16 // $16 brRight
  06cc:39 06            pushi 6 // $6 loop
  06ce:78               push1 
  06cf:76               push0 
  06d0:39 7e            pushi 7e // $7e setCycle
  06d2:7a               push2 
  06d3:51 1a            class End 
  06d5:36                push 
  06d6:7c            pushSelf 
  06d7:81 00              lag gEgo 
  06d9:4a 14             send 14 

  06db:32 00ea            jmp code_07c8 

        code_06de
  06de:3c                 dup 
  06df:35 02              ldi 2 
  06e1:1a                 eq? 
  06e2:31 17              bnt code_06fb 
  06e4:39 06            pushi 6 // $6 loop
  06e6:78               push1 
  06e7:39 04            pushi 4 // $4 x
  06e9:39 07            pushi 7 // $7 cel
  06eb:78               push1 
  06ec:76               push0 
  06ed:39 7e            pushi 7e // $7e setCycle
  06ef:7a               push2 
  06f0:51 1a            class End 
  06f2:36                push 
  06f3:7c            pushSelf 
  06f4:81 00              lag gEgo 
  06f6:4a 14             send 14 

  06f8:32 00cd            jmp code_07c8 

        code_06fb
  06fb:3c                 dup 
  06fc:35 03              ldi 3 
  06fe:1a                 eq? 
  06ff:31 66              bnt code_0767 
  0701:80 00a2            lag global162 
  0704:31 0d              bnt code_0713 
  0706:7a               push2 
  0707:39 0c            pushi c // $c nsRight
  0709:39 07            pushi 7 // $7 cel
  070b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0711:33 4e              jmp code_0761 

        code_0713
  0713:83 01              lal local1 
  0715:31 3b              bnt code_0752 
  0717:38 00ee          pushi ee // $ee has
  071a:78               push1 
  071b:76               push0 
  071c:81 00              lag gEgo 
  071e:4a 06             send 6 

  0720:18                 not 
  0721:31 2f              bnt code_0752 
  0723:38 0082          pushi 82 // $82 owner
  0726:76               push0 
  0727:39 43            pushi 43 // $43 at
  0729:78               push1 
  072a:76               push0 
  072b:81 09              lag gInventory 
  072d:4a 06             send 6 

  072f:4a 04             send 4 

  0731:36                push 
  0732:35 63              ldi 63 
  0734:1a                 eq? 
  0735:31 1b              bnt code_0752 
  0737:7a               push2 
  0738:39 0c            pushi c // $c nsRight
  073a:39 08            pushi 8 // $8 underBits
  073c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0742:35 01              ldi 1 
  0744:a0 00b6            sag global182 
  0747:38 00ec          pushi ec // $ec get
  074a:78               push1 
  074b:76               push0 
  074c:81 00              lag gEgo 
  074e:4a 06             send 6 

  0750:33 0b              jmp code_075d 

        code_0752
  0752:7a               push2 
  0753:39 0c            pushi c // $c nsRight
  0755:39 09            pushi 9 // $9 nsTop
  0757:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_075d
  075d:35 00              ldi 0 
  075f:a3 01              sal local1 

        code_0761
  0761:35 01              ldi 1 
  0763:65 10             aTop cycles 
  0765:33 61              jmp code_07c8 

        code_0767
  0767:3c                 dup 
  0768:35 04              ldi 4 
  076a:1a                 eq? 
  076b:31 0d              bnt code_077a 
  076d:39 7e            pushi 7e // $7e setCycle
  076f:7a               push2 
  0770:51 1b            class Beg 
  0772:36                push 
  0773:7c            pushSelf 
  0774:81 00              lag gEgo 
  0776:4a 08             send 8 

  0778:33 4e              jmp code_07c8 

        code_077a
  077a:3c                 dup 
  077b:35 05              ldi 5 
  077d:1a                 eq? 
  077e:31 1f              bnt code_079f 
  0780:39 06            pushi 6 // $6 loop
  0782:78               push1 
  0783:76               push0 
  0784:39 07            pushi 7 // $7 cel
  0786:78               push1 
  0787:78               push1 
  0788:89 00              lsg gEgo 
  078a:43 0e 02         callk NumCels 2 

  078d:36                push 
  078e:35 01              ldi 1 
  0790:04                 sub 
  0791:36                push 
  0792:39 7e            pushi 7e // $7e setCycle
  0794:7a               push2 
  0795:51 1b            class Beg 
  0797:36                push 
  0798:7c            pushSelf 
  0799:81 00              lag gEgo 
  079b:4a 14             send 14 

  079d:33 29              jmp code_07c8 

        code_079f
  079f:3c                 dup 
  07a0:35 06              ldi 6 
  07a2:1a                 eq? 
  07a3:31 23              bnt code_07c8 
  07a5:39 05            pushi 5 // $5 view
  07a7:78               push1 
  07a8:76               push0 
  07a9:39 06            pushi 6 // $6 loop
  07ab:78               push1 
  07ac:78               push1 
  07ad:38 00c9          pushi c9 // $c9 ignoreActors
  07b0:78               push1 
  07b1:76               push0 
  07b2:39 7e            pushi 7e // $7e setCycle
  07b4:78               push1 
  07b5:51 17            class Walk 
  07b7:36                push 
  07b8:81 00              lag gEgo 
  07ba:4a 18             send 18 

  07bc:76               push0 
  07bd:45 04 00         callb procedure_0004 0 // HandsOn 

  07c0:39 7a            pushi 7a // $7a setScript
  07c2:78               push1 
  07c3:76               push0 
  07c4:63 08             pToa client 
  07c6:4a 06             send 6 


        code_07c8
  07c8:3a                toss 
  07c9:48                 ret 
    )

)

// 0e24
(instance myDoor of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (changeState) // method_07ca
  07ca:87 01              lap param1 
  07cc:65 0a             aTop state 
  07ce:36                push 
  07cf:3c                 dup 
  07d0:35 00              ldi 0 
  07d2:1a                 eq? 
  07d3:31 06              bnt code_07db 
  07d5:35 02              ldi 2 
  07d7:65 10             aTop cycles 
  07d9:33 78              jmp code_0853 

        code_07db
  07db:3c                 dup 
  07dc:35 01              ldi 1 
  07de:1a                 eq? 
  07df:31 24              bnt code_0805 
  07e1:39 7e            pushi 7e // $7e setCycle
  07e3:7a               push2 
  07e4:51 1a            class End 
  07e6:36                push 
  07e7:7c            pushSelf 
  07e8:72 0721          lofsa $0f0c // Cellar
  07eb:4a 08             send 8 

  07ed:39 2b            pushi 2b // $2b number
  07ef:78               push1 
  07f0:39 2b            pushi 2b // $2b number
  07f2:39 06            pushi 6 // $6 loop
  07f4:78               push1 
  07f5:78               push1 
  07f6:39 3f            pushi 3f // $3f priority
  07f8:78               push1 
  07f9:39 05            pushi 5 // $5 view
  07fb:39 2a            pushi 2a // $2a play
  07fd:76               push0 
  07fe:72 08d3          lofsa $10d4 // myMusic
  0801:4a 16             send 16 

  0803:33 4e              jmp code_0853 

        code_0805
  0805:3c                 dup 
  0806:35 02              ldi 2 
  0808:1a                 eq? 
  0809:31 1e              bnt code_0829 
  080b:39 12            pushi 12 // $12 illegalBits
  080d:78               push1 
  080e:76               push0 
  080f:39 7e            pushi 7e // $7e setCycle
  0811:78               push1 
  0812:51 17            class Walk 
  0814:36                push 
  0815:38 00d3          pushi d3 // $d3 setMotion
  0818:39 04            pushi 4 // $4 x
  081a:51 1d            class MoveTo 
  081c:36                push 
  081d:38 00fb          pushi fb // $fb changeScore
  0820:39 78            pushi 78 // $78 changeState
  0822:7c            pushSelf 
  0823:81 00              lag gEgo 
  0825:4a 18             send 18 

  0827:33 2a              jmp code_0853 

        code_0829
  0829:3c                 dup 
  082a:35 03              ldi 3 
  082c:1a                 eq? 
  082d:31 14              bnt code_0843 
  082f:38 00d3          pushi d3 // $d3 setMotion
  0832:39 04            pushi 4 // $4 x
  0834:51 1d            class MoveTo 
  0836:36                push 
  0837:38 00e3          pushi e3 // $e3 controls
  083a:39 7d            pushi 7d // $7d set
  083c:7c            pushSelf 
  083d:81 00              lag gEgo 
  083f:4a 0c             send c 

  0841:33 10              jmp code_0853 

        code_0843
  0843:3c                 dup 
  0844:35 04              ldi 4 
  0846:1a                 eq? 
  0847:31 0a              bnt code_0853 
  0849:38 00f8          pushi f8 // $f8 newRoom
  084c:78               push1 
  084d:39 35            pushi 35 // $35 b-incr
  084f:81 02              lag gCurRoom 
  0851:4a 06             send 6 


        code_0853
  0853:3a                toss 
  0854:48                 ret 
    )

)

// 0e54
(instance myDoor2 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_0855
  0855:87 01              lap param1 
  0857:65 0a             aTop state 
  0859:36                push 
  085a:3c                 dup 
  085b:35 00              ldi 0 
  085d:1a                 eq? 
  085e:31 07              bnt code_0867 
  0860:35 02              ldi 2 
  0862:65 10             aTop cycles 
  0864:32 00a8            jmp code_090f 

        code_0867
  0867:3c                 dup 
  0868:35 01              ldi 1 
  086a:1a                 eq? 
  086b:31 1a              bnt code_0887 
  086d:39 12            pushi 12 // $12 illegalBits
  086f:78               push1 
  0870:76               push0 
  0871:38 00d3          pushi d3 // $d3 setMotion
  0874:39 04            pushi 4 // $4 x
  0876:51 1d            class MoveTo 
  0878:36                push 
  0879:38 00af          pushi af // $af incClientPos
  087c:38 0088          pushi 88 // $88 fade
  087f:7c            pushSelf 
  0880:81 00              lag gEgo 
  0882:4a 12             send 12 

  0884:32 0088            jmp code_090f 

        code_0887
  0887:3c                 dup 
  0888:35 02              ldi 2 
  088a:1a                 eq? 
  088b:31 19              bnt code_08a6 
  088d:38 00c8          pushi c8 // $c8 setLoop
  0890:78               push1 
  0891:78               push1 
  0892:38 00d3          pushi d3 // $d3 setMotion
  0895:39 04            pushi 4 // $4 x
  0897:51 1d            class MoveTo 
  0899:36                push 
  089a:38 00a5          pushi a5 // $a5 cycler
  089d:39 7a            pushi 7a // $7a setScript
  089f:7c            pushSelf 
  08a0:81 00              lag gEgo 
  08a2:4a 12             send 12 

  08a4:33 69              jmp code_090f 

        code_08a6
  08a6:3c                 dup 
  08a7:35 03              ldi 3 
  08a9:1a                 eq? 
  08aa:31 3d              bnt code_08e9 
  08ac:38 00d3          pushi d3 // $d3 setMotion
  08af:78               push1 
  08b0:76               push0 
  08b1:39 12            pushi 12 // $12 illegalBits
  08b3:78               push1 
  08b4:38 8000          pushi 8000 // $8000 sel_32768
  08b7:81 00              lag gEgo 
  08b9:4a 0c             send c 

  08bb:38 00a4          pushi a4 // $a4 cycleSpeed
  08be:78               push1 
  08bf:78               push1 
  08c0:38 00c9          pushi c9 // $c9 ignoreActors
  08c3:78               push1 
  08c4:78               push1 
  08c5:39 7e            pushi 7e // $7e setCycle
  08c7:7a               push2 
  08c8:51 1a            class End 
  08ca:36                push 
  08cb:7c            pushSelf 
  08cc:72 05eb          lofsa $0eba // Door
  08cf:4a 14             send 14 

  08d1:39 2b            pushi 2b // $2b number
  08d3:78               push1 
  08d4:39 2b            pushi 2b // $2b number
  08d6:39 06            pushi 6 // $6 loop
  08d8:78               push1 
  08d9:78               push1 
  08da:39 3f            pushi 3f // $3f priority
  08dc:78               push1 
  08dd:39 05            pushi 5 // $5 view
  08df:39 2a            pushi 2a // $2a play
  08e1:76               push0 
  08e2:72 07ef          lofsa $10d4 // myMusic
  08e5:4a 16             send 16 

  08e7:33 26              jmp code_090f 

        code_08e9
  08e9:3c                 dup 
  08ea:35 04              ldi 4 
  08ec:1a                 eq? 
  08ed:31 20              bnt code_090f 
  08ef:38 00d3          pushi d3 // $d3 setMotion
  08f2:39 03            pushi 3 // $3 y
  08f4:51 1d            class MoveTo 
  08f6:36                push 
  08f7:39 04            pushi 4 // $4 x
  08f9:76               push0 
  08fa:81 00              lag gEgo 
  08fc:4a 04             send 4 

  08fe:36                push 
  08ff:35 32              ldi 32 
  0901:04                 sub 
  0902:36                push 
  0903:39 03            pushi 3 // $3 y
  0905:76               push0 
  0906:81 00              lag gEgo 
  0908:4a 04             send 4 

  090a:36                push 
  090b:81 00              lag gEgo 
  090d:4a 0a             send a 


        code_090f
  090f:3a                toss 
  0910:48                 ret 
    )

)

// 0e84
(instance knockDoor 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_0911
  0911:87 01              lap param1 
  0913:65 0a             aTop state 
  0915:36                push 
  0916:3c                 dup 
  0917:35 00              ldi 0 
  0919:1a                 eq? 
  091a:31 1d              bnt code_0939 
  091c:76               push0 
  091d:45 03 00         callb procedure_0003 0 // HandsOff 

  0920:39 12            pushi 12 // $12 illegalBits
  0922:78               push1 
  0923:76               push0 
  0924:38 00d3          pushi d3 // $d3 setMotion
  0927:39 04            pushi 4 // $4 x
  0929:51 1d            class MoveTo 
  092b:36                push 
  092c:38 010b          pushi 10b // $10b setFeatures
  092f:39 7d            pushi 7d // $7d set
  0931:7c            pushSelf 
  0932:81 00              lag gEgo 
  0934:4a 12             send 12 

  0936:32 00d7            jmp code_0a10 

        code_0939
  0939:3c                 dup 
  093a:35 01              ldi 1 
  093c:1a                 eq? 
  093d:31 1d              bnt code_095c 
  093f:39 05            pushi 5 // $5 view
  0941:78               push1 
  0942:39 38            pushi 38 // $38 moveSpeed
  0944:39 06            pushi 6 // $6 loop
  0946:78               push1 
  0947:39 04            pushi 4 // $4 x
  0949:38 00d3          pushi d3 // $d3 setMotion
  094c:78               push1 
  094d:76               push0 
  094e:39 7e            pushi 7e // $7e setCycle
  0950:7a               push2 
  0951:51 1a            class End 
  0953:36                push 
  0954:7c            pushSelf 
  0955:81 00              lag gEgo 
  0957:4a 1a             send 1a 

  0959:32 00b4            jmp code_0a10 

        code_095c
  095c:3c                 dup 
  095d:35 02              ldi 2 
  095f:1a                 eq? 
  0960:31 27              bnt code_0989 
  0962:39 2b            pushi 2b // $2b number
  0964:78               push1 
  0965:39 30            pushi 30 // $30 b-moveCnt
  0967:39 06            pushi 6 // $6 loop
  0969:78               push1 
  096a:78               push1 
  096b:39 2a            pushi 2a // $2a play
  096d:76               push0 
  096e:72 0763          lofsa $10d4 // myMusic
  0971:4a 10             send 10 

  0973:39 06            pushi 6 // $6 loop
  0975:78               push1 
  0976:39 05            pushi 5 // $5 view
  0978:39 7e            pushi 7e // $7e setCycle
  097a:78               push1 
  097b:51 16            class Fwd 
  097d:36                push 
  097e:81 00              lag gEgo 
  0980:4a 0c             send c 

  0982:35 06              ldi 6 
  0984:65 10             aTop cycles 
  0986:32 0087            jmp code_0a10 

        code_0989
  0989:3c                 dup 
  098a:35 03              ldi 3 
  098c:1a                 eq? 
  098d:31 17              bnt code_09a6 
  098f:39 06            pushi 6 // $6 loop
  0991:78               push1 
  0992:39 04            pushi 4 // $4 x
  0994:39 07            pushi 7 // $7 cel
  0996:78               push1 
  0997:39 03            pushi 3 // $3 y
  0999:39 7e            pushi 7e // $7e setCycle
  099b:7a               push2 
  099c:51 1b            class Beg 
  099e:36                push 
  099f:7c            pushSelf 
  09a0:81 00              lag gEgo 
  09a2:4a 14             send 14 

  09a4:33 6a              jmp code_0a10 

        code_09a6
  09a6:3c                 dup 
  09a7:35 04              ldi 4 
  09a9:1a                 eq? 
  09aa:31 64              bnt code_0a10 
  09ac:76               push0 
  09ad:45 04 00         callb procedure_0004 0 // HandsOn 

  09b0:39 05            pushi 5 // $5 view
  09b2:78               push1 
  09b3:76               push0 
  09b4:39 06            pushi 6 // $6 loop
  09b6:78               push1 
  09b7:78               push1 
  09b8:39 12            pushi 12 // $12 illegalBits
  09ba:78               push1 
  09bb:38 8010          pushi 8010 // $8010 sel_32784
  09be:39 7e            pushi 7e // $7e setCycle
  09c0:78               push1 
  09c1:51 17            class Walk 
  09c3:36                push 
  09c4:81 00              lag gEgo 
  09c6:4a 18             send 18 

  09c8:88 00a5            lsg gAct 
  09cb:35 01              ldi 1 
  09cd:1a                 eq? 
  09ce:31 08              bnt code_09d8 
  09d0:88 009b            lsg global155 
  09d3:35 11              ldi 11 
  09d5:22                 lt? 
  09d6:2f 18               bt code_09f0 

        code_09d8
  09d8:88 00a5            lsg gAct 
  09db:35 03              ldi 3 
  09dd:1a                 eq? 
  09de:2f 10               bt code_09f0 
  09e0:88 00a5            lsg gAct 
  09e3:35 00              ldi 0 
  09e5:1a                 eq? 
  09e6:2f 08               bt code_09f0 
  09e8:88 00a5            lsg gAct 
  09eb:35 04              ldi 4 
  09ed:1e                 gt? 
  09ee:31 0d              bnt code_09fd 

        code_09f0
  09f0:7a               push2 
  09f1:39 0c            pushi c // $c nsRight
  09f3:39 0a            pushi a // $a nsLeft
  09f5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09fb:33 0b              jmp code_0a08 

        code_09fd
  09fd:7a               push2 
  09fe:39 0c            pushi c // $c nsRight
  0a00:39 0b            pushi b // $b nsBottom
  0a02:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0a08
  0a08:39 7a            pushi 7a // $7a setScript
  0a0a:78               push1 
  0a0b:76               push0 
  0a0c:63 08             pToa client 
  0a0e:4a 06             send 6 


        code_0a10
  0a10:3a                toss 
  0a11:48                 ret 
    )

)

// 0eb4
(instance Door of Prop
    (properties
        y $7a
        x $96
        z $0
        heading $0
        yStep $2
        view $75
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0a12
  0a12:39 03            pushi 3 // $3 y
  0a14:7c            pushSelf 
  0a15:8f 01              lsp param1 
  0a17:39 03            pushi 3 // $3 y
  0a19:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a1f:31 0f              bnt code_0a30 
  0a21:39 4c            pushi 4c // $4c claimed
  0a23:78               push1 
  0a24:78               push1 
  0a25:87 01              lap param1 
  0a27:4a 06             send 6 

  0a29:78               push1 
  0a2a:74 07a5          lofss $11d2 // door
  0a2d:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a30
  0a30:48                 ret 
    )

)

// 0f06
(instance Cellar of Prop
    (properties
        y $75
        x $108
        z $0
        heading $0
        yStep $2
        view $70
        loop $0
        cel $0
        priority $8
        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_0a31
  0a31:3f 01             link 1 // (var $1)
  0a33:35 00              ldi 0 
  0a35:a5 00              sat temp0 
  0a37:88 00a5            lsg gAct 
  0a3a:35 01              ldi 1 
  0a3c:1a                 eq? 
  0a3d:31 08              bnt code_0a47 
  0a3f:88 009b            lsg global155 
  0a42:35 11              ldi 11 
  0a44:22                 lt? 
  0a45:2f 18               bt code_0a5f 

        code_0a47
  0a47:88 00a5            lsg gAct 
  0a4a:35 03              ldi 3 
  0a4c:1a                 eq? 
  0a4d:2f 10               bt code_0a5f 
  0a4f:88 00a5            lsg gAct 
  0a52:35 00              ldi 0 
  0a54:1a                 eq? 
  0a55:2f 08               bt code_0a5f 
  0a57:88 00a5            lsg gAct 
  0a5a:35 04              ldi 4 
  0a5c:1e                 gt? 
  0a5d:31 04              bnt code_0a63 

        code_0a5f
  0a5f:35 01              ldi 1 
  0a61:a5 00              sat temp0 

        code_0a63
  0a63:39 03            pushi 3 // $3 y
  0a65:7c            pushSelf 
  0a66:8f 01              lsp param1 
  0a68:39 03            pushi 3 // $3 y
  0a6a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a70:2f 09               bt code_0a7b 
  0a72:78               push1 
  0a73:74 02cb          lofss $0d41 // look/(door<basement),basement
  0a76:43 25 02         callk Said 2 

  0a79:31 16              bnt code_0a91 

        code_0a7b
  0a7b:39 4c            pushi 4c // $4c claimed
  0a7d:78               push1 
  0a7e:78               push1 
  0a7f:87 01              lap param1 
  0a81:4a 06             send 6 

  0a83:7a               push2 
  0a84:39 0c            pushi c // $c nsRight
  0a86:39 0c            pushi c // $c nsRight
  0a88:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a8e:32 00a5            jmp code_0b36 

        code_0a91
  0a91:78               push1 
  0a92:74 022a          lofss $0cbf // /(door<basement),basement>
  0a95:43 25 02         callk Said 2 

  0a98:2f 1b               bt code_0ab5 
  0a9a:38 00db          pushi db // $db onControl
  0a9d:78               push1 
  0a9e:76               push0 
  0a9f:81 00              lag gEgo 
  0aa1:4a 06             send 6 

  0aa3:36                push 
  0aa4:34 0080            ldi 80 
  0aa7:12                 and 
  0aa8:30 008b            bnt code_0b36 
  0aab:78               push1 
  0aac:74 021d          lofss $0ccc // /door>
  0aaf:43 25 02         callk Said 2 

  0ab2:30 0081            bnt code_0b36 

        code_0ab5
  0ab5:78               push1 
  0ab6:74 01fb          lofss $0cb4 // (look<dans),debloquer
  0ab9:43 25 02         callk Said 2 

  0abc:31 1e              bnt code_0adc 
  0abe:85 00              lat temp0 
  0ac0:31 0d              bnt code_0acf 
  0ac2:7a               push2 
  0ac3:39 0c            pushi c // $c nsRight
  0ac5:39 0d            pushi d // $d lsTop
  0ac7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0acd:33 0b              jmp code_0ada 

        code_0acf
  0acf:7a               push2 
  0ad0:39 0c            pushi c // $c nsRight
  0ad2:39 0e            pushi e // $e lsLeft
  0ad4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ada
  0ada:33 5a              jmp code_0b36 

        code_0adc
  0adc:78               push1 
  0add:74 029c          lofss $0d7c // open
  0ae0:43 25 02         callk Said 2 

  0ae3:31 51              bnt code_0b36 
  0ae5:38 00db          pushi db // $db onControl
  0ae8:78               push1 
  0ae9:76               push0 
  0aea:81 00              lag gEgo 
  0aec:4a 06             send 6 

  0aee:36                push 
  0aef:34 0080            ldi 80 
  0af2:12                 and 
  0af3:31 3d              bnt code_0b32 
  0af5:85 00              lat temp0 
  0af7:18                 not 
  0af8:31 10              bnt code_0b0a 
  0afa:76               push0 
  0afb:45 03 00         callb procedure_0003 0 // HandsOff 

  0afe:39 7a            pushi 7a // $7a setScript
  0b00:78               push1 
  0b01:74 0326          lofss $0e2a // myDoor
  0b04:81 00              lag gEgo 
  0b06:4a 06             send 6 

  0b08:33 26              jmp code_0b30 

        code_0b0a
  0b0a:39 07            pushi 7 // $7 cel
  0b0c:76               push0 
  0b0d:72 03fc          lofsa $0f0c // Cellar
  0b10:4a 04             send 4 

  0b12:36                push 
  0b13:38 00a6          pushi a6 // $a6 lastCel
  0b16:76               push0 
  0b17:72 03f2          lofsa $0f0c // Cellar
  0b1a:4a 04             send 4 

  0b1c:1c                 ne? 
  0b1d:31 0d              bnt code_0b2c 
  0b1f:7a               push2 
  0b20:39 0c            pushi c // $c nsRight
  0b22:39 0f            pushi f // $f lsBottom
  0b24:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0b2a:33 04              jmp code_0b30 

        code_0b2c
  0b2c:76               push0 
  0b2d:45 10 00         callb procedure_0010 0 // AlreadyOpen 


        code_0b30
  0b30:33 04              jmp code_0b36 

        code_0b32
  0b32:76               push0 
  0b33:45 09 00         callb procedure_0009 0 // NotClose 


        code_0b36
  0b36:48                 ret 
    )

)

// 0f58
(instance Lamp of Prop
    (properties
        y $53
        x $82
        z $0
        heading $0
        yStep $2
        view $70
        loop $1
        cel $1
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0b37
  0b37:78               push1 
  0b38:74 0200          lofss $0d3b // get/allumer
  0b3b:43 25 02         callk Said 2 

  0b3e:31 0d              bnt code_0b4d 
  0b40:7a               push2 
  0b41:39 0c            pushi c // $c nsRight
  0b43:39 10            pushi 10 // $10 lsRight
  0b45:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0b4b:33 2b              jmp code_0b78 

        code_0b4d
  0b4d:39 03            pushi 3 // $3 y
  0b4f:7c            pushSelf 
  0b50:8f 01              lsp param1 
  0b52:39 03            pushi 3 // $3 y
  0b54:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b5a:2f 09               bt code_0b65 
  0b5c:78               push1 
  0b5d:74 0204          lofss $0d64 // look/allumer
  0b60:43 25 02         callk Said 2 

  0b63:31 13              bnt code_0b78 

        code_0b65
  0b65:39 4c            pushi 4c // $4c claimed
  0b67:78               push1 
  0b68:78               push1 
  0b69:87 01              lap param1 
  0b6b:4a 06             send 6 

  0b6d:7a               push2 
  0b6e:39 0c            pushi c // $c nsRight
  0b70:39 11            pushi 11 // $11 signal
  0b72:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0b78
  0b78:48                 ret 
    )

)

// 0faa
(instance Splash1 of Prop
    (properties
        y $0
        x $0
        z $0
        heading $0
        yStep $2
        view $1
        loop $6
        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
    )
)

// 0ff8
(instance Splash2 of Prop
    (properties
        y $0
        x $0
        z $0
        heading $0
        yStep $2
        view $1
        loop $6
        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
    )
)

// 1046
(instance dHouse2 of Prop
    (properties
        y $9f
        x $a8
        z $0
        heading $0
        yStep $2
        view $70
        loop $2
        cel $1
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
    (method (handleEvent) // method_0b79
  0b79:39 03            pushi 3 // $3 y
  0b7b:7c            pushSelf 
  0b7c:8f 01              lsp param1 
  0b7e:39 03            pushi 3 // $3 y
  0b80:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0b86:31 13              bnt code_0b9b 
  0b88:39 4c            pushi 4c // $4c claimed
  0b8a:78               push1 
  0b8b:78               push1 
  0b8c:87 01              lap param1 
  0b8e:4a 06             send 6 

  0b90:7a               push2 
  0b91:39 0c            pushi c // $c nsRight
  0b93:39 12            pushi 12 // $12 illegalBits
  0b95:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0b9b
  0b9b:48                 ret 
    )

)

// 1098
(instance dHouse of RPicView
    (properties
        y $9f
        x $97
        z $0
        heading $0
        view $70
        loop $2
        cel $0
        priority $c
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0b9c
  0b9c:78               push1 
  0b9d:74 01ca          lofss $0d6a // look<(below,behind)/doghouse
  0ba0:43 25 02         callk Said 2 

  0ba3:31 0e              bnt code_0bb3 
  0ba5:7a               push2 
  0ba6:39 0c            pushi c // $c nsRight
  0ba8:39 13            pushi 13 // $13 brTop
  0baa:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0bb0:32 009a            jmp code_0c4d 

        code_0bb3
  0bb3:78               push1 
  0bb4:74 01d9          lofss $0d90 // chercher,(look<dans)/doghouse
  0bb7:43 25 02         callk Said 2 

  0bba:2f 09               bt code_0bc5 
  0bbc:78               push1 
  0bbd:74 01bf          lofss $0d7f // chercher,(look<dans)/cabin<beauregard
  0bc0:43 25 02         callk Said 2 

  0bc3:31 35              bnt code_0bfa 

        code_0bc5
  0bc5:38 00da          pushi da // $da inRect
  0bc8:39 04            pushi 4 // $4 x
  0bca:38 00a3          pushi a3 // $a3 startUpd
  0bcd:38 0095          pushi 95 // $95 theItem
  0bd0:38 00bb          pushi bb // $bb targetY
  0bd3:38 00a3          pushi a3 // $a3 startUpd
  0bd6:81 00              lag gEgo 
  0bd8:4a 0c             send c 

  0bda:31 10              bnt code_0bec 
  0bdc:76               push0 
  0bdd:45 03 00         callb procedure_0003 0 // HandsOff 

  0be0:39 7a            pushi 7a // $7a setScript
  0be2:78               push1 
  0be3:74 0214          lofss $0dfa // LookDog
  0be6:81 00              lag gEgo 
  0be8:4a 06             send 6 

  0bea:33 04              jmp code_0bf0 

        code_0bec
  0bec:76               push0 
  0bed:45 09 00         callb procedure_0009 0 // NotClose 


        code_0bf0
  0bf0:39 4c            pushi 4c // $4c claimed
  0bf2:78               push1 
  0bf3:78               push1 
  0bf4:87 01              lap param1 
  0bf6:4a 06             send 6 

  0bf8:33 53              jmp code_0c4d 

        code_0bfa
  0bfa:78               push1 
  0bfb:74 0126          lofss $0d24 // enter,(get,aller<dans)/doghouse
  0bfe:43 25 02         callk Said 2 

  0c01:2f 09               bt code_0c0c 
  0c03:78               push1 
  0c04:74 0109          lofss $0d10 // enter,(get,aller<dans)/cabin<beauregard
  0c07:43 25 02         callk Said 2 

  0c0a:31 0d              bnt code_0c19 

        code_0c0c
  0c0c:7a               push2 
  0c0d:39 0c            pushi c // $c nsRight
  0c0f:39 14            pushi 14 // $14 brLeft
  0c11:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c17:33 34              jmp code_0c4d 

        code_0c19
  0c19:39 03            pushi 3 // $3 y
  0c1b:7c            pushSelf 
  0c1c:8f 01              lsp param1 
  0c1e:39 03            pushi 3 // $3 y
  0c20:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0c26:2f 12               bt code_0c3a 
  0c28:78               push1 
  0c29:74 0132          lofss $0d5e // look/doghouse
  0c2c:43 25 02         callk Said 2 

  0c2f:2f 09               bt code_0c3a 
  0c31:78               push1 
  0c32:74 011a          lofss $0d4f // look/cabin<beauregard
  0c35:43 25 02         callk Said 2 

  0c38:31 13              bnt code_0c4d 

        code_0c3a
  0c3a:7a               push2 
  0c3b:39 0c            pushi c // $c nsRight
  0c3d:39 12            pushi 12 // $12 illegalBits
  0c3f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c45:39 4c            pushi 4c // $4c claimed
  0c47:78               push1 
  0c48:78               push1 
  0c49:87 01              lap param1 
  0c4b:4a 06             send 6 


        code_0c4d
  0c4d:48                 ret 
    )

)

// 10ce
(instance myMusic of Sound
    (properties
        state $0
        number $0
        priority $0
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 10f8
(instance Window1 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $3b
        nsLeft $13
        nsBottom $8d
        nsRight $2e
    )
    (method (handleEvent) // method_0c4e
  0c4e:39 03            pushi 3 // $3 y
  0c50:7c            pushSelf 
  0c51:8f 01              lsp param1 
  0c53:39 03            pushi 3 // $3 y
  0c55:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0c5b:31 0f              bnt code_0c6c 
  0c5d:39 4c            pushi 4c // $4c claimed
  0c5f:78               push1 
  0c60:78               push1 
  0c61:87 01              lap param1 
  0c63:4a 06             send 6 

  0c65:78               push1 
  0c66:74 058f          lofss $11f8 // window
  0c69:45 19 02         callb procedure_0019 2 // DoLook 


        code_0c6c
  0c6c:48                 ret 
    )

)

// 1124
(instance Dish of Prop
    (properties
        y $9f
        x $ce
        z $0
        heading $0
        yStep $2
        view $70
        loop $2
        cel $2
        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_0c6d
  0c6d:39 03            pushi 3 // $3 y
  0c6f:7c            pushSelf 
  0c70:8f 01              lsp param1 
  0c72:39 03            pushi 3 // $3 y
  0c74:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0c7a:2f 09               bt code_0c85 
  0c7c:78               push1 
  0c7d:74 00d8          lofss $0d58 // look/dish
  0c80:43 25 02         callk Said 2 

  0c83:31 15              bnt code_0c9a 

        code_0c85
  0c85:39 4c            pushi 4c // $4c claimed
  0c87:78               push1 
  0c88:78               push1 
  0c89:87 01              lap param1 
  0c8b:4a 06             send 6 

  0c8d:7a               push2 
  0c8e:39 0c            pushi c // $c nsRight
  0c90:39 15            pushi 15 // $15 brBottom
  0c92:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c98:33 14              jmp code_0cae 

        code_0c9a
  0c9a:78               push1 
  0c9b:74 0097          lofss $0d35 // get/dish
  0c9e:43 25 02         callk Said 2 

  0ca1:31 0b              bnt code_0cae 
  0ca3:7a               push2 
  0ca4:39 0c            pushi c // $c nsRight
  0ca6:39 16            pushi 16 // $16 brRight
  0ca8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0cae
  0cae:48                 ret 
  0caf:00                bnot 
    )

)



