(script 269)

(string
    string_068c "Feather"
    string_0694 "Jeeves"
    string_069b "sweepFeather"
    string_06a8 "sweeping"
    string_06b1 ""
)

(said
    said_0514 /butler>
    said_0519 ask,raconter//*<about
    said_0526 embrace
    said_0529 draguer
    said_052c get
    said_052f get/feather
    said_0535 deliver,hold/*
    said_053e abattre
    said_0541 embrasser
    said_0544 ecouter
    said_0547 look/butler
    said_054d look/feather
    said_0553 bonjour
)

(synonym
    butler | jeeves = person | personne
    butler | jeeves = fellow | gars | gentleman | guy | homme | man | type
)

(local
    local0 = $0088
    local1 = $008d
    local2 = $0045
    local3 = $0093
    local4 = $008b
    local5 = $008d
    local6 = $0000
    local7 = $0000
    local8 = $0000
)

// 055c
(instance public sweeping of Rgn
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
    )
    (method (init) // method_001a
  001a:39 57            pushi 57 // $57 init
  001c:76               push0 
  001d:57 36 04         super Rgn 4 

  0020:78               push1 
  0021:38 03de          pushi 3de // $3de sel_990
  0024:43 03 02         callk DisposeScript 2 

  0027:34 0400            ldi 400 
  002a:a0 00c3            sag global195 
  002d:39 03            pushi 3 // $3 y
  002f:38 0080          pushi 80 // $80 timeLeft
  0032:38 01cb          pushi 1cb // $1cb sel_459
  0035:38 038e          pushi 38e // $38e sel_910
  0038:45 15 06         callb procedure_0015 6 // LoadMany 

  003b:39 05            pushi 5 // $5 view
  003d:78               push1 
  003e:38 01bf          pushi 1bf // $1bf sel_447
  0041:39 7e            pushi 7e // $7e setCycle
  0043:78               push1 
  0044:51 17            class Walk 
  0046:36                push 
  0047:38 00c5          pushi c5 // $c5 posn
  004a:7a               push2 
  004b:38 014a          pushi 14a // $14a eyesID
  004e:38 0096          pushi 96 // $96 busy
  0051:39 57            pushi 57 // $57 init
  0053:76               push0 
  0054:39 7a            pushi 7a // $7a setScript
  0056:78               push1 
  0057:74 053a          lofss $0594 // sweepFeather
  005a:72 0567          lofsa $05c4 // Jeeves
  005d:4a 1e             send 1e 

  005f:39 42            pushi 42 // $42 setPri
  0061:78               push1 
  0062:39 08            pushi 8 // $8 underBits
  0064:38 00c9          pushi c9 // $c9 ignoreActors
  0067:78               push1 
  0068:78               push1 
  0069:39 57            pushi 57 // $57 init
  006b:76               push0 
  006c:72 05bd          lofsa $062c // Feather
  006f:4a 10             send 10 

  0071:48                 ret 
    )

    (method (doit) // method_0072
  0072:39 3d            pushi 3d // $3d isBlocked
  0074:76               push0 
  0075:72 054c          lofsa $05c4 // Jeeves
  0078:4a 04             send 4 

  007a:31 16              bnt code_0092 
  007c:83 08              lal local8 
  007e:18                 not 
  007f:31 0f              bnt code_0090 
  0081:35 01              ldi 1 
  0083:a3 08              sal local8 
  0085:7a               push2 
  0086:38 010d          pushi 10d // $10d drawPic
  0089:76               push0 
  008a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0090
  0090:33 04              jmp code_0096 

        code_0092
  0092:35 00              ldi 0 
  0094:a3 08              sal local8 

        code_0096
  0096:39 3c            pushi 3c // $3c doit
  0098:76               push0 
  0099:57 36 04         super Rgn 4 

  009c:48                 ret 
    )

    (method (dispose) // method_009d
  009d:39 58            pushi 58 // $58 dispose
  009f:76               push0 
  00a0:57 36 04         super Rgn 4 

  00a3:48                 ret 
    )

    (method (handleEvent) // method_00a4
  00a4:39 4c            pushi 4c // $4c claimed
  00a6:76               push0 
  00a7:87 01              lap param1 
  00a9:4a 04             send 4 

  00ab:31 03              bnt code_00b0 
  00ad:35 01              ldi 1 
  00af:48                 ret 

        code_00b0
  00b0:48                 ret 
    )

)

// 058e
(instance sweepFeather 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_00b1
  00b1:87 01              lap param1 
  00b3:65 0a             aTop state 
  00b5:36                push 
  00b6:3c                 dup 
  00b7:35 00              ldi 0 
  00b9:1a                 eq? 
  00ba:31 07              bnt code_00c3 
  00bc:35 05              ldi 5 
  00be:65 12             aTop seconds 
  00c0:32 0181            jmp code_0244 

        code_00c3
  00c3:3c                 dup 
  00c4:35 01              ldi 1 
  00c6:1a                 eq? 
  00c7:31 1c              bnt code_00e5 
  00c9:38 00d3          pushi d3 // $d3 setMotion
  00cc:39 04            pushi 4 // $4 x
  00ce:51 1d            class MoveTo 
  00d0:36                push 
  00d1:38 00fa          pushi fa // $fa restart
  00d4:38 0097          pushi 97 // $97 open
  00d7:7c            pushSelf 
  00d8:72 04e9          lofsa $05c4 // Jeeves
  00db:4a 0c             send c 

  00dd:35 01              ldi 1 
  00df:a0 0175            sag global373 
  00e2:32 015f            jmp code_0244 

        code_00e5
  00e5:3c                 dup 
  00e6:35 02              ldi 2 
  00e8:1a                 eq? 
  00e9:31 26              bnt code_0111 
  00eb:88 008d            lsg global141 
  00ee:35 02              ldi 2 
  00f0:14                  or 
  00f1:a0 008d            sag global141 
  00f4:39 05            pushi 5 // $5 view
  00f6:78               push1 
  00f7:38 01cb          pushi 1cb // $1cb sel_459
  00fa:39 07            pushi 7 // $7 cel
  00fc:78               push1 
  00fd:76               push0 
  00fe:39 06            pushi 6 // $6 loop
  0100:78               push1 
  0101:78               push1 
  0102:39 7e            pushi 7e // $7e setCycle
  0104:7a               push2 
  0105:51 1a            class End 
  0107:36                push 
  0108:7c            pushSelf 
  0109:72 04b8          lofsa $05c4 // Jeeves
  010c:4a 1a             send 1a 

  010e:32 0133            jmp code_0244 

        code_0111
  0111:3c                 dup 
  0112:35 03              ldi 3 
  0114:1a                 eq? 
  0115:31 1f              bnt code_0136 
  0117:39 06            pushi 6 // $6 loop
  0119:78               push1 
  011a:39 03            pushi 3 // $3 y
  011c:39 7e            pushi 7e // $7e setCycle
  011e:78               push1 
  011f:51 16            class Fwd 
  0121:36                push 
  0122:72 049f          lofsa $05c4 // Jeeves
  0125:4a 0c             send c 

  0127:39 58            pushi 58 // $58 dispose
  0129:76               push0 
  012a:72 04ff          lofsa $062c // Feather
  012d:4a 04             send 4 

  012f:35 04              ldi 4 
  0131:65 12             aTop seconds 
  0133:32 010e            jmp code_0244 

        code_0136
  0136:3c                 dup 
  0137:35 04              ldi 4 
  0139:1a                 eq? 
  013a:31 17              bnt code_0153 
  013c:39 07            pushi 7 // $7 cel
  013e:78               push1 
  013f:7a               push2 
  0140:39 06            pushi 6 // $6 loop
  0142:78               push1 
  0143:78               push1 
  0144:39 7e            pushi 7e // $7e setCycle
  0146:7a               push2 
  0147:51 1b            class Beg 
  0149:36                push 
  014a:7c            pushSelf 
  014b:72 0476          lofsa $05c4 // Jeeves
  014e:4a 14             send 14 

  0150:32 00f1            jmp code_0244 

        code_0153
  0153:3c                 dup 
  0154:35 05              ldi 5 
  0156:1a                 eq? 
  0157:31 2f              bnt code_0188 
  0159:39 05            pushi 5 // $5 view
  015b:78               push1 
  015c:38 01bf          pushi 1bf // $1bf sel_447
  015f:39 7e            pushi 7e // $7e setCycle
  0161:78               push1 
  0162:51 17            class Walk 
  0164:36                push 
  0165:38 00d3          pushi d3 // $d3 setMotion
  0168:39 04            pushi 4 // $4 x
  016a:51 1d            class MoveTo 
  016c:36                push 
  016d:8b 06              lsl local6 
  016f:35 02              ldi 2 
  0171:06                 mul 
  0172:9b 00             lsli local0 
  0174:8b 06              lsl local6 
  0176:35 02              ldi 2 
  0178:06                 mul 
  0179:36                push 
  017a:35 01              ldi 1 
  017c:02                 add 
  017d:9b 00             lsli local0 
  017f:7c            pushSelf 
  0180:72 0441          lofsa $05c4 // Jeeves
  0183:4a 18             send 18 

  0185:32 00bc            jmp code_0244 

        code_0188
  0188:3c                 dup 
  0189:35 06              ldi 6 
  018b:1a                 eq? 
  018c:31 1d              bnt code_01ab 
  018e:39 05            pushi 5 // $5 view
  0190:78               push1 
  0191:38 01cb          pushi 1cb // $1cb sel_459
  0194:39 07            pushi 7 // $7 cel
  0196:78               push1 
  0197:76               push0 
  0198:39 06            pushi 6 // $6 loop
  019a:78               push1 
  019b:76               push0 
  019c:39 7e            pushi 7e // $7e setCycle
  019e:7a               push2 
  019f:51 1a            class End 
  01a1:36                push 
  01a2:7c            pushSelf 
  01a3:72 041e          lofsa $05c4 // Jeeves
  01a6:4a 1a             send 1a 

  01a8:32 0099            jmp code_0244 

        code_01ab
  01ab:3c                 dup 
  01ac:35 07              ldi 7 
  01ae:1a                 eq? 
  01af:31 15              bnt code_01c6 
  01b1:39 06            pushi 6 // $6 loop
  01b3:78               push1 
  01b4:7a               push2 
  01b5:39 7e            pushi 7e // $7e setCycle
  01b7:78               push1 
  01b8:51 16            class Fwd 
  01ba:36                push 
  01bb:72 0406          lofsa $05c4 // Jeeves
  01be:4a 0c             send c 

  01c0:35 04              ldi 4 
  01c2:65 12             aTop seconds 
  01c4:33 7e              jmp code_0244 

        code_01c6
  01c6:3c                 dup 
  01c7:35 08              ldi 8 
  01c9:1a                 eq? 
  01ca:31 16              bnt code_01e2 
  01cc:39 07            pushi 7 // $7 cel
  01ce:78               push1 
  01cf:7a               push2 
  01d0:39 06            pushi 6 // $6 loop
  01d2:78               push1 
  01d3:76               push0 
  01d4:39 7e            pushi 7e // $7e setCycle
  01d6:7a               push2 
  01d7:51 1b            class Beg 
  01d9:36                push 
  01da:7c            pushSelf 
  01db:72 03e6          lofsa $05c4 // Jeeves
  01de:4a 14             send 14 

  01e0:33 62              jmp code_0244 

        code_01e2
  01e2:3c                 dup 
  01e3:35 09              ldi 9 
  01e5:1a                 eq? 
  01e6:31 29              bnt code_0211 
  01e8:39 05            pushi 5 // $5 view
  01ea:78               push1 
  01eb:38 01bf          pushi 1bf // $1bf sel_447
  01ee:39 7e            pushi 7e // $7e setCycle
  01f0:78               push1 
  01f1:51 17            class Walk 
  01f3:36                push 
  01f4:38 00c9          pushi c9 // $c9 ignoreActors
  01f7:78               push1 
  01f8:76               push0 
  01f9:72 03c8          lofsa $05c4 // Jeeves
  01fc:4a 12             send 12 

  01fe:8b 06              lsl local6 
  0200:35 02              ldi 2 
  0202:22                 lt? 
  0203:31 06              bnt code_020b 
  0205:c3 06              +al local6 
  0207:35 04              ldi 4 
  0209:65 0a             aTop state 

        code_020b
  020b:35 01              ldi 1 
  020d:65 10             aTop cycles 
  020f:33 33              jmp code_0244 

        code_0211
  0211:3c                 dup 
  0212:35 0a              ldi a 
  0214:1a                 eq? 
  0215:31 16              bnt code_022d 
  0217:38 00d3          pushi d3 // $d3 setMotion
  021a:39 04            pushi 4 // $4 x
  021c:51 1d            class MoveTo 
  021e:36                push 
  021f:38 014a          pushi 14a // $14a eyesID
  0222:38 0096          pushi 96 // $96 busy
  0225:7c            pushSelf 
  0226:72 039b          lofsa $05c4 // Jeeves
  0229:4a 0c             send c 

  022b:33 17              jmp code_0244 

        code_022d
  022d:3c                 dup 
  022e:35 0b              ldi b 
  0230:1a                 eq? 
  0231:31 11              bnt code_0244 
  0233:35 00              ldi 0 
  0235:a0 0175            sag global373 
  0238:39 7a            pushi 7a // $7a setScript
  023a:78               push1 
  023b:76               push0 
  023c:39 58            pushi 58 // $58 dispose
  023e:76               push0 
  023f:72 0382          lofsa $05c4 // Jeeves
  0242:4a 0a             send a 


        code_0244
  0244:3a                toss 
  0245:48                 ret 
    )

)

// 05be
(instance Jeeves of Act
    (properties
        y $8c
        x $c4
        z $0
        heading $0
        yStep $2
        view $0
        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_0246
  0246:88 00cf            lsg global207 
  0249:34 0400            ldi 400 
  024c:12                 and 
  024d:18                 not 
  024e:31 3c              bnt code_028c 
  0250:39 03            pushi 3 // $3 y
  0252:7c            pushSelf 
  0253:8f 01              lsp param1 
  0255:39 03            pushi 3 // $3 y
  0257:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  025d:2f 09               bt code_0268 
  025f:78               push1 
  0260:74 02e4          lofss $0547 // look/butler
  0263:43 25 02         callk Said 2 

  0266:31 24              bnt code_028c 

        code_0268
  0268:35 0b              ldi b 
  026a:a0 00d5            sag global213 
  026d:88 00cf            lsg global207 
  0270:34 0400            ldi 400 
  0273:14                  or 
  0274:a0 00cf            sag global207 
  0277:39 4c            pushi 4c // $4c claimed
  0279:78               push1 
  027a:78               push1 
  027b:87 01              lap param1 
  027d:4a 06             send 6 

  027f:39 03            pushi 3 // $3 y
  0281:76               push0 
  0282:38 010d          pushi 10d // $10d drawPic
  0285:78               push1 
  0286:45 01 06         callb procedure_0001 6 // Say 

  0289:32 023f            jmp code_04cb 

        code_028c
  028c:88 00cf            lsg global207 
  028f:34 0400            ldi 400 
  0292:12                 and 
  0293:31 2e              bnt code_02c3 
  0295:39 03            pushi 3 // $3 y
  0297:7c            pushSelf 
  0298:8f 01              lsp param1 
  029a:39 03            pushi 3 // $3 y
  029c:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  02a2:2f 09               bt code_02ad 
  02a4:78               push1 
  02a5:74 029f          lofss $0547 // look/butler
  02a8:43 25 02         callk Said 2 

  02ab:31 16              bnt code_02c3 

        code_02ad
  02ad:39 4c            pushi 4c // $4c claimed
  02af:78               push1 
  02b0:78               push1 
  02b1:87 01              lap param1 
  02b3:4a 06             send 6 

  02b5:7a               push2 
  02b6:38 010d          pushi 10d // $10d drawPic
  02b9:7a               push2 
  02ba:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02c0:32 0208            jmp code_04cb 

        code_02c3
  02c3:78               push1 
  02c4:74 0252          lofss $0519 // ask,raconter//*<about
  02c7:43 25 02         callk Said 2 

  02ca:30 0090            bnt code_035d 
  02cd:35 0b              ldi b 
  02cf:a0 00d5            sag global213 
  02d2:7a               push2 
  02d3:78               push1 
  02d4:39 07            pushi 7 // $7 cel
  02d6:43 40 04         callk Random 4 

  02d9:36                push 
  02da:3c                 dup 
  02db:35 01              ldi 1 
  02dd:1a                 eq? 
  02de:31 0d              bnt code_02ed 
  02e0:39 03            pushi 3 // $3 y
  02e2:78               push1 
  02e3:38 010d          pushi 10d // $10d drawPic
  02e6:39 03            pushi 3 // $3 y
  02e8:45 01 06         callb procedure_0001 6 // Say 

  02eb:33 6c              jmp code_0359 

        code_02ed
  02ed:3c                 dup 
  02ee:35 02              ldi 2 
  02f0:1a                 eq? 
  02f1:31 0d              bnt code_0300 
  02f3:39 03            pushi 3 // $3 y
  02f5:78               push1 
  02f6:38 010d          pushi 10d // $10d drawPic
  02f9:39 04            pushi 4 // $4 x
  02fb:45 01 06         callb procedure_0001 6 // Say 

  02fe:33 59              jmp code_0359 

        code_0300
  0300:3c                 dup 
  0301:35 03              ldi 3 
  0303:1a                 eq? 
  0304:31 0e              bnt code_0314 
  0306:7a               push2 
  0307:38 010d          pushi 10d // $10d drawPic
  030a:39 05            pushi 5 // $5 view
  030c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0312:33 45              jmp code_0359 

        code_0314
  0314:3c                 dup 
  0315:35 04              ldi 4 
  0317:1a                 eq? 
  0318:31 0d              bnt code_0327 
  031a:39 03            pushi 3 // $3 y
  031c:78               push1 
  031d:38 010d          pushi 10d // $10d drawPic
  0320:39 06            pushi 6 // $6 loop
  0322:45 01 06         callb procedure_0001 6 // Say 

  0325:33 32              jmp code_0359 

        code_0327
  0327:3c                 dup 
  0328:35 05              ldi 5 
  032a:1a                 eq? 
  032b:31 0d              bnt code_033a 
  032d:39 03            pushi 3 // $3 y
  032f:78               push1 
  0330:38 010d          pushi 10d // $10d drawPic
  0333:39 07            pushi 7 // $7 cel
  0335:45 01 06         callb procedure_0001 6 // Say 

  0338:33 1f              jmp code_0359 

        code_033a
  033a:3c                 dup 
  033b:35 06              ldi 6 
  033d:1a                 eq? 
  033e:31 0e              bnt code_034e 
  0340:7a               push2 
  0341:38 010d          pushi 10d // $10d drawPic
  0344:39 08            pushi 8 // $8 underBits
  0346:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  034c:33 0b              jmp code_0359 

        code_034e
  034e:39 03            pushi 3 // $3 y
  0350:78               push1 
  0351:38 010d          pushi 10d // $10d drawPic
  0354:39 09            pushi 9 // $9 nsTop
  0356:45 01 06         callb procedure_0001 6 // Say 


        code_0359
  0359:3a                toss 
  035a:32 016e            jmp code_04cb 

        code_035d
  035d:78               push1 
  035e:74 01d4          lofss $0535 // deliver,hold/*
  0361:43 25 02         callk Said 2 

  0364:31 78              bnt code_03de 
  0366:80 00db            lag global219 
  0369:31 6c              bnt code_03d7 
  036b:80 00e0            lag global224 
  036e:31 67              bnt code_03d7 
  0370:7a               push2 
  0371:78               push1 
  0372:39 05            pushi 5 // $5 view
  0374:43 40 04         callk Random 4 

  0377:36                push 
  0378:3c                 dup 
  0379:35 01              ldi 1 
  037b:1a                 eq? 
  037c:31 0e              bnt code_038c 
  037e:7a               push2 
  037f:38 010d          pushi 10d // $10d drawPic
  0382:39 0a            pushi a // $a nsLeft
  0384:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  038a:33 48              jmp code_03d4 

        code_038c
  038c:3c                 dup 
  038d:35 02              ldi 2 
  038f:1a                 eq? 
  0390:31 0e              bnt code_03a0 
  0392:7a               push2 
  0393:38 010d          pushi 10d // $10d drawPic
  0396:39 0b            pushi b // $b nsBottom
  0398:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  039e:33 34              jmp code_03d4 

        code_03a0
  03a0:3c                 dup 
  03a1:35 03              ldi 3 
  03a3:1a                 eq? 
  03a4:31 0e              bnt code_03b4 
  03a6:7a               push2 
  03a7:38 010d          pushi 10d // $10d drawPic
  03aa:39 0c            pushi c // $c nsRight
  03ac:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03b2:33 20              jmp code_03d4 

        code_03b4
  03b4:3c                 dup 
  03b5:35 04              ldi 4 
  03b7:1a                 eq? 
  03b8:31 0e              bnt code_03c8 
  03ba:7a               push2 
  03bb:38 010d          pushi 10d // $10d drawPic
  03be:39 0d            pushi d // $d lsTop
  03c0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  03c6:33 0c              jmp code_03d4 

        code_03c8
  03c8:7a               push2 
  03c9:38 010d          pushi 10d // $10d drawPic
  03cc:39 0e            pushi e // $e lsLeft
  03ce:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_03d4
  03d4:3a                toss 
  03d5:33 04              jmp code_03db 

        code_03d7
  03d7:76               push0 
  03d8:45 0d 00         callb procedure_000d 0 // DontHave 


        code_03db
  03db:32 00ed            jmp code_04cb 

        code_03de
  03de:78               push1 
  03df:74 0132          lofss $0514 // /butler>
  03e2:43 25 02         callk Said 2 

  03e5:30 00e3            bnt code_04cb 
  03e8:78               push1 
  03e9:74 0167          lofss $0553 // bonjour
  03ec:43 25 02         callk Said 2 

  03ef:31 52              bnt code_0443 
  03f1:35 0b              ldi b 
  03f3:a0 00d5            sag global213 
  03f6:8b 07              lsl local7 
  03f8:3c                 dup 
  03f9:35 00              ldi 0 
  03fb:1a                 eq? 
  03fc:31 0d              bnt code_040b 
  03fe:39 03            pushi 3 // $3 y
  0400:78               push1 
  0401:38 010d          pushi 10d // $10d drawPic
  0404:39 0f            pushi f // $f lsBottom
  0406:45 01 06         callb procedure_0001 6 // Say 

  0409:33 32              jmp code_043d 

        code_040b
  040b:3c                 dup 
  040c:35 01              ldi 1 
  040e:1a                 eq? 
  040f:31 0d              bnt code_041e 
  0411:39 03            pushi 3 // $3 y
  0413:78               push1 
  0414:38 010d          pushi 10d // $10d drawPic
  0417:39 10            pushi 10 // $10 lsRight
  0419:45 01 06         callb procedure_0001 6 // Say 

  041c:33 1f              jmp code_043d 

        code_041e
  041e:3c                 dup 
  041f:35 02              ldi 2 
  0421:1a                 eq? 
  0422:31 0d              bnt code_0431 
  0424:39 03            pushi 3 // $3 y
  0426:78               push1 
  0427:38 010d          pushi 10d // $10d drawPic
  042a:39 11            pushi 11 // $11 signal
  042c:45 01 06         callb procedure_0001 6 // Say 

  042f:33 0c              jmp code_043d 

        code_0431
  0431:7a               push2 
  0432:38 010d          pushi 10d // $10d drawPic
  0435:39 12            pushi 12 // $12 illegalBits
  0437:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_043d
  043d:3a                toss 
  043e:c3 07              +al local7 
  0440:32 0088            jmp code_04cb 

        code_0443
  0443:78               push1 
  0444:74 00fd          lofss $0544 // ecouter
  0447:43 25 02         callk Said 2 

  044a:31 0e              bnt code_045a 
  044c:7a               push2 
  044d:38 010d          pushi 10d // $10d drawPic
  0450:39 13            pushi 13 // $13 brTop
  0452:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0458:33 71              jmp code_04cb 

        code_045a
  045a:78               push1 
  045b:74 00ce          lofss $052c // get
  045e:43 25 02         callk Said 2 

  0461:31 0e              bnt code_0471 
  0463:7a               push2 
  0464:38 010d          pushi 10d // $10d drawPic
  0467:39 14            pushi 14 // $14 brLeft
  0469:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  046f:33 5a              jmp code_04cb 

        code_0471
  0471:78               push1 
  0472:74 00c9          lofss $053e // abattre
  0475:43 25 02         callk Said 2 

  0478:31 0e              bnt code_0488 
  047a:7a               push2 
  047b:38 010d          pushi 10d // $10d drawPic
  047e:39 15            pushi 15 // $15 brBottom
  0480:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0486:33 43              jmp code_04cb 

        code_0488
  0488:78               push1 
  0489:74 00b5          lofss $0541 // embrasser
  048c:43 25 02         callk Said 2 

  048f:31 0e              bnt code_049f 
  0491:7a               push2 
  0492:38 010d          pushi 10d // $10d drawPic
  0495:39 16            pushi 16 // $16 brRight
  0497:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  049d:33 2c              jmp code_04cb 

        code_049f
  049f:78               push1 
  04a0:74 0083          lofss $0526 // embrace
  04a3:43 25 02         callk Said 2 

  04a6:31 0e              bnt code_04b6 
  04a8:7a               push2 
  04a9:38 010d          pushi 10d // $10d drawPic
  04ac:39 17            pushi 17 // $17 name
  04ae:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04b4:33 15              jmp code_04cb 

        code_04b6
  04b6:78               push1 
  04b7:74 006f          lofss $0529 // draguer
  04ba:43 25 02         callk Said 2 

  04bd:31 0c              bnt code_04cb 
  04bf:7a               push2 
  04c0:38 010d          pushi 10d // $10d drawPic
  04c3:39 18            pushi 18 // $18 key
  04c5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_04cb
  04cb:48                 ret 
    )

)

// 0626
(instance Feather of Prop
    (properties
        y $97
        x $e3
        z $0
        heading $0
        yStep $2
        view $84
        loop $5
        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_04cc
  04cc:78               push1 
  04cd:74 005f          lofss $052f // get/feather
  04d0:43 25 02         callk Said 2 

  04d3:31 0e              bnt code_04e3 
  04d5:7a               push2 
  04d6:38 010d          pushi 10d // $10d drawPic
  04d9:39 19            pushi 19 // $19 time
  04db:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04e1:33 2c              jmp code_050f 

        code_04e3
  04e3:78               push1 
  04e4:74 0066          lofss $054d // look/feather
  04e7:43 25 02         callk Said 2 

  04ea:2f 0f               bt code_04fb 
  04ec:39 03            pushi 3 // $3 y
  04ee:7c            pushSelf 
  04ef:8f 01              lsp param1 
  04f1:39 03            pushi 3 // $3 y
  04f3:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  04f9:31 14              bnt code_050f 

        code_04fb
  04fb:7a               push2 
  04fc:38 010d          pushi 10d // $10d drawPic
  04ff:39 1a            pushi 1a // $1a text
  0501:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0507:39 4c            pushi 4c // $4c claimed
  0509:78               push1 
  050a:78               push1 
  050b:87 01              lap param1 
  050d:4a 06             send 6 


        code_050f
  050f:48                 ret 
    )

)



