(script 383)

(string
    string_09de "Duster"
    string_09e5 "Fifi"
    string_09ea "Jeeves"
    string_09f1 "fifi"
    string_09f6 "fifiActions"
    string_0a02 "jeevesActions"
    string_0a10 "kiss"
    string_0a15 "kissact3"
    string_0a1e "myMusic"
)

(said
    said_074e */fifi>
    said_0755 /butler>
    said_075a ecouter
    said_075d look/butler
    said_0763 look/fifi
    said_0769 look/gens
    said_076f bonjour
    said_0772 bonjour,look/person
    said_077b bonjour/gens
)

(synonym
    fifi | maid = dame | femme | fille | girl | lady | maiden | woman
    butler | jeeves = fellow | gars | gentleman | guy | homme | man | type
)

(local
    local0 = $006b
    local1 = $008b
    local2 = $00a3
    local3 = $008b
    local4 = $00e6
    local5 = $008b
    local6 = $0062
    local7 = $009b
    local8 = $00af
    local9 = $009b
    local10 = $0102
    local11 = $009b
    local12 = $00a3
    local13 = $005e
    local14 = $00de
    local15 = $0070
    local16 = $00b1
    local17 = $005c
    local18 = $005a
    local19 = $005e
    local20 = $0000
    local21 = $0000
    local22 = $0000
    local23 = $0000
)

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

// 07b2
(instance public kissact3 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:39 16            pushi 16 // $16 brRight
  0023:45 05 02         callb procedure_0005 2 // SetFlag 

  0026:39 05            pushi 5 // $5 view
  0028:38 0080          pushi 80 // $80 timeLeft
  002b:38 01d3          pushi 1d3 // $1d3 sel_467
  002e:38 01d6          pushi 1d6 // $1d6 sel_470
  0031:38 01bf          pushi 1bf // $1bf sel_447
  0034:38 01cb          pushi 1cb // $1cb sel_459
  0037:45 15 0a         callb procedure_0015 a // LoadMany 

  003a:7a               push2 
  003b:38 0087          pushi 87 // $87 clean
  003e:39 04            pushi 4 // $4 x
  0040:43 00 04         callk Load 4 

  0043:7a               push2 
  0044:38 0082          pushi 82 // $82 owner
  0047:38 03d9          pushi 3d9 // $3d9 sel_985
  004a:43 00 04         callk Load 4 

  004d:7a               push2 
  004e:38 0084          pushi 84 // $84 stop
  0051:39 33            pushi 33 // $33 b-di
  0053:43 00 04         callk Load 4 

  0056:35 01              ldi 1 
  0058:a0 00c0            sag gFifiState 
  005b:39 04            pushi 4 // $4 x
  005d:38 008f          pushi 8f // $8f moveTo
  0060:38 00f3          pushi f3 // $f3 close
  0063:38 0126          pushi 126 // $126 curAngle
  0066:38 0179          pushi 179 // $179 sel_377
  0069:45 15 08         callb procedure_0015 8 // LoadMany 

  006c:39 04            pushi 4 // $4 x
  006e:38 0080          pushi 80 // $80 timeLeft
  0071:38 01d6          pushi 1d6 // $1d6 sel_470
  0074:38 0388          pushi 388 // $388 sel_904
  0077:38 038e          pushi 38e // $38e sel_910
  007a:45 15 08         callb procedure_0015 8 // LoadMany 

  007d:88 00d0            lsg global208 
  0080:35 10              ldi 10 
  0082:14                  or 
  0083:a0 00d0            sag global208 
  0086:36                push 
  0087:34 0400            ldi 400 
  008a:14                  or 
  008b:a0 00d0            sag global208 
  008e:34 0126            ldi 126 
  0091:a0 017d            sag global381 
  0094:34 0179            ldi 179 
  0097:a0 0183            sag global387 
  009a:39 2b            pushi 2b // $2b number
  009c:78               push1 
  009d:39 70            pushi 70 // $70 start
  009f:39 06            pushi 6 // $6 loop
  00a1:78               push1 
  00a2:76               push0 
  00a3:72 06e8          lofsa $078e // myMusic
  00a6:4a 0c             send c 

  00a8:39 12            pushi 12 // $12 illegalBits
  00aa:78               push1 
  00ab:76               push0 
  00ac:38 00c9          pushi c9 // $c9 ignoreActors
  00af:78               push1 
  00b0:78               push1 
  00b1:39 57            pushi 57 // $57 init
  00b3:76               push0 
  00b4:72 0897          lofsa $094e // Duster
  00b7:4a 10             send 10 

  00b9:38 00d4          pushi d4 // $d4 setAvoider
  00bc:78               push1 
  00bd:39 56            pushi 56 // $56 new
  00bf:76               push0 
  00c0:51 21            class Avoid 
  00c2:4a 04             send 4 

  00c4:36                push 
  00c5:39 57            pushi 57 // $57 init
  00c7:76               push0 
  00c8:72 081b          lofsa $08e6 // Fifi
  00cb:4a 0a             send a 

  00cd:39 7a            pushi 7a // $7a setScript
  00cf:78               push1 
  00d0:74 0717          lofss $07ea // kiss
  00d3:54 06             self 6 

  00d5:48                 ret 
    )

    (method (doit) // method_00d6
  00d6:39 3c            pushi 3c // $3c doit
  00d8:76               push0 
  00d9:57 36 04         super Rgn 4 

  00dc:48                 ret 
    )

    (method (dispose) // method_00dd
  00dd:78               push1 
  00de:38 03d9          pushi 3d9 // $3d9 sel_985
  00e1:43 03 02         callk DisposeScript 2 

  00e4:39 58            pushi 58 // $58 dispose
  00e6:76               push0 
  00e7:57 36 04         super Rgn 4 

  00ea:48                 ret 
    )

    (method (handleEvent) // method_00eb
  00eb:39 6f            pushi 6f // $6f handleEvent
  00ed:78               push1 
  00ee:8f 01              lsp param1 
  00f0:57 36 06         super Rgn 6 

  00f3:39 4c            pushi 4c // $4c claimed
  00f5:76               push0 
  00f6:87 01              lap param1 
  00f8:4a 04             send 4 

  00fa:31 01              bnt code_00fd 
  00fc:48                 ret 

        code_00fd
  00fd:48                 ret 
    )

)

