(script 14)

(string
    string_12fa "Chair"
    string_1300 "Chapel"
    string_1307 "Door"
    string_130c "House"
    string_1312 "Room14"
    string_1319 "Rope"
    string_131e "Splash1"
    string_1326 "Splash2"
    string_132e "Squirel"
    string_1336 "Tower"
    string_133c "Window1"
    string_1344 "Window2"
    string_134c "Window3"
    string_1354 "Window4"
    string_135c "comeIn"
    string_1363 "myDoor"
    string_136a "noOneHome"
    string_1374 "runAway"
    string_137c "soundFX"
    string_1384 "swinging"
    string_138d ""
)

(said
    said_0d74 /path,(boulder<stepping)
    said_0d80 [<around,at][/room]
    said_0d8e bang[/door]
    said_0d96 break/door
    said_0d9c break/fenetre
    said_0da2 get,attraper/ecureuil
    said_0dab get,get,chop,delier,look/chanvre
    said_0dbd get/balancoire
    said_0dc3 aller,climb,(get<(dans,on))/balancoire
    said_0dd9 look/chapel
    said_0ddf look/door
    said_0de5 look/cabane,cabin
    said_0dee look/ecureuil
    said_0df4 look/balancoire
    said_0dfa look/tour
    said_0e00 look/fenetre
    said_0e06 look<(dans,through)/fenetre,cabane
    said_0e17 look>
    said_0e1b open/door
    said_0e21 open/fenetre
    said_0e27 appuyer/balancoire
    said_0e2d asseoir[/balancoire]
    said_0e35 balancoire
    said_0e38 debloquer/door
)

(local
    local0 = $0000
    local1 = $0000
    local2 = $0000
    local3 = $0000
    local4 = $0000
    local5 = $0000
    local6 = $0000
    local7 = $0000
    local8 = $0000
    local9 = $0000
    local10 = $0000
    local11 = $0000
    local12 = $0000
    local13 = $0000
    local14 = $0000
    local15 = $0000
)

