(script 28)

(string
    string_08d2 "Bird1"
    string_08d8 "Bird2"
    string_08de "House"
    string_08e4 "Room28"
    string_08eb "Sign"
    string_08f0 "Splash"
    string_08f7 "Statue"
    string_08fe "Thunder"
    string_0906 "falling"
    string_090e "house"
    string_0914 "light1"
    string_091b "light2"
    string_0922 "myIcon"
    string_0929 "showers"
    string_0931 "smoke1"
    string_0938 "smoke2"
    string_093f ""
)

(said
    said_04d8 /dock
    said_04dc /door,(allumer[<gallery])
    said_04ea /path
    said_04ee /fumee,cheminee
    said_04f5 <below/dock
    said_04fc [<around,at][/room]
    said_050a bathe,dive,patauger
    said_0513 enter,aller,hop,dive,(get<dans)/eau,brook
    said_052d get,detach/aigle
    said_0536 get/sign
    said_053c look,etudier/sign
    said_0545 look/aigle
    said_054b look/monument
    said_0551 look>
)

(local
    local0 = $0000
)

// 055c
(instance public Room28 of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $1c
        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:39 57            pushi 57 // $57 init
  000e:76               push0 
  000f:57 37 04         super Rm 4 

  0012:35 7c              ldi 7c 
  0014:65 16             aTop horizon 
  0016:35 1d              ldi 1d 
  0018:65 1c             aTop east 
  001a:35 1b              ldi 1b 
  001c:65 20             aTop west 
  001e:35 16              ldi 16 
  0020:65 1a             aTop north 
  0022:35 01              ldi 1 
  0024:65 1e             aTop south 
  0026:39 61            pushi 61 // $61 add
  0028:39 03            pushi 3 // $3 y
  002a:74 071d          lofss $074a // Sign
  002d:74 0750          lofss $0780 // Bird1
  0030:74 0783          lofss $07b6 // Bird2
  0033:39 62            pushi 62 // $62 eachElementDo
  0035:78               push1 
  0036:39 57            pushi 57 // $57 init
  0038:39 3c            pushi 3c // $3c doit
  003a:76               push0 
  003b:81 0a              lag gAddToPics 
  003d:4a 14             send 14 

  003f:38 010a          pushi 10a // $10a setRegions
  0042:7a               push2 
  0043:38 00ce          pushi ce // $ce yLast
  0046:38 00cf          pushi cf // $cf blocks
  0049:38 010b          pushi 10b // $10b setFeatures
  004c:39 05            pushi 5 // $5 view
  004e:74 06f9          lofss $074a // Sign
  0051:74 0798          lofss $07ec // House
  0054:74 07c1          lofss $0818 // Statue
  0057:74 0726          lofss $0780 // Bird1
  005a:74 0759          lofss $07b6 // Bird2
  005d:54 16             self 16 

  005f:7a               push2 
  0060:38 0080          pushi 80 // $80 timeLeft
  0063:39 09            pushi 9 // $9 nsTop
  0065:43 00 04         callk Load 4 

  0068:39 2b            pushi 2b // $2b number
  006a:78               push1 
  006b:39 11            pushi 11 // $11 signal
  006d:39 06            pushi 6 // $6 loop
  006f:78               push1 
  0070:76               push0 
  0071:72 080c          lofsa $0880 // Thunder
  0074:4a 0c             send c 

  0076:80 00df            lag gDetailLevel 
  0079:31 3c              bnt code_00b7 
  007b:38 00a4          pushi a4 // $a4 cycleSpeed
  007e:78               push1 
  007f:7a               push2 
  0080:39 7e            pushi 7e // $7e setCycle
  0082:78               push1 
  0083:51 16            class Fwd 
  0085:36                push 
  0086:39 57            pushi 57 // $57 init
  0088:76               push0 
  0089:72 0622          lofsa $06ae // smoke1
  008c:4a 10             send 10 

  008e:38 00a4          pushi a4 // $a4 cycleSpeed
  0091:78               push1 
  0092:7a               push2 
  0093:39 7e            pushi 7e // $7e setCycle
  0095:78               push1 
  0096:51 16            class Fwd 
  0098:36                push 
  0099:39 57            pushi 57 // $57 init
  009b:76               push0 
  009c:72 065d          lofsa $06fc // smoke2
  009f:4a 10             send 10 

  00a1:39 57            pushi 57 // $57 init
  00a3:76               push0 
  00a4:72 056b          lofsa $0612 // light1
  00a7:4a 04             send 4 

  00a9:39 57            pushi 57 // $57 init
  00ab:76               push0 
  00ac:39 7a            pushi 7a // $7a setScript
  00ae:78               push1 
  00af:74 0500          lofss $05b2 // showers
  00b2:72 05ab          lofsa $0660 // light2
  00b5:4a 0a             send a 


        code_00b7
  00b7:89 0c              lsg gPrevRoomNum 
  00b9:3c                 dup 
  00ba:35 01              ldi 1 
  00bc:1a                 eq? 
  00bd:31 15              bnt code_00d4 
  00bf:39 06            pushi 6 // $6 loop
  00c1:78               push1 
  00c2:39 03            pushi 3 // $3 y
  00c4:38 00c5          pushi c5 // $c5 posn
  00c7:7a               push2 
  00c8:38 009d          pushi 9d // $9d cycleDir
  00cb:38 00bc          pushi bc // $bc motionInited
  00ce:81 00              lag gEgo 
  00d0:4a 0e             send e 

  00d2:33 33              jmp code_0107 

        code_00d4
  00d4:3c                 dup 
  00d5:35 16              ldi 16 
  00d7:1a                 eq? 
  00d8:31 0f              bnt code_00e9 
  00da:38 00c5          pushi c5 // $c5 posn
  00dd:7a               push2 
  00de:38 00a0          pushi a0 // $a0 cycleDone
  00e1:39 7f            pushi 7f // $7f setReal
  00e3:81 00              lag gEgo 
  00e5:4a 08             send 8 

  00e7:33 1e              jmp code_0107 

        code_00e9
  00e9:3c                 dup 
  00ea:35 1d              ldi 1d 
  00ec:1a                 eq? 
  00ed:31 18              bnt code_0107 
  00ef:39 03            pushi 3 // $3 y
  00f1:76               push0 
  00f2:81 00              lag gEgo 
  00f4:4a 04             send 4 

  00f6:36                push 
  00f7:34 0081            ldi 81 
  00fa:22                 lt? 
  00fb:31 0a              bnt code_0107 
  00fd:39 03            pushi 3 // $3 y
  00ff:78               push1 
  0100:38 0081          pushi 81 // $81 prevSignal
  0103:81 00              lag gEgo 
  0105:4a 06             send 6 


        code_0107
  0107:3a                toss 
  0108:39 05            pushi 5 // $5 view
  010a:78               push1 
  010b:76               push0 
  010c:39 57            pushi 57 // $57 init
  010e:76               push0 
  010f:81 00              lag gEgo 
  0111:4a 0a             send a 

  0113:76               push0 
  0114:45 04 00         callb procedure_0004 0 // HandsOn 

  0117:48                 ret 
    )

    (method (newRoom) // method_0118
  0118:38 00f8          pushi f8 // $f8 newRoom
  011b:78               push1 
  011c:8f 01              lsp param1 
  011e:57 37 06         super Rm 6 

  0121:48                 ret 
    )

    (method (doit) // method_0122
  0122:76               push0 
  0123:45 14 00         callb procedure_0014 0 // IsFirstTimeInRoom 

  0126:31 0a              bnt code_0132 
  0128:7a               push2 
  0129:39 1c            pushi 1c // $1c color
  012b:76               push0 
  012c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0132
  0132:38 00db          pushi db // $db onControl
  0135:78               push1 
  0136:76               push0 
  0137:81 00              lag gEgo 
  0139:4a 06             send 6 

  013b:36                push 
  013c:35 04              ldi 4 
  013e:12                 and 
  013f:31 19              bnt code_015a 
  0141:8b 00              lsl local0 
  0143:35 00              ldi 0 
  0145:1a                 eq? 
  0146:31 12              bnt code_015a 
  0148:35 01              ldi 1 
  014a:a3 00              sal local0 
  014c:35 00              ldi 0 
  014e:65 1e             aTop south 
  0150:65 1a             aTop north 
  0152:39 7a            pushi 7a // $7a setScript
  0154:78               push1 
  0155:74 048a          lofss $05e2 // falling
  0158:54 06             self 6 


        code_015a
  015a:39 3c            pushi 3c // $3c doit
  015c:76               push0 
  015d:57 37 04         super Rm 4 

  0160:48                 ret 
    )

    (method (dispose) // method_0161
  0161:39 58            pushi 58 // $58 dispose
  0163:76               push0 
  0164:57 37 04         super Rm 4 

  0167:48                 ret 
    )

    (method (handleEvent) // method_0168
  0168:39 4c            pushi 4c // $4c claimed
  016a:76               push0 
  016b:87 01              lap param1 
  016d:4a 04             send 4 

  016f:31 03              bnt code_0174 
  0171:35 01              ldi 1 
  0173:48                 ret 

        code_0174
  0174:39 22            pushi 22 // $22 type
  0176:76               push0 
  0177:87 01              lap param1 
  0179:4a 04             send 4 

  017b:36                push 
  017c:34 0080            ldi 80 
  017f:1a                 eq? 
  0180:30 00a8            bnt code_022b 
  0183:78               push1 
  0184:74 03ca          lofss $0551 // look>
  0187:43 25 02         callk Said 2 

  018a:30 0081            bnt code_020e 
  018d:78               push1 
  018e:74 036b          lofss $04fc // [<around,at][/room]
  0191:43 25 02         callk Said 2 

  0194:31 0c              bnt code_01a2 
  0196:7a               push2 
  0197:39 1c            pushi 1c // $1c color
  0199:76               push0 
  019a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  01a0:33 6a              jmp code_020c 

        code_01a2
  01a2:78               push1 
  01a3:74 0344          lofss $04ea // /path
  01a6:43 25 02         callk Said 2 

  01a9:31 0c              bnt code_01b7 
  01ab:7a               push2 
  01ac:39 1c            pushi 1c // $1c color
  01ae:78               push1 
  01af:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  01b5:33 55              jmp code_020c 

        code_01b7
  01b7:78               push1 
  01b8:74 033a          lofss $04f5 // <below/dock
  01bb:43 25 02         callk Said 2 

  01be:31 0c              bnt code_01cc 
  01c0:7a               push2 
  01c1:39 1c            pushi 1c // $1c color
  01c3:7a               push2 
  01c4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  01ca:33 40              jmp code_020c 

        code_01cc
  01cc:78               push1 
  01cd:74 0308          lofss $04d8 // /dock
  01d0:43 25 02         callk Said 2 

  01d3:31 0d              bnt code_01e2 
  01d5:7a               push2 
  01d6:39 1c            pushi 1c // $1c color
  01d8:39 03            pushi 3 // $3 y
  01da:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  01e0:33 2a              jmp code_020c 

        code_01e2
  01e2:78               push1 
  01e3:74 02f6          lofss $04dc // /door,(allumer[<gallery])
  01e6:43 25 02         callk Said 2 

  01e9:31 0d              bnt code_01f8 
  01eb:7a               push2 
  01ec:39 1c            pushi 1c // $1c color
  01ee:39 04            pushi 4 // $4 x
  01f0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  01f6:33 14              jmp code_020c 

        code_01f8
  01f8:78               push1 
  01f9:74 02f2          lofss $04ee // /fumee,cheminee
  01fc:43 25 02         callk Said 2 

  01ff:31 0b              bnt code_020c 
  0201:7a               push2 
  0202:39 1c            pushi 1c // $1c color
  0204:39 05            pushi 5 // $5 view
  0206:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_020c
  020c:33 1d              jmp code_022b 

        code_020e
  020e:78               push1 
  020f:74 02f8          lofss $050a // bathe,dive,patauger
  0212:43 25 02         callk Said 2 

  0215:2f 09               bt code_0220 
  0217:78               push1 
  0218:74 02f8          lofss $0513 // enter,aller,hop,dive,(get<dans)/eau,brook
  021b:43 25 02         callk Said 2 

  021e:31 0b              bnt code_022b 

        code_0220
  0220:7a               push2 
  0221:39 1c            pushi 1c // $1c color
  0223:39 06            pushi 6 // $6 loop
  0225:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_022b
  022b:48                 ret 
    )

)