// 07e4
(instance kiss of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (doit) // method_00fe
  00fe:67 0a             pTos state 
  0100:35 05              ldi 5 
  0102:1a                 eq? 
  0103:31 16              bnt code_011b 
  0105:39 07            pushi 7 // $7 cel
  0107:76               push0 
  0108:72 07db          lofsa $08e6 // Fifi
  010b:4a 04             send 4 

  010d:36                push 
  010e:35 04              ldi 4 
  0110:1a                 eq? 
  0111:31 08              bnt code_011b 
  0113:39 58            pushi 58 // $58 dispose
  0115:76               push0 
  0116:72 0835          lofsa $094e // Duster
  0119:4a 04             send 4 


        code_011b
  011b:67 0a             pTos state 
  011d:35 05              ldi 5 
  011f:1a                 eq? 
  0120:31 22              bnt code_0144 
  0122:39 07            pushi 7 // $7 cel
  0124:76               push0 
  0125:72 07be          lofsa $08e6 // Fifi
  0128:4a 04             send 4 

  012a:36                push 
  012b:35 01              ldi 1 
  012d:1a                 eq? 
  012e:31 14              bnt code_0144 
  0130:39 06            pushi 6 // $6 loop
  0132:78               push1 
  0133:39 08            pushi 8 // $8 underBits
  0135:39 07            pushi 7 // $7 cel
  0137:78               push1 
  0138:76               push0 
  0139:39 7e            pushi 7e // $7e setCycle
  013b:78               push1 
  013c:51 1a            class End 
  013e:36                push 
  013f:72 073c          lofsa $087e // Jeeves
  0142:4a 12             send 12 


        code_0144
  0144:67 0a             pTos state 
  0146:35 05              ldi 5 
  0148:1a                 eq? 
  0149:31 2c              bnt code_0177 
  014b:39 07            pushi 7 // $7 cel
  014d:76               push0 
  014e:72 072d          lofsa $087e // Jeeves
  0151:4a 04             send 4 

  0153:36                push 
  0154:35 01              ldi 1 
  0156:1a                 eq? 
  0157:31 1e              bnt code_0177 
  0159:39 06            pushi 6 // $6 loop
  015b:76               push0 
  015c:72 071f          lofsa $087e // Jeeves
  015f:4a 04             send 4 

  0161:36                push 
  0162:35 08              ldi 8 
  0164:1a                 eq? 
  0165:31 10              bnt code_0177 
  0167:39 06            pushi 6 // $6 loop
  0169:78               push1 
  016a:39 09            pushi 9 // $9 nsTop
  016c:39 7e            pushi 7e // $7e setCycle
  016e:78               push1 
  016f:51 16            class Fwd 
  0171:36                push 
  0172:72 0709          lofsa $087e // Jeeves
  0175:4a 0c             send c 


        code_0177
  0177:67 0a             pTos state 
  0179:35 01              ldi 1 
  017b:1a                 eq? 
  017c:31 34              bnt code_01b2 
  017e:39 07            pushi 7 // $7 cel
  0180:76               push0 
  0181:72 0762          lofsa $08e6 // Fifi
  0184:4a 04             send 4 

  0186:36                push 
  0187:35 01              ldi 1 
  0189:1a                 eq? 
  018a:31 26              bnt code_01b2 
  018c:38 00dc          pushi dc // $dc setStep
  018f:7a               push2 
  0190:39 03            pushi 3 // $3 y
  0192:39 03            pushi 3 // $3 y
  0194:38 00c8          pushi c8 // $c8 setLoop
  0197:78               push1 
  0198:78               push1 
  0199:39 7e            pushi 7e // $7e setCycle
  019b:78               push1 
  019c:51 16            class Fwd 
  019e:36                push 
  019f:38 00d3          pushi d3 // $d3 setMotion
  01a2:39 03            pushi 3 // $3 y
  01a4:51 1d            class MoveTo 
  01a6:36                push 
  01a7:38 0088          pushi 88 // $88 fade
  01aa:38 008e          pushi 8e // $8e move
  01ad:72 079e          lofsa $094e // Duster
  01b0:4a 1e             send 1e 


        code_01b2
  01b2:39 3c            pushi 3c // $3c doit
  01b4:76               push0 
  01b5:57 05 04         super Script 4 

  01b8:48                 ret 
    )

    (method (changeState) // method_01b9
  01b9:87 01              lap param1 
  01bb:65 0a             aTop state 
  01bd:36                push 
  01be:3c                 dup 
  01bf:35 00              ldi 0 
  01c1:1a                 eq? 
  01c2:31 0b              bnt code_01cf 
  01c4:76               push0 
  01c5:45 03 00         callb procedure_0003 0 // HandsOff 

  01c8:35 01              ldi 1 
  01ca:65 10             aTop cycles 
  01cc:32 010b            jmp code_02da 

        code_01cf
  01cf:3c                 dup 
  01d0:35 01              ldi 1 
  01d2:1a                 eq? 
  01d3:31 22              bnt code_01f7 
  01d5:39 05            pushi 5 // $5 view
  01d7:78               push1 
  01d8:38 01db          pushi 1db // $1db sel_475
  01db:39 06            pushi 6 // $6 loop
  01dd:78               push1 
  01de:76               push0 
  01df:39 07            pushi 7 // $7 cel
  01e1:78               push1 
  01e2:76               push0 
  01e3:38 00a4          pushi a4 // $a4 cycleSpeed
  01e6:78               push1 
  01e7:7a               push2 
  01e8:39 7e            pushi 7e // $7e setCycle
  01ea:7a               push2 
  01eb:51 1a            class End 
  01ed:36                push 
  01ee:7c            pushSelf 
  01ef:72 06f4          lofsa $08e6 // Fifi
  01f2:4a 20             send 20 

  01f4:32 00e3            jmp code_02da 

        code_01f7
  01f7:3c                 dup 
  01f8:35 02              ldi 2 
  01fa:1a                 eq? 
  01fb:31 3a              bnt code_0237 
  01fd:39 2b            pushi 2b // $2b number
  01ff:78               push1 
  0200:39 33            pushi 33 // $33 b-di
  0202:39 06            pushi 6 // $6 loop
  0204:78               push1 
  0205:78               push1 
  0206:39 2a            pushi 2a // $2a play
  0208:76               push0 
  0209:72 0582          lofsa $078e // myMusic
  020c:4a 10             send 10 

  020e:39 7e            pushi 7e // $7e setCycle
  0210:78               push1 
  0211:76               push0 
  0212:39 06            pushi 6 // $6 loop
  0214:78               push1 
  0215:7a               push2 
  0216:39 07            pushi 7 // $7 cel
  0218:78               push1 
  0219:76               push0 
  021a:72 0731          lofsa $094e // Duster
  021d:4a 12             send 12 

  021f:39 06            pushi 6 // $6 loop
  0221:78               push1 
  0222:39 03            pushi 3 // $3 y
  0224:39 07            pushi 7 // $7 cel
  0226:78               push1 
  0227:76               push0 
  0228:39 7e            pushi 7e // $7e setCycle
  022a:7a               push2 
  022b:51 1a            class End 
  022d:36                push 
  022e:7c            pushSelf 
  022f:72 06b4          lofsa $08e6 // Fifi
  0232:4a 14             send 14 

  0234:32 00a3            jmp code_02da 

        code_0237
  0237:3c                 dup 
  0238:35 03              ldi 3 
  023a:1a                 eq? 
  023b:31 18              bnt code_0255 
  023d:39 06            pushi 6 // $6 loop
  023f:78               push1 
  0240:39 04            pushi 4 // $4 x
  0242:39 07            pushi 7 // $7 cel
  0244:78               push1 
  0245:76               push0 
  0246:39 7e            pushi 7e // $7e setCycle
  0248:7a               push2 
  0249:51 1a            class End 
  024b:36                push 
  024c:7c            pushSelf 
  024d:72 0696          lofsa $08e6 // Fifi
  0250:4a 14             send 14 

  0252:32 0085            jmp code_02da 

        code_0255
  0255:3c                 dup 
  0256:35 04              ldi 4 
  0258:1a                 eq? 
  0259:31 34              bnt code_028f 
  025b:39 07            pushi 7 // $7 cel
  025d:78               push1 
  025e:76               push0 
  025f:39 06            pushi 6 // $6 loop
  0261:78               push1 
  0262:39 05            pushi 5 // $5 view
  0264:39 7e            pushi 7e // $7e setCycle
  0266:78               push1 
  0267:51 16            class Fwd 
  0269:36                push 
  026a:72 0679          lofsa $08e6 // Fifi
  026d:4a 12             send 12 

  026f:39 7e            pushi 7e // $7e setCycle
  0271:78               push1 
  0272:51 1a            class End 
  0274:36                push 
  0275:38 00d4          pushi d4 // $d4 setAvoider
  0278:78               push1 
  0279:39 56            pushi 56 // $56 new
  027b:76               push0 
  027c:51 21            class Avoid 
  027e:4a 04             send 4 

  0280:36                push 
  0281:39 57            pushi 57 // $57 init
  0283:76               push0 
  0284:72 05f7          lofsa $087e // Jeeves
  0287:4a 10             send 10 

  0289:35 03              ldi 3 
  028b:65 12             aTop seconds 
  028d:33 4b              jmp code_02da 

        code_028f
  028f:3c                 dup 
  0290:35 05              ldi 5 
  0292:1a                 eq? 
  0293:31 13              bnt code_02a8 
  0295:39 06            pushi 6 // $6 loop
  0297:78               push1 
  0298:39 07            pushi 7 // $7 cel
  029a:39 7e            pushi 7e // $7e setCycle
  029c:7a               push2 
  029d:51 1a            class End 
  029f:36                push 
  02a0:7c            pushSelf 
  02a1:72 0642          lofsa $08e6 // Fifi
  02a4:4a 0e             send e 

  02a6:33 32              jmp code_02da 

        code_02a8
  02a8:3c                 dup 
  02a9:35 06              ldi 6 
  02ab:1a                 eq? 
  02ac:31 2c              bnt code_02da 
  02ae:76               push0 
  02af:45 04 00         callb procedure_0004 0 // HandsOn 

  02b2:38 00a4          pushi a4 // $a4 cycleSpeed
  02b5:78               push1 
  02b6:76               push0 
  02b7:39 7a            pushi 7a // $7a setScript
  02b9:78               push1 
  02ba:74 0591          lofss $084e // fifiActions
  02bd:72 0626          lofsa $08e6 // Fifi
  02c0:4a 0c             send c 

  02c2:38 00a4          pushi a4 // $a4 cycleSpeed
  02c5:78               push1 
  02c6:76               push0 
  02c7:39 7a            pushi 7a // $7a setScript
  02c9:78               push1 
  02ca:74 0551          lofss $081e // jeevesActions
  02cd:72 05ae          lofsa $087e // Jeeves
  02d0:4a 0c             send c 

  02d2:39 7a            pushi 7a // $7a setScript
  02d4:78               push1 
  02d5:76               push0 
  02d6:63 08             pToa client 
  02d8:4a 06             send 6 


        code_02da
  02da:3a                toss 
  02db:48                 ret 
    )

)