// 0e44
(instance public Room14 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $e
        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 0d              ldi d 
  000e:65 20             aTop west 
  0010:35 0a              ldi a 
  0012:65 1c             aTop east 
  0014:39 57            pushi 57 // $57 init
  0016:76               push0 
  0017:57 37 04         super Rm 4 

  001a:39 04            pushi 4 // $4 x
  001c:38 0080          pushi 80 // $80 timeLeft
  001f:78               push1 
  0020:39 19            pushi 19 // $19 time
  0022:39 38            pushi 38 // $38 moveSpeed
  0024:45 15 08         callb procedure_0015 8 // LoadMany 

  0027:39 07            pushi 7 // $7 cel
  0029:38 0084          pushi 84 // $84 stop
  002c:39 29            pushi 29 // $29 edit
  002e:39 2b            pushi 2b // $2b number
  0030:39 2c            pushi 2c // $2c handle
  0032:39 2f            pushi 2f // $2f dy
  0034:39 30            pushi 30 // $30 b-moveCnt
  0036:39 61            pushi 61 // $61 add
  0038:45 15 0e         callb procedure_0015 e // LoadMany 

  003b:80 00ce            lag global206 
  003e:18                 not 
  003f:31 09              bnt code_004a 
  0041:7a               push2 
  0042:38 0080          pushi 80 // $80 timeLeft
  0045:39 2f            pushi 2f // $2f dy
  0047:43 00 04         callk Load 4 


        code_004a
  004a:39 42            pushi 42 // $42 setPri
  004c:78               push1 
  004d:39 0a            pushi a // $a nsLeft
  004f:38 00c9          pushi c9 // $c9 ignoreActors
  0052:78               push1 
  0053:78               push1 
  0054:39 07            pushi 7 // $7 cel
  0056:78               push1 
  0057:80 00ce            lag global206 
  005a:31 04              bnt code_0060 
  005c:35 02              ldi 2 
  005e:33 02              jmp code_0062 

        code_0060
  0060:35 00              ldi 0 

        code_0062
  0062:36                push 
  0063:39 57            pushi 57 // $57 init
  0065:76               push0 
  0066:38 00c6          pushi c6 // $c6 stopUpd
  0069:76               push0 
  006a:72 0fbd          lofsa $102a // Chair
  006d:4a 1a             send 1a 

  006f:39 07            pushi 7 // $7 cel
  0071:78               push1 
  0072:89 0c              lsg gPrevRoomNum 
  0074:35 3f              ldi 3f 
  0076:1a                 eq? 
  0077:31 04              bnt code_007d 
  0079:35 02              ldi 2 
  007b:33 02              jmp code_007f 

        code_007d
  007d:35 00              ldi 0 

        code_007f
  007f:36                push 
  0080:39 57            pushi 57 // $57 init
  0082:76               push0 
  0083:38 00c6          pushi c6 // $c6 stopUpd
  0086:76               push0 
  0087:72 1008          lofsa $1092 // Door
  008a:4a 0e             send e 

  008c:39 42            pushi 42 // $42 setPri
  008e:78               push1 
  008f:39 0e            pushi e // $e lsLeft
  0091:39 57            pushi 57 // $57 init
  0093:76               push0 
  0094:38 00c6          pushi c6 // $c6 stopUpd
  0097:76               push0 
  0098:72 0f41          lofsa $0fdc // Rope
  009b:4a 0e             send e 

  009d:80 00df            lag gDetailLevel 
  00a0:31 30              bnt code_00d2 
  00a2:39 57            pushi 57 // $57 init
  00a4:76               push0 
  00a5:39 7a            pushi 7a // $7a setScript
  00a7:78               push1 
  00a8:74 0e7f          lofss $0f2a // runAway
  00ab:72 0edc          lofsa $0f8a // Squirel
  00ae:4a 0a             send a 

  00b0:38 00c9          pushi c9 // $c9 ignoreActors
  00b3:78               push1 
  00b4:78               push1 
  00b5:39 57            pushi 57 // $57 init
  00b7:76               push0 
  00b8:38 0089          pushi 89 // $89 hide
  00bb:76               push0 
  00bc:72 1025          lofsa $10e4 // Splash1
  00bf:4a 0e             send e 

  00c1:38 00c9          pushi c9 // $c9 ignoreActors
  00c4:78               push1 
  00c5:78               push1 
  00c6:39 57            pushi 57 // $57 init
  00c8:76               push0 
  00c9:38 0089          pushi 89 // $89 hide
  00cc:76               push0 
  00cd:72 1062          lofsa $1132 // Splash2
  00d0:4a 0e             send e 


        code_00d2
  00d2:38 010b          pushi 10b // $10b setFeatures
  00d5:39 07            pushi 7 // $7 cel
  00d7:74 10a6          lofss $1180 // Window1
  00da:74 10cf          lofss $11ac // Window2
  00dd:74 10f8          lofss $11d8 // Window3
  00e0:74 1121          lofss $1204 // Window4
  00e3:74 114a          lofss $1230 // Tower
  00e6:74 1173          lofss $125c // Chapel
  00e9:74 119c          lofss $1288 // House
  00ec:54 12             self 12 

  00ee:88 00a5            lsg gAct 
  00f1:35 02              ldi 2 
  00f3:20                 ge? 
  00f4:31 11              bnt code_0107 
  00f6:88 00a5            lsg gAct 
  00f9:35 04              ldi 4 
  00fb:22                 lt? 
  00fc:31 09              bnt code_0107 
  00fe:38 010a          pushi 10a // $10a setRegions
  0101:78               push1 
  0102:38 00ca          pushi ca // $ca show
  0105:54 06             self 6 


        code_0107
  0107:88 00a5            lsg gAct 
  010a:35 06              ldi 6 
  010c:1a                 eq? 
  010d:31 11              bnt code_0120 
  010f:89 76              lsg gMustDos 
  0111:35 02              ldi 2 
  0113:12                 and 
  0114:18                 not 
  0115:31 09              bnt code_0120 
  0117:38 010a          pushi 10a // $10a setRegions
  011a:78               push1 
  011b:38 0119          pushi 119 // $119 startExtra
  011e:54 06             self 6 


        code_0120
  0120:89 0c              lsg gPrevRoomNum 
  0122:3c                 dup 
  0123:35 15              ldi 15 
  0125:1a                 eq? 
  0126:31 10              bnt code_0138 
  0128:38 00c5          pushi c5 // $c5 posn
  012b:7a               push2 
  012c:38 0114          pushi 114 // $114 minPause
  012f:38 00bc          pushi bc // $bc motionInited
  0132:81 00              lag gEgo 
  0134:4a 08             send 8 

  0136:33 74              jmp code_01ac 

        code_0138
  0138:3c                 dup 
  0139:35 14              ldi 14 
  013b:1a                 eq? 
  013c:31 0f              bnt code_014d 
  013e:38 00c5          pushi c5 // $c5 posn
  0141:7a               push2 
  0142:39 30            pushi 30 // $30 b-moveCnt
  0144:38 00bc          pushi bc // $bc motionInited
  0147:81 00              lag gEgo 
  0149:4a 08             send 8 

  014b:33 5f              jmp code_01ac 

        code_014d
  014d:3c                 dup 
  014e:35 03              ldi 3 
  0150:1a                 eq? 
  0151:31 0f              bnt code_0162 
  0153:38 00c5          pushi c5 // $c5 posn
  0156:7a               push2 
  0157:38 0114          pushi 114 // $114 minPause
  015a:39 64            pushi 64 // $64 allTrue
  015c:81 00              lag gEgo 
  015e:4a 08             send 8 

  0160:33 4a              jmp code_01ac 

        code_0162
  0162:3c                 dup 
  0163:35 09              ldi 9 
  0165:1a                 eq? 
  0166:31 0e              bnt code_0176 
  0168:38 00c5          pushi c5 // $c5 posn
  016b:7a               push2 
  016c:39 4c            pushi 4c // $4c claimed
  016e:39 71            pushi 71 // $71 timer
  0170:81 00              lag gEgo 
  0172:4a 08             send 8 

  0174:33 36              jmp code_01ac 

        code_0176
  0176:3c                 dup 
  0177:35 3f              ldi 3f 
  0179:1a                 eq? 
  017a:31 1c              bnt code_0198 
  017c:38 00c5          pushi c5 // $c5 posn
  017f:7a               push2 
  0180:38 00e3          pushi e3 // $e3 controls
  0183:38 0084          pushi 84 // $84 stop
  0186:39 06            pushi 6 // $6 loop
  0188:78               push1 
  0189:7a               push2 
  018a:81 00              lag gEgo 
  018c:4a 0e             send e 

  018e:39 7a            pushi 7a // $7a setScript
  0190:78               push1 
  0191:74 0d06          lofss $0e9a // myDoor
  0194:54 06             self 6 

  0196:33 14              jmp code_01ac 

        code_0198
  0198:3c                 dup 
  0199:35 0a              ldi a 
  019b:1a                 eq? 
  019c:31 0e              bnt code_01ac 
  019e:38 00c5          pushi c5 // $c5 posn
  01a1:7a               push2 
  01a2:38 0136          pushi 136 // $136 elevatorID
  01a5:38 008a          pushi 8a // $8a enable
  01a8:81 00              lag gEgo 
  01aa:4a 08             send 8 


        code_01ac
  01ac:3a                toss 
  01ad:39 05            pushi 5 // $5 view
  01af:78               push1 
  01b0:76               push0 
  01b1:39 12            pushi 12 // $12 illegalBits
  01b3:78               push1 
  01b4:38 8000          pushi 8000 // $8000 sel_32768
  01b7:39 57            pushi 57 // $57 init
  01b9:76               push0 
  01ba:81 00              lag gEgo 
  01bc:4a 10             send 10 

  01be:48                 ret 
    )

    (method (doit) // method_01bf
  01bf:76               push0 
  01c0:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  01c3:31 0a              bnt code_01cf 
  01c5:7a               push2 
  01c6:39 0e            pushi e // $e lsLeft
  01c8:76               push0 
  01c9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_01cf
  01cf:38 00db          pushi db // $db onControl
  01d2:78               push1 
  01d3:76               push0 
  01d4:81 00              lag gEgo 
  01d6:4a 06             send 6 

  01d8:36                push 
  01d9:35 10              ldi 10 
  01db:12                 and 
  01dc:31 0a              bnt code_01e8 
  01de:38 00f8          pushi f8 // $f8 newRoom
  01e1:78               push1 
  01e2:39 03            pushi 3 // $3 y
  01e4:81 02              lag gCurRoom 
  01e6:4a 06             send 6 


        code_01e8
  01e8:38 00db          pushi db // $db onControl
  01eb:78               push1 
  01ec:76               push0 
  01ed:81 00              lag gEgo 
  01ef:4a 06             send 6 

  01f1:36                push 
  01f2:35 08              ldi 8 
  01f4:12                 and 
  01f5:31 0a              bnt code_0201 
  01f7:38 00f8          pushi f8 // $f8 newRoom
  01fa:78               push1 
  01fb:39 09            pushi 9 // $9 nsTop
  01fd:81 02              lag gCurRoom 
  01ff:4a 06             send 6 


        code_0201
  0201:38 00db          pushi db // $db onControl
  0204:78               push1 
  0205:78               push1 
  0206:81 00              lag gEgo 
  0208:4a 06             send 6 

  020a:36                push 
  020b:34 4000            ldi 4000 
  020e:12                 and 
  020f:30 017e            bnt code_0390 
  0212:39 3b            pushi 3b // $3b mover
  0214:76               push0 
  0215:81 00              lag gEgo 
  0217:4a 04             send 4 

  0219:36                push 
  021a:35 00              ldi 0 
  021c:1c                 ne? 
  021d:30 0170            bnt code_0390 
  0220:80 00df            lag gDetailLevel 
  0223:30 016a            bnt code_0390 
  0226:39 06            pushi 6 // $6 loop
  0228:76               push0 
  0229:81 00              lag gEgo 
  022b:4a 04             send 4 

  022d:36                push 
  022e:3c                 dup 
  022f:35 02              ldi 2 
  0231:1a                 eq? 
  0232:31 73              bnt code_02a7 
  0234:39 07            pushi 7 // $7 cel
  0236:76               push0 
  0237:81 00              lag gEgo 
  0239:4a 04             send 4 

  023b:36                push 
  023c:35 02              ldi 2 
  023e:1a                 eq? 
  023f:31 2b              bnt code_026c 
  0241:38 00c5          pushi c5 // $c5 posn
  0244:7a               push2 
  0245:39 04            pushi 4 // $4 x
  0247:76               push0 
  0248:81 00              lag gEgo 
  024a:4a 04             send 4 

  024c:36                push 
  024d:35 05              ldi 5 
  024f:02                 add 
  0250:36                push 
  0251:39 03            pushi 3 // $3 y
  0253:76               push0 
  0254:81 00              lag gEgo 
  0256:4a 04             send 4 

  0258:36                push 
  0259:39 07            pushi 7 // $7 cel
  025b:78               push1 
  025c:76               push0 
  025d:38 00ca          pushi ca // $ca show
  0260:76               push0 
  0261:39 7e            pushi 7e // $7e setCycle
  0263:78               push1 
  0264:51 1a            class End 
  0266:36                push 
  0267:72 0e7a          lofsa $10e4 // Splash1
  026a:4a 18             send 18 


        code_026c
  026c:39 07            pushi 7 // $7 cel
  026e:76               push0 
  026f:81 00              lag gEgo 
  0271:4a 04             send 4 

  0273:36                push 
  0274:35 05              ldi 5 
  0276:1a                 eq? 
  0277:31 2b              bnt code_02a4 
  0279:38 00c5          pushi c5 // $c5 posn
  027c:7a               push2 
  027d:39 04            pushi 4 // $4 x
  027f:76               push0 
  0280:81 00              lag gEgo 
  0282:4a 04             send 4 

  0284:36                push 
  0285:35 05              ldi 5 
  0287:02                 add 
  0288:36                push 
  0289:39 03            pushi 3 // $3 y
  028b:76               push0 
  028c:81 00              lag gEgo 
  028e:4a 04             send 4 

  0290:36                push 
  0291:39 07            pushi 7 // $7 cel
  0293:78               push1 
  0294:76               push0 
  0295:38 00ca          pushi ca // $ca show
  0298:76               push0 
  0299:39 7e            pushi 7e // $7e setCycle
  029b:78               push1 
  029c:51 1a            class End 
  029e:36                push 
  029f:72 0e90          lofsa $1132 // Splash2
  02a2:4a 18             send 18 


        code_02a4
  02a4:32 00e8            jmp code_038f 

        code_02a7
  02a7:3c                 dup 
  02a8:35 03              ldi 3 
  02aa:1a                 eq? 
  02ab:31 72              bnt code_031f 
  02ad:39 07            pushi 7 // $7 cel
  02af:76               push0 
  02b0:81 00              lag gEgo 
  02b2:4a 04             send 4 

  02b4:36                push 
  02b5:35 02              ldi 2 
  02b7:1a                 eq? 
  02b8:31 2b              bnt code_02e5 
  02ba:38 00c5          pushi c5 // $c5 posn
  02bd:7a               push2 
  02be:39 04            pushi 4 // $4 x
  02c0:76               push0 
  02c1:81 00              lag gEgo 
  02c3:4a 04             send 4 

  02c5:36                push 
  02c6:35 05              ldi 5 
  02c8:02                 add 
  02c9:36                push 
  02ca:39 03            pushi 3 // $3 y
  02cc:76               push0 
  02cd:81 00              lag gEgo 
  02cf:4a 04             send 4 

  02d1:36                push 
  02d2:39 07            pushi 7 // $7 cel
  02d4:78               push1 
  02d5:76               push0 
  02d6:38 00ca          pushi ca // $ca show
  02d9:76               push0 
  02da:39 7e            pushi 7e // $7e setCycle
  02dc:78               push1 
  02dd:51 1a            class End 
  02df:36                push 
  02e0:72 0e01          lofsa $10e4 // Splash1
  02e3:4a 18             send 18 


        code_02e5
  02e5:39 07            pushi 7 // $7 cel
  02e7:76               push0 
  02e8:81 00              lag gEgo 
  02ea:4a 04             send 4 

  02ec:36                push 
  02ed:35 05              ldi 5 
  02ef:1a                 eq? 
  02f0:31 2b              bnt code_031d 
  02f2:38 00c5          pushi c5 // $c5 posn
  02f5:7a               push2 
  02f6:39 04            pushi 4 // $4 x
  02f8:76               push0 
  02f9:81 00              lag gEgo 
  02fb:4a 04             send 4 

  02fd:36                push 
  02fe:35 05              ldi 5 
  0300:02                 add 
  0301:36                push 
  0302:39 03            pushi 3 // $3 y
  0304:76               push0 
  0305:81 00              lag gEgo 
  0307:4a 04             send 4 

  0309:36                push 
  030a:39 07            pushi 7 // $7 cel
  030c:78               push1 
  030d:76               push0 
  030e:38 00ca          pushi ca // $ca show
  0311:76               push0 
  0312:39 7e            pushi 7e // $7e setCycle
  0314:78               push1 
  0315:51 1a            class End 
  0317:36                push 
  0318:72 0e17          lofsa $1132 // Splash2
  031b:4a 18             send 18 


        code_031d
  031d:33 70              jmp code_038f 

        code_031f
  031f:39 07            pushi 7 // $7 cel
  0321:76               push0 
  0322:81 00              lag gEgo 
  0324:4a 04             send 4 

  0326:36                push 
  0327:35 00              ldi 0 
  0329:1a                 eq? 
  032a:31 2b              bnt code_0357 
  032c:38 00c5          pushi c5 // $c5 posn
  032f:7a               push2 
  0330:39 04            pushi 4 // $4 x
  0332:76               push0 
  0333:81 00              lag gEgo 
  0335:4a 04             send 4 

  0337:36                push 
  0338:35 02              ldi 2 
  033a:04                 sub 
  033b:36                push 
  033c:39 03            pushi 3 // $3 y
  033e:76               push0 
  033f:81 00              lag gEgo 
  0341:4a 04             send 4 

  0343:36                push 
  0344:39 07            pushi 7 // $7 cel
  0346:78               push1 
  0347:76               push0 
  0348:38 00ca          pushi ca // $ca show
  034b:76               push0 
  034c:39 7e            pushi 7e // $7e setCycle
  034e:78               push1 
  034f:51 1a            class End 
  0351:36                push 
  0352:72 0d8f          lofsa $10e4 // Splash1
  0355:4a 18             send 18 


        code_0357
  0357:39 07            pushi 7 // $7 cel
  0359:76               push0 
  035a:81 00              lag gEgo 
  035c:4a 04             send 4 

  035e:36                push 
  035f:35 04              ldi 4 
  0361:1a                 eq? 
  0362:31 2b              bnt code_038f 
  0364:38 00c5          pushi c5 // $c5 posn
  0367:7a               push2 
  0368:39 04            pushi 4 // $4 x
  036a:76               push0 
  036b:81 00              lag gEgo 
  036d:4a 04             send 4 

  036f:36                push 
  0370:35 02              ldi 2 
  0372:04                 sub 
  0373:36                push 
  0374:39 03            pushi 3 // $3 y
  0376:76               push0 
  0377:81 00              lag gEgo 
  0379:4a 04             send 4 

  037b:36                push 
  037c:39 07            pushi 7 // $7 cel
  037e:78               push1 
  037f:76               push0 
  0380:38 00ca          pushi ca // $ca show
  0383:76               push0 
  0384:39 7e            pushi 7e // $7e setCycle
  0386:78               push1 
  0387:51 1a            class End 
  0389:36                push 
  038a:72 0da5          lofsa $1132 // Splash2
  038d:4a 18             send 18 


        code_038f
  038f:3a                toss 

        code_0390
  0390:38 00eb          pushi eb // $eb edgeHit
  0393:76               push0 
  0394:81 00              lag gEgo 
  0396:4a 04             send 4 

  0398:36                push 
  0399:35 03              ldi 3 
  039b:1a                 eq? 
  039c:31 24              bnt code_03c2 
  039e:39 04            pushi 4 // $4 x
  03a0:76               push0 
  03a1:81 00              lag gEgo 
  03a3:4a 04             send 4 

  03a5:36                push 
  03a6:34 00c0            ldi c0 
  03a9:22                 lt? 
  03aa:31 0c              bnt code_03b8 
  03ac:38 00f8          pushi f8 // $f8 newRoom
  03af:78               push1 
  03b0:39 14            pushi 14 // $14 brLeft
  03b2:81 02              lag gCurRoom 
  03b4:4a 06             send 6 

  03b6:33 0a              jmp code_03c2 

        code_03b8
  03b8:38 00f8          pushi f8 // $f8 newRoom
  03bb:78               push1 
  03bc:39 15            pushi 15 // $15 brBottom
  03be:81 02              lag gCurRoom 
  03c0:4a 06             send 6 


        code_03c2
  03c2:83 0f              lal local15 
  03c4:31 3b              bnt code_0401 
  03c6:39 07            pushi 7 // $7 cel
  03c8:76               push0 
  03c9:72 0c10          lofsa $0fdc // Rope
  03cc:4a 04             send 4 

  03ce:36                push 
  03cf:3c                 dup 
  03d0:35 02              ldi 2 
  03d2:1a                 eq? 
  03d3:31 13              bnt code_03e8 
  03d5:38 00c5          pushi c5 // $c5 posn
  03d8:7a               push2 
  03d9:39 38            pushi 38 // $38 moveSpeed
  03db:39 7e            pushi 7e // $7e setCycle
  03dd:38 00c7          pushi c7 // $c7 forceUpd
  03e0:76               push0 
  03e1:72 0c46          lofsa $102a // Chair
  03e4:4a 0c             send c 

  03e6:33 18              jmp code_0400 

        code_03e8
  03e8:3c                 dup 
  03e9:35 01              ldi 1 
  03eb:1a                 eq? 
  03ec:31 12              bnt code_0400 
  03ee:38 00c5          pushi c5 // $c5 posn
  03f1:7a               push2 
  03f2:39 38            pushi 38 // $38 moveSpeed
  03f4:38 0080          pushi 80 // $80 timeLeft
  03f7:38 00c7          pushi c7 // $c7 forceUpd
  03fa:76               push0 
  03fb:72 0c2c          lofsa $102a // Chair
  03fe:4a 0c             send c 


        code_0400
  0400:3a                toss 

        code_0401
  0401:39 3c            pushi 3c // $3c doit
  0403:76               push0 
  0404:57 37 04         super Rm 4 

  0407:48                 ret 
    )

    (method (dispose) // method_0408
  0408:39 58            pushi 58 // $58 dispose
  040a:76               push0 
  040b:57 37 04         super Rm 4 

  040e:48                 ret 
    )

    (method (newRoom) // method_040f
  040f:8f 01              lsp param1 
  0411:35 3f              ldi 3f 
  0413:1a                 eq? 
  0414:31 1e              bnt code_0434 
  0416:38 0084          pushi 84 // $84 stop
  0419:76               push0 
  041a:80 00b7            lag gConMusic 
  041d:4a 04             send 4 

  041f:39 12            pushi 12 // $12 illegalBits
  0421:78               push1 
  0422:38 8000          pushi 8000 // $8000 sel_32768
  0425:39 42            pushi 42 // $42 setPri
  0427:78               push1 
  0428:39 ff            pushi ff // $ff checkAni
  042a:38 00c8          pushi c8 // $c8 setLoop
  042d:78               push1 
  042e:39 ff            pushi ff // $ff checkAni
  0430:81 00              lag gEgo 
  0432:4a 12             send 12 


        code_0434
  0434:38 00f8          pushi f8 // $f8 newRoom
  0437:78               push1 
  0438:8f 01              lsp param1 
  043a:57 37 06         super Rm 6 

  043d:48                 ret 
    )

    (method (handleEvent) // method_043e
  043e:3f 01             link 1 // (var $1)
  0440:39 4c            pushi 4c // $4c claimed
  0442:76               push0 
  0443:87 01              lap param1 
  0445:4a 04             send 4 

  0447:31 03              bnt code_044c 
  0449:35 01              ldi 1 
  044b:48                 ret 

        code_044c
  044c:39 22            pushi 22 // $22 type
  044e:76               push0 
  044f:87 01              lap param1 
  0451:4a 04             send 4 

  0453:36                push 
  0454:34 0080            ldi 80 
  0457:1a                 eq? 
  0458:31 46              bnt code_04a0 
  045a:78               push1 
  045b:74 09b9          lofss $0e17 // look>
  045e:43 25 02         callk Said 2 

  0461:31 2a              bnt code_048d 
  0463:78               push1 
  0464:74 0919          lofss $0d80 // [<around,at][/room]
  0467:43 25 02         callk Said 2 

  046a:31 0c              bnt code_0478 
  046c:7a               push2 
  046d:39 0e            pushi e // $e lsLeft
  046f:76               push0 
  0470:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0476:33 13              jmp code_048b 

        code_0478
  0478:78               push1 
  0479:74 08f8          lofss $0d74 // /path,(boulder<stepping)
  047c:43 25 02         callk Said 2 

  047f:31 0a              bnt code_048b 
  0481:7a               push2 
  0482:39 0e            pushi e // $e lsLeft
  0484:78               push1 
  0485:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_048b
  048b:33 13              jmp code_04a0 

        code_048d
  048d:78               push1 
  048e:74 091a          lofss $0dab // get,get,chop,delier,look/chanvre
  0491:43 25 02         callk Said 2 

  0494:31 0a              bnt code_04a0 
  0496:7a               push2 
  0497:39 0e            pushi e // $e lsLeft
  0499:7a               push2 
  049a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_04a0
  04a0:48                 ret 
    )

)

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

  04b0:83 02              lal local2 
  04b2:31 19              bnt code_04cd 
  04b4:39 12            pushi 12 // $12 illegalBits
  04b6:78               push1 
  04b7:76               push0 
  04b8:38 00d3          pushi d3 // $d3 setMotion
  04bb:39 04            pushi 4 // $4 x
  04bd:51 1d            class MoveTo 
  04bf:36                push 
  04c0:38 00ec          pushi ec // $ec get
  04c3:38 0082          pushi 82 // $82 owner
  04c6:7c            pushSelf 
  04c7:81 00              lag gEgo 
  04c9:4a 12             send 12 

  04cb:33 04              jmp code_04d1 

        code_04cd
  04cd:35 01              ldi 1 
  04cf:65 10             aTop cycles 

        code_04d1
  04d1:32 00e3            jmp code_05b7 

        code_04d4
  04d4:3c                 dup 
  04d5:35 01              ldi 1 
  04d7:1a                 eq? 
  04d8:31 5d              bnt code_0537 
  04da:83 02              lal local2 
  04dc:31 33              bnt code_0511 
  04de:39 42            pushi 42 // $42 setPri
  04e0:78               push1 
  04e1:39 08            pushi 8 // $8 underBits
  04e3:39 06            pushi 6 // $6 loop
  04e5:78               push1 
  04e6:39 03            pushi 3 // $3 y
  04e8:81 00              lag gEgo 
  04ea:4a 0c             send c 

  04ec:38 00a4          pushi a4 // $a4 cycleSpeed
  04ef:78               push1 
  04f0:39 03            pushi 3 // $3 y
  04f2:39 7e            pushi 7e // $7e setCycle
  04f4:7a               push2 
  04f5:51 1a            class End 
  04f7:36                push 
  04f8:7c            pushSelf 
  04f9:72 0b96          lofsa $1092 // Door
  04fc:4a 0e             send e 

  04fe:39 2b            pushi 2b // $2b number
  0500:78               push1 
  0501:39 2b            pushi 2b // $2b number
  0503:39 06            pushi 6 // $6 loop
  0505:78               push1 
  0506:78               push1 
  0507:39 2a            pushi 2a // $2a play
  0509:76               push0 
  050a:72 0da7          lofsa $12b4 // soundFX
  050d:4a 10             send 10 

  050f:33 23              jmp code_0534 

        code_0511
  0511:38 00a4          pushi a4 // $a4 cycleSpeed
  0514:78               push1 
  0515:39 03            pushi 3 // $3 y
  0517:39 7e            pushi 7e // $7e setCycle
  0519:7a               push2 
  051a:51 1b            class Beg 
  051c:36                push 
  051d:7c            pushSelf 
  051e:72 0b71          lofsa $1092 // Door
  0521:4a 0e             send e 

  0523:39 2b            pushi 2b // $2b number
  0525:78               push1 
  0526:39 2c            pushi 2c // $2c handle
  0528:39 06            pushi 6 // $6 loop
  052a:78               push1 
  052b:78               push1 
  052c:39 2a            pushi 2a // $2a play
  052e:76               push0 
  052f:72 0d82          lofsa $12b4 // soundFX
  0532:4a 10             send 10 


        code_0534
  0534:32 0080            jmp code_05b7 

        code_0537
  0537:3c                 dup 
  0538:35 02              ldi 2 
  053a:1a                 eq? 
  053b:31 3c              bnt code_0579 
  053d:38 00c6          pushi c6 // $c6 stopUpd
  0540:76               push0 
  0541:72 0b4e          lofsa $1092 // Door
  0544:4a 04             send 4 

  0546:83 02              lal local2 
  0548:31 29              bnt code_0573 
  054a:39 05            pushi 5 // $5 view
  054c:78               push1 
  054d:39 19            pushi 19 // $19 time
  054f:39 07            pushi 7 // $7 cel
  0551:78               push1 
  0552:76               push0 
  0553:38 00c8          pushi c8 // $c8 setLoop
  0556:78               push1 
  0557:76               push0 
  0558:38 00d3          pushi d3 // $d3 setMotion
  055b:39 03            pushi 3 // $3 y
  055d:51 1d            class MoveTo 
  055f:36                push 
  0560:38 00d2          pushi d2 // $d2 avoider
  0563:38 0082          pushi 82 // $82 owner
  0566:39 7e            pushi 7e // $7e setCycle
  0568:7a               push2 
  0569:51 1a            class End 
  056b:36                push 
  056c:7c            pushSelf 
  056d:81 00              lag gEgo 
  056f:4a 24             send 24 

  0571:33 04              jmp code_0577 

        code_0573
  0573:35 01              ldi 1 
  0575:65 10             aTop cycles 

        code_0577
  0577:33 3e              jmp code_05b7 

        code_0579
  0579:3c                 dup 
  057a:35 03              ldi 3 
  057c:1a                 eq? 
  057d:31 38              bnt code_05b7 
  057f:83 02              lal local2 
  0581:31 28              bnt code_05ab 
  0583:88 00a5            lsg gAct 
  0586:35 06              ldi 6 
  0588:1a                 eq? 
  0589:31 16              bnt code_05a1 
  058b:89 0c              lsg gPrevRoomNum 
  058d:35 3f              ldi 3f 
  058f:1a                 eq? 
  0590:31 0f              bnt code_05a1 
  0592:89 76              lsg gMustDos 
  0594:35 02              ldi 2 
  0596:12                 and 
  0597:31 08              bnt code_05a1 
  0599:89 76              lsg gMustDos 
  059b:34 00fb            ldi fb 
  059e:12                 and 
  059f:a1 76              sag gMustDos 

        code_05a1
  05a1:38 00f8          pushi f8 // $f8 newRoom
  05a4:78               push1 
  05a5:39 3f            pushi 3f // $3f priority
  05a7:81 02              lag gCurRoom 
  05a9:4a 06             send 6 


        code_05ab
  05ab:76               push0 
  05ac:45 04 00         callb procedure_0004 0 // HandsOn 

  05af:39 7a            pushi 7a // $7a setScript
  05b1:78               push1 
  05b2:76               push0 
  05b3:63 08             pToa client 
  05b5:4a 06             send 6 


        code_05b7
  05b7:3a                toss 
  05b8:48                 ret 
    )

)