// 05ac
(instance showers 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_022c
  022c:87 01              lap param1 
  022e:65 0a             aTop state 
  0230:36                push 
  0231:3c                 dup 
  0232:35 00              ldi 0 
  0234:1a                 eq? 
  0235:31 09              bnt code_0240 
  0237:35 03              ldi 3 
  0239:65 0a             aTop state 
  023b:65 12             aTop seconds 
  023d:32 0081            jmp code_02c1 

        code_0240
  0240:3c                 dup 
  0241:35 01              ldi 1 
  0243:1a                 eq? 
  0244:31 1c              bnt code_0262 
  0246:39 7e            pushi 7e // $7e setCycle
  0248:78               push1 
  0249:51 16            class Fwd 
  024b:36                push 
  024c:72 03c3          lofsa $0612 // light1
  024f:4a 06             send 6 

  0251:39 7e            pushi 7e // $7e setCycle
  0253:78               push1 
  0254:51 16            class Fwd 
  0256:36                push 
  0257:72 0406          lofsa $0660 // light2
  025a:4a 06             send 6 

  025c:35 07              ldi 7 
  025e:65 10             aTop cycles 
  0260:33 5f              jmp code_02c1 

        code_0262
  0262:3c                 dup 
  0263:35 02              ldi 2 
  0265:1a                 eq? 
  0266:31 19              bnt code_0281 
  0268:39 7e            pushi 7e // $7e setCycle
  026a:78               push1 
  026b:51 1a            class End 
  026d:36                push 
  026e:72 03a1          lofsa $0612 // light1
  0271:4a 06             send 6 

  0273:39 7e            pushi 7e // $7e setCycle
  0275:7a               push2 
  0276:51 1a            class End 
  0278:36                push 
  0279:7c            pushSelf 
  027a:72 03e3          lofsa $0660 // light2
  027d:4a 08             send 8 

  027f:33 40              jmp code_02c1 

        code_0281
  0281:3c                 dup 
  0282:35 03              ldi 3 
  0284:1a                 eq? 
  0285:31 0f              bnt code_0296 
  0287:39 06            pushi 6 // $6 loop
  0289:78               push1 
  028a:78               push1 
  028b:39 2a            pushi 2a // $2a play
  028d:78               push1 
  028e:7c            pushSelf 
  028f:72 05ee          lofsa $0880 // Thunder
  0292:4a 0c             send c 

  0294:33 2b              jmp code_02c1 

        code_0296
  0296:3c                 dup 
  0297:35 04              ldi 4 
  0299:1a                 eq? 
  029a:31 17              bnt code_02b3 
  029c:7a               push2 
  029d:78               push1 
  029e:39 64            pushi 64 // $64 allTrue
  02a0:43 40 04         callk Random 4 

  02a3:36                push 
  02a4:35 0f              ldi f 
  02a6:22                 lt? 
  02a7:31 04              bnt code_02ad 
  02a9:35 00              ldi 0 
  02ab:65 0a             aTop state 

        code_02ad
  02ad:35 07              ldi 7 
  02af:65 10             aTop cycles 
  02b1:33 0e              jmp code_02c1 

        code_02b3
  02b3:3c                 dup 
  02b4:35 05              ldi 5 
  02b6:1a                 eq? 
  02b7:31 08              bnt code_02c1 
  02b9:35 03              ldi 3 
  02bb:65 0a             aTop state 
  02bd:35 05              ldi 5 
  02bf:65 12             aTop seconds 

        code_02c1
  02c1:3a                toss 
  02c2:48                 ret 
    )

)