// 0818
(instance jeevesActions 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_02dc
  02dc:87 01              lap param1 
  02de:65 0a             aTop state 
  02e0:36                push 
  02e1:3c                 dup 
  02e2:35 00              ldi 0 
  02e4:1a                 eq? 
  02e5:31 3d              bnt code_0324 
  02e7:7a               push2 
  02e8:76               push0 
  02e9:39 05            pushi 5 // $5 view
  02eb:43 40 04         callk Random 4 

  02ee:a3 14              sal local20 
  02f0:39 05            pushi 5 // $5 view
  02f2:78               push1 
  02f3:38 01bf          pushi 1bf // $1bf sel_447
  02f6:39 7e            pushi 7e // $7e setCycle
  02f8:78               push1 
  02f9:51 17            class Walk 
  02fb:36                push 
  02fc:38 00c9          pushi c9 // $c9 ignoreActors
  02ff:78               push1 
  0300:76               push0 
  0301:38 00d3          pushi d3 // $d3 setMotion
  0304:39 04            pushi 4 // $4 x
  0306:51 1d            class MoveTo 
  0308:36                push 
  0309:8b 14              lsl local20 
  030b:35 02              ldi 2 
  030d:06                 mul 
  030e:9b 00             lsli local0 
  0310:8b 14              lsl local20 
  0312:35 02              ldi 2 
  0314:06                 mul 
  0315:36                push 
  0316:35 01              ldi 1 
  0318:02                 add 
  0319:9b 00             lsli local0 
  031b:7c            pushSelf 
  031c:72 055f          lofsa $087e // Jeeves
  031f:4a 1e             send 1e 

  0321:32 0096            jmp code_03ba 

        code_0324
  0324:3c                 dup 
  0325:35 01              ldi 1 
  0327:1a                 eq? 
  0328:31 2f              bnt code_0359 
  032a:39 05            pushi 5 // $5 view
  032c:78               push1 
  032d:38 01cb          pushi 1cb // $1cb sel_459
  0330:39 07            pushi 7 // $7 cel
  0332:78               push1 
  0333:76               push0 
  0334:39 06            pushi 6 // $6 loop
  0336:78               push1 
  0337:7a               push2 
  0338:78               push1 
  0339:39 64            pushi 64 // $64 allTrue
  033b:43 40 04         callk Random 4 

  033e:36                push 
  033f:35 32              ldi 32 
  0341:22                 lt? 
  0342:31 04              bnt code_0348 
  0344:35 00              ldi 0 
  0346:33 02              jmp code_034a 

        code_0348
  0348:35 01              ldi 1 

        code_034a
  034a:36                push 
  034b:39 7e            pushi 7e // $7e setCycle
  034d:7a               push2 
  034e:51 1a            class End 
  0350:36                push 
  0351:7c            pushSelf 
  0352:72 0529          lofsa $087e // Jeeves
  0355:4a 1a             send 1a 

  0357:33 61              jmp code_03ba 

        code_0359
  0359:3c                 dup 
  035a:35 02              ldi 2 
  035c:1a                 eq? 
  035d:31 29              bnt code_0388 
  035f:39 06            pushi 6 // $6 loop
  0361:78               push1 
  0362:39 06            pushi 6 // $6 loop
  0364:76               push0 
  0365:72 0516          lofsa $087e // Jeeves
  0368:4a 04             send 4 

  036a:36                push 
  036b:35 00              ldi 0 
  036d:1a                 eq? 
  036e:31 04              bnt code_0374 
  0370:35 02              ldi 2 
  0372:33 02              jmp code_0376 

        code_0374
  0374:35 03              ldi 3 

        code_0376
  0376:36                push 
  0377:39 7e            pushi 7e // $7e setCycle
  0379:78               push1 
  037a:51 16            class Fwd 
  037c:36                push 
  037d:72 04fe          lofsa $087e // Jeeves
  0380:4a 0c             send c 

  0382:35 04              ldi 4 
  0384:65 12             aTop seconds 
  0386:33 32              jmp code_03ba 

        code_0388
  0388:3c                 dup 
  0389:35 03              ldi 3 
  038b:1a                 eq? 
  038c:31 2c              bnt code_03ba 
  038e:39 07            pushi 7 // $7 cel
  0390:78               push1 
  0391:7a               push2 
  0392:39 06            pushi 6 // $6 loop
  0394:78               push1 
  0395:39 06            pushi 6 // $6 loop
  0397:76               push0 
  0398:72 04e3          lofsa $087e // Jeeves
  039b:4a 04             send 4 

  039d:36                push 
  039e:35 02              ldi 2 
  03a0:1a                 eq? 
  03a1:31 04              bnt code_03a7 
  03a3:35 00              ldi 0 
  03a5:33 02              jmp code_03a9 

        code_03a7
  03a7:35 01              ldi 1 

        code_03a9
  03a9:36                push 
  03aa:39 7e            pushi 7e // $7e setCycle
  03ac:7a               push2 
  03ad:51 1b            class Beg 
  03af:36                push 
  03b0:7c            pushSelf 
  03b1:72 04ca          lofsa $087e // Jeeves
  03b4:4a 14             send 14 

  03b6:35 ff              ldi ff 
  03b8:65 0a             aTop state 

        code_03ba
  03ba:3a                toss 
  03bb:48                 ret 
    )

)

