(script 10)

(string
    string_0e64 "Argue"
    string_0e6a "CHead"
    string_0e70 "Clarence"
    string_0e79 "Door"
    string_0e7e "Room10"
    string_0e85 "Splash1"
    string_0e8d "Splash2"
    string_0e95 "WHead"
    string_0e9b "Wilbur"
    string_0ea2 "Window1"
    string_0eaa "Window2"
    string_0eb2 "Window3"
    string_0eba "comeDown"
    string_0ec3 "door"
    string_0ec8 "myDoor"
    string_0ecf "myMusic"
    string_0ed7 "window"
)

(said
    said_0a48 /barriere
    said_0a4c /path
    said_0a50 /escalier
    said_0a54 /haut
    said_0a58 [<around,at][/room<!*]
    said_0a69 climb/barriere
    said_0a6f look>
)

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

// 0a7a
(instance public Room10 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $a
        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_000c
  000c:35 15              ldi 15 
  000e:65 1e             aTop south 
  0010:35 0f              ldi f 
  0012:65 1c             aTop east 
  0014:35 03              ldi 3 
  0016:65 1a             aTop north 
  0018:39 57            pushi 57 // $57 init
  001a:76               push0 
  001b:57 37 04         super Rm 4 

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

  0022:a3 02              sal local2 
  0024:38 010a          pushi 10a // $10a setRegions
  0027:78               push1 
  0028:38 00ce          pushi ce // $ce yLast
  002b:38 010b          pushi 10b // $10b setFeatures
  002e:39 03            pushi 3 // $3 y
  0030:74 0c1b          lofss $0c4e // Window1
  0033:74 0c44          lofss $0c7a // Window2
  0036:74 0c6d          lofss $0ca6 // Window3
  0039:54 10             self 10 

  003b:39 03            pushi 3 // $3 y
  003d:38 0084          pushi 84 // $84 stop
  0040:39 2b            pushi 2b // $2b number
  0042:39 2c            pushi 2c // $2c handle
  0044:45 15 06         callb procedure_0015 6 // LoadMany 

  0047:39 07            pushi 7 // $7 cel
  0049:78               push1 
  004a:89 0c              lsg gPrevRoomNum 
  004c:35 1f              ldi 1f 
  004e:1a                 eq? 
  004f:31 04              bnt code_0055 
  0051:35 03              ldi 3 
  0053:33 02              jmp code_0057 

        code_0055
  0055:35 00              ldi 0 

        code_0057
  0057:36                push 
  0058:39 42            pushi 42 // $42 setPri
  005a:78               push1 
  005b:39 06            pushi 6 // $6 loop
  005d:38 00c9          pushi c9 // $c9 ignoreActors
  0060:78               push1 
  0061:78               push1 
  0062:39 57            pushi 57 // $57 init
  0064:76               push0 
  0065:38 00c6          pushi c6 // $c6 stopUpd
  0068:76               push0 
  0069:72 0af4          lofsa $0b60 // Door
  006c:4a 1a             send 1a 

  006e:72 0aef          lofsa $0b60 // Door
  0071:a0 0175            sag global373 
  0074:80 00df            lag gDetailLevel 
  0077:31 22              bnt code_009b 
  0079:38 00c9          pushi c9 // $c9 ignoreActors
  007c:78               push1 
  007d:78               push1 
  007e:39 57            pushi 57 // $57 init
  0080:76               push0 
  0081:38 0089          pushi 89 // $89 hide
  0084:76               push0 
  0085:72 0b2a          lofsa $0bb2 // Splash1
  0088:4a 0e             send e 

  008a:38 00c9          pushi c9 // $c9 ignoreActors
  008d:78               push1 
  008e:78               push1 
  008f:39 57            pushi 57 // $57 init
  0091:76               push0 
  0092:38 0089          pushi 89 // $89 hide
  0095:76               push0 
  0096:72 0b67          lofsa $0c00 // Splash2
  0099:4a 0e             send e 


        code_009b
  009b:89 0c              lsg gPrevRoomNum 
  009d:3c                 dup 
  009e:35 04              ldi 4 
  00a0:1a                 eq? 
  00a1:31 0e              bnt code_00b1 
  00a3:38 00c5          pushi c5 // $c5 posn
  00a6:7a               push2 
  00a7:39 38            pushi 38 // $38 moveSpeed
  00a9:39 32            pushi 32 // $32 b-i2
  00ab:81 00              lag gEgo 
  00ad:4a 08             send 8 

  00af:33 63              jmp code_0114 

        code_00b1
  00b1:3c                 dup 
  00b2:35 03              ldi 3 
  00b4:1a                 eq? 
  00b5:31 0d              bnt code_00c4 
  00b7:38 00c5          pushi c5 // $c5 posn
  00ba:7a               push2 
  00bb:78               push1 
  00bc:39 44            pushi 44 // $44 next
  00be:81 00              lag gEgo 
  00c0:4a 08             send 8 

  00c2:33 50              jmp code_0114 

        code_00c4
  00c4:3c                 dup 
  00c5:35 1f              ldi 1f 
  00c7:1a                 eq? 
  00c8:31 20              bnt code_00ea 
  00ca:38 00c5          pushi c5 // $c5 posn
  00cd:7a               push2 
  00ce:38 009a          pushi 9a // $9a left
  00d1:39 79            pushi 79 // $79 cue
  00d3:81 00              lag gEgo 
  00d5:4a 08             send 8 

  00d7:76               push0 
  00d8:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  00db:18                 not 
  00dc:31 0a              bnt code_00e8 
  00de:39 7a            pushi 7a // $7a setScript
  00e0:78               push1 
  00e1:74 0a1c          lofss $0b00 // comeDown
  00e4:81 00              lag gEgo 
  00e6:4a 06             send 6 


        code_00e8
  00e8:33 2a              jmp code_0114 

        code_00ea
  00ea:3c                 dup 
  00eb:35 0f              ldi f 
  00ed:1a                 eq? 
  00ee:31 10              bnt code_0100 
  00f0:38 00c5          pushi c5 // $c5 posn
  00f3:7a               push2 
  00f4:38 013d          pushi 13d // $13d elevX
  00f7:38 00b5          pushi b5 // $b5 escapes
  00fa:81 00              lag gEgo 
  00fc:4a 08             send 8 

  00fe:33 14              jmp code_0114 

        code_0100
  0100:3c                 dup 
  0101:35 15              ldi 15 
  0103:1a                 eq? 
  0104:31 0e              bnt code_0114 
  0106:38 00c5          pushi c5 // $c5 posn
  0109:7a               push2 
  010a:38 00a0          pushi a0 // $a0 cycleDone
  010d:38 00b9          pushi b9 // $b9 nonBumps
  0110:81 00              lag gEgo 
  0112:4a 08             send 8 


        code_0114
  0114:3a                toss 
  0115:39 05            pushi 5 // $5 view
  0117:78               push1 
  0118:76               push0 
  0119:39 12            pushi 12 // $12 illegalBits
  011b:78               push1 
  011c:38 8002          pushi 8002 // $8002 sel_32770
  011f:39 57            pushi 57 // $57 init
  0121:76               push0 
  0122:81 00              lag gEgo 
  0124:4a 10             send 10 

  0126:88 00a5            lsg gAct 
  0129:35 01              ldi 1 
  012b:1a                 eq? 
  012c:31 09              bnt code_0137 
  012e:38 010a          pushi 10a // $10a setRegions
  0131:78               push1 
  0132:38 017d          pushi 17d // $17d sel_381
  0135:54 06             self 6 


        code_0137
  0137:88 00a5            lsg gAct 
  013a:35 05              ldi 5 
  013c:1a                 eq? 
  013d:31 09              bnt code_0148 
  013f:38 010a          pushi 10a // $10a setRegions
  0142:78               push1 
  0143:38 0115          pushi 115 // $115 maxPause
  0146:54 06             self 6 


        code_0148
  0148:88 00a5            lsg gAct 
  014b:35 02              ldi 2 
  014d:20                 ge? 
  014e:31 18              bnt code_0168 
  0150:88 00a5            lsg gAct 
  0153:35 04              ldi 4 
  0155:22                 lt? 
  0156:31 10              bnt code_0168 
  0158:89 72              lsg global114 
  015a:35 00              ldi 0 
  015c:1c                 ne? 
  015d:31 09              bnt code_0168 
  015f:38 010a          pushi 10a // $10a setRegions
  0162:78               push1 
  0163:38 00ca          pushi ca // $ca show
  0166:54 06             self 6 


        code_0168
  0168:88 00a5            lsg gAct 
  016b:35 03              ldi 3 
  016d:1a                 eq? 
  016e:31 07              bnt code_0177 
  0170:89 72              lsg global114 
  0172:35 00              ldi 0 
  0174:1a                 eq? 
  0175:2f 10               bt code_0187 

        code_0177
  0177:88 00a5            lsg gAct 
  017a:35 06              ldi 6 
  017c:1a                 eq? 
  017d:31 11              bnt code_0190 
  017f:89 76              lsg gMustDos 
  0181:35 02              ldi 2 
  0183:12                 and 
  0184:18                 not 
  0185:31 09              bnt code_0190 

        code_0187
  0187:38 010a          pushi 10a // $10a setRegions
  018a:78               push1 
  018b:38 0119          pushi 119 // $119 startExtra
  018e:54 06             self 6 


        code_0190
  0190:88 00a5            lsg gAct 
  0193:35 01              ldi 1 
  0195:1a                 eq? 
  0196:31 55              bnt code_01ed 
  0198:88 009a            lsg gClarenceWilburState 
  019b:35 00              ldi 0 
  019d:1a                 eq? 
  019e:31 4d              bnt code_01ed 
  01a0:34 0708            ldi 708 
  01a3:a0 0170            sag gCycleTimers 
  01a6:35 01              ldi 1 
  01a8:a3 03              sal local3 
  01aa:39 04            pushi 4 // $4 x
  01ac:38 0080          pushi 80 // $80 timeLeft
  01af:38 0190          pushi 190 // $190 sel_400
  01b2:38 01a4          pushi 1a4 // $1a4 sel_420
  01b5:38 0194          pushi 194 // $194 sel_404
  01b8:45 15 08         callb procedure_0015 8 // LoadMany 

  01bb:39 57            pushi 57 // $57 init
  01bd:76               push0 
  01be:72 0b75          lofsa $0d36 // Clarence
  01c1:4a 04             send 4 

  01c3:39 42            pushi 42 // $42 setPri
  01c5:78               push1 
  01c6:39 0a            pushi a // $a nsLeft
  01c8:39 57            pushi 57 // $57 init
  01ca:76               push0 
  01cb:72 0bcc          lofsa $0d9a // CHead
  01ce:4a 0a             send a 

  01d0:39 57            pushi 57 // $57 init
  01d2:76               push0 
  01d3:72 0afc          lofsa $0cd2 // Wilbur
  01d6:4a 04             send 4 

  01d8:39 42            pushi 42 // $42 setPri
  01da:78               push1 
  01db:39 0a            pushi a // $a nsLeft
  01dd:39 57            pushi 57 // $57 init
  01df:76               push0 
  01e0:72 0c05          lofsa $0de8 // WHead
  01e3:4a 0a             send a 

  01e5:39 7a            pushi 7a // $7a setScript
  01e7:78               push1 
  01e8:74 08e5          lofss $0ad0 // Argue
  01eb:54 06             self 6 


        code_01ed
  01ed:48                 ret 
    )

    (method (doit) // method_01ee
  01ee:83 02              lal local2 
  01f0:31 1f              bnt code_0211 
  01f2:35 00              ldi 0 
  01f4:a3 02              sal local2 
  01f6:7a               push2 
  01f7:39 0a            pushi a // $a nsLeft
  01f9:76               push0 
  01fa:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0200:89 0c              lsg gPrevRoomNum 
  0202:35 1f              ldi 1f 
  0204:1a                 eq? 
  0205:31 0a              bnt code_0211 
  0207:39 7a            pushi 7a // $7a setScript
  0209:78               push1 
  020a:74 08f3          lofss $0b00 // comeDown
  020d:81 00              lag gEgo 
  020f:4a 06             send 6 


        code_0211
  0211:38 00db          pushi db // $db onControl
  0214:78               push1 
  0215:76               push0 
  0216:81 00              lag gEgo 
  0218:4a 06             send 6 

  021a:36                push 
  021b:35 04              ldi 4 
  021d:12                 and 
  021e:31 1f              bnt code_023f 
  0220:88 00a5            lsg gAct 
  0223:35 01              ldi 1 
  0225:1a                 eq? 
  0226:31 0d              bnt code_0235 
  0228:88 009a            lsg gClarenceWilburState 
  022b:35 0e              ldi e 
  022d:1a                 eq? 
  022e:31 05              bnt code_0235 
  0230:35 02              ldi 2 
  0232:a0 009a            sag gClarenceWilburState 

        code_0235
  0235:38 00f8          pushi f8 // $f8 newRoom
  0238:78               push1 
  0239:39 04            pushi 4 // $4 x
  023b:81 02              lag gCurRoom 
  023d:4a 06             send 6 


        code_023f
  023f:38 00db          pushi db // $db onControl
  0242:78               push1 
  0243:78               push1 
  0244:81 00              lag gEgo 
  0246:4a 06             send 6 

  0248:36                push 
  0249:35 02              ldi 2 
  024b:12                 and 
  024c:31 0a              bnt code_0258 
  024e:38 00f8          pushi f8 // $f8 newRoom
  0251:78               push1 
  0252:39 1f            pushi 1f // $1f style
  0254:81 02              lag gCurRoom 
  0256:4a 06             send 6 


        code_0258
  0258:38 00db          pushi db // $db onControl
  025b:78               push1 
  025c:78               push1 
  025d:81 00              lag gEgo 
  025f:4a 06             send 6 

  0261:36                push 
  0262:35 20              ldi 20 
  0264:12                 and 
  0265:31 2d              bnt code_0294 
  0267:39 06            pushi 6 // $6 loop
  0269:76               push0 
  026a:81 00              lag gEgo 
  026c:4a 04             send 4 

  026e:36                push 
  026f:35 00              ldi 0 
  0271:1a                 eq? 
  0272:2f 0d               bt code_0281 
  0274:39 06            pushi 6 // $6 loop
  0276:76               push0 
  0277:81 00              lag gEgo 
  0279:4a 04             send 4 

  027b:36                push 
  027c:35 03              ldi 3 
  027e:1a                 eq? 
  027f:31 13              bnt code_0294 

        code_0281
  0281:8b 00              lsl local0 
  0283:35 00              ldi 0 
  0285:1a                 eq? 
  0286:31 0c              bnt code_0294 
  0288:35 01              ldi 1 
  028a:a3 00              sal local0 
  028c:39 7a            pushi 7a // $7a setScript
  028e:78               push1 
  028f:74 089e          lofss $0b30 // myDoor
  0292:54 06             self 6 


        code_0294
  0294:38 00eb          pushi eb // $eb edgeHit
  0297:76               push0 
  0298:81 00              lag gEgo 
  029a:4a 04             send 4 

  029c:36                push 
  029d:35 04              ldi 4 
  029f:1a                 eq? 
  02a0:31 38              bnt code_02da 
  02a2:88 00a5            lsg gAct 
  02a5:35 01              ldi 1 
  02a7:1a                 eq? 
  02a8:31 0d              bnt code_02b7 
  02aa:88 009a            lsg gClarenceWilburState 
  02ad:35 0e              ldi e 
  02af:1a                 eq? 
  02b0:31 05              bnt code_02b7 
  02b2:35 02              ldi 2 
  02b4:a0 009a            sag gClarenceWilburState 

        code_02b7
  02b7:39 03            pushi 3 // $3 y
  02b9:76               push0 
  02ba:81 00              lag gEgo 
  02bc:4a 04             send 4 

  02be:36                push 
  02bf:35 50              ldi 50 
  02c1:22                 lt? 
  02c2:31 0c              bnt code_02d0 
  02c4:38 00f8          pushi f8 // $f8 newRoom
  02c7:78               push1 
  02c8:39 03            pushi 3 // $3 y
  02ca:81 02              lag gCurRoom 
  02cc:4a 06             send 6 

  02ce:33 0a              jmp code_02da 

        code_02d0
  02d0:38 00f8          pushi f8 // $f8 newRoom
  02d3:78               push1 
  02d4:39 0e            pushi e // $e lsLeft
  02d6:81 02              lag gCurRoom 
  02d8:4a 06             send 6 


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

  02e3:36                push 
  02e4:34 4000            ldi 4000 
  02e7:12                 and 
  02e8:30 0186            bnt code_0471 
  02eb:39 3b            pushi 3b // $3b mover
  02ed:76               push0 
  02ee:81 00              lag gEgo 
  02f0:4a 04             send 4 

  02f2:36                push 
  02f3:35 00              ldi 0 
  02f5:1c                 ne? 
  02f6:30 0178            bnt code_0471 
  02f9:80 00df            lag gDetailLevel 
  02fc:30 0172            bnt code_0471 
  02ff:39 06            pushi 6 // $6 loop
  0301:76               push0 
  0302:81 00              lag gEgo 
  0304:4a 04             send 4 

  0306:36                push 
  0307:3c                 dup 
  0308:35 02              ldi 2 
  030a:1a                 eq? 
  030b:31 73              bnt code_0380 
  030d:39 07            pushi 7 // $7 cel
  030f:76               push0 
  0310:81 00              lag gEgo 
  0312:4a 04             send 4 

  0314:36                push 
  0315:35 02              ldi 2 
  0317:1a                 eq? 
  0318:31 2b              bnt code_0345 
  031a:38 00c5          pushi c5 // $c5 posn
  031d:7a               push2 
  031e:39 04            pushi 4 // $4 x
  0320:76               push0 
  0321:81 00              lag gEgo 
  0323:4a 04             send 4 

  0325:36                push 
  0326:35 05              ldi 5 
  0328:02                 add 
  0329:36                push 
  032a:39 03            pushi 3 // $3 y
  032c:76               push0 
  032d:81 00              lag gEgo 
  032f:4a 04             send 4 

  0331:36                push 
  0332:39 07            pushi 7 // $7 cel
  0334:78               push1 
  0335:76               push0 
  0336:38 00ca          pushi ca // $ca show
  0339:76               push0 
  033a:39 7e            pushi 7e // $7e setCycle
  033c:78               push1 
  033d:51 1a            class End 
  033f:36                push 
  0340:72 086f          lofsa $0bb2 // Splash1
  0343:4a 18             send 18 


        code_0345
  0345:39 07            pushi 7 // $7 cel
  0347:76               push0 
  0348:81 00              lag gEgo 
  034a:4a 04             send 4 

  034c:36                push 
  034d:35 05              ldi 5 
  034f:1a                 eq? 
  0350:31 2b              bnt code_037d 
  0352:38 00c5          pushi c5 // $c5 posn
  0355:7a               push2 
  0356:39 04            pushi 4 // $4 x
  0358:76               push0 
  0359:81 00              lag gEgo 
  035b:4a 04             send 4 

  035d:36                push 
  035e:35 05              ldi 5 
  0360:02                 add 
  0361:36                push 
  0362:39 03            pushi 3 // $3 y
  0364:76               push0 
  0365:81 00              lag gEgo 
  0367:4a 04             send 4 

  0369:36                push 
  036a:39 07            pushi 7 // $7 cel
  036c:78               push1 
  036d:76               push0 
  036e:38 00ca          pushi ca // $ca show
  0371:76               push0 
  0372:39 7e            pushi 7e // $7e setCycle
  0374:78               push1 
  0375:51 1a            class End 
  0377:36                push 
  0378:72 0885          lofsa $0c00 // Splash2
  037b:4a 18             send 18 


        code_037d
  037d:32 00f0            jmp code_0470 

        code_0380
  0380:3c                 dup 
  0381:35 03              ldi 3 
  0383:1a                 eq? 
  0384:31 72              bnt code_03f8 
  0386:39 07            pushi 7 // $7 cel
  0388:76               push0 
  0389:81 00              lag gEgo 
  038b:4a 04             send 4 

  038d:36                push 
  038e:35 02              ldi 2 
  0390:1a                 eq? 
  0391:31 2b              bnt code_03be 
  0393:38 00c5          pushi c5 // $c5 posn
  0396:7a               push2 
  0397:39 04            pushi 4 // $4 x
  0399:76               push0 
  039a:81 00              lag gEgo 
  039c:4a 04             send 4 

  039e:36                push 
  039f:35 05              ldi 5 
  03a1:02                 add 
  03a2:36                push 
  03a3:39 03            pushi 3 // $3 y
  03a5:76               push0 
  03a6:81 00              lag gEgo 
  03a8:4a 04             send 4 

  03aa:36                push 
  03ab:39 07            pushi 7 // $7 cel
  03ad:78               push1 
  03ae:76               push0 
  03af:38 00ca          pushi ca // $ca show
  03b2:76               push0 
  03b3:39 7e            pushi 7e // $7e setCycle
  03b5:78               push1 
  03b6:51 1a            class End 
  03b8:36                push 
  03b9:72 07f6          lofsa $0bb2 // Splash1
  03bc:4a 18             send 18 


        code_03be
  03be:39 07            pushi 7 // $7 cel
  03c0:76               push0 
  03c1:81 00              lag gEgo 
  03c3:4a 04             send 4 

  03c5:36                push 
  03c6:35 05              ldi 5 
  03c8:1a                 eq? 
  03c9:31 2b              bnt code_03f6 
  03cb:38 00c5          pushi c5 // $c5 posn
  03ce:7a               push2 
  03cf:39 04            pushi 4 // $4 x
  03d1:76               push0 
  03d2:81 00              lag gEgo 
  03d4:4a 04             send 4 

  03d6:36                push 
  03d7:35 05              ldi 5 
  03d9:02                 add 
  03da:36                push 
  03db:39 03            pushi 3 // $3 y
  03dd:76               push0 
  03de:81 00              lag gEgo 
  03e0:4a 04             send 4 

  03e2:36                push 
  03e3:39 07            pushi 7 // $7 cel
  03e5:78               push1 
  03e6:76               push0 
  03e7:38 00ca          pushi ca // $ca show
  03ea:76               push0 
  03eb:39 7e            pushi 7e // $7e setCycle
  03ed:78               push1 
  03ee:51 1a            class End 
  03f0:36                push 
  03f1:72 080c          lofsa $0c00 // Splash2
  03f4:4a 18             send 18 


        code_03f6
  03f6:33 78              jmp code_0470 

        code_03f8
  03f8:39 07            pushi 7 // $7 cel
  03fa:76               push0 
  03fb:81 00              lag gEgo 
  03fd:4a 04             send 4 

  03ff:36                push 
  0400:35 00              ldi 0 
  0402:1a                 eq? 
  0403:31 2f              bnt code_0434 
  0405:38 00c5          pushi c5 // $c5 posn
  0408:7a               push2 
  0409:39 04            pushi 4 // $4 x
  040b:76               push0 
  040c:81 00              lag gEgo 
  040e:4a 04             send 4 

  0410:36                push 
  0411:35 02              ldi 2 
  0413:04                 sub 
  0414:36                push 
  0415:39 03            pushi 3 // $3 y
  0417:76               push0 
  0418:81 00              lag gEgo 
  041a:4a 04             send 4 

  041c:36                push 
  041d:35 01              ldi 1 
  041f:02                 add 
  0420:36                push 
  0421:39 07            pushi 7 // $7 cel
  0423:78               push1 
  0424:76               push0 
  0425:38 00ca          pushi ca // $ca show
  0428:76               push0 
  0429:39 7e            pushi 7e // $7e setCycle
  042b:78               push1 
  042c:51 1a            class End 
  042e:36                push 
  042f:72 0780          lofsa $0bb2 // Splash1
  0432:4a 18             send 18 


        code_0434
  0434:39 07            pushi 7 // $7 cel
  0436:76               push0 
  0437:81 00              lag gEgo 
  0439:4a 04             send 4 

  043b:36                push 
  043c:35 04              ldi 4 
  043e:1a                 eq? 
  043f:31 2f              bnt code_0470 
  0441:38 00c5          pushi c5 // $c5 posn
  0444:7a               push2 
  0445:39 04            pushi 4 // $4 x
  0447:76               push0 
  0448:81 00              lag gEgo 
  044a:4a 04             send 4 

  044c:36                push 
  044d:35 02              ldi 2 
  044f:04                 sub 
  0450:36                push 
  0451:39 03            pushi 3 // $3 y
  0453:76               push0 
  0454:81 00              lag gEgo 
  0456:4a 04             send 4 

  0458:36                push 
  0459:35 01              ldi 1 
  045b:02                 add 
  045c:36                push 
  045d:39 07            pushi 7 // $7 cel
  045f:78               push1 
  0460:76               push0 
  0461:38 00ca          pushi ca // $ca show
  0464:76               push0 
  0465:39 7e            pushi 7e // $7e setCycle
  0467:78               push1 
  0468:51 1a            class End 
  046a:36                push 
  046b:72 0792          lofsa $0c00 // Splash2
  046e:4a 18             send 18 


        code_0470
  0470:3a                toss 

        code_0471
  0471:39 3c            pushi 3c // $3c doit
  0473:76               push0 
  0474:57 37 04         super Rm 4 

  0477:48                 ret 
    )

    (method (dispose) // method_0478
  0478:78               push1 
  0479:38 03d9          pushi 3d9 // $3d9 sel_985
  047c:43 03 02         callk DisposeScript 2 

  047f:39 58            pushi 58 // $58 dispose
  0481:76               push0 
  0482:57 37 04         super Rm 4 

  0485:48                 ret 
    )

    (method (newRoom) // method_0486
  0486:8f 01              lsp param1 
  0488:35 1f              ldi 1f 
  048a:1a                 eq? 
  048b:31 15              bnt code_04a2 
  048d:38 0084          pushi 84 // $84 stop
  0490:76               push0 
  0491:80 00b7            lag gConMusic 
  0494:4a 04             send 4 

  0496:38 00c8          pushi c8 // $c8 setLoop
  0499:78               push1 
  049a:39 ff            pushi ff // $ff checkAni
  049c:81 00              lag gEgo 
  049e:4a 06             send 6 

  04a0:33 15              jmp code_04b7 

        code_04a2
  04a2:88 00a5            lsg gAct 
  04a5:35 01              ldi 1 
  04a7:1a                 eq? 
  04a8:31 0d              bnt code_04b7 
  04aa:88 009a            lsg gClarenceWilburState 
  04ad:35 03              ldi 3 
  04af:22                 lt? 
  04b0:31 05              bnt code_04b7 
  04b2:35 03              ldi 3 
  04b4:a0 009a            sag gClarenceWilburState 

        code_04b7
  04b7:38 00f8          pushi f8 // $f8 newRoom
  04ba:78               push1 
  04bb:8f 01              lsp param1 
  04bd:57 37 06         super Rm 6 

  04c0:48                 ret 
    )

    (method (handleEvent) // method_04c1
  04c1:3f 01             link 1 // (var $1)
  04c3:39 6f            pushi 6f // $6f handleEvent
  04c5:78               push1 
  04c6:8f 01              lsp param1 
  04c8:57 37 06         super Rm 6 

  04cb:39 4c            pushi 4c // $4c claimed
  04cd:76               push0 
  04ce:87 01              lap param1 
  04d0:4a 04             send 4 

  04d2:31 03              bnt code_04d7 
  04d4:35 01              ldi 1 
  04d6:48                 ret 

        code_04d7
  04d7:39 22            pushi 22 // $22 type
  04d9:76               push0 
  04da:87 01              lap param1 
  04dc:4a 04             send 4 

  04de:36                push 
  04df:34 0080            ldi 80 
  04e2:1a                 eq? 
  04e3:30 0088            bnt code_056e 
  04e6:78               push1 
  04e7:74 0585          lofss $0a6f // look>
  04ea:43 25 02         callk Said 2 

  04ed:31 6b              bnt code_055a 
  04ef:78               push1 
  04f0:74 0565          lofss $0a58 // [<around,at][/room<!*]
  04f3:43 25 02         callk Said 2 

  04f6:31 0c              bnt code_0504 
  04f8:7a               push2 
  04f9:39 0a            pushi a // $a nsLeft
  04fb:76               push0 
  04fc:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0502:33 54              jmp code_0558 

        code_0504
  0504:78               push1 
  0505:74 0540          lofss $0a48 // /barriere
  0508:43 25 02         callk Said 2 

  050b:31 0c              bnt code_0519 
  050d:7a               push2 
  050e:39 0a            pushi a // $a nsLeft
  0510:78               push1 
  0511:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0517:33 3f              jmp code_0558 

        code_0519
  0519:78               push1 
  051a:74 052f          lofss $0a4c // /path
  051d:43 25 02         callk Said 2 

  0520:31 0c              bnt code_052e 
  0522:7a               push2 
  0523:39 0a            pushi a // $a nsLeft
  0525:7a               push2 
  0526:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  052c:33 2a              jmp code_0558 

        code_052e
  052e:78               push1 
  052f:74 051e          lofss $0a50 // /escalier
  0532:43 25 02         callk Said 2 

  0535:31 0d              bnt code_0544 
  0537:7a               push2 
  0538:39 0a            pushi a // $a nsLeft
  053a:39 03            pushi 3 // $3 y
  053c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0542:33 14              jmp code_0558 

        code_0544
  0544:78               push1 
  0545:74 050c          lofss $0a54 // /haut
  0548:43 25 02         callk Said 2 

  054b:31 0b              bnt code_0558 
  054d:7a               push2 
  054e:39 0a            pushi a // $a nsLeft
  0550:39 04            pushi 4 // $4 x
  0552:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0558
  0558:33 14              jmp code_056e 

        code_055a
  055a:78               push1 
  055b:74 050b          lofss $0a69 // climb/barriere
  055e:43 25 02         callk Said 2 

  0561:31 0b              bnt code_056e 
  0563:7a               push2 
  0564:39 0a            pushi a // $a nsLeft
  0566:39 05            pushi 5 // $5 view
  0568:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_056e
  056e:48                 ret 
    )

)

