(script 382)

(string
    string_0966 "Jeeves"
    string_096d "bRecord"
    string_0975 "boa"
    string_0979 "footprint"
    string_0983 "pickUp"
    string_098a "rm36Actions"
    string_0996 "sweeping"
    string_099f ""
)

(said
    said_06fe /butler>
    said_0703 ask,raconter//*<about
    said_0710 embrace
    said_0713 draguer//butler<avec
    said_071d get
    said_0720 get/feather
    said_0726 get/boue
    said_072c get/chanson[<broken]
    said_0737 deliver,hold/*
    said_0740 abattre
    said_0743 embrasser
    said_0746 ecouter
    said_0749 look/butler
    said_074f look/feather
    said_0755 look/boue,spot,bootprint
    said_0761 look/chanson
    said_0767 bonjour
)

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

(local
    local0 = $0000
    local1 = $0000
)

// 0770
(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:34 0400            ldi 400 
  0023:a0 00c3            sag global195 
  0026:39 03            pushi 3 // $3 y
  0028:38 0080          pushi 80 // $80 timeLeft
  002b:38 01cb          pushi 1cb // $1cb sel_459
  002e:38 038e          pushi 38e // $38e sel_910
  0031:45 15 06         callb procedure_0015 6 // LoadMany 

  0034:39 05            pushi 5 // $5 view
  0036:78               push1 
  0037:38 01bf          pushi 1bf // $1bf sel_447
  003a:72 07cb          lofsa $0808 // Jeeves
  003d:4a 06             send 6 

  003f:39 42            pushi 42 // $42 setPri
  0041:78               push1 
  0042:78               push1 
  0043:38 00c9          pushi c9 // $c9 ignoreActors
  0046:78               push1 
  0047:78               push1 
  0048:39 57            pushi 57 // $57 init
  004a:76               push0 
  004b:72 0874          lofsa $08c2 // boa
  004e:4a 10             send 10 

  0050:38 0082          pushi 82 // $82 owner
  0053:76               push0 
  0054:39 43            pushi 43 // $43 at
  0056:78               push1 
  0057:39 09            pushi 9 // $9 nsTop
  0059:81 09              lag gInventory 
  005b:4a 06             send 6 

  005d:4a 04             send 4 

  005f:36                push 
  0060:35 24              ldi 24 
  0062:1a                 eq? 
  0063:31 2b              bnt code_0090 
  0065:7a               push2 
  0066:38 0080          pushi 80 // $80 timeLeft
  0069:39 11            pushi 11 // $11 signal
  006b:43 00 04         callk Load 4 

  006e:39 42            pushi 42 // $42 setPri
  0070:78               push1 
  0071:78               push1 
  0072:38 00c9          pushi c9 // $c9 ignoreActors
  0075:78               push1 
  0076:78               push1 
  0077:39 57            pushi 57 // $57 init
  0079:76               push0 
  007a:72 07f3          lofsa $0870 // bRecord
  007d:4a 10             send 10 

  007f:39 42            pushi 42 // $42 setPri
  0081:78               push1 
  0082:78               push1 
  0083:38 00c9          pushi c9 // $c9 ignoreActors
  0086:78               push1 
  0087:78               push1 
  0088:39 57            pushi 57 // $57 init
  008a:76               push0 
  008b:72 0886          lofsa $0914 // footprint
  008e:4a 10             send 10 


        code_0090
  0090:39 12            pushi 12 // $12 illegalBits
  0092:78               push1 
  0093:38 8010          pushi 8010 // $8010 sel_32784
  0096:39 04            pushi 4 // $4 x
  0098:78               push1 
  0099:38 0154          pushi 154 // $154 itemY
  009c:39 03            pushi 3 // $3 y
  009e:78               push1 
  009f:39 64            pushi 64 // $64 allTrue
  00a1:72 0764          lofsa $0808 // Jeeves
  00a4:4a 12             send 12 

  00a6:39 7a            pushi 7a // $7a setScript
  00a8:78               push1 
  00a9:74 06fc          lofss $07a8 // rm36Actions
  00ac:54 06             self 6 

  00ae:48                 ret 
    )

    (method (doit) // method_00af
  00af:39 3c            pushi 3c // $3c doit
  00b1:76               push0 
  00b2:57 36 04         super Rgn 4 

  00b5:48                 ret 
    )

    (method (dispose) // method_00b6
  00b6:78               push1 
  00b7:38 03d9          pushi 3d9 // $3d9 sel_985
  00ba:43 03 02         callk DisposeScript 2 

  00bd:39 58            pushi 58 // $58 dispose
  00bf:76               push0 
  00c0:57 36 04         super Rgn 4 

  00c3:48                 ret 
    )

    (method (handleEvent) // method_00c4
  00c4:39 4c            pushi 4c // $4c claimed
  00c6:76               push0 
  00c7:87 01              lap param1 
  00c9:4a 04             send 4 

  00cb:31 03              bnt code_00d0 
  00cd:35 01              ldi 1 
  00cf:48                 ret 

        code_00d0
  00d0:39 22            pushi 22 // $22 type
  00d2:76               push0 
  00d3:87 01              lap param1 
  00d5:4a 04             send 4 

  00d7:36                push 
  00d8:34 0080            ldi 80 
  00db:1a                 eq? 
  00dc:31 14              bnt code_00f2 
  00de:78               push1 
  00df:74 0673          lofss $0755 // look/boue,spot,bootprint
  00e2:43 25 02         callk Said 2 

  00e5:31 0b              bnt code_00f2 
  00e7:7a               push2 
  00e8:38 017e          pushi 17e // $17e sel_382
  00eb:76               push0 
  00ec:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_00f2
  00f2:48                 ret 
    )

)

// 07a2
(instance rm36Actions 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_00f3
  00f3:87 01              lap param1 
  00f5:65 0a             aTop state 
  00f7:36                push 
  00f8:3c                 dup 
  00f9:35 00              ldi 0 
  00fb:1a                 eq? 
  00fc:31 07              bnt code_0105 
  00fe:35 1e              ldi 1e 
  0100:65 12             aTop seconds 
  0102:32 01db            jmp code_02e0 

        code_0105
  0105:3c                 dup 
  0106:35 01              ldi 1 
  0108:1a                 eq? 
  0109:31 47              bnt code_0152 
  010b:35 01              ldi 1 
  010d:a0 0176            sag global374 
  0110:39 05            pushi 5 // $5 view
  0112:78               push1 
  0113:38 01bf          pushi 1bf // $1bf sel_447
  0116:39 7e            pushi 7e // $7e setCycle
  0118:78               push1 
  0119:51 17            class Walk 
  011b:36                push 
  011c:38 00c9          pushi c9 // $c9 ignoreActors
  011f:78               push1 
  0120:76               push0 
  0121:38 00d4          pushi d4 // $d4 setAvoider
  0124:78               push1 
  0125:38 00be          pushi be // $be offScreenOK
  0128:78               push1 
  0129:78               push1 
  012a:39 56            pushi 56 // $56 new
  012c:76               push0 
  012d:51 21            class Avoid 
  012f:4a 04             send 4 

  0131:4a 06             send 6 

  0133:36                push 
  0134:39 57            pushi 57 // $57 init
  0136:76               push0 
  0137:72 06ce          lofsa $0808 // Jeeves
  013a:4a 1c             send 1c 

  013c:38 00d3          pushi d3 // $d3 setMotion
  013f:39 04            pushi 4 // $4 x
  0141:51 1d            class MoveTo 
  0143:36                push 
  0144:38 0099          pushi 99 // $99 top
  0147:39 6e            pushi 6e // $6e indexOf
  0149:7c            pushSelf 
  014a:72 06bb          lofsa $0808 // Jeeves
  014d:4a 0c             send c 

  014f:32 018e            jmp code_02e0 

        code_0152
  0152:3c                 dup 
  0153:35 02              ldi 2 
  0155:1a                 eq? 
  0156:31 16              bnt code_016e 
  0158:38 00d3          pushi d3 // $d3 setMotion
  015b:39 04            pushi 4 // $4 x
  015d:51 1d            class MoveTo 
  015f:36                push 
  0160:38 0084          pushi 84 // $84 stop
  0163:39 64            pushi 64 // $64 allTrue
  0165:7c            pushSelf 
  0166:72 069f          lofsa $0808 // Jeeves
  0169:4a 0c             send c 

  016b:32 0172            jmp code_02e0 

        code_016e
  016e:3c                 dup 
  016f:35 03              ldi 3 
  0171:1a                 eq? 
  0172:31 1d              bnt code_0191 
  0174:39 05            pushi 5 // $5 view
  0176:78               push1 
  0177:38 01cb          pushi 1cb // $1cb sel_459
  017a:39 07            pushi 7 // $7 cel
  017c:78               push1 
  017d:76               push0 
  017e:39 06            pushi 6 // $6 loop
  0180:78               push1 
  0181:78               push1 
  0182:39 7e            pushi 7e // $7e setCycle
  0184:7a               push2 
  0185:51 1a            class End 
  0187:36                push 
  0188:7c            pushSelf 
  0189:72 067c          lofsa $0808 // Jeeves
  018c:4a 1a             send 1a 

  018e:32 014f            jmp code_02e0 

        code_0191
  0191:3c                 dup 
  0192:35 04              ldi 4 
  0194:1a                 eq? 
  0195:31 3d              bnt code_01d4 
  0197:38 00c8          pushi c8 // $c8 setLoop
  019a:78               push1 
  019b:39 03            pushi 3 // $3 y
  019d:39 7e            pushi 7e // $7e setCycle
  019f:78               push1 
  01a0:51 16            class Fwd 
  01a2:36                push 
  01a3:72 0662          lofsa $0808 // Jeeves
  01a6:4a 0c             send c 

  01a8:39 58            pushi 58 // $58 dispose
  01aa:76               push0 
  01ab:72 0714          lofsa $08c2 // boa
  01ae:4a 04             send 4 

  01b0:88 008d            lsg global141 
  01b3:35 04              ldi 4 
  01b5:14                  or 
  01b6:a0 008d            sag global141 
  01b9:39 65            pushi 65 // $65 contains
  01bb:78               push1 
  01bc:74 06b1          lofss $0870 // bRecord
  01bf:81 05              lag gCast 
  01c1:4a 06             send 6 

  01c3:31 08              bnt code_01cd 
  01c5:39 58            pushi 58 // $58 dispose
  01c7:76               push0 
  01c8:72 06a5          lofsa $0870 // bRecord
  01cb:4a 04             send 4 


        code_01cd
  01cd:35 04              ldi 4 
  01cf:65 12             aTop seconds 
  01d1:32 010c            jmp code_02e0 

        code_01d4
  01d4:3c                 dup 
  01d5:35 05              ldi 5 
  01d7:1a                 eq? 
  01d8:31 17              bnt code_01f1 
  01da:39 07            pushi 7 // $7 cel
  01dc:78               push1 
  01dd:7a               push2 
  01de:39 06            pushi 6 // $6 loop
  01e0:78               push1 
  01e1:78               push1 
  01e2:39 7e            pushi 7e // $7e setCycle
  01e4:7a               push2 
  01e5:51 1b            class Beg 
  01e7:36                push 
  01e8:7c            pushSelf 
  01e9:72 061c          lofsa $0808 // Jeeves
  01ec:4a 14             send 14 

  01ee:32 00ef            jmp code_02e0 

        code_01f1
  01f1:3c                 dup 
  01f2:35 06              ldi 6 
  01f4:1a                 eq? 
  01f5:31 2c              bnt code_0223 
  01f7:39 05            pushi 5 // $5 view
  01f9:78               push1 
  01fa:38 01bf          pushi 1bf // $1bf sel_447
  01fd:39 7e            pushi 7e // $7e setCycle
  01ff:78               push1 
  0200:51 17            class Walk 
  0202:36                push 
  0203:38 00c9          pushi c9 // $c9 ignoreActors
  0206:78               push1 
  0207:76               push0 
  0208:38 00c8          pushi c8 // $c8 setLoop
  020b:78               push1 
  020c:39 ff            pushi ff // $ff checkAni
  020e:38 00d3          pushi d3 // $d3 setMotion
  0211:39 04            pushi 4 // $4 x
  0213:51 1d            class MoveTo 
  0215:36                push 
  0216:39 75            pushi 75 // $75 register
  0218:39 6a            pushi 6a // $6a prev
  021a:7c            pushSelf 
  021b:72 05ea          lofsa $0808 // Jeeves
  021e:4a 24             send 24 

  0220:32 00bd            jmp code_02e0 

        code_0223
  0223:3c                 dup 
  0224:35 07              ldi 7 
  0226:1a                 eq? 
  0227:31 1d              bnt code_0246 
  0229:39 05            pushi 5 // $5 view
  022b:78               push1 
  022c:38 01cb          pushi 1cb // $1cb sel_459
  022f:39 07            pushi 7 // $7 cel
  0231:78               push1 
  0232:76               push0 
  0233:39 06            pushi 6 // $6 loop
  0235:78               push1 
  0236:78               push1 
  0237:39 7e            pushi 7e // $7e setCycle
  0239:7a               push2 
  023a:51 1a            class End 
  023c:36                push 
  023d:7c            pushSelf 
  023e:72 05c7          lofsa $0808 // Jeeves
  0241:4a 1a             send 1a 

  0243:32 009a            jmp code_02e0 

        code_0246
  0246:3c                 dup 
  0247:35 08              ldi 8 
  0249:1a                 eq? 
  024a:31 1f              bnt code_026b 
  024c:38 00c8          pushi c8 // $c8 setLoop
  024f:78               push1 
  0250:39 03            pushi 3 // $3 y
  0252:39 7e            pushi 7e // $7e setCycle
  0254:78               push1 
  0255:51 16            class Fwd 
  0257:36                push 
  0258:72 05ad          lofsa $0808 // Jeeves
  025b:4a 0c             send c 

  025d:39 58            pushi 58 // $58 dispose
  025f:76               push0 
  0260:72 06b1          lofsa $0914 // footprint
  0263:4a 04             send 4 

  0265:35 03              ldi 3 
  0267:65 12             aTop seconds 
  0269:33 75              jmp code_02e0 

        code_026b
  026b:3c                 dup 
  026c:35 09              ldi 9 
  026e:1a                 eq? 
  026f:31 16              bnt code_0287 
  0271:39 07            pushi 7 // $7 cel
  0273:78               push1 
  0274:7a               push2 
  0275:39 06            pushi 6 // $6 loop
  0277:78               push1 
  0278:78               push1 
  0279:39 7e            pushi 7e // $7e setCycle
  027b:7a               push2 
  027c:51 1b            class Beg 
  027e:36                push 
  027f:7c            pushSelf 
  0280:72 0585          lofsa $0808 // Jeeves
  0283:4a 14             send 14 

  0285:33 59              jmp code_02e0 

        code_0287
  0287:3c                 dup 
  0288:35 0a              ldi a 
  028a:1a                 eq? 
  028b:31 31              bnt code_02be 
  028d:39 05            pushi 5 // $5 view
  028f:78               push1 
  0290:38 01bf          pushi 1bf // $1bf sel_447
  0293:39 7e            pushi 7e // $7e setCycle
  0295:78               push1 
  0296:51 17            class Walk 
  0298:36                push 
  0299:38 00c9          pushi c9 // $c9 ignoreActors
  029c:78               push1 
  029d:76               push0 
  029e:72 0567          lofsa $0808 // Jeeves
  02a1:4a 12             send 12 

  02a3:38 00c8          pushi c8 // $c8 setLoop
  02a6:78               push1 
  02a7:39 ff            pushi ff // $ff checkAni
  02a9:38 00d3          pushi d3 // $d3 setMotion
  02ac:39 04            pushi 4 // $4 x
  02ae:51 1d            class MoveTo 
  02b0:36                push 
  02b1:38 0154          pushi 154 // $154 itemY
  02b4:39 62            pushi 62 // $62 eachElementDo
  02b6:7c            pushSelf 
  02b7:72 054e          lofsa $0808 // Jeeves
  02ba:4a 12             send 12 

  02bc:33 22              jmp code_02e0 

        code_02be
  02be:3c                 dup 
  02bf:35 0b              ldi b 
  02c1:1a                 eq? 
  02c2:31 1c              bnt code_02e0 
  02c4:39 58            pushi 58 // $58 dispose
  02c6:76               push0 
  02c7:72 053e          lofsa $0808 // Jeeves
  02ca:4a 04             send 4 

  02cc:35 00              ldi 0 
  02ce:a0 0176            sag global374 
  02d1:78               push1 
  02d2:38 03d9          pushi 3d9 // $3d9 sel_985
  02d5:43 03 02         callk DisposeScript 2 

  02d8:39 7a            pushi 7a // $7a setScript
  02da:78               push1 
  02db:76               push0 
  02dc:63 08             pToa client 
  02de:4a 06             send 6 


        code_02e0
  02e0:3a                toss 
  02e1:48                 ret 
    )

)

// 07d2
(instance pickUp 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_02e2
  02e2:87 01              lap param1 
  02e4:65 0a             aTop state 
  02e6:36                push 
  02e7:3c                 dup 
  02e8:35 00              ldi 0 
  02ea:1a                 eq? 
  02eb:31 14              bnt code_0301 
  02ed:76               push0 
  02ee:45 03 00         callb procedure_0003 0 // HandsOff 

  02f1:7a               push2 
  02f2:89 00              lsg gEgo 
  02f4:74 0579          lofss $0870 // bRecord
  02f7:45 02 04         callb procedure_0002 4 // LookAt 

  02fa:35 02              ldi 2 
  02fc:65 10             aTop cycles 
  02fe:32 0086            jmp code_0387 

        code_0301
  0301:3c                 dup 
  0302:35 01              ldi 1 
  0304:1a                 eq? 
  0305:31 1b              bnt code_0322 
  0307:39 05            pushi 5 // $5 view
  0309:78               push1 
  030a:39 11            pushi 11 // $11 signal
  030c:39 07            pushi 7 // $7 cel
  030e:78               push1 
  030f:76               push0 
  0310:38 00d3          pushi d3 // $d3 setMotion
  0313:78               push1 
  0314:76               push0 
  0315:39 7e            pushi 7e // $7e setCycle
  0317:7a               push2 
  0318:51 1a            class End 
  031a:36                push 
  031b:7c            pushSelf 
  031c:81 00              lag gEgo 
  031e:4a 1a             send 1a 

  0320:33 65              jmp code_0387 

        code_0322
  0322:3c                 dup 
  0323:35 02              ldi 2 
  0325:1a                 eq? 
  0326:31 29              bnt code_0351 
  0328:38 00ec          pushi ec // $ec get
  032b:78               push1 
  032c:39 09            pushi 9 // $9 nsTop
  032e:81 00              lag gEgo 
  0330:4a 06             send 6 

  0332:38 0089          pushi 89 // $89 hide
  0335:76               push0 
  0336:72 0537          lofsa $0870 // bRecord
  0339:4a 04             send 4 

  033b:35 01              ldi 1 
  033d:a0 00b6            sag global182 
  0340:7a               push2 
  0341:38 017e          pushi 17e // $17e sel_382
  0344:78               push1 
  0345:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  034b:35 02              ldi 2 
  034d:65 10             aTop cycles 
  034f:33 36              jmp code_0387 

        code_0351
  0351:3c                 dup 
  0352:35 03              ldi 3 
  0354:1a                 eq? 
  0355:31 0d              bnt code_0364 
  0357:39 7e            pushi 7e // $7e setCycle
  0359:7a               push2 
  035a:51 1b            class Beg 
  035c:36                push 
  035d:7c            pushSelf 
  035e:81 00              lag gEgo 
  0360:4a 08             send 8 

  0362:33 23              jmp code_0387 

        code_0364
  0364:3c                 dup 
  0365:35 04              ldi 4 
  0367:1a                 eq? 
  0368:31 1d              bnt code_0387 
  036a:76               push0 
  036b:45 04 00         callb procedure_0004 0 // HandsOn 

  036e:39 05            pushi 5 // $5 view
  0370:78               push1 
  0371:76               push0 
  0372:39 7e            pushi 7e // $7e setCycle
  0374:78               push1 
  0375:51 17            class Walk 
  0377:36                push 
  0378:81 00              lag gEgo 
  037a:4a 0c             send c 

  037c:39 58            pushi 58 // $58 dispose
  037e:76               push0 
  037f:39 7a            pushi 7a // $7a setScript
  0381:78               push1 
  0382:76               push0 
  0383:63 08             pToa client 
  0385:4a 0a             send a 


        code_0387
  0387:3a                toss 
  0388:48                 ret 
    )

)

// 0802
(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_0389
  0389:88 00cf            lsg global207 
  038c:34 0400            ldi 400 
  038f:12                 and 
  0390:18                 not 
  0391:31 3c              bnt code_03cf 
  0393:39 03            pushi 3 // $3 y
  0395:7c            pushSelf 
  0396:8f 01              lsp param1 
  0398:39 03            pushi 3 // $3 y
  039a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  03a0:2f 09               bt code_03ab 
  03a2:78               push1 
  03a3:74 03a3          lofss $0749 // look/butler
  03a6:43 25 02         callk Said 2 

  03a9:31 24              bnt code_03cf 

        code_03ab
  03ab:35 0b              ldi b 
  03ad:a0 00d5            sag global213 
  03b0:88 00cf            lsg global207 
  03b3:34 0400            ldi 400 
  03b6:14                  or 
  03b7:a0 00cf            sag global207 
  03ba:39 4c            pushi 4c // $4c claimed
  03bc:78               push1 
  03bd:78               push1 
  03be:87 01              lap param1 
  03c0:4a 06             send 6 

  03c2:39 03            pushi 3 // $3 y
  03c4:76               push0 
  03c5:38 017e          pushi 17e // $17e sel_382
  03c8:7a               push2 
  03c9:45 01 06         callb procedure_0001 6 // Say 

  03cc:32 023f            jmp code_060e 

        code_03cf
  03cf:88 00cf            lsg global207 
  03d2:34 0400            ldi 400 
  03d5:12                 and 
  03d6:31 2f              bnt code_0407 
  03d8:39 03            pushi 3 // $3 y
  03da:7c            pushSelf 
  03db:8f 01              lsp param1 
  03dd:39 03            pushi 3 // $3 y
  03df:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  03e5:2f 09               bt code_03f0 
  03e7:78               push1 
  03e8:74 035e          lofss $0749 // look/butler
  03eb:43 25 02         callk Said 2 

  03ee:31 17              bnt code_0407 

        code_03f0
  03f0:39 4c            pushi 4c // $4c claimed
  03f2:78               push1 
  03f3:78               push1 
  03f4:87 01              lap param1 
  03f6:4a 06             send 6 

  03f8:7a               push2 
  03f9:38 017e          pushi 17e // $17e sel_382
  03fc:39 03            pushi 3 // $3 y
  03fe:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0404:32 0207            jmp code_060e 

        code_0407
  0407:78               push1 
  0408:74 02f8          lofss $0703 // ask,raconter//*<about
  040b:43 25 02         callk Said 2 

  040e:30 0090            bnt code_04a1 
  0411:35 0b              ldi b 
  0413:a0 00d5            sag global213 
  0416:7a               push2 
  0417:78               push1 
  0418:39 07            pushi 7 // $7 cel
  041a:43 40 04         callk Random 4 

  041d:36                push 
  041e:3c                 dup 
  041f:35 01              ldi 1 
  0421:1a                 eq? 
  0422:31 0d              bnt code_0431 
  0424:39 03            pushi 3 // $3 y
  0426:78               push1 
  0427:38 017e          pushi 17e // $17e sel_382
  042a:39 04            pushi 4 // $4 x
  042c:45 01 06         callb procedure_0001 6 // Say 

  042f:33 6c              jmp code_049d 

        code_0431
  0431:3c                 dup 
  0432:35 02              ldi 2 
  0434:1a                 eq? 
  0435:31 0d              bnt code_0444 
  0437:39 03            pushi 3 // $3 y
  0439:78               push1 
  043a:38 017e          pushi 17e // $17e sel_382
  043d:39 05            pushi 5 // $5 view
  043f:45 01 06         callb procedure_0001 6 // Say 

  0442:33 59              jmp code_049d 

        code_0444
  0444:3c                 dup 
  0445:35 03              ldi 3 
  0447:1a                 eq? 
  0448:31 0e              bnt code_0458 
  044a:7a               push2 
  044b:38 017e          pushi 17e // $17e sel_382
  044e:39 06            pushi 6 // $6 loop
  0450:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0456:33 45              jmp code_049d 

        code_0458
  0458:3c                 dup 
  0459:35 04              ldi 4 
  045b:1a                 eq? 
  045c:31 0d              bnt code_046b 
  045e:39 03            pushi 3 // $3 y
  0460:78               push1 
  0461:38 017e          pushi 17e // $17e sel_382
  0464:39 07            pushi 7 // $7 cel
  0466:45 01 06         callb procedure_0001 6 // Say 

  0469:33 32              jmp code_049d 

        code_046b
  046b:3c                 dup 
  046c:35 05              ldi 5 
  046e:1a                 eq? 
  046f:31 0d              bnt code_047e 
  0471:39 03            pushi 3 // $3 y
  0473:78               push1 
  0474:38 017e          pushi 17e // $17e sel_382
  0477:39 08            pushi 8 // $8 underBits
  0479:45 01 06         callb procedure_0001 6 // Say 

  047c:33 1f              jmp code_049d 

        code_047e
  047e:3c                 dup 
  047f:35 06              ldi 6 
  0481:1a                 eq? 
  0482:31 0e              bnt code_0492 
  0484:7a               push2 
  0485:38 017e          pushi 17e // $17e sel_382
  0488:39 09            pushi 9 // $9 nsTop
  048a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0490:33 0b              jmp code_049d 

        code_0492
  0492:39 03            pushi 3 // $3 y
  0494:78               push1 
  0495:38 017e          pushi 17e // $17e sel_382
  0498:39 0a            pushi a // $a nsLeft
  049a:45 01 06         callb procedure_0001 6 // Say 


        code_049d
  049d:3a                toss 
  049e:32 016d            jmp code_060e 

        code_04a1
  04a1:78               push1 
  04a2:74 0292          lofss $0737 // deliver,hold/*
  04a5:43 25 02         callk Said 2 

  04a8:31 78              bnt code_0522 
  04aa:80 00db            lag global219 
  04ad:31 6c              bnt code_051b 
  04af:80 00e0            lag global224 
  04b2:31 67              bnt code_051b 
  04b4:7a               push2 
  04b5:78               push1 
  04b6:39 05            pushi 5 // $5 view
  04b8:43 40 04         callk Random 4 

  04bb:36                push 
  04bc:3c                 dup 
  04bd:35 01              ldi 1 
  04bf:1a                 eq? 
  04c0:31 0e              bnt code_04d0 
  04c2:7a               push2 
  04c3:38 017e          pushi 17e // $17e sel_382
  04c6:39 0b            pushi b // $b nsBottom
  04c8:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04ce:33 48              jmp code_0518 

        code_04d0
  04d0:3c                 dup 
  04d1:35 02              ldi 2 
  04d3:1a                 eq? 
  04d4:31 0e              bnt code_04e4 
  04d6:7a               push2 
  04d7:38 017e          pushi 17e // $17e sel_382
  04da:39 0c            pushi c // $c nsRight
  04dc:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04e2:33 34              jmp code_0518 

        code_04e4
  04e4:3c                 dup 
  04e5:35 03              ldi 3 
  04e7:1a                 eq? 
  04e8:31 0e              bnt code_04f8 
  04ea:7a               push2 
  04eb:38 017e          pushi 17e // $17e sel_382
  04ee:39 0d            pushi d // $d lsTop
  04f0:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  04f6:33 20              jmp code_0518 

        code_04f8
  04f8:3c                 dup 
  04f9:35 04              ldi 4 
  04fb:1a                 eq? 
  04fc:31 0e              bnt code_050c 
  04fe:7a               push2 
  04ff:38 017e          pushi 17e // $17e sel_382
  0502:39 0e            pushi e // $e lsLeft
  0504:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  050a:33 0c              jmp code_0518 

        code_050c
  050c:7a               push2 
  050d:38 017e          pushi 17e // $17e sel_382
  0510:39 0f            pushi f // $f lsBottom
  0512:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0518
  0518:3a                toss 
  0519:33 04              jmp code_051f 

        code_051b
  051b:76               push0 
  051c:45 0d 00         callb procedure_000d 0 // DontHave 


        code_051f
  051f:32 00ec            jmp code_060e 

        code_0522
  0522:78               push1 
  0523:74 01d8          lofss $06fe // /butler>
  0526:43 25 02         callk Said 2 

  0529:30 00cd            bnt code_05f9 
  052c:78               push1 
  052d:74 0237          lofss $0767 // bonjour
  0530:43 25 02         callk Said 2 

  0533:31 51              bnt code_0586 
  0535:35 0b              ldi b 
  0537:a0 00d5            sag global213 
  053a:8b 01              lsl local1 
  053c:3c                 dup 
  053d:35 00              ldi 0 
  053f:1a                 eq? 
  0540:31 0d              bnt code_054f 
  0542:39 03            pushi 3 // $3 y
  0544:78               push1 
  0545:38 017e          pushi 17e // $17e sel_382
  0548:39 10            pushi 10 // $10 lsRight
  054a:45 01 06         callb procedure_0001 6 // Say 

  054d:33 32              jmp code_0581 

        code_054f
  054f:3c                 dup 
  0550:35 01              ldi 1 
  0552:1a                 eq? 
  0553:31 0d              bnt code_0562 
  0555:39 03            pushi 3 // $3 y
  0557:78               push1 
  0558:38 017e          pushi 17e // $17e sel_382
  055b:39 11            pushi 11 // $11 signal
  055d:45 01 06         callb procedure_0001 6 // Say 

  0560:33 1f              jmp code_0581 

        code_0562
  0562:3c                 dup 
  0563:35 02              ldi 2 
  0565:1a                 eq? 
  0566:31 0d              bnt code_0575 
  0568:39 03            pushi 3 // $3 y
  056a:78               push1 
  056b:38 017e          pushi 17e // $17e sel_382
  056e:39 12            pushi 12 // $12 illegalBits
  0570:45 01 06         callb procedure_0001 6 // Say 

  0573:33 0c              jmp code_0581 

        code_0575
  0575:7a               push2 
  0576:38 017e          pushi 17e // $17e sel_382
  0579:39 13            pushi 13 // $13 brTop
  057b:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0581
  0581:3a                toss 
  0582:c3 01              +al local1 
  0584:33 71              jmp code_05f7 

        code_0586
  0586:78               push1 
  0587:74 01bc          lofss $0746 // ecouter
  058a:43 25 02         callk Said 2 

  058d:31 0e              bnt code_059d 
  058f:7a               push2 
  0590:38 017e          pushi 17e // $17e sel_382
  0593:39 14            pushi 14 // $14 brLeft
  0595:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  059b:33 5a              jmp code_05f7 

        code_059d
  059d:78               push1 
  059e:74 017c          lofss $071d // get
  05a1:43 25 02         callk Said 2 

  05a4:31 0e              bnt code_05b4 
  05a6:7a               push2 
  05a7:38 017e          pushi 17e // $17e sel_382
  05aa:39 15            pushi 15 // $15 brBottom
  05ac:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05b2:33 43              jmp code_05f7 

        code_05b4
  05b4:78               push1 
  05b5:74 0188          lofss $0740 // abattre
  05b8:43 25 02         callk Said 2 

  05bb:31 0e              bnt code_05cb 
  05bd:7a               push2 
  05be:38 017e          pushi 17e // $17e sel_382
  05c1:39 16            pushi 16 // $16 brRight
  05c3:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05c9:33 2c              jmp code_05f7 

        code_05cb
  05cb:78               push1 
  05cc:74 0174          lofss $0743 // embrasser
  05cf:43 25 02         callk Said 2 

  05d2:31 0e              bnt code_05e2 
  05d4:7a               push2 
  05d5:38 017e          pushi 17e // $17e sel_382
  05d8:39 17            pushi 17 // $17 name
  05da:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05e0:33 15              jmp code_05f7 

        code_05e2
  05e2:78               push1 
  05e3:74 012a          lofss $0710 // embrace
  05e6:43 25 02         callk Said 2 

  05e9:31 0c              bnt code_05f7 
  05eb:7a               push2 
  05ec:38 017e          pushi 17e // $17e sel_382
  05ef:39 18            pushi 18 // $18 key
  05f1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_05f7
  05f7:33 15              jmp code_060e 

        code_05f9
  05f9:78               push1 
  05fa:74 0116          lofss $0713 // draguer//butler<avec
  05fd:43 25 02         callk Said 2 

  0600:31 0c              bnt code_060e 
  0602:7a               push2 
  0603:38 017e          pushi 17e // $17e sel_382
  0606:39 19            pushi 19 // $19 time
  0608:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_060e
  060e:48                 ret 
    )

)

// 086a
(instance bRecord of Prop
    (properties
        y $60
        x $73
        z $0
        heading $0
        yStep $2
        view $88
        loop $2
        cel $7
        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_060f
  060f:39 6f            pushi 6f // $6f handleEvent
  0611:78               push1 
  0612:8f 01              lsp param1 
  0614:57 27 06         super Prop 6 

  0617:31 02              bnt code_061b 
  0619:33 56              jmp code_0671 

        code_061b
  061b:39 03            pushi 3 // $3 y
  061d:7c            pushSelf 
  061e:8f 01              lsp param1 
  0620:39 03            pushi 3 // $3 y
  0622:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0628:2f 09               bt code_0633 
  062a:78               push1 
  062b:74 0133          lofss $0761 // look/chanson
  062e:43 25 02         callk Said 2 

  0631:31 16              bnt code_0649 

        code_0633
  0633:7a               push2 
  0634:38 017e          pushi 17e // $17e sel_382
  0637:39 1a            pushi 1a // $1a text
  0639:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  063f:39 4c            pushi 4c // $4c claimed
  0641:78               push1 
  0642:78               push1 
  0643:87 01              lap param1 
  0645:4a 06             send 6 

  0647:33 28              jmp code_0671 

        code_0649
  0649:78               push1 
  064a:74 00df          lofss $072c // get/chanson[<broken]
  064d:43 25 02         callk Said 2 

  0650:31 1f              bnt code_0671 
  0652:38 00ae          pushi ae // $ae distanceTo
  0655:78               push1 
  0656:74 0217          lofss $0870 // bRecord
  0659:81 00              lag gEgo 
  065b:4a 06             send 6 

  065d:36                push 
  065e:35 0f              ldi f 
  0660:22                 lt? 
  0661:31 0a              bnt code_066d 
  0663:39 7a            pushi 7a // $7a setScript
  0665:78               push1 
  0666:74 016f          lofss $07d8 // pickUp
  0669:54 06             self 6 

  066b:33 04              jmp code_0671 

        code_066d
  066d:76               push0 
  066e:45 09 00         callb procedure_0009 0 // NotClose 


        code_0671
  0671:48                 ret 
    )

)

// 08bc
(instance boa of Prop
    (properties
        y $64
        x $5a
        z $0
        heading $0
        yStep $2
        view $88
        loop $9
        cel $3
        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_0672
  0672:39 03            pushi 3 // $3 y
  0674:7c            pushSelf 
  0675:8f 01              lsp param1 
  0677:39 03            pushi 3 // $3 y
  0679:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  067f:2f 09               bt code_068a 
  0681:78               push1 
  0682:74 00ca          lofss $074f // look/feather
  0685:43 25 02         callk Said 2 

  0688:31 16              bnt code_06a0 

        code_068a
  068a:7a               push2 
  068b:38 017e          pushi 17e // $17e sel_382
  068e:39 1b            pushi 1b // $1b elements
  0690:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0696:39 4c            pushi 4c // $4c claimed
  0698:78               push1 
  0699:78               push1 
  069a:87 01              lap param1 
  069c:4a 06             send 6 

  069e:33 15              jmp code_06b5 

        code_06a0
  06a0:78               push1 
  06a1:74 007c          lofss $0720 // get/feather
  06a4:43 25 02         callk Said 2 

  06a7:31 0c              bnt code_06b5 
  06a9:7a               push2 
  06aa:38 017e          pushi 17e // $17e sel_382
  06ad:39 1c            pushi 1c // $1c color
  06af:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_06b5
  06b5:48                 ret 
    )

)

// 090e
(instance footprint of Prop
    (properties
        y $6a
        x $64
        z $0
        heading $0
        yStep $2
        view $88
        loop $3
        cel $3
        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_06b6
  06b6:78               push1 
  06b7:74 006c          lofss $0726 // get/boue
  06ba:43 25 02         callk Said 2 

  06bd:31 0e              bnt code_06cd 
  06bf:7a               push2 
  06c0:38 017e          pushi 17e // $17e sel_382
  06c3:39 1d            pushi 1d // $1d back
  06c5:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  06cb:33 2c              jmp code_06f9 

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

  06da:2f 09               bt code_06e5 
  06dc:78               push1 
  06dd:74 0075          lofss $0755 // look/boue,spot,bootprint
  06e0:43 25 02         callk Said 2 

  06e3:31 14              bnt code_06f9 

        code_06e5
  06e5:7a               push2 
  06e6:38 017e          pushi 17e // $17e sel_382
  06e9:39 1e            pushi 1e // $1e mode
  06eb:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  06f1:39 4c            pushi 4c // $4c claimed
  06f3:78               push1 
  06f4:78               push1 
  06f5:87 01              lap param1 
  06f7:4a 06             send 6 


        code_06f9
  06f9:48                 ret 
    )

)