// 0848
(instance fifiActions 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_03bc
  03bc:87 01              lap param1 
  03be:65 0a             aTop state 
  03c0:36                push 
  03c1:3c                 dup 
  03c2:35 00              ldi 0 
  03c4:1a                 eq? 
  03c5:31 27              bnt code_03ee 
  03c7:39 05            pushi 5 // $5 view
  03c9:78               push1 
  03ca:38 01d0          pushi 1d0 // $1d0 sel_464
  03cd:39 7e            pushi 7e // $7e setCycle
  03cf:78               push1 
  03d0:51 17            class Walk 
  03d2:36                push 
  03d3:38 00c9          pushi c9 // $c9 ignoreActors
  03d6:78               push1 
  03d7:76               push0 
  03d8:38 00d3          pushi d3 // $d3 setMotion
  03db:39 04            pushi 4 // $4 x
  03dd:51 1d            class MoveTo 
  03df:36                push 
  03e0:39 40            pushi 40 // $40 modifiers
  03e2:38 008b          pushi 8b // $8b select
  03e5:7c            pushSelf 
  03e6:72 04fd          lofsa $08e6 // Fifi
  03e9:4a 1e             send 1e 

  03eb:32 00fb            jmp code_04e9 

        code_03ee
  03ee:3c                 dup 
  03ef:35 01              ldi 1 
  03f1:1a                 eq? 
  03f2:31 15              bnt code_0409 
  03f4:38 00d3          pushi d3 // $d3 setMotion
  03f7:39 04            pushi 4 // $4 x
  03f9:51 1d            class MoveTo 
  03fb:36                push 
  03fc:39 38            pushi 38 // $38 moveSpeed
  03fe:39 67            pushi 67 // $67 first
  0400:7c            pushSelf 
  0401:72 04e2          lofsa $08e6 // Fifi
  0404:4a 0c             send c 

  0406:32 00e0            jmp code_04e9 

        code_0409
  0409:3c                 dup 
  040a:35 02              ldi 2 
  040c:1a                 eq? 
  040d:31 3d              bnt code_044c 
  040f:7a               push2 
  0410:76               push0 
  0411:39 03            pushi 3 // $3 y
  0413:43 40 04         callk Random 4 

  0416:a3 15              sal local21 
  0418:39 05            pushi 5 // $5 view
  041a:78               push1 
  041b:38 01d0          pushi 1d0 // $1d0 sel_464
  041e:39 7e            pushi 7e // $7e setCycle
  0420:78               push1 
  0421:51 17            class Walk 
  0423:36                push 
  0424:38 00c9          pushi c9 // $c9 ignoreActors
  0427:78               push1 
  0428:76               push0 
  0429:38 00d3          pushi d3 // $d3 setMotion
  042c:39 04            pushi 4 // $4 x
  042e:51 1d            class MoveTo 
  0430:36                push 
  0431:8b 15              lsl local21 
  0433:35 02              ldi 2 
  0435:06                 mul 
  0436:9b 0c             lsli local12 
  0438:8b 15              lsl local21 
  043a:35 02              ldi 2 
  043c:06                 mul 
  043d:36                push 
  043e:35 01              ldi 1 
  0440:02                 add 
  0441:9b 0c             lsli local12 
  0443:7c            pushSelf 
  0444:72 049f          lofsa $08e6 // Fifi
  0447:4a 1e             send 1e 

  0449:32 009d            jmp code_04e9 

        code_044c
  044c:3c                 dup 
  044d:35 03              ldi 3 
  044f:1a                 eq? 
  0450:31 3f              bnt code_0491 
  0452:39 05            pushi 5 // $5 view
  0454:78               push1 
  0455:38 01d6          pushi 1d6 // $1d6 sel_470
  0458:39 07            pushi 7 // $7 cel
  045a:78               push1 
  045b:76               push0 
  045c:39 06            pushi 6 // $6 loop
  045e:78               push1 
  045f:8b 15              lsl local21 
  0461:3c                 dup 
  0462:35 00              ldi 0 
  0464:1a                 eq? 
  0465:31 04              bnt code_046b 
  0467:35 01              ldi 1 
  0469:33 16              jmp code_0481 

        code_046b
  046b:3c                 dup 
  046c:35 01              ldi 1 
  046e:1a                 eq? 
  046f:31 04              bnt code_0475 
  0471:35 00              ldi 0 
  0473:33 0c              jmp code_0481 

        code_0475
  0475:3c                 dup 
  0476:35 02              ldi 2 
  0478:1a                 eq? 
  0479:31 04              bnt code_047f 
  047b:35 01              ldi 1 
  047d:33 02              jmp code_0481 

        code_047f
  047f:35 00              ldi 0 

        code_0481
  0481:3a                toss 
  0482:36                push 
  0483:39 7e            pushi 7e // $7e setCycle
  0485:7a               push2 
  0486:51 1a            class End 
  0488:36                push 
  0489:7c            pushSelf 
  048a:72 0459          lofsa $08e6 // Fifi
  048d:4a 1a             send 1a 

  048f:33 58              jmp code_04e9 

        code_0491
  0491:3c                 dup 
  0492:35 04              ldi 4 
  0494:1a                 eq? 
  0495:31 38              bnt code_04cf 
  0497:39 06            pushi 6 // $6 loop
  0499:78               push1 
  049a:8b 15              lsl local21 
  049c:3c                 dup 
  049d:35 00              ldi 0 
  049f:1a                 eq? 
  04a0:31 04              bnt code_04a6 
  04a2:35 03              ldi 3 
  04a4:33 16              jmp code_04bc 

        code_04a6
  04a6:3c                 dup 
  04a7:35 01              ldi 1 
  04a9:1a                 eq? 
  04aa:31 04              bnt code_04b0 
  04ac:35 02              ldi 2 
  04ae:33 0c              jmp code_04bc 

        code_04b0
  04b0:3c                 dup 
  04b1:35 02              ldi 2 
  04b3:1a                 eq? 
  04b4:31 04              bnt code_04ba 
  04b6:35 03              ldi 3 
  04b8:33 02              jmp code_04bc 

        code_04ba
  04ba:35 02              ldi 2 

        code_04bc
  04bc:3a                toss 
  04bd:36                push 
  04be:39 7e            pushi 7e // $7e setCycle
  04c0:78               push1 
  04c1:51 16            class Fwd 
  04c3:36                push 
  04c4:72 041f          lofsa $08e6 // Fifi
  04c7:4a 0c             send c 

  04c9:35 04              ldi 4 
  04cb:65 12             aTop seconds 
  04cd:33 1a              jmp code_04e9 

        code_04cf
  04cf:3c                 dup 
  04d0:35 05              ldi 5 
  04d2:1a                 eq? 
  04d3:31 14              bnt code_04e9 
  04d5:39 07            pushi 7 // $7 cel
  04d7:78               push1 
  04d8:7a               push2 
  04d9:39 7e            pushi 7e // $7e setCycle
  04db:7a               push2 
  04dc:51 1b            class Beg 
  04de:36                push 
  04df:7c            pushSelf 
  04e0:72 0403          lofsa $08e6 // Fifi
  04e3:4a 0e             send e 

  04e5:35 01              ldi 1 
  04e7:65 0a             aTop state 

        code_04e9
  04e9:3a                toss 
  04ea:48                 ret 
    )

)