// 0aca
(instance Argue 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_056f
  056f:87 01              lap param1 
  0571:65 0a             aTop state 
  0573:36                push 
  0574:3c                 dup 
  0575:35 00              ldi 0 
  0577:1a                 eq? 
  0578:31 2d              bnt code_05a7 
  057a:89 0c              lsg gPrevRoomNum 
  057c:35 1f              ldi 1f 
  057e:1a                 eq? 
  057f:31 1f              bnt code_05a0 
  0581:39 04            pushi 4 // $4 x
  0583:76               push0 
  0584:81 00              lag gEgo 
  0586:4a 04             send 4 

  0588:36                push 
  0589:35 76              ldi 76 
  058b:1c                 ne? 
  058c:2f 0e               bt code_059c 
  058e:39 03            pushi 3 // $3 y
  0590:76               push0 
  0591:81 00              lag gEgo 
  0593:4a 04             send 4 

  0595:36                push 
  0596:34 0090            ldi 90 
  0599:1c                 ne? 
  059a:31 04              bnt code_05a0 

        code_059c
  059c:35 ff              ldi ff 
  059e:65 0a             aTop state 

        code_05a0
  05a0:35 01              ldi 1 
  05a2:65 10             aTop cycles 
  05a4:32 02d2            jmp code_0879 

        code_05a7
  05a7:3c                 dup 
  05a8:35 01              ldi 1 
  05aa:1a                 eq? 
  05ab:31 65              bnt code_0612 
  05ad:38 00e9          pushi e9 // $e9 canControl
  05b0:78               push1 
  05b1:76               push0 
  05b2:38 00e2          pushi e2 // $e2 canInput
  05b5:78               push1 
  05b6:76               push0 
  05b7:51 2b            class User 
  05b9:4a 0c             send c 

  05bb:38 00db          pushi db // $db onControl
  05be:78               push1 
  05bf:78               push1 
  05c0:81 00              lag gEgo 
  05c2:4a 06             send 6 

  05c4:36                push 
  05c5:35 01              ldi 1 
  05c7:12                 and 
  05c8:18                 not 
  05c9:31 06              bnt code_05d1 
  05cb:35 00              ldi 0 
  05cd:65 0a             aTop state 
  05cf:33 3a              jmp code_060b 

        code_05d1
  05d1:80 00d8            lag global216 
  05d4:18                 not 
  05d5:31 06              bnt code_05dd 
  05d7:35 00              ldi 0 
  05d9:65 0a             aTop state 
  05db:33 2e              jmp code_060b 

        code_05dd
  05dd:89 76              lsg gMustDos 
  05df:35 01              ldi 1 
  05e1:12                 and 
  05e2:18                 not 
  05e3:31 1b              bnt code_0600 
  05e5:89 76              lsg gMustDos 
  05e7:35 01              ldi 1 
  05e9:14                  or 
  05ea:a1 76              sag gMustDos 
  05ec:39 7a            pushi 7a // $7a setScript
  05ee:78               push1 
  05ef:7a               push2 
  05f0:38 0196          pushi 196 // $196 sel_406
  05f3:76               push0 
  05f4:43 02 04         callk ScriptID 4 

  05f7:36                push 
  05f8:54 06             self 6 

  05fa:35 00              ldi 0 
  05fc:65 0a             aTop state 
  05fe:33 0b              jmp code_060b 

        code_0600
  0600:39 76            pushi 76 // $76 script
  0602:76               push0 
  0603:54 04             self 4 

  0605:31 04              bnt code_060b 
  0607:35 00              ldi 0 
  0609:65 0a             aTop state 

        code_060b
  060b:35 03              ldi 3 
  060d:65 10             aTop cycles 
  060f:32 0267            jmp code_0879 

        code_0612
  0612:3c                 dup 
  0613:35 02              ldi 2 
  0615:1a                 eq? 
  0616:31 17              bnt code_062f 
  0618:39 06            pushi 6 // $6 loop
  061a:78               push1 
  061b:76               push0 
  061c:39 07            pushi 7 // $7 cel
  061e:78               push1 
  061f:76               push0 
  0620:39 7e            pushi 7e // $7e setCycle
  0622:7a               push2 
  0623:51 1a            class End 
  0625:36                push 
  0626:7c            pushSelf 
  0627:72 06a8          lofsa $0cd2 // Wilbur
  062a:4a 14             send 14 

  062c:32 024a            jmp code_0879 

        code_062f
  062f:3c                 dup 
  0630:35 03              ldi 3 
  0632:1a                 eq? 
  0633:31 36              bnt code_066b 
  0635:39 06            pushi 6 // $6 loop
  0637:78               push1 
  0638:7a               push2 
  0639:39 7e            pushi 7e // $7e setCycle
  063b:78               push1 
  063c:51 16            class Fwd 
  063e:36                push 
  063f:72 0690          lofsa $0cd2 // Wilbur
  0642:4a 0c             send c 

  0644:39 7e            pushi 7e // $7e setCycle
  0646:78               push1 
  0647:51 16            class Fwd 
  0649:36                push 
  064a:72 079b          lofsa $0de8 // WHead
  064d:4a 06             send 6 

  064f:39 06            pushi 6 // $6 loop
  0651:39 0a            pushi a // $a nsLeft
  0653:39 06            pushi 6 // $6 loop
  0655:39 43            pushi 43 // $43 at
  0657:39 19            pushi 19 // $19 time
  0659:38 0091          pushi 91 // $91 isType
  065c:39 58            pushi 58 // $58 dispose
  065e:46 00ff 0000 0c  calle ff procedure_0000 c // Print 

  0664:35 05              ldi 5 
  0666:65 12             aTop seconds 
  0668:32 020e            jmp code_0879 

        code_066b
  066b:3c                 dup 
  066c:35 04              ldi 4 
  066e:1a                 eq? 
  066f:31 30              bnt code_06a1 
  0671:39 06            pushi 6 // $6 loop
  0673:78               push1 
  0674:76               push0 
  0675:39 07            pushi 7 // $7 cel
  0677:78               push1 
  0678:39 03            pushi 3 // $3 y
  067a:39 7e            pushi 7e // $7e setCycle
  067c:78               push1 
  067d:51 1b            class Beg 
  067f:36                push 
  0680:72 064f          lofsa $0cd2 // Wilbur
  0683:4a 12             send 12 

  0685:39 06            pushi 6 // $6 loop
  0687:78               push1 
  0688:78               push1 
  0689:39 7e            pushi 7e // $7e setCycle
  068b:7a               push2 
  068c:51 1a            class End 
  068e:36                push 
  068f:7c            pushSelf 
  0690:72 06a3          lofsa $0d36 // Clarence
  0693:4a 0e             send e 

  0695:39 7e            pushi 7e // $7e setCycle
  0697:78               push1 
  0698:76               push0 
  0699:72 074c          lofsa $0de8 // WHead
  069c:4a 06             send 6 

  069e:32 01d8            jmp code_0879 

        code_06a1
  06a1:3c                 dup 
  06a2:35 05              ldi 5 
  06a4:1a                 eq? 
  06a5:31 44              bnt code_06eb 
  06a7:76               push0 
  06a8:45 0f 00         callb procedure_000f 0 // cls 

  06ab:39 7e            pushi 7e // $7e setCycle
  06ad:78               push1 
  06ae:76               push0 
  06af:72 0620          lofsa $0cd2 // Wilbur
  06b2:4a 06             send 6 

  06b4:39 06            pushi 6 // $6 loop
  06b6:78               push1 
  06b7:39 03            pushi 3 // $3 y
  06b9:39 7e            pushi 7e // $7e setCycle
  06bb:78               push1 
  06bc:51 16            class Fwd 
  06be:36                push 
  06bf:72 0674          lofsa $0d36 // Clarence
  06c2:4a 0c             send c 

  06c4:39 7e            pushi 7e // $7e setCycle
  06c6:78               push1 
  06c7:51 16            class Fwd 
  06c9:36                push 
  06ca:72 06cd          lofsa $0d9a // CHead
  06cd:4a 06             send 6 

  06cf:39 06            pushi 6 // $6 loop
  06d1:39 0a            pushi a // $a nsLeft
  06d3:39 07            pushi 7 // $7 cel
  06d5:39 43            pushi 43 // $43 at
  06d7:39 37            pushi 37 // $37 yStep
  06d9:38 0091          pushi 91 // $91 isType
  06dc:39 58            pushi 58 // $58 dispose
  06de:46 00ff 0000 0c  calle ff procedure_0000 c // Print 

  06e4:35 02              ldi 2 
  06e6:65 12             aTop seconds 
  06e8:32 018e            jmp code_0879 

        code_06eb
  06eb:3c                 dup 
  06ec:35 06              ldi 6 
  06ee:1a                 eq? 
  06ef:31 33              bnt code_0724 
  06f1:76               push0 
  06f2:45 0f 00         callb procedure_000f 0 // cls 

  06f5:39 06            pushi 6 // $6 loop
  06f7:39 0a            pushi a // $a nsLeft
  06f9:39 08            pushi 8 // $8 underBits
  06fb:39 43            pushi 43 // $43 at
  06fd:39 19            pushi 19 // $19 time
  06ff:38 0091          pushi 91 // $91 isType
  0702:39 58            pushi 58 // $58 dispose
  0704:46 00ff 0000 0c  calle ff procedure_0000 c // Print 

  070a:39 06            pushi 6 // $6 loop
  070c:78               push1 
  070d:78               push1 
  070e:39 07            pushi 7 // $7 cel
  0710:78               push1 
  0711:7a               push2 
  0712:39 7e            pushi 7e // $7e setCycle
  0714:78               push1 
  0715:51 1b            class Beg 
  0717:36                push 
  0718:72 061b          lofsa $0d36 // Clarence
  071b:4a 12             send 12 

  071d:35 01              ldi 1 
  071f:65 12             aTop seconds 
  0721:32 0155            jmp code_0879 

        code_0724
  0724:3c                 dup 
  0725:35 07              ldi 7 
  0727:1a                 eq? 
  0728:31 54              bnt code_077e 
  072a:38 0089          pushi 89 // $89 hide
  072d:76               push0 
  072e:72 0669          lofsa $0d9a // CHead
  0731:4a 04             send 4 

  0733:38 0089          pushi 89 // $89 hide
  0736:76               push0 
  0737:72 06ae          lofsa $0de8 // WHead
  073a:4a 04             send 4 

  073c:39 05            pushi 5 // $5 view
  073e:78               push1 
  073f:38 0190          pushi 190 // $190 sel_400
  0742:39 7e            pushi 7e // $7e setCycle
  0744:78               push1 
  0745:51 17            class Walk 
  0747:36                push 
  0748:38 00d3          pushi d3 // $d3 setMotion
  074b:39 04            pushi 4 // $4 x
  074d:51 1d            class MoveTo 
  074f:36                push 
  0750:38 0087          pushi 87 // $87 clean
  0753:38 0087          pushi 87 // $87 clean
  0756:7c            pushSelf 
  0757:72 05dc          lofsa $0d36 // Clarence
  075a:4a 18             send 18 

  075c:39 05            pushi 5 // $5 view
  075e:78               push1 
  075f:38 01a4          pushi 1a4 // $1a4 sel_420
  0762:39 7e            pushi 7e // $7e setCycle
  0764:78               push1 
  0765:51 17            class Walk 
  0767:36                push 
  0768:38 00d3          pushi d3 // $d3 setMotion
  076b:39 03            pushi 3 // $3 y
  076d:51 1d            class MoveTo 
  076f:36                push 
  0770:38 0087          pushi 87 // $87 clean
  0773:38 0087          pushi 87 // $87 clean
  0776:72 0559          lofsa $0cd2 // Wilbur
  0779:4a 16             send 16 

  077b:32 00fb            jmp code_0879 

        code_077e
  077e:3c                 dup 
  077f:35 08              ldi 8 
  0781:1a                 eq? 
  0782:31 2d              bnt code_07b1 
  0784:76               push0 
  0785:45 0f 00         callb procedure_000f 0 // cls 

  0788:38 00d3          pushi d3 // $d3 setMotion
  078b:39 04            pushi 4 // $4 x
  078d:51 1d            class MoveTo 
  078f:36                push 
  0790:38 0096          pushi 96 // $96 busy
  0793:39 7a            pushi 7a // $7a setScript
  0795:7c            pushSelf 
  0796:72 059d          lofsa $0d36 // Clarence
  0799:4a 0c             send c 

  079b:38 00d3          pushi d3 // $d3 setMotion
  079e:39 04            pushi 4 // $4 x
  07a0:51 1d            class MoveTo 
  07a2:36                push 
  07a3:38 0096          pushi 96 // $96 busy
  07a6:39 7b            pushi 7b // $7b cycleCnt
  07a8:7c            pushSelf 
  07a9:72 0526          lofsa $0cd2 // Wilbur
  07ac:4a 0c             send c 

  07ae:32 00c8            jmp code_0879 

        code_07b1
  07b1:3c                 dup 
  07b2:35 09              ldi 9 
  07b4:1a                 eq? 
  07b5:31 2a              bnt code_07e1 
  07b7:35 01              ldi 1 
  07b9:a0 009a            sag gClarenceWilburState 
  07bc:39 7e            pushi 7e // $7e setCycle
  07be:7a               push2 
  07bf:51 1a            class End 
  07c1:36                push 
  07c2:7c            pushSelf 
  07c3:72 039a          lofsa $0b60 // Door
  07c6:4a 08             send 8 

  07c8:39 2b            pushi 2b // $2b number
  07ca:78               push1 
  07cb:39 2b            pushi 2b // $2b number
  07cd:39 06            pushi 6 // $6 loop
  07cf:78               push1 
  07d0:78               push1 
  07d1:39 3f            pushi 3f // $3f priority
  07d3:78               push1 
  07d4:39 05            pushi 5 // $5 view
  07d6:39 2a            pushi 2a // $2a play
  07d8:76               push0 
  07d9:72 065a          lofsa $0e36 // myMusic
  07dc:4a 16             send 16 

  07de:32 0098            jmp code_0879 

        code_07e1
  07e1:3c                 dup 
  07e2:35 0a              ldi a 
  07e4:1a                 eq? 
  07e5:31 2f              bnt code_0816 
  07e7:39 12            pushi 12 // $12 illegalBits
  07e9:78               push1 
  07ea:76               push0 
  07eb:38 00d3          pushi d3 // $d3 setMotion
  07ee:39 03            pushi 3 // $3 y
  07f0:51 1d            class MoveTo 
  07f2:36                push 
  07f3:38 00be          pushi be // $be offScreenOK
  07f6:39 75            pushi 75 // $75 register
  07f8:72 053b          lofsa $0d36 // Clarence
  07fb:4a 10             send 10 

  07fd:39 12            pushi 12 // $12 illegalBits
  07ff:78               push1 
  0800:76               push0 
  0801:38 00d3          pushi d3 // $d3 setMotion
  0804:39 04            pushi 4 // $4 x
  0806:51 1d            class MoveTo 
  0808:36                push 
  0809:38 00b1          pushi b1 // $b1 bumpTurn
  080c:39 77            pushi 77 // $77 caller
  080e:7c            pushSelf 
  080f:72 04c0          lofsa $0cd2 // Wilbur
  0812:4a 12             send 12 

  0814:33 63              jmp code_0879 

        code_0816
  0816:3c                 dup 
  0817:35 0b              ldi b 
  0819:1a                 eq? 
  081a:31 24              bnt code_0840 
  081c:39 7e            pushi 7e // $7e setCycle
  081e:7a               push2 
  081f:51 1b            class Beg 
  0821:36                push 
  0822:7c            pushSelf 
  0823:72 033a          lofsa $0b60 // Door
  0826:4a 08             send 8 

  0828:39 2b            pushi 2b // $2b number
  082a:78               push1 
  082b:39 2c            pushi 2c // $2c handle
  082d:39 06            pushi 6 // $6 loop
  082f:78               push1 
  0830:78               push1 
  0831:39 3f            pushi 3f // $3f priority
  0833:78               push1 
  0834:39 05            pushi 5 // $5 view
  0836:39 2a            pushi 2a // $2a play
  0838:76               push0 
  0839:72 05fa          lofsa $0e36 // myMusic
  083c:4a 16             send 16 

  083e:33 39              jmp code_0879 

        code_0840
  0840:3c                 dup 
  0841:35 0c              ldi c 
  0843:1a                 eq? 
  0844:31 0f              bnt code_0855 
  0846:38 00c6          pushi c6 // $c6 stopUpd
  0849:76               push0 
  084a:72 0313          lofsa $0b60 // Door
  084d:4a 04             send 4 

  084f:35 01              ldi 1 
  0851:65 10             aTop cycles 
  0853:33 24              jmp code_0879 

        code_0855
  0855:3c                 dup 
  0856:35 0d              ldi d 
  0858:1a                 eq? 
  0859:31 0a              bnt code_0865 
  085b:76               push0 
  085c:45 04 00         callb procedure_0004 0 // HandsOn 

  085f:35 14              ldi 14 
  0861:65 12             aTop seconds 
  0863:33 14              jmp code_0879 

        code_0865
  0865:3c                 dup 
  0866:35 0e              ldi e 
  0868:1a                 eq? 
  0869:31 0e              bnt code_0879 
  086b:88 009a            lsg gClarenceWilburState 
  086e:35 03              ldi 3 
  0870:1a                 eq? 
  0871:39 7a            pushi 7a // $7a setScript
  0873:78               push1 
  0874:76               push0 
  0875:63 08             pToa client 
  0877:4a 06             send 6 


        code_0879
  0879:3a                toss 
  087a:48                 ret 
    )

)