// 05dc
(instance falling 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_02c3
  02c3:87 01              lap param1 
  02c5:65 0a             aTop state 
  02c7:36                push 
  02c8:3c                 dup 
  02c9:35 00              ldi 0 
  02cb:1a                 eq? 
  02cc:31 1c              bnt code_02ea 
  02ce:76               push0 
  02cf:45 03 00         callb procedure_0003 0 // HandsOff 

  02d2:39 05            pushi 5 // $5 view
  02d4:78               push1 
  02d5:39 09            pushi 9 // $9 nsTop
  02d7:38 00c8          pushi c8 // $c8 setLoop
  02da:78               push1 
  02db:76               push0 
  02dc:39 7e            pushi 7e // $7e setCycle
  02de:7a               push2 
  02df:51 1a            class End 
  02e1:36                push 
  02e2:7c            pushSelf 
  02e3:81 00              lag gEgo 
  02e5:4a 14             send 14 

  02e7:32 00cb            jmp code_03b5 

        code_02ea
  02ea:3c                 dup 
  02eb:35 01              ldi 1 
  02ed:1a                 eq? 
  02ee:31 16              bnt code_0306 
  02f0:38 00c8          pushi c8 // $c8 setLoop
  02f3:78               push1 
  02f4:78               push1 
  02f5:39 7e            pushi 7e // $7e setCycle
  02f7:78               push1 
  02f8:51 16            class Fwd 
  02fa:36                push 
  02fb:81 00              lag gEgo 
  02fd:4a 0c             send c 

  02ff:35 03              ldi 3 
  0301:65 10             aTop cycles 
  0303:32 00af            jmp code_03b5 

        code_0306
  0306:3c                 dup 
  0307:35 02              ldi 2 
  0309:1a                 eq? 
  030a:31 1c              bnt code_0328 
  030c:38 00c8          pushi c8 // $c8 setLoop
  030f:78               push1 
  0310:7a               push2 
  0311:39 42            pushi 42 // $42 setPri
  0313:78               push1 
  0314:39 0f            pushi f // $f lsBottom
  0316:39 7e            pushi 7e // $7e setCycle
  0318:7a               push2 
  0319:51 1a            class End 
  031b:36                push 
  031c:7c            pushSelf 
  031d:39 12            pushi 12 // $12 illegalBits
  031f:78               push1 
  0320:76               push0 
  0321:81 00              lag gEgo 
  0323:4a 1a             send 1a 

  0325:32 008d            jmp code_03b5 

        code_0328
  0328:3c                 dup 
  0329:35 03              ldi 3 
  032b:1a                 eq? 
  032c:31 2c              bnt code_035a 
  032e:38 00a2          pushi a2 // $a2 setCel
  0331:78               push1 
  0332:39 09            pushi 9 // $9 nsTop
  0334:39 7e            pushi 7e // $7e setCycle
  0336:78               push1 
  0337:76               push0 
  0338:38 00dc          pushi dc // $dc setStep
  033b:7a               push2 
  033c:39 0a            pushi a // $a nsLeft
  033e:39 0a            pushi a // $a nsLeft
  0340:38 00d3          pushi d3 // $d3 setMotion
  0343:39 04            pushi 4 // $4 x
  0345:51 1d            class MoveTo 
  0347:36                push 
  0348:39 04            pushi 4 // $4 x
  034a:76               push0 
  034b:81 00              lag gEgo 
  034d:4a 04             send 4 

  034f:36                push 
  0350:38 00c8          pushi c8 // $c8 setLoop
  0353:7c            pushSelf 
  0354:81 00              lag gEgo 
  0356:4a 20             send 20 

  0358:33 5b              jmp code_03b5 

        code_035a
  035a:3c                 dup 
  035b:35 04              ldi 4 
  035d:1a                 eq? 
  035e:31 2a              bnt code_038a 
  0360:39 2a            pushi 2a // $2a play
  0362:76               push0 
  0363:72 0544          lofsa $08aa // Splash
  0366:4a 04             send 4 

  0368:38 00c5          pushi c5 // $c5 posn
  036b:7a               push2 
  036c:39 04            pushi 4 // $4 x
  036e:76               push0 
  036f:81 00              lag gEgo 
  0371:4a 04             send 4 

  0373:36                push 
  0374:38 00be          pushi be // $be offScreenOK
  0377:38 00c8          pushi c8 // $c8 setLoop
  037a:78               push1 
  037b:39 06            pushi 6 // $6 loop
  037d:39 7e            pushi 7e // $7e setCycle
  037f:7a               push2 
  0380:51 1a            class End 
  0382:36                push 
  0383:7c            pushSelf 
  0384:81 00              lag gEgo 
  0386:4a 16             send 16 

  0388:33 2b              jmp code_03b5 

        code_038a
  038a:3c                 dup 
  038b:35 05              ldi 5 
  038d:1a                 eq? 
  038e:31 25              bnt code_03b5 
  0390:38 0089          pushi 89 // $89 hide
  0393:76               push0 
  0394:81 00              lag gEgo 
  0396:4a 04             send 4 

  0398:72 04a9          lofsa $0844 // myIcon
  039b:a0 0080            sag global128 
  039e:35 00              ldi 0 
  03a0:a0 0081            sag global129 
  03a3:35 00              ldi 0 
  03a5:a0 0082            sag global130 
  03a8:35 01              ldi 1 
  03aa:a0 0084            sag global132 
  03ad:7a               push2 
  03ae:39 1c            pushi 1c // $1c color
  03b0:39 07            pushi 7 // $7 cel
  03b2:45 13 04         callb procedure_0013 4 // EgoDead 


        code_03b5
  03b5:3a                toss 
  03b6:48                 ret 
    )

)