// 0ec4
(instance comeIn 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_05b9
  05b9:87 01              lap param1 
  05bb:65 0a             aTop state 
  05bd:36                push 
  05be:3c                 dup 
  05bf:35 00              ldi 0 
  05c1:1a                 eq? 
  05c2:31 17              bnt code_05db 
  05c4:39 05            pushi 5 // $5 view
  05c6:78               push1 
  05c7:39 38            pushi 38 // $38 moveSpeed
  05c9:39 06            pushi 6 // $6 loop
  05cb:78               push1 
  05cc:76               push0 
  05cd:39 7e            pushi 7e // $7e setCycle
  05cf:7a               push2 
  05d0:51 1a            class End 
  05d2:36                push 
  05d3:7c            pushSelf 
  05d4:81 00              lag gEgo 
  05d6:4a 14             send 14 

  05d8:32 00b9            jmp code_0694 

        code_05db
  05db:3c                 dup 
  05dc:35 01              ldi 1 
  05de:1a                 eq? 
  05df:31 3c              bnt code_061d 
  05e1:39 07            pushi 7 // $7 cel
  05e3:39 0e            pushi e // $e lsLeft
  05e5:39 03            pushi 3 // $3 y
  05e7:39 43            pushi 43 // $43 at
  05e9:39 28            pushi 28 // $28 message
  05eb:38 008c          pushi 8c // $8c track
  05ee:39 53            pushi 53 // $53 draw
  05f0:39 58            pushi 58 // $58 dispose
  05f2:46 00ff 0000 0e  calle ff procedure_0000 e // Print 

  05f8:39 2b            pushi 2b // $2b number
  05fa:78               push1 
  05fb:39 30            pushi 30 // $30 b-moveCnt
  05fd:39 06            pushi 6 // $6 loop
  05ff:78               push1 
  0600:78               push1 
  0601:39 2a            pushi 2a // $2a play
  0603:76               push0 
  0604:72 0cad          lofsa $12b4 // soundFX
  0607:4a 10             send 10 

  0609:39 06            pushi 6 // $6 loop
  060b:78               push1 
  060c:7a               push2 
  060d:39 7e            pushi 7e // $7e setCycle
  060f:78               push1 
  0610:51 16            class Fwd 
  0612:36                push 
  0613:81 00              lag gEgo 
  0615:4a 0c             send c 

  0617:35 0e              ldi e 
  0619:65 10             aTop cycles 
  061b:33 77              jmp code_0694 

        code_061d
  061d:3c                 dup 
  061e:35 02              ldi 2 
  0620:1a                 eq? 
  0621:31 1f              bnt code_0642 
  0623:76               push0 
  0624:45 0f 00         callb procedure_000f 0 // cls 

  0627:39 05            pushi 5 // $5 view
  0629:78               push1 
  062a:39 38            pushi 38 // $38 moveSpeed
  062c:39 06            pushi 6 // $6 loop
  062e:78               push1 
  062f:76               push0 
  0630:39 07            pushi 7 // $7 cel
  0632:78               push1 
  0633:39 03            pushi 3 // $3 y
  0635:39 7e            pushi 7e // $7e setCycle
  0637:7a               push2 
  0638:51 1b            class Beg 
  063a:36                push 
  063b:7c            pushSelf 
  063c:81 00              lag gEgo 
  063e:4a 1a             send 1a 

  0640:33 52              jmp code_0694 

        code_0642
  0642:3c                 dup 
  0643:35 03              ldi 3 
  0645:1a                 eq? 
  0646:31 26              bnt code_066e 
  0648:88 00a5            lsg gAct 
  064b:35 06              ldi 6 
  064d:1a                 eq? 
  064e:31 0d              bnt code_065d 
  0650:7a               push2 
  0651:39 0e            pushi e // $e lsLeft
  0653:39 04            pushi 4 // $4 x
  0655:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  065b:33 0b              jmp code_0668 

        code_065d
  065d:7a               push2 
  065e:39 0e            pushi e // $e lsLeft
  0660:39 05            pushi 5 // $5 view
  0662:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0668
  0668:35 01              ldi 1 
  066a:65 10             aTop cycles 
  066c:33 26              jmp code_0694 

        code_066e
  066e:3c                 dup 
  066f:35 04              ldi 4 
  0671:1a                 eq? 
  0672:31 20              bnt code_0694 
  0674:35 01              ldi 1 
  0676:a3 02              sal local2 
  0678:39 05            pushi 5 // $5 view
  067a:78               push1 
  067b:76               push0 
  067c:39 7e            pushi 7e // $7e setCycle
  067e:78               push1 
  067f:51 17            class Walk 
  0681:36                push 
  0682:39 7a            pushi 7a // $7a setScript
  0684:78               push1 
  0685:74 0812          lofss $0e9a // myDoor
  0688:81 00              lag gEgo 
  068a:4a 12             send 12 

  068c:39 7a            pushi 7a // $7a setScript
  068e:78               push1 
  068f:76               push0 
  0690:63 08             pToa client 
  0692:4a 06             send 6 


        code_0694
  0694:3a                toss 
  0695:48                 ret 
    )

)