// 0afa
(instance comeDown 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_087b
  087b:3f 01             link 1 // (var $1)
  087d:87 01              lap param1 
  087f:65 0a             aTop state 
  0881:36                push 
  0882:3c                 dup 
  0883:35 00              ldi 0 
  0885:1a                 eq? 
  0886:31 0a              bnt code_0892 
  0888:76               push0 
  0889:45 03 00         callb procedure_0003 0 // HandsOff 

  088c:35 03              ldi 3 
  088e:65 10             aTop cycles 
  0890:33 7b              jmp code_090d 

        code_0892
  0892:3c                 dup 
  0893:35 01              ldi 1 
  0895:1a                 eq? 
  0896:31 3a              bnt code_08d2 
  0898:38 00d3          pushi d3 // $d3 setMotion
  089b:39 04            pushi 4 // $4 x
  089d:51 1d            class MoveTo 
  089f:36                push 
  08a0:39 76            pushi 76 // $76 script
  08a2:38 0090          pushi 90 // $90 setMark
  08a5:7c            pushSelf 
  08a6:81 00              lag gEgo 
  08a8:4a 0c             send c 

  08aa:38 00a4          pushi a4 // $a4 cycleSpeed
  08ad:78               push1 
  08ae:78               push1 
  08af:39 7e            pushi 7e // $7e setCycle
  08b1:78               push1 
  08b2:51 1b            class Beg 
  08b4:36                push 
  08b5:72 02a8          lofsa $0b60 // Door
  08b8:4a 0c             send c 

  08ba:39 2b            pushi 2b // $2b number
  08bc:78               push1 
  08bd:39 2c            pushi 2c // $2c handle
  08bf:39 06            pushi 6 // $6 loop
  08c1:78               push1 
  08c2:78               push1 
  08c3:39 3f            pushi 3f // $3f priority
  08c5:78               push1 
  08c6:39 05            pushi 5 // $5 view
  08c8:39 2a            pushi 2a // $2a play
  08ca:76               push0 
  08cb:72 0568          lofsa $0e36 // myMusic
  08ce:4a 16             send 16 

  08d0:33 3b              jmp code_090d 

        code_08d2
  08d2:3c                 dup 
  08d3:35 02              ldi 2 
  08d5:1a                 eq? 
  08d6:31 35              bnt code_090d 
  08d8:83 03              lal local3 
  08da:18                 not 
  08db:31 04              bnt code_08e1 
  08dd:76               push0 
  08de:45 04 00         callb procedure_0004 0 // HandsOn 


        code_08e1
  08e1:88 00b3            lsg global179 
  08e4:81 0b              lag gCurRoomNum 
  08e6:1a                 eq? 
  08e7:31 13              bnt code_08fc 
  08e9:88 00a5            lsg gAct 
  08ec:35 03              ldi 3 
  08ee:1c                 ne? 
  08ef:31 09              bnt code_08fa 
  08f1:38 00c6          pushi c6 // $c6 stopUpd
  08f4:76               push0 
  08f5:72 0268          lofsa $0b60 // Door
  08f8:4a 04             send 4 


        code_08fa
  08fa:33 09              jmp code_0905 

        code_08fc
  08fc:38 00c6          pushi c6 // $c6 stopUpd
  08ff:76               push0 
  0900:72 025d          lofsa $0b60 // Door
  0903:4a 04             send 4 


        code_0905
  0905:39 7a            pushi 7a // $7a setScript
  0907:78               push1 
  0908:76               push0 
  0909:63 08             pToa client 
  090b:4a 06             send 6 


        code_090d
  090d:3a                toss 
  090e:48                 ret 
    )

)