// 060c
(instance light1 of Prop
    (properties
        y $2a
        x $56
        z $0
        heading $0
        yStep $2
        view $80
        loop $2
        cel $1
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

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

// 06a8
(instance smoke1 of Prop
    (properties
        y $19
        x $8e
        z $0
        heading $0
        yStep $2
        view $80
        loop $8
        cel $2
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
    )
)

// 06f6
(instance smoke2 of Prop
    (properties
        y $19
        x $b3
        z $0
        heading $0
        yStep $2
        view $80
        loop $8
        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
    )
)

// 0744
(instance Sign of RPicView
    (properties
        y $87
        x $91
        z $0
        heading $0
        view $80
        loop $1
        cel $1
        priority $c
        signal $4000
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_03b7
  03b7:78               push1 
  03b8:74 017b          lofss $0536 // get/sign
  03bb:43 25 02         callk Said 2 

  03be:31 0d              bnt code_03cd 
  03c0:7a               push2 
  03c1:39 1c            pushi 1c // $1c color
  03c3:39 08            pushi 8 // $8 underBits
  03c5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03cb:33 46              jmp code_0413 

        code_03cd
  03cd:39 03            pushi 3 // $3 y
  03cf:7c            pushSelf 
  03d0:8f 01              lsp param1 
  03d2:39 03            pushi 3 // $3 y
  03d4:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  03da:2f 09               bt code_03e5 
  03dc:78               push1 
  03dd:74 015c          lofss $053c // look,etudier/sign
  03e0:43 25 02         callk Said 2 

  03e3:31 2e              bnt code_0413 

        code_03e5
  03e5:39 03            pushi 3 // $3 y
  03e7:76               push0 
  03e8:81 00              lag gEgo 
  03ea:4a 04             send 4 

  03ec:36                push 
  03ed:34 00a0            ldi a0 
  03f0:1e                 gt? 
  03f1:31 0d              bnt code_0400 
  03f3:7a               push2 
  03f4:39 1c            pushi 1c // $1c color
  03f6:39 09            pushi 9 // $9 nsTop
  03f8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03fe:33 0b              jmp code_040b 

        code_0400
  0400:7a               push2 
  0401:39 1c            pushi 1c // $1c color
  0403:39 0a            pushi a // $a nsLeft
  0405:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_040b
  040b:39 4c            pushi 4c // $4c claimed
  040d:78               push1 
  040e:78               push1 
  040f:87 01              lap param1 
  0411:4a 06             send 6 


        code_0413
  0413:48                 ret 
    )

)

// 077a
(instance Bird1 of RPicView
    (properties
        y $67
        x $6f
        z $0
        heading $0
        view $80
        loop $1
        cel $0
        priority $c
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0414
  0414:78               push1 
  0415:74 0115          lofss $052d // get,detach/aigle
  0418:43 25 02         callk Said 2 

  041b:31 0d              bnt code_042a 
  041d:7a               push2 
  041e:39 1c            pushi 1c // $1c color
  0420:39 0b            pushi b // $b nsBottom
  0422:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0428:33 2b              jmp code_0455 

        code_042a
  042a:39 03            pushi 3 // $3 y
  042c:7c            pushSelf 
  042d:8f 01              lsp param1 
  042f:39 03            pushi 3 // $3 y
  0431:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0437:2f 09               bt code_0442 
  0439:78               push1 
  043a:74 0108          lofss $0545 // look/aigle
  043d:43 25 02         callk Said 2 

  0440:31 13              bnt code_0455 

        code_0442
  0442:39 4c            pushi 4c // $4c claimed
  0444:78               push1 
  0445:78               push1 
  0446:87 01              lap param1 
  0448:4a 06             send 6 

  044a:7a               push2 
  044b:39 1c            pushi 1c // $1c color
  044d:39 0c            pushi c // $c nsRight
  044f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0455
  0455:48                 ret 
    )

)

// 07b0
(instance Bird2 of RPicView
    (properties
        y $67
        x $cf
        z $0
        heading $0
        view $80
        loop $1
        cel $0
        priority $c
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
    )
    (method (handleEvent) // method_0456
  0456:39 03            pushi 3 // $3 y
  0458:7c            pushSelf 
  0459:8f 01              lsp param1 
  045b:39 03            pushi 3 // $3 y
  045d:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0463:31 13              bnt code_0478 
  0465:39 4c            pushi 4c // $4c claimed
  0467:78               push1 
  0468:78               push1 
  0469:87 01              lap param1 
  046b:4a 06             send 6 

  046d:7a               push2 
  046e:39 1c            pushi 1c // $1c color
  0470:39 0c            pushi c // $c nsRight
  0472:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0478
  0478:48                 ret 
    )

)

// 07e6
(instance House of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $22
        nsLeft $60
        nsBottom $52
        nsRight $e2
    )
    (method (handleEvent) // method_0479
  0479:39 03            pushi 3 // $3 y
  047b:7c            pushSelf 
  047c:8f 01              lsp param1 
  047e:39 03            pushi 3 // $3 y
  0480:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0486:31 0f              bnt code_0497 
  0488:39 4c            pushi 4c // $4c claimed
  048a:78               push1 
  048b:78               push1 
  048c:87 01              lap param1 
  048e:4a 06             send 6 

  0490:78               push1 
  0491:74 047a          lofss $090e // house
  0494:45 19 02         callb procedure_0019 2 // DoLook 


        code_0497
  0497:48                 ret 
    )

)

// 0812
(instance Statue of RFeature
    (properties
        y $0
        x $0
        z $0
        heading $0
        nsTop $50
        nsLeft $9d
        nsBottom $60
        nsRight $a3
    )
    (method (handleEvent) // method_0498
  0498:39 03            pushi 3 // $3 y
  049a:7c            pushSelf 
  049b:8f 01              lsp param1 
  049d:39 03            pushi 3 // $3 y
  049f:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  04a5:2f 09               bt code_04b0 
  04a7:78               push1 
  04a8:74 00a0          lofss $054b // look/monument
  04ab:43 25 02         callk Said 2 

  04ae:31 13              bnt code_04c3 

        code_04b0
  04b0:39 4c            pushi 4c // $4c claimed
  04b2:78               push1 
  04b3:78               push1 
  04b4:87 01              lap param1 
  04b6:4a 06             send 6 

  04b8:7a               push2 
  04b9:39 1c            pushi 1c // $1c color
  04bb:39 0d            pushi d // $d lsTop
  04bd:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_04c3
  04c3:48                 ret 
    )

)

// 083e
(instance myIcon of DCIcon
    (properties
        type $4
        state $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        key $0
        said $0
        value $0
        view $28c
        loop $0
        cel $0
        cycler $0
        cycleSpeed $10
        signal $0
        count $ffff
    )
    (method (init) // method_04c4
  04c4:39 57            pushi 57 // $57 init
  04c6:78               push1 
  04c7:7c            pushSelf 
  04c8:39 56            pushi 56 // $56 new
  04ca:76               push0 
  04cb:51 16            class Fwd 
  04cd:4a 04             send 4 

  04cf:65 20             aTop cycler 
  04d1:4a 06             send 6 

  04d3:48                 ret 
    )

)

// 087a
(instance Thunder of Sound
    (properties
        state $0
        number $0
        priority $0
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)

// 08a4
(instance Splash of Sound
    (properties
        state $0
        number $52
        priority $0
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)