// 0ef4
(instance swinging 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_0696
  0696:87 01              lap param1 
  0698:65 0a             aTop state 
  069a:36                push 
  069b:3c                 dup 
  069c:35 00              ldi 0 
  069e:1a                 eq? 
  069f:31 1e              bnt code_06bf 
  06a1:76               push0 
  06a2:45 03 00         callb procedure_0003 0 // HandsOff 

  06a5:35 01              ldi 1 
  06a7:a0 00ce            sag global206 
  06aa:38 00d3          pushi d3 // $d3 setMotion
  06ad:39 04            pushi 4 // $4 x
  06af:51 1d            class MoveTo 
  06b1:36                push 
  06b2:39 34            pushi 34 // $34 b-xAxis
  06b4:38 0090          pushi 90 // $90 setMark
  06b7:7c            pushSelf 
  06b8:81 00              lag gEgo 
  06ba:4a 0c             send c 

  06bc:32 01a3            jmp code_0862 

        code_06bf
  06bf:3c                 dup 
  06c0:35 01              ldi 1 
  06c2:1a                 eq? 
  06c3:31 34              bnt code_06f9 
  06c5:39 06            pushi 6 // $6 loop
  06c7:39 0e            pushi e // $e lsLeft
  06c9:39 06            pushi 6 // $6 loop
  06cb:39 43            pushi 43 // $43 at
  06cd:39 5a            pushi 5a // $5a showSelf
  06cf:39 0a            pushi a // $a nsLeft
  06d1:39 58            pushi 58 // $58 dispose
  06d3:46 00ff 0000 0c  calle ff procedure_0000 c // Print 

  06d9:39 05            pushi 5 // $5 view
  06db:78               push1 
  06dc:39 2f            pushi 2f // $2f dy
  06de:39 06            pushi 6 // $6 loop
  06e0:78               push1 
  06e1:76               push0 
  06e2:39 07            pushi 7 // $7 cel
  06e4:78               push1 
  06e5:76               push0 
  06e6:38 00a4          pushi a4 // $a4 cycleSpeed
  06e9:78               push1 
  06ea:7a               push2 
  06eb:39 7e            pushi 7e // $7e setCycle
  06ed:7a               push2 
  06ee:51 1a            class End 
  06f0:36                push 
  06f1:7c            pushSelf 
  06f2:81 00              lag gEgo 
  06f4:4a 20             send 20 

  06f6:32 0169            jmp code_0862 

        code_06f9
  06f9:3c                 dup 
  06fa:35 02              ldi 2 
  06fc:1a                 eq? 
  06fd:31 3c              bnt code_073b 
  06ff:38 00c8          pushi c8 // $c8 setLoop
  0702:78               push1 
  0703:76               push0 
  0704:38 00d3          pushi d3 // $d3 setMotion
  0707:39 03            pushi 3 // $3 y
  0709:51 1d            class MoveTo 
  070b:36                push 
  070c:39 34            pushi 34 // $34 b-xAxis
  070e:38 0093          pushi 93 // $93 advance
  0711:81 00              lag gEgo 
  0713:4a 10             send 10 

  0715:38 00a2          pushi a2 // $a2 setCel
  0718:78               push1 
  0719:76               push0 
  071a:38 00d3          pushi d3 // $d3 setMotion
  071d:39 03            pushi 3 // $3 y
  071f:51 1d            class MoveTo 
  0721:36                push 
  0722:39 38            pushi 38 // $38 moveSpeed
  0724:38 0080          pushi 80 // $80 timeLeft
  0727:72 0900          lofsa $102a // Chair
  072a:4a 10             send 10 

  072c:39 7e            pushi 7e // $7e setCycle
  072e:7a               push2 
  072f:51 1a            class End 
  0731:36                push 
  0732:7c            pushSelf 
  0733:72 08a6          lofsa $0fdc // Rope
  0736:4a 08             send 8 

  0738:32 0127            jmp code_0862 

        code_073b
  073b:3c                 dup 
  073c:35 03              ldi 3 
  073e:1a                 eq? 
  073f:31 37              bnt code_0778 
  0741:39 2b            pushi 2b // $2b number
  0743:78               push1 
  0744:39 29            pushi 29 // $29 edit
  0746:39 06            pushi 6 // $6 loop
  0748:78               push1 
  0749:78               push1 
  074a:39 2a            pushi 2a // $2a play
  074c:76               push0 
  074d:72 0b64          lofsa $12b4 // soundFX
  0750:4a 10             send 10 

  0752:39 06            pushi 6 // $6 loop
  0754:78               push1 
  0755:78               push1 
  0756:39 07            pushi 7 // $7 cel
  0758:78               push1 
  0759:76               push0 
  075a:38 00a4          pushi a4 // $a4 cycleSpeed
  075d:78               push1 
  075e:76               push0 
  075f:39 7e            pushi 7e // $7e setCycle
  0761:7a               push2 
  0762:51 1a            class End 
  0764:36                push 
  0765:7c            pushSelf 
  0766:81 00              lag gEgo 
  0768:4a 1a             send 1a 

  076a:39 7e            pushi 7e // $7e setCycle
  076c:78               push1 
  076d:51 1a            class End 
  076f:36                push 
  0770:72 08b7          lofsa $102a // Chair
  0773:4a 06             send 6 

  0775:32 00ea            jmp code_0862 

        code_0778
  0778:3c                 dup 
  0779:35 04              ldi 4 
  077b:1a                 eq? 
  077c:31 33              bnt code_07b1 
  077e:76               push0 
  077f:45 0f 00         callb procedure_000f 0 // cls 

  0782:39 2b            pushi 2b // $2b number
  0784:78               push1 
  0785:39 2f            pushi 2f // $2f dy
  0787:39 06            pushi 6 // $6 loop
  0789:78               push1 
  078a:78               push1 
  078b:39 2a            pushi 2a // $2a play
  078d:76               push0 
  078e:72 0b23          lofsa $12b4 // soundFX
  0791:4a 10             send 10 

  0793:35 01              ldi 1 
  0795:a3 0f              sal local15 
  0797:39 7e            pushi 7e // $7e setCycle
  0799:78               push1 
  079a:51 16            class Fwd 
  079c:36                push 
  079d:72 083c          lofsa $0fdc // Rope
  07a0:4a 06             send 6 

  07a2:7a               push2 
  07a3:39 05            pushi 5 // $5 view
  07a5:39 05            pushi 5 // $5 view
  07a7:43 6a 04         callk ShakeScreen 4 

  07aa:35 0e              ldi e 
  07ac:65 10             aTop cycles 
  07ae:32 00b1            jmp code_0862 

        code_07b1
  07b1:3c                 dup 
  07b2:35 05              ldi 5 
  07b4:1a                 eq? 
  07b5:31 38              bnt code_07ef 
  07b7:35 00              ldi 0 
  07b9:a3 0f              sal local15 
  07bb:39 7e            pushi 7e // $7e setCycle
  07bd:78               push1 
  07be:51 1b            class Beg 
  07c0:36                push 
  07c1:72 0818          lofsa $0fdc // Rope
  07c4:4a 06             send 6 

  07c6:39 06            pushi 6 // $6 loop
  07c8:78               push1 
  07c9:7a               push2 
  07ca:39 07            pushi 7 // $7 cel
  07cc:78               push1 
  07cd:76               push0 
  07ce:39 7e            pushi 7e // $7e setCycle
  07d0:78               push1 
  07d1:51 16            class Fwd 
  07d3:36                push 
  07d4:81 00              lag gEgo 
  07d6:4a 12             send 12 

  07d8:39 2b            pushi 2b // $2b number
  07da:78               push1 
  07db:39 61            pushi 61 // $61 add
  07dd:39 06            pushi 6 // $6 loop
  07df:78               push1 
  07e0:78               push1 
  07e1:39 2a            pushi 2a // $2a play
  07e3:76               push0 
  07e4:72 0acd          lofsa $12b4 // soundFX
  07e7:4a 10             send 10 

  07e9:35 05              ldi 5 
  07eb:65 12             aTop seconds 
  07ed:33 73              jmp code_0862 

        code_07ef
  07ef:3c                 dup 
  07f0:35 06              ldi 6 
  07f2:1a                 eq? 
  07f3:31 2c              bnt code_0821 
  07f5:76               push0 
  07f6:45 0f 00         callb procedure_000f 0 // cls 

  07f9:38 00c6          pushi c6 // $c6 stopUpd
  07fc:76               push0 
  07fd:72 082a          lofsa $102a // Chair
  0800:4a 04             send 4 

  0802:38 00c6          pushi c6 // $c6 stopUpd
  0805:76               push0 
  0806:72 07d3          lofsa $0fdc // Rope
  0809:4a 04             send 4 

  080b:39 06            pushi 6 // $6 loop
  080d:78               push1 
  080e:39 03            pushi 3 // $3 y
  0810:39 07            pushi 7 // $7 cel
  0812:78               push1 
  0813:76               push0 
  0814:39 7e            pushi 7e // $7e setCycle
  0816:7a               push2 
  0817:51 1a            class End 
  0819:36                push 
  081a:7c            pushSelf 
  081b:81 00              lag gEgo 
  081d:4a 14             send 14 

  081f:33 41              jmp code_0862 

        code_0821
  0821:3c                 dup 
  0822:35 07              ldi 7 
  0824:1a                 eq? 
  0825:31 1e              bnt code_0845 
  0827:39 05            pushi 5 // $5 view
  0829:78               push1 
  082a:76               push0 
  082b:39 06            pushi 6 // $6 loop
  082d:78               push1 
  082e:7a               push2 
  082f:38 00c8          pushi c8 // $c8 setLoop
  0832:78               push1 
  0833:39 ff            pushi ff // $ff checkAni
  0835:39 7e            pushi 7e // $7e setCycle
  0837:78               push1 
  0838:51 17            class Walk 
  083a:36                push 
  083b:81 00              lag gEgo 
  083d:4a 18             send 18 

  083f:35 02              ldi 2 
  0841:65 10             aTop cycles 
  0843:33 1d              jmp code_0862 

        code_0845
  0845:3c                 dup 
  0846:35 08              ldi 8 
  0848:1a                 eq? 
  0849:31 17              bnt code_0862 
  084b:7a               push2 
  084c:39 0e            pushi e // $e lsLeft
  084e:39 07            pushi 7 // $7 cel
  0850:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0856:76               push0 
  0857:45 04 00         callb procedure_0004 0 // HandsOn 

  085a:39 7a            pushi 7a // $7a setScript
  085c:78               push1 
  085d:76               push0 
  085e:63 08             pToa client 
  0860:4a 06             send 6 


        code_0862
  0862:3a                toss 
  0863:48                 ret 
    )

)