// 0b2a
(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_090f
  090f:87 01              lap param1 
  0911:65 0a             aTop state 
  0913:36                push 
  0914:3c                 dup 
  0915:35 00              ldi 0 
  0917:1a                 eq? 
  0918:31 29              bnt code_0943 
  091a:38 00e9          pushi e9 // $e9 canControl
  091d:78               push1 
  091e:76               push0 
  091f:38 00e2          pushi e2 // $e2 canInput
  0922:78               push1 
  0923:76               push0 
  0924:51 2b            class User 
  0926:4a 0c             send c 

  0928:38 00c8          pushi c8 // $c8 setLoop
  092b:78               push1 
  092c:76               push0 
  092d:38 00d3          pushi d3 // $d3 setMotion
  0930:39 04            pushi 4 // $4 x
  0932:51 1d            class MoveTo 
  0934:36                push 
  0935:38 0087          pushi 87 // $87 clean
  0938:38 0086          pushi 86 // $86 pause
  093b:7c            pushSelf 
  093c:81 00              lag gEgo 
  093e:4a 12             send 12 

  0940:32 0082            jmp code_09c5 

        code_0943
  0943:3c                 dup 
  0944:35 01              ldi 1 
  0946:1a                 eq? 
  0947:31 14              bnt code_095d 
  0949:38 00d3          pushi d3 // $d3 setMotion
  094c:39 04            pushi 4 // $4 x
  094e:51 1d            class MoveTo 
  0950:36                push 
  0951:38 0092          pushi 92 // $92 checkState
  0954:39 78            pushi 78 // $78 changeState
  0956:7c            pushSelf 
  0957:81 00              lag gEgo 
  0959:4a 0c             send c 

  095b:33 68              jmp code_09c5 

        code_095d
  095d:3c                 dup 
  095e:35 02              ldi 2 
  0960:1a                 eq? 
  0961:31 3d              bnt code_09a0 
  0963:38 00d3          pushi d3 // $d3 setMotion
  0966:78               push1 
  0967:76               push0 
  0968:39 12            pushi 12 // $12 illegalBits
  096a:78               push1 
  096b:38 8000          pushi 8000 // $8000 sel_32768
  096e:81 00              lag gEgo 
  0970:4a 0c             send c 

  0972:38 00a4          pushi a4 // $a4 cycleSpeed
  0975:78               push1 
  0976:78               push1 
  0977:38 00c9          pushi c9 // $c9 ignoreActors
  097a:78               push1 
  097b:78               push1 
  097c:39 7e            pushi 7e // $7e setCycle
  097e:7a               push2 
  097f:51 1a            class End 
  0981:36                push 
  0982:7c            pushSelf 
  0983:72 01da          lofsa $0b60 // Door
  0986:4a 14             send 14 

  0988:39 2b            pushi 2b // $2b number
  098a:78               push1 
  098b:39 2b            pushi 2b // $2b number
  098d:39 06            pushi 6 // $6 loop
  098f:78               push1 
  0990:78               push1 
  0991:39 3f            pushi 3f // $3f priority
  0993:78               push1 
  0994:39 05            pushi 5 // $5 view
  0996:39 2a            pushi 2a // $2a play
  0998:76               push0 
  0999:72 049a          lofsa $0e36 // myMusic
  099c:4a 16             send 16 

  099e:33 25              jmp code_09c5 

        code_09a0
  09a0:3c                 dup 
  09a1:35 03              ldi 3 
  09a3:1a                 eq? 
  09a4:31 1f              bnt code_09c5 
  09a6:38 00c9          pushi c9 // $c9 ignoreActors
  09a9:78               push1 
  09aa:78               push1 
  09ab:38 00d3          pushi d3 // $d3 setMotion
  09ae:39 03            pushi 3 // $3 y
  09b0:51 1d            class MoveTo 
  09b2:36                push 
  09b3:39 04            pushi 4 // $4 x
  09b5:76               push0 
  09b6:81 00              lag gEgo 
  09b8:4a 04             send 4 

  09ba:36                push 
  09bb:35 32              ldi 32 
  09bd:02                 add 
  09be:36                push 
  09bf:39 79            pushi 79 // $79 cue
  09c1:81 00              lag gEgo 
  09c3:4a 10             send 10 


        code_09c5
  09c5:3a                toss 
  09c6:48                 ret 
    )

)