// 0878
(instance Jeeves of Act
    (properties
        y $99
        x $a9
        z $0
        heading $0
        yStep $2
        view $1db
        loop $6
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
        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_04eb
  04eb:88 00cf            lsg global207 
  04ee:34 0400            ldi 400 
  04f1:12                 and 
  04f2:18                 not 
  04f3:31 3c              bnt code_0531 
  04f5:39 03            pushi 3 // $3 y
  04f7:7c            pushSelf 
  04f8:8f 01              lsp param1 
  04fa:39 03            pushi 3 // $3 y
  04fc:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0502:2f 09               bt code_050d 
  0504:78               push1 
  0505:74 0255          lofss $075d // look/butler
  0508:43 25 02         callk Said 2 

  050b:31 24              bnt code_0531 

        code_050d
  050d:35 0b              ldi b 
  050f:a0 00d5            sag global213 
  0512:88 00cf            lsg global207 
  0515:34 0400            ldi 400 
  0518:14                  or 
  0519:a0 00cf            sag global207 
  051c:39 4c            pushi 4c // $4c claimed
  051e:78               push1 
  051f:78               push1 
  0520:87 01              lap param1 
  0522:4a 06             send 6 

  0524:39 03            pushi 3 // $3 y
  0526:76               push0 
  0527:38 017f          pushi 17f // $17f sel_383
  052a:76               push0 
  052b:45 01 06         callb procedure_0001 6 // Say 

  052e:32 00f5            jmp code_0626 

        code_0531
  0531:88 00cf            lsg global207 
  0534:34 0400            ldi 400 
  0537:12                 and 
  0538:31 2e              bnt code_0568 
  053a:39 03            pushi 3 // $3 y
  053c:7c            pushSelf 
  053d:8f 01              lsp param1 
  053f:39 03            pushi 3 // $3 y
  0541:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0547:2f 09               bt code_0552 
  0549:78               push1 
  054a:74 0210          lofss $075d // look/butler
  054d:43 25 02         callk Said 2 

  0550:31 16              bnt code_0568 

        code_0552
  0552:39 4c            pushi 4c // $4c claimed
  0554:78               push1 
  0555:78               push1 
  0556:87 01              lap param1 
  0558:4a 06             send 6 

  055a:7a               push2 
  055b:38 017f          pushi 17f // $17f sel_383
  055e:78               push1 
  055f:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0565:32 00be            jmp code_0626 

        code_0568
  0568:78               push1 
  0569:74 0206          lofss $0772 // bonjour,look/person
  056c:43 25 02         callk Said 2 

  056f:31 0e              bnt code_057f 
  0571:7a               push2 
  0572:38 017f          pushi 17f // $17f sel_383
  0575:7a               push2 
  0576:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  057c:32 00a7            jmp code_0626 

        code_057f
  057f:78               push1 
  0580:74 01f8          lofss $077b // bonjour/gens
  0583:43 25 02         callk Said 2 

  0586:31 0f              bnt code_0597 
  0588:7a               push2 
  0589:38 017f          pushi 17f // $17f sel_383
  058c:39 03            pushi 3 // $3 y
  058e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0594:32 008f            jmp code_0626 

        code_0597
  0597:78               push1 
  0598:74 01ce          lofss $0769 // look/gens
  059b:43 25 02         callk Said 2 

  059e:31 0e              bnt code_05ae 
  05a0:7a               push2 
  05a1:38 017f          pushi 17f // $17f sel_383
  05a4:39 04            pushi 4 // $4 x
  05a6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05ac:33 78              jmp code_0626 

        code_05ae
  05ae:78               push1 
  05af:74 01a3          lofss $0755 // /butler>
  05b2:43 25 02         callk Said 2 

  05b5:31 6f              bnt code_0626 
  05b7:78               push1 
  05b8:74 01b4          lofss $076f // bonjour
  05bb:43 25 02         callk Said 2 

  05be:31 51              bnt code_0611 
  05c0:35 0b              ldi b 
  05c2:a0 00d5            sag global213 
  05c5:8b 16              lsl local22 
  05c7:3c                 dup 
  05c8:35 00              ldi 0 
  05ca:1a                 eq? 
  05cb:31 0d              bnt code_05da 
  05cd:39 03            pushi 3 // $3 y
  05cf:78               push1 
  05d0:38 017f          pushi 17f // $17f sel_383
  05d3:39 05            pushi 5 // $5 view
  05d5:45 01 06         callb procedure_0001 6 // Say 

  05d8:33 32              jmp code_060c 

        code_05da
  05da:3c                 dup 
  05db:35 01              ldi 1 
  05dd:1a                 eq? 
  05de:31 0d              bnt code_05ed 
  05e0:39 03            pushi 3 // $3 y
  05e2:78               push1 
  05e3:38 017f          pushi 17f // $17f sel_383
  05e6:39 06            pushi 6 // $6 loop
  05e8:45 01 06         callb procedure_0001 6 // Say 

  05eb:33 1f              jmp code_060c 

        code_05ed
  05ed:3c                 dup 
  05ee:35 02              ldi 2 
  05f0:1a                 eq? 
  05f1:31 0d              bnt code_0600 
  05f3:39 03            pushi 3 // $3 y
  05f5:78               push1 
  05f6:38 017f          pushi 17f // $17f sel_383
  05f9:39 07            pushi 7 // $7 cel
  05fb:45 01 06         callb procedure_0001 6 // Say 

  05fe:33 0c              jmp code_060c 

        code_0600
  0600:7a               push2 
  0601:38 017f          pushi 17f // $17f sel_383
  0604:39 08            pushi 8 // $8 underBits
  0606:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_060c
  060c:3a                toss 
  060d:c3 16              +al local22 
  060f:33 15              jmp code_0626 

        code_0611
  0611:78               push1 
  0612:74 0145          lofss $075a // ecouter
  0615:43 25 02         callk Said 2 

  0618:31 0c              bnt code_0626 
  061a:7a               push2 
  061b:38 017f          pushi 17f // $17f sel_383
  061e:39 09            pushi 9 // $9 nsTop
  0620:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0626
  0626:48                 ret 
    )

)