// 0f24
(instance runAway 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_0864
  0864:87 01              lap param1 
  0866:65 0a             aTop state 
  0868:36                push 
  0869:3c                 dup 
  086a:35 00              ldi 0 
  086c:1a                 eq? 
  086d:31 0d              bnt code_087c 
  086f:7a               push2 
  0870:39 03            pushi 3 // $3 y
  0872:39 08            pushi 8 // $8 underBits
  0874:43 40 04         callk Random 4 

  0877:65 12             aTop seconds 
  0879:32 00d5            jmp code_0951 

        code_087c
  087c:3c                 dup 
  087d:35 01              ldi 1 
  087f:1a                 eq? 
  0880:31 0f              bnt code_0891 
  0882:39 7e            pushi 7e // $7e setCycle
  0884:7a               push2 
  0885:51 1a            class End 
  0887:36                push 
  0888:7c            pushSelf 
  0889:72 06fe          lofsa $0f8a // Squirel
  088c:4a 08             send 8 

  088e:32 00c0            jmp code_0951 

        code_0891
  0891:3c                 dup 
  0892:35 02              ldi 2 
  0894:1a                 eq? 
  0895:31 31              bnt code_08c8 
  0897:38 00c5          pushi c5 // $c5 posn
  089a:7a               push2 
  089b:39 04            pushi 4 // $4 x
  089d:76               push0 
  089e:72 06e9          lofsa $0f8a // Squirel
  08a1:4a 04             send 4 

  08a3:36                push 
  08a4:35 17              ldi 17 
  08a6:02                 add 
  08a7:36                push 
  08a8:39 03            pushi 3 // $3 y
  08aa:76               push0 
  08ab:72 06dc          lofsa $0f8a // Squirel
  08ae:4a 04             send 4 

  08b0:36                push 
  08b1:72 06d6          lofsa $0f8a // Squirel
  08b4:4a 08             send 8 

  08b6:cb 0e              +sl local14 
  08b8:35 03              ldi 3 
  08ba:22                 lt? 
  08bb:31 04              bnt code_08c1 
  08bd:35 00              ldi 0 
  08bf:65 0a             aTop state 

        code_08c1
  08c1:35 01              ldi 1 
  08c3:65 10             aTop cycles 
  08c5:32 0089            jmp code_0951 

        code_08c8
  08c8:3c                 dup 
  08c9:35 03              ldi 3 
  08cb:1a                 eq? 
  08cc:31 1a              bnt code_08e8 
  08ce:39 06            pushi 6 // $6 loop
  08d0:78               push1 
  08d1:7a               push2 
  08d2:38 00a4          pushi a4 // $a4 cycleSpeed
  08d5:78               push1 
  08d6:7a               push2 
  08d7:39 7e            pushi 7e // $7e setCycle
  08d9:78               push1 
  08da:51 16            class Fwd 
  08dc:36                push 
  08dd:72 06aa          lofsa $0f8a // Squirel
  08e0:4a 12             send 12 

  08e2:35 07              ldi 7 
  08e4:65 10             aTop cycles 
  08e6:33 69              jmp code_0951 

        code_08e8
  08e8:3c                 dup 
  08e9:35 04              ldi 4 
  08eb:1a                 eq? 
  08ec:31 17              bnt code_0905 
  08ee:39 06            pushi 6 // $6 loop
  08f0:78               push1 
  08f1:76               push0 
  08f2:38 00a4          pushi a4 // $a4 cycleSpeed
  08f5:78               push1 
  08f6:76               push0 
  08f7:39 7e            pushi 7e // $7e setCycle
  08f9:7a               push2 
  08fa:51 1a            class End 
  08fc:36                push 
  08fd:7c            pushSelf 
  08fe:72 0689          lofsa $0f8a // Squirel
  0901:4a 14             send 14 

  0903:33 4c              jmp code_0951 

        code_0905
  0905:3c                 dup 
  0906:35 05              ldi 5 
  0908:1a                 eq? 
  0909:31 30              bnt code_093b 
  090b:38 00c5          pushi c5 // $c5 posn
  090e:7a               push2 
  090f:39 04            pushi 4 // $4 x
  0911:76               push0 
  0912:72 0675          lofsa $0f8a // Squirel
  0915:4a 04             send 4 

  0917:36                push 
  0918:35 17              ldi 17 
  091a:02                 add 
  091b:36                push 
  091c:39 03            pushi 3 // $3 y
  091e:76               push0 
  091f:72 0668          lofsa $0f8a // Squirel
  0922:4a 04             send 4 

  0924:36                push 
  0925:72 0662          lofsa $0f8a // Squirel
  0928:4a 08             send 8 

  092a:cb 0e              +sl local14 
  092c:35 05              ldi 5 
  092e:22                 lt? 
  092f:31 04              bnt code_0935 
  0931:35 03              ldi 3 
  0933:65 0a             aTop state 

        code_0935
  0935:35 01              ldi 1 
  0937:65 10             aTop cycles 
  0939:33 16              jmp code_0951 

        code_093b
  093b:3c                 dup 
  093c:35 06              ldi 6 
  093e:1a                 eq? 
  093f:31 10              bnt code_0951 
  0941:39 58            pushi 58 // $58 dispose
  0943:76               push0 
  0944:72 0643          lofsa $0f8a // Squirel
  0947:4a 04             send 4 

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


        code_0951
  0951:3a                toss 
  0952:48                 ret 
    )

)