// 0b5a
(instance Door of Prop
    (properties
        y $7b
        x $a8
        z $0
        heading $0
        yStep $2
        view $75
        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_09c7
  09c7:39 03            pushi 3 // $3 y
  09c9:7c            pushSelf 
  09ca:8f 01              lsp param1 
  09cc:39 03            pushi 3 // $3 y
  09ce:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  09d4:31 0f              bnt code_09e5 
  09d6:39 4c            pushi 4c // $4c claimed
  09d8:78               push1 
  09d9:78               push1 
  09da:87 01              lap param1 
  09dc:4a 06             send 6 

  09de:78               push1 
  09df:74 04e1          lofss $0ec3 // door
  09e2:45 19 02         callb procedure_0019 2 // DoLook 


        code_09e5
  09e5:48                 ret 
    )

)

// 0bac
(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
    )
)

// 0bfa
(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
    )
)

// 0c48
(instance Window1 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $1f
        nsLeft $62
        nsBottom $60
        nsRight $78
    )
    (method (handleEvent) // method_09e6
  09e6:39 03            pushi 3 // $3 y
  09e8:7c            pushSelf 
  09e9:8f 01              lsp param1 
  09eb:39 03            pushi 3 // $3 y
  09ed:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  09f3:31 0f              bnt code_0a04 
  09f5:39 4c            pushi 4c // $4c claimed
  09f7:78               push1 
  09f8:78               push1 
  09f9:87 01              lap param1 
  09fb:4a 06             send 6 

  09fd:78               push1 
  09fe:74 04d6          lofss $0ed7 // window
  0a01:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a04
  0a04:48                 ret 
    )

)