// 08e0
(instance Fifi of Act
    (properties
        y $99
        x $94
        z $0
        heading $0
        yStep $2
        view $1db
        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_0627
  0627:38 00ae          pushi ae // $ae distanceTo
  062a:78               push1 
  062b:74 02b8          lofss $08e6 // Fifi
  062e:81 00              lag gEgo 
  0630:4a 06             send 6 

  0632:36                push 
  0633:38 00ae          pushi ae // $ae distanceTo
  0636:78               push1 
  0637:74 0244          lofss $087e // Jeeves
  063a:81 00              lag gEgo 
  063c:4a 06             send 6 

  063e:22                 lt? 
  063f:31 07              bnt code_0648 
  0641:35 10              ldi 10 
  0643:a0 00d6            sag global214 
  0646:33 06              jmp code_064e 

        code_0648
  0648:34 0400            ldi 400 
  064b:a0 00d6            sag global214 

        code_064e
  064e:39 03            pushi 3 // $3 y
  0650:7c            pushSelf 
  0651:8f 01              lsp param1 
  0653:39 03            pushi 3 // $3 y
  0655:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  065b:31 1b              bnt code_0678 
  065d:88 00cf            lsg global207 
  0660:35 10              ldi 10 
  0662:12                 and 
  0663:18                 not 
  0664:31 12              bnt code_0678 
  0666:39 4c            pushi 4c // $4c claimed
  0668:78               push1 
  0669:78               push1 
  066a:87 01              lap param1 
  066c:4a 06             send 6 

  066e:78               push1 
  066f:74 037f          lofss $09f1 // fifi
  0672:45 19 02         callb procedure_0019 2 // DoLook 

  0675:32 00d1            jmp code_0749 

        code_0678
  0678:88 00cf            lsg global207 
  067b:35 10              ldi 10 
  067d:12                 and 
  067e:31 2f              bnt code_06af 
  0680:39 03            pushi 3 // $3 y
  0682:7c            pushSelf 
  0683:8f 01              lsp param1 
  0685:39 03            pushi 3 // $3 y
  0687:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  068d:2f 09               bt code_0698 
  068f:78               push1 
  0690:74 00d0          lofss $0763 // look/fifi
  0693:43 25 02         callk Said 2 

  0696:31 17              bnt code_06af 

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

  06a0:7a               push2 
  06a1:38 017f          pushi 17f // $17f sel_383
  06a4:39 0a            pushi a // $a nsLeft
  06a6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  06ac:32 009a            jmp code_0749 

        code_06af
  06af:39 22            pushi 22 // $22 type
  06b1:76               push0 
  06b2:87 01              lap param1 
  06b4:4a 04             send 4 

  06b6:36                push 
  06b7:34 0080            ldi 80 
  06ba:1a                 eq? 
  06bb:30 008b            bnt code_0749 
  06be:78               push1 
  06bf:74 008c          lofss $074e // */fifi>
  06c2:43 25 02         callk Said 2 

  06c5:30 0081            bnt code_0749 
  06c8:78               push1 
  06c9:74 00a3          lofss $076f // bonjour
  06cc:43 25 02         callk Said 2 

  06cf:31 63              bnt code_0734 
  06d1:35 05              ldi 5 
  06d3:a0 00d5            sag global213 
  06d6:8b 17              lsl local23 
  06d8:3c                 dup 
  06d9:35 00              ldi 0 
  06db:1a                 eq? 
  06dc:31 0d              bnt code_06eb 
  06de:39 03            pushi 3 // $3 y
  06e0:78               push1 
  06e1:38 017f          pushi 17f // $17f sel_383
  06e4:39 0b            pushi b // $b nsBottom
  06e6:45 01 06         callb procedure_0001 6 // Say 

  06e9:33 44              jmp code_072f 

        code_06eb
  06eb:3c                 dup 
  06ec:35 01              ldi 1 
  06ee:1a                 eq? 
  06ef:31 0d              bnt code_06fe 
  06f1:39 03            pushi 3 // $3 y
  06f3:78               push1 
  06f4:38 017f          pushi 17f // $17f sel_383
  06f7:39 0c            pushi c // $c nsRight
  06f9:45 01 06         callb procedure_0001 6 // Say 

  06fc:33 31              jmp code_072f 

        code_06fe
  06fe:3c                 dup 
  06ff:35 02              ldi 2 
  0701:1a                 eq? 
  0702:31 0d              bnt code_0711 
  0704:39 03            pushi 3 // $3 y
  0706:78               push1 
  0707:38 017f          pushi 17f // $17f sel_383
  070a:39 0d            pushi d // $d lsTop
  070c:45 01 06         callb procedure_0001 6 // Say 

  070f:33 1e              jmp code_072f 

        code_0711
  0711:3c                 dup 
  0712:35 03              ldi 3 
  0714:1a                 eq? 
  0715:31 0d              bnt code_0724 
  0717:39 03            pushi 3 // $3 y
  0719:78               push1 
  071a:38 017f          pushi 17f // $17f sel_383
  071d:39 0e            pushi e // $e lsLeft
  071f:45 01 06         callb procedure_0001 6 // Say 

  0722:33 0b              jmp code_072f 

        code_0724
  0724:39 03            pushi 3 // $3 y
  0726:78               push1 
  0727:38 017f          pushi 17f // $17f sel_383
  072a:39 0f            pushi f // $f lsBottom
  072c:45 01 06         callb procedure_0001 6 // Say 


        code_072f
  072f:3a                toss 
  0730:c3 17              +al local23 
  0732:33 15              jmp code_0749 

        code_0734
  0734:78               push1 
  0735:74 0022          lofss $075a // ecouter
  0738:43 25 02         callk Said 2 

  073b:31 0c              bnt code_0749 
  073d:7a               push2 
  073e:38 017f          pushi 17f // $17f sel_383
  0741:39 10            pushi 10 // $10 lsRight
  0743:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0749
  0749:48                 ret 
    )

)

// 0948
(instance Duster of Act
    (properties
        y $7c
        x $9e
        z $0
        heading $0
        yStep $2
        view $1db
        loop $1
        cel $0
        priority $0
        underBits $0
        signal $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        lsTop $0
        lsLeft $0
        lsBottom $0
        lsRight $0
        brTop $0
        brLeft $0
        brBottom $0
        brRight $0
        cycleSpeed $0
        script $0
        cycler $0
        timer $0
        illegalBits $8000
        xLast $0
        yLast $0
        xStep $3
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)