// 0f54
(instance noOneHome 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_0953
  0953:87 01              lap param1 
  0955:65 0a             aTop state 
  0957:36                push 
  0958:3c                 dup 
  0959:35 00              ldi 0 
  095b:1a                 eq? 
  095c:31 17              bnt code_0975 
  095e:39 05            pushi 5 // $5 view
  0960:78               push1 
  0961:39 38            pushi 38 // $38 moveSpeed
  0963:39 06            pushi 6 // $6 loop
  0965:78               push1 
  0966:76               push0 
  0967:39 7e            pushi 7e // $7e setCycle
  0969:7a               push2 
  096a:51 1a            class End 
  096c:36                push 
  096d:7c            pushSelf 
  096e:81 00              lag gEgo 
  0970:4a 14             send 14 

  0972:32 0080            jmp code_09f5 

        code_0975
  0975:3c                 dup 
  0976:35 01              ldi 1 
  0978:1a                 eq? 
  0979:31 25              bnt code_09a0 
  097b:39 06            pushi 6 // $6 loop
  097d:78               push1 
  097e:7a               push2 
  097f:39 7e            pushi 7e // $7e setCycle
  0981:78               push1 
  0982:51 16            class Fwd 
  0984:36                push 
  0985:81 00              lag gEgo 
  0987:4a 0c             send c 

  0989:35 0c              ldi c 
  098b:65 10             aTop cycles 
  098d:39 2b            pushi 2b // $2b number
  098f:78               push1 
  0990:39 30            pushi 30 // $30 b-moveCnt
  0992:39 06            pushi 6 // $6 loop
  0994:78               push1 
  0995:78               push1 
  0996:39 2a            pushi 2a // $2a play
  0998:76               push0 
  0999:72 0918          lofsa $12b4 // soundFX
  099c:4a 10             send 10 

  099e:33 55              jmp code_09f5 

        code_09a0
  09a0:3c                 dup 
  09a1:35 02              ldi 2 
  09a3:1a                 eq? 
  09a4:31 2a              bnt code_09d0 
  09a6:76               push0 
  09a7:45 0f 00         callb procedure_000f 0 // cls 

  09aa:7a               push2 
  09ab:39 0e            pushi e // $e lsLeft
  09ad:39 08            pushi 8 // $8 underBits
  09af:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  09b5:39 05            pushi 5 // $5 view
  09b7:78               push1 
  09b8:39 38            pushi 38 // $38 moveSpeed
  09ba:39 06            pushi 6 // $6 loop
  09bc:78               push1 
  09bd:76               push0 
  09be:39 07            pushi 7 // $7 cel
  09c0:78               push1 
  09c1:39 03            pushi 3 // $3 y
  09c3:39 7e            pushi 7e // $7e setCycle
  09c5:7a               push2 
  09c6:51 1b            class Beg 
  09c8:36                push 
  09c9:7c            pushSelf 
  09ca:81 00              lag gEgo 
  09cc:4a 1a             send 1a 

  09ce:33 25              jmp code_09f5 

        code_09d0
  09d0:3c                 dup 
  09d1:35 03              ldi 3 
  09d3:1a                 eq? 
  09d4:31 1f              bnt code_09f5 
  09d6:76               push0 
  09d7:45 04 00         callb procedure_0004 0 // HandsOn 

  09da:39 05            pushi 5 // $5 view
  09dc:78               push1 
  09dd:76               push0 
  09de:39 7e            pushi 7e // $7e setCycle
  09e0:78               push1 
  09e1:51 17            class Walk 
  09e3:36                push 
  09e4:39 06            pushi 6 // $6 loop
  09e6:78               push1 
  09e7:39 03            pushi 3 // $3 y
  09e9:81 00              lag gEgo 
  09eb:4a 12             send 12 

  09ed:39 7a            pushi 7a // $7a setScript
  09ef:78               push1 
  09f0:76               push0 
  09f1:63 08             pToa client 
  09f3:4a 06             send 6 


        code_09f5
  09f5:3a                toss 
  09f6:48                 ret 
    )

)