// 0c74
(instance Window2 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $38
        nsLeft $c3
        nsBottom $8a
        nsRight $db
    )
    (method (handleEvent) // method_0a05
  0a05:39 03            pushi 3 // $3 y
  0a07:7c            pushSelf 
  0a08:8f 01              lsp param1 
  0a0a:39 03            pushi 3 // $3 y
  0a0c:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a12:31 0f              bnt code_0a23 
  0a14:39 4c            pushi 4c // $4c claimed
  0a16:78               push1 
  0a17:78               push1 
  0a18:87 01              lap param1 
  0a1a:4a 06             send 6 

  0a1c:78               push1 
  0a1d:74 04b7          lofss $0ed7 // window
  0a20:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a23
  0a23:48                 ret 
    )

)

// 0ca0
(instance Window3 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $3b
        nsLeft $10d
        nsBottom $8a
        nsRight $127
    )
    (method (handleEvent) // method_0a24
  0a24:39 03            pushi 3 // $3 y
  0a26:7c            pushSelf 
  0a27:8f 01              lsp param1 
  0a29:39 03            pushi 3 // $3 y
  0a2b:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a31:31 0f              bnt code_0a42 
  0a33:39 4c            pushi 4c // $4c claimed
  0a35:78               push1 
  0a36:78               push1 
  0a37:87 01              lap param1 
  0a39:4a 06             send 6 

  0a3b:78               push1 
  0a3c:74 0498          lofss $0ed7 // window
  0a3f:45 19 02         callb procedure_0019 2 // DoLook 


        code_0a42
  0a42:48                 ret 
  0a43:00                bnot 
    )

)

// 0ccc
(instance Wilbur of Act
    (properties
        y $8e
        x $40
        z $0
        heading $0
        yStep $2
        view $1a9
        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
    )
)

// 0d30
(instance Clarence of Act
    (properties
        y $8e
        x $61
        z $0
        heading $0
        yStep $2
        view $192
        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
    )
)

// 0d94
(instance CHead of Prop
    (properties
        y $66
        x $5f
        z $0
        heading $0
        yStep $2
        view $194
        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
    )
)

// 0de2
(instance WHead of Prop
    (properties
        y $67
        x $3e
        z $0
        heading $0
        yStep $2
        view $194
        loop $4
        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
    )
)

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