// 0f84
(instance Squirel of Prop
    (properties
        y $6f
        x $c
        z $0
        heading $0
        yStep $2
        view $ce
        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_09f7
  09f7:78               push1 
  09f8:74 03a7          lofss $0da2 // get,attraper/ecureuil
  09fb:43 25 02         callk Said 2 

  09fe:31 0d              bnt code_0a0d 
  0a00:7a               push2 
  0a01:39 0e            pushi e // $e lsLeft
  0a03:39 09            pushi 9 // $9 nsTop
  0a05:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a0b:33 2b              jmp code_0a38 

        code_0a0d
  0a0d:39 03            pushi 3 // $3 y
  0a0f:7c            pushSelf 
  0a10:8f 01              lsp param1 
  0a12:39 03            pushi 3 // $3 y
  0a14:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0a1a:2f 09               bt code_0a25 
  0a1c:78               push1 
  0a1d:74 03ce          lofss $0dee // look/ecureuil
  0a20:43 25 02         callk Said 2 

  0a23:31 13              bnt code_0a38 

        code_0a25
  0a25:39 4c            pushi 4c // $4c claimed
  0a27:78               push1 
  0a28:78               push1 
  0a29:87 01              lap param1 
  0a2b:4a 06             send 6 

  0a2d:7a               push2 
  0a2e:39 0e            pushi e // $e lsLeft
  0a30:39 0a            pushi a // $a nsLeft
  0a32:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0a38
  0a38:48                 ret 
    )

)

// 0fd6
(instance Rope of Prop
    (properties
        y $3e
        x $64
        z $0
        heading $0
        yStep $2
        view $72
        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
    )
)

// 1024
(instance Chair of Act
    (properties
        y $7e
        x $38
        z $0
        heading $0
        yStep $2
        view $72
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
        illegalBits $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
    (method (handleEvent) // method_0a39
  0a39:78               push1 
  0a3a:74 03ea          lofss $0e27 // appuyer/balancoire
  0a3d:43 25 02         callk Said 2 

  0a40:31 0e              bnt code_0a50 
  0a42:7a               push2 
  0a43:39 0e            pushi e // $e lsLeft
  0a45:39 0b            pushi b // $b nsBottom
  0a47:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a4d:32 00a7            jmp code_0af7 

        code_0a50
  0a50:78               push1 
  0a51:74 03e1          lofss $0e35 // balancoire
  0a54:43 25 02         callk Said 2 

  0a57:2f 12               bt code_0a6b 
  0a59:78               push1 
  0a5a:74 0366          lofss $0dc3 // aller,climb,(get<(dans,on))/balancoire
  0a5d:43 25 02         callk Said 2 

  0a60:2f 09               bt code_0a6b 
  0a62:78               push1 
  0a63:74 03c7          lofss $0e2d // asseoir[/balancoire]
  0a66:43 25 02         callk Said 2 

  0a69:31 39              bnt code_0aa4 

        code_0a6b
  0a6b:80 00ce            lag global206 
  0a6e:31 0d              bnt code_0a7d 
  0a70:7a               push2 
  0a71:39 0e            pushi e // $e lsLeft
  0a73:39 0c            pushi c // $c nsRight
  0a75:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0a7b:33 25              jmp code_0aa2 

        code_0a7d
  0a7d:38 00da          pushi da // $da inRect
  0a80:39 04            pushi 4 // $4 x
  0a82:39 1b            pushi 1b // $1b elements
  0a84:38 008c          pushi 8c // $8c track
  0a87:39 4d            pushi 4d // $4d value
  0a89:38 00a7          pushi a7 // $a7 isStopped
  0a8c:81 00              lag gEgo 
  0a8e:4a 0c             send c 

  0a90:31 0c              bnt code_0a9e 
  0a92:39 7a            pushi 7a // $7a setScript
  0a94:78               push1 
  0a95:74 0462          lofss $0efa // swinging
  0a98:81 00              lag gEgo 
  0a9a:4a 06             send 6 

  0a9c:33 04              jmp code_0aa2 

        code_0a9e
  0a9e:76               push0 
  0a9f:45 09 00         callb procedure_0009 0 // NotClose 


        code_0aa2
  0aa2:33 53              jmp code_0af7 

        code_0aa4
  0aa4:78               push1 
  0aa5:74 0315          lofss $0dbd // get/balancoire
  0aa8:43 25 02         callk Said 2 

  0aab:31 0d              bnt code_0aba 
  0aad:7a               push2 
  0aae:39 0e            pushi e // $e lsLeft
  0ab0:39 0d            pushi d // $d lsTop
  0ab2:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0ab8:33 3d              jmp code_0af7 

        code_0aba
  0aba:39 03            pushi 3 // $3 y
  0abc:7c            pushSelf 
  0abd:8f 01              lsp param1 
  0abf:39 03            pushi 3 // $3 y
  0ac1:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0ac7:2f 09               bt code_0ad2 
  0ac9:78               push1 
  0aca:74 0327          lofss $0df4 // look/balancoire
  0acd:43 25 02         callk Said 2 

  0ad0:31 25              bnt code_0af7 

        code_0ad2
  0ad2:39 4c            pushi 4c // $4c claimed
  0ad4:78               push1 
  0ad5:78               push1 
  0ad6:87 01              lap param1 
  0ad8:4a 06             send 6 

  0ada:80 00ce            lag global206 
  0add:31 0d              bnt code_0aec 
  0adf:7a               push2 
  0ae0:39 0e            pushi e // $e lsLeft
  0ae2:39 0e            pushi e // $e lsLeft
  0ae4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0aea:33 0b              jmp code_0af7 

        code_0aec
  0aec:7a               push2 
  0aed:39 0e            pushi e // $e lsLeft
  0aef:39 0f            pushi f // $f lsBottom
  0af1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0af7
  0af7:48                 ret 
    )

)

// 108c
(instance Door of Prop
    (properties
        y $7d
        x $e8
        z $0
        heading $0
        yStep $2
        view $72
        loop $1
        cel $0
        priority $5
        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_0af8
  0af8:78               push1 
  0af9:74 029a          lofss $0d96 // break/door
  0afc:43 25 02         callk Said 2 

  0aff:31 0e              bnt code_0b0f 
  0b01:7a               push2 
  0b02:39 0e            pushi e // $e lsLeft
  0b04:39 10            pushi 10 // $10 lsRight
  0b06:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0b0c:32 00f0            jmp code_0bff 

        code_0b0f
  0b0f:78               push1 
  0b10:74 0325          lofss $0e38 // debloquer/door
  0b13:43 25 02         callk Said 2 

  0b16:31 23              bnt code_0b3b 
  0b18:88 00a5            lsg gAct 
  0b1b:35 07              ldi 7 
  0b1d:20                 ge? 
  0b1e:31 0d              bnt code_0b2d 
  0b20:7a               push2 
  0b21:39 0e            pushi e // $e lsLeft
  0b23:39 11            pushi 11 // $11 signal
  0b25:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0b2b:33 0b              jmp code_0b38 

        code_0b2d
  0b2d:7a               push2 
  0b2e:39 0e            pushi e // $e lsLeft
  0b30:39 12            pushi 12 // $12 illegalBits
  0b32:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0b38
  0b38:32 00c4            jmp code_0bff 

        code_0b3b
  0b3b:78               push1 
  0b3c:74 024f          lofss $0d8e // bang[/door]
  0b3f:43 25 02         callk Said 2 

  0b42:31 4d              bnt code_0b91 
  0b44:38 00db          pushi db // $db onControl
  0b47:78               push1 
  0b48:78               push1 
  0b49:81 00              lag gEgo 
  0b4b:4a 06             send 6 

  0b4d:36                push 
  0b4e:35 02              ldi 2 
  0b50:12                 and 
  0b51:31 38              bnt code_0b8b 
  0b53:88 00a5            lsg gAct 
  0b56:35 02              ldi 2 
  0b58:1a                 eq? 
  0b59:2f 10               bt code_0b6b 
  0b5b:88 00a5            lsg gAct 
  0b5e:35 06              ldi 6 
  0b60:1a                 eq? 
  0b61:31 18              bnt code_0b7b 
  0b63:89 76              lsg gMustDos 
  0b65:35 02              ldi 2 
  0b67:12                 and 
  0b68:18                 not 
  0b69:31 10              bnt code_0b7b 

        code_0b6b
  0b6b:76               push0 
  0b6c:45 03 00         callb procedure_0003 0 // HandsOff 

  0b6f:39 7a            pushi 7a // $7a setScript
  0b71:78               push1 
  0b72:74 0355          lofss $0eca // comeIn
  0b75:81 00              lag gEgo 
  0b77:4a 06             send 6 

  0b79:33 0e              jmp code_0b89 

        code_0b7b
  0b7b:76               push0 
  0b7c:45 03 00         callb procedure_0003 0 // HandsOff 

  0b7f:39 7a            pushi 7a // $7a setScript
  0b81:78               push1 
  0b82:74 03d5          lofss $0f5a // noOneHome
  0b85:81 00              lag gEgo 
  0b87:4a 06             send 6 


        code_0b89
  0b89:33 04              jmp code_0b8f 

        code_0b8b
  0b8b:76               push0 
  0b8c:45 09 00         callb procedure_0009 0 // NotClose 


        code_0b8f
  0b8f:33 6e              jmp code_0bff 

        code_0b91
  0b91:78               push1 
  0b92:74 0286          lofss $0e1b // open/door
  0b95:43 25 02         callk Said 2 

  0b98:31 3a              bnt code_0bd4 
  0b9a:38 00db          pushi db // $db onControl
  0b9d:78               push1 
  0b9e:78               push1 
  0b9f:81 00              lag gEgo 
  0ba1:4a 06             send 6 

  0ba3:36                push 
  0ba4:35 02              ldi 2 
  0ba6:12                 and 
  0ba7:31 25              bnt code_0bce 
  0ba9:88 00a5            lsg gAct 
  0bac:35 02              ldi 2 
  0bae:20                 ge? 
  0baf:31 10              bnt code_0bc1 
  0bb1:35 01              ldi 1 
  0bb3:a3 02              sal local2 
  0bb5:39 7a            pushi 7a // $7a setScript
  0bb7:78               push1 
  0bb8:74 02df          lofss $0e9a // myDoor
  0bbb:81 00              lag gEgo 
  0bbd:4a 06             send 6 

  0bbf:33 0b              jmp code_0bcc 

        code_0bc1
  0bc1:7a               push2 
  0bc2:39 0e            pushi e // $e lsLeft
  0bc4:39 13            pushi 13 // $13 brTop
  0bc6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0bcc
  0bcc:33 04              jmp code_0bd2 

        code_0bce
  0bce:76               push0 
  0bcf:45 09 00         callb procedure_0009 0 // NotClose 


        code_0bd2
  0bd2:33 2b              jmp code_0bff 

        code_0bd4
  0bd4:39 03            pushi 3 // $3 y
  0bd6:7c            pushSelf 
  0bd7:8f 01              lsp param1 
  0bd9:39 03            pushi 3 // $3 y
  0bdb:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0be1:2f 09               bt code_0bec 
  0be3:78               push1 
  0be4:74 01f8          lofss $0ddf // look/door
  0be7:43 25 02         callk Said 2 

  0bea:31 13              bnt code_0bff 

        code_0bec
  0bec:39 4c            pushi 4c // $4c claimed
  0bee:78               push1 
  0bef:78               push1 
  0bf0:87 01              lap param1 
  0bf2:4a 06             send 6 

  0bf4:7a               push2 
  0bf5:39 0e            pushi e // $e lsLeft
  0bf7:39 14            pushi 14 // $14 brLeft
  0bf9:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0bff
  0bff:48                 ret 
    )

)

// 10de
(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
    )
)

// 112c
(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
    )
)

// 117a
(instance Window1 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $53
        nsLeft $85
        nsBottom $5f
        nsRight $90
    )
    (method (handleEvent) // method_0c00
  0c00:78               push1 
  0c01:74 0202          lofss $0e06 // look<(dans,through)/fenetre,cabane
  0c04:43 25 02         callk Said 2 

  0c07:31 22              bnt code_0c2b 
  0c09:38 00db          pushi db // $db onControl
  0c0c:78               push1 
  0c0d:76               push0 
  0c0e:81 00              lag gEgo 
  0c10:4a 06             send 6 

  0c12:36                push 
  0c13:35 40              ldi 40 
  0c15:12                 and 
  0c16:31 0d              bnt code_0c25 
  0c18:7a               push2 
  0c19:39 0e            pushi e // $e lsLeft
  0c1b:39 15            pushi 15 // $15 brBottom
  0c1d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c23:33 04              jmp code_0c29 

        code_0c25
  0c25:76               push0 
  0c26:45 09 00         callb procedure_0009 0 // NotClose 


        code_0c29
  0c29:33 57              jmp code_0c82 

        code_0c2b
  0c2b:78               push1 
  0c2c:74 016d          lofss $0d9c // break/fenetre
  0c2f:43 25 02         callk Said 2 

  0c32:31 0d              bnt code_0c41 
  0c34:7a               push2 
  0c35:39 0e            pushi e // $e lsLeft
  0c37:39 16            pushi 16 // $16 brRight
  0c39:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c3f:33 41              jmp code_0c82 

        code_0c41
  0c41:78               push1 
  0c42:74 01dc          lofss $0e21 // open/fenetre
  0c45:43 25 02         callk Said 2 

  0c48:31 0d              bnt code_0c57 
  0c4a:7a               push2 
  0c4b:39 0e            pushi e // $e lsLeft
  0c4d:39 17            pushi 17 // $17 name
  0c4f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0c55:33 2b              jmp code_0c82 

        code_0c57
  0c57:39 03            pushi 3 // $3 y
  0c59:7c            pushSelf 
  0c5a:8f 01              lsp param1 
  0c5c:39 03            pushi 3 // $3 y
  0c5e:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0c64:2f 09               bt code_0c6f 
  0c66:78               push1 
  0c67:74 0196          lofss $0e00 // look/fenetre
  0c6a:43 25 02         callk Said 2 

  0c6d:31 13              bnt code_0c82 

        code_0c6f
  0c6f:39 4c            pushi 4c // $4c claimed
  0c71:78               push1 
  0c72:78               push1 
  0c73:87 01              lap param1 
  0c75:4a 06             send 6 

  0c77:7a               push2 
  0c78:39 0e            pushi e // $e lsLeft
  0c7a:39 18            pushi 18 // $18 key
  0c7c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0c82
  0c82:48                 ret 
    )

)

// 11a6
(instance Window2 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $5d
        nsLeft $a4
        nsBottom $6c
        nsRight $b0
    )
    (method (handleEvent) // method_0c83
  0c83:39 03            pushi 3 // $3 y
  0c85:7c            pushSelf 
  0c86:8f 01              lsp param1 
  0c88:39 03            pushi 3 // $3 y
  0c8a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0c90:31 13              bnt code_0ca5 
  0c92:39 4c            pushi 4c // $4c claimed
  0c94:78               push1 
  0c95:78               push1 
  0c96:87 01              lap param1 
  0c98:4a 06             send 6 

  0c9a:7a               push2 
  0c9b:39 0e            pushi e // $e lsLeft
  0c9d:39 18            pushi 18 // $18 key
  0c9f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ca5
  0ca5:48                 ret 
    )

)

// 11d2
(instance Window3 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $5f
        nsLeft $c3
        nsBottom $6a
        nsRight $cf
    )
    (method (handleEvent) // method_0ca6
  0ca6:39 03            pushi 3 // $3 y
  0ca8:7c            pushSelf 
  0ca9:8f 01              lsp param1 
  0cab:39 03            pushi 3 // $3 y
  0cad:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0cb3:31 13              bnt code_0cc8 
  0cb5:39 4c            pushi 4c // $4c claimed
  0cb7:78               push1 
  0cb8:78               push1 
  0cb9:87 01              lap param1 
  0cbb:4a 06             send 6 

  0cbd:7a               push2 
  0cbe:39 0e            pushi e // $e lsLeft
  0cc0:39 18            pushi 18 // $18 key
  0cc2:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0cc8
  0cc8:48                 ret 
    )

)

// 11fe
(instance Window4 of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $57
        nsLeft $f0
        nsBottom $63
        nsRight $fb
    )
    (method (handleEvent) // method_0cc9
  0cc9:39 03            pushi 3 // $3 y
  0ccb:7c            pushSelf 
  0ccc:8f 01              lsp param1 
  0cce:39 03            pushi 3 // $3 y
  0cd0:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0cd6:31 13              bnt code_0ceb 
  0cd8:39 4c            pushi 4c // $4c claimed
  0cda:78               push1 
  0cdb:78               push1 
  0cdc:87 01              lap param1 
  0cde:4a 06             send 6 

  0ce0:7a               push2 
  0ce1:39 0e            pushi e // $e lsLeft
  0ce3:39 18            pushi 18 // $18 key
  0ce5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0ceb
  0ceb:48                 ret 
    )

)

// 122a
(instance Tower of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $15
        nsLeft $f2
        nsBottom $2d
        nsRight $fc
    )
    (method (handleEvent) // method_0cec
  0cec:39 03            pushi 3 // $3 y
  0cee:7c            pushSelf 
  0cef:8f 01              lsp param1 
  0cf1:39 03            pushi 3 // $3 y
  0cf3:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0cf9:2f 09               bt code_0d04 
  0cfb:78               push1 
  0cfc:74 00fb          lofss $0dfa // look/tour
  0cff:43 25 02         callk Said 2 

  0d02:31 13              bnt code_0d17 

        code_0d04
  0d04:39 4c            pushi 4c // $4c claimed
  0d06:78               push1 
  0d07:78               push1 
  0d08:87 01              lap param1 
  0d0a:4a 06             send 6 

  0d0c:7a               push2 
  0d0d:39 0e            pushi e // $e lsLeft
  0d0f:39 19            pushi 19 // $19 time
  0d11:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0d17
  0d17:48                 ret 
    )

)

// 1256
(instance Chapel of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $1d
        nsLeft $6a
        nsBottom $2e
        nsRight $82
    )
    (method (handleEvent) // method_0d18
  0d18:39 03            pushi 3 // $3 y
  0d1a:7c            pushSelf 
  0d1b:8f 01              lsp param1 
  0d1d:39 03            pushi 3 // $3 y
  0d1f:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0d25:2f 09               bt code_0d30 
  0d27:78               push1 
  0d28:74 00ae          lofss $0dd9 // look/chapel
  0d2b:43 25 02         callk Said 2 

  0d2e:31 13              bnt code_0d43 

        code_0d30
  0d30:39 4c            pushi 4c // $4c claimed
  0d32:78               push1 
  0d33:78               push1 
  0d34:87 01              lap param1 
  0d36:4a 06             send 6 

  0d38:7a               push2 
  0d39:39 0e            pushi e // $e lsLeft
  0d3b:39 1a            pushi 1a // $1a text
  0d3d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0d43
  0d43:48                 ret 
    )

)

// 1282
(instance House of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $2f
        nsLeft $83
        nsBottom $79
        nsRight $ff
    )
    (method (handleEvent) // method_0d44
  0d44:39 03            pushi 3 // $3 y
  0d46:7c            pushSelf 
  0d47:8f 01              lsp param1 
  0d49:39 03            pushi 3 // $3 y
  0d4b:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0d51:2f 09               bt code_0d5c 
  0d53:78               push1 
  0d54:74 008e          lofss $0de5 // look/cabane,cabin
  0d57:43 25 02         callk Said 2 

  0d5a:31 13              bnt code_0d6f 

        code_0d5c
  0d5c:39 4c            pushi 4c // $4c claimed
  0d5e:78               push1 
  0d5f:78               push1 
  0d60:87 01              lap param1 
  0d62:4a 06             send 6 

  0d64:7a               push2 
  0d65:39 0e            pushi e // $e lsLeft
  0d67:39 1b            pushi 1b // $1b elements
  0d69:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0d6f
  0d6f:48                 ret 
    )

)

// 12ae
(instance soundFX of Sound
    (properties
        state $0
        number $30
        priority $3
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)



