(script 380)

(string
    string_04a4 "Fifi"
    string_04a9 "dustAct1"
    string_04b2 "fifiActions"
)

(said
    said_039c /fifi>
    said_03a1 ask,raconter//*<about
    said_03ae embrace
    said_03b1 get
    said_03b4 deliver,hold/*
    said_03bd abattre
    said_03c0 embrasser
    said_03c3 look/fifi
    said_03c9 bonjour
)

(synonym
    fifi | maid = person | personne
    fifi | maid = dame | femme | fille | girl | lady | maiden | woman
)

(local
    local0 = $0000
    local1 = $0000
    local2 = $0000
)

// 03d2
(instance public dustAct1 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:35 10              ldi 10 
  0022:a0 00c3            sag global195 
  0025:39 03            pushi 3 // $3 y
  0027:38 0080          pushi 80 // $80 timeLeft
  002a:38 01d6          pushi 1d6 // $1d6 sel_470
  002d:38 0388          pushi 388 // $388 sel_904
  0030:45 15 06         callb procedure_0015 6 // LoadMany 

  0033:39 05            pushi 5 // $5 view
  0035:78               push1 
  0036:38 01d0          pushi 1d0 // $1d0 sel_464
  0039:38 00d4          pushi d4 // $d4 setAvoider
  003c:78               push1 
  003d:39 56            pushi 56 // $56 new
  003f:76               push0 
  0040:51 21            class Avoid 
  0042:4a 04             send 4 

  0044:36                push 
  0045:39 12            pushi 12 // $12 illegalBits
  0047:78               push1 
  0048:38 c006          pushi c006 // $c006 sel_49158
  004b:39 57            pushi 57 // $57 init
  004d:76               push0 
  004e:39 7a            pushi 7a // $7a setScript
  0050:78               push1 
  0051:74 03b6          lofss $040a // fifiActions
  0054:72 03e3          lofsa $043a // Fifi
  0057:4a 1c             send 1c 

  0059:48                 ret 
    )

    (method (doit) // method_005a
  005a:39 3c            pushi 3c // $3c doit
  005c:76               push0 
  005d:57 36 04         super Rgn 4 

  0060:48                 ret 
    )

    (method (dispose) // method_0061
  0061:78               push1 
  0062:38 03d9          pushi 3d9 // $3d9 sel_985
  0065:43 03 02         callk DisposeScript 2 

  0068:39 58            pushi 58 // $58 dispose
  006a:76               push0 
  006b:57 36 04         super Rgn 4 

  006e:48                 ret 
    )

    (method (handleEvent) // method_006f
  006f:39 6f            pushi 6f // $6f handleEvent
  0071:78               push1 
  0072:8f 01              lsp param1 
  0074:57 36 06         super Rgn 6 

  0077:39 4c            pushi 4c // $4c claimed
  0079:76               push0 
  007a:87 01              lap param1 
  007c:4a 04             send 4 

  007e:31 03              bnt code_0083 
  0080:35 01              ldi 1 
  0082:48                 ret 

        code_0083
  0083:48                 ret 
    )

)

// 0404
(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_0084
  0084:87 01              lap param1 
  0086:65 0a             aTop state 
  0088:36                push 
  0089:3c                 dup 
  008a:35 00              ldi 0 
  008c:1a                 eq? 
  008d:30 00de            bnt code_016e 
  0090:39 05            pushi 5 // $5 view
  0092:78               push1 
  0093:38 01d0          pushi 1d0 // $1d0 sel_464
  0096:39 42            pushi 42 // $42 setPri
  0098:78               push1 
  0099:39 ff            pushi ff // $ff checkAni
  009b:39 7e            pushi 7e // $7e setCycle
  009d:78               push1 
  009e:51 17            class Walk 
  00a0:36                push 
  00a1:39 12            pushi 12 // $12 illegalBits
  00a3:78               push1 
  00a4:38 c006          pushi c006 // $c006 sel_49158
  00a7:38 00c9          pushi c9 // $c9 ignoreActors
  00aa:78               push1 
  00ab:76               push0 
  00ac:72 038b          lofsa $043a // Fifi
  00af:4a 1e             send 1e 

  00b1:38 00d3          pushi d3 // $d3 setMotion
  00b4:39 04            pushi 4 // $4 x
  00b6:51 1d            class MoveTo 
  00b8:36                push 
  00b9:8b 00              lsl local0 
  00bb:3c                 dup 
  00bc:35 00              ldi 0 
  00be:1a                 eq? 
  00bf:31 05              bnt code_00c6 
  00c1:34 00e1            ldi e1 
  00c4:33 49              jmp code_010f 

        code_00c6
  00c6:3c                 dup 
  00c7:35 01              ldi 1 
  00c9:1a                 eq? 
  00ca:31 04              bnt code_00d0 
  00cc:35 3e              ldi 3e 
  00ce:33 3f              jmp code_010f 

        code_00d0
  00d0:3c                 dup 
  00d1:35 02              ldi 2 
  00d3:1a                 eq? 
  00d4:31 04              bnt code_00da 
  00d6:35 6a              ldi 6a 
  00d8:33 35              jmp code_010f 

        code_00da
  00da:3c                 dup 
  00db:35 03              ldi 3 
  00dd:1a                 eq? 
  00de:31 05              bnt code_00e5 
  00e0:34 00d0            ldi d0 
  00e3:33 2a              jmp code_010f 

        code_00e5
  00e5:3c                 dup 
  00e6:35 04              ldi 4 
  00e8:1a                 eq? 
  00e9:31 05              bnt code_00f0 
  00eb:34 0097            ldi 97 
  00ee:33 1f              jmp code_010f 

        code_00f0
  00f0:3c                 dup 
  00f1:35 05              ldi 5 
  00f3:1a                 eq? 
  00f4:31 05              bnt code_00fb 
  00f6:34 00a6            ldi a6 
  00f9:33 14              jmp code_010f 

        code_00fb
  00fb:3c                 dup 
  00fc:35 06              ldi 6 
  00fe:1a                 eq? 
  00ff:31 05              bnt code_0106 
  0101:34 00c4            ldi c4 
  0104:33 09              jmp code_010f 

        code_0106
  0106:3c                 dup 
  0107:35 07              ldi 7 
  0109:1a                 eq? 
  010a:31 03              bnt code_010f 
  010c:34 00d1            ldi d1 

        code_010f
  010f:3a                toss 
  0110:36                push 
  0111:8b 00              lsl local0 
  0113:3c                 dup 
  0114:35 00              ldi 0 
  0116:1a                 eq? 
  0117:31 05              bnt code_011e 
  0119:34 0099            ldi 99 
  011c:33 45              jmp code_0163 

        code_011e
  011e:3c                 dup 
  011f:35 01              ldi 1 
  0121:1a                 eq? 
  0122:31 05              bnt code_0129 
  0124:34 00a7            ldi a7 
  0127:33 3a              jmp code_0163 

        code_0129
  0129:3c                 dup 
  012a:35 02              ldi 2 
  012c:1a                 eq? 
  012d:31 04              bnt code_0133 
  012f:35 73              ldi 73 
  0131:33 30              jmp code_0163 

        code_0133
  0133:3c                 dup 
  0134:35 03              ldi 3 
  0136:1a                 eq? 
  0137:31 04              bnt code_013d 
  0139:35 6c              ldi 6c 
  013b:33 26              jmp code_0163 

        code_013d
  013d:3c                 dup 
  013e:35 04              ldi 4 
  0140:1a                 eq? 
  0141:31 04              bnt code_0147 
  0143:35 5d              ldi 5d 
  0145:33 1c              jmp code_0163 

        code_0147
  0147:3c                 dup 
  0148:35 05              ldi 5 
  014a:1a                 eq? 
  014b:31 04              bnt code_0151 
  014d:35 5d              ldi 5d 
  014f:33 12              jmp code_0163 

        code_0151
  0151:3c                 dup 
  0152:35 06              ldi 6 
  0154:1a                 eq? 
  0155:31 04              bnt code_015b 
  0157:35 5d              ldi 5d 
  0159:33 08              jmp code_0163 

        code_015b
  015b:3c                 dup 
  015c:35 07              ldi 7 
  015e:1a                 eq? 
  015f:31 02              bnt code_0163 
  0161:35 6c              ldi 6c 

        code_0163
  0163:3a                toss 
  0164:36                push 
  0165:7c            pushSelf 
  0166:72 02d1          lofsa $043a // Fifi
  0169:4a 0c             send c 

  016b:32 011f            jmp code_028d 

        code_016e
  016e:3c                 dup 
  016f:35 01              ldi 1 
  0171:1a                 eq? 
  0172:30 0083            bnt code_01f8 
  0175:39 05            pushi 5 // $5 view
  0177:78               push1 
  0178:38 01d6          pushi 1d6 // $1d6 sel_470
  017b:39 42            pushi 42 // $42 setPri
  017d:78               push1 
  017e:8b 00              lsl local0 
  0180:35 01              ldi 1 
  0182:1a                 eq? 
  0183:31 04              bnt code_0189 
  0185:35 0e              ldi e 
  0187:33 02              jmp code_018b 

        code_0189
  0189:35 ff              ldi ff 

        code_018b
  018b:36                push 
  018c:39 07            pushi 7 // $7 cel
  018e:78               push1 
  018f:76               push0 
  0190:39 12            pushi 12 // $12 illegalBits
  0192:78               push1 
  0193:76               push0 
  0194:39 06            pushi 6 // $6 loop
  0196:78               push1 
  0197:8b 00              lsl local0 
  0199:3c                 dup 
  019a:35 00              ldi 0 
  019c:1a                 eq? 
  019d:31 04              bnt code_01a3 
  019f:35 01              ldi 1 
  01a1:33 44              jmp code_01e7 

        code_01a3
  01a3:3c                 dup 
  01a4:35 01              ldi 1 
  01a6:1a                 eq? 
  01a7:31 04              bnt code_01ad 
  01a9:35 05              ldi 5 
  01ab:33 3a              jmp code_01e7 

        code_01ad
  01ad:3c                 dup 
  01ae:35 02              ldi 2 
  01b0:1a                 eq? 
  01b1:31 04              bnt code_01b7 
  01b3:35 01              ldi 1 
  01b5:33 30              jmp code_01e7 

        code_01b7
  01b7:3c                 dup 
  01b8:35 03              ldi 3 
  01ba:1a                 eq? 
  01bb:31 04              bnt code_01c1 
  01bd:35 04              ldi 4 
  01bf:33 26              jmp code_01e7 

        code_01c1
  01c1:3c                 dup 
  01c2:35 04              ldi 4 
  01c4:1a                 eq? 
  01c5:31 04              bnt code_01cb 
  01c7:35 01              ldi 1 
  01c9:33 1c              jmp code_01e7 

        code_01cb
  01cb:3c                 dup 
  01cc:35 05              ldi 5 
  01ce:1a                 eq? 
  01cf:31 04              bnt code_01d5 
  01d1:35 00              ldi 0 
  01d3:33 12              jmp code_01e7 

        code_01d5
  01d5:3c                 dup 
  01d6:35 06              ldi 6 
  01d8:1a                 eq? 
  01d9:31 04              bnt code_01df 
  01db:35 04              ldi 4 
  01dd:33 08              jmp code_01e7 

        code_01df
  01df:3c                 dup 
  01e0:35 07              ldi 7 
  01e2:1a                 eq? 
  01e3:31 02              bnt code_01e7 
  01e5:35 04              ldi 4 

        code_01e7
  01e7:3a                toss 
  01e8:36                push 
  01e9:39 7e            pushi 7e // $7e setCycle
  01eb:7a               push2 
  01ec:51 1a            class End 
  01ee:36                push 
  01ef:7c            pushSelf 
  01f0:72 0247          lofsa $043a // Fifi
  01f3:4a 26             send 26 

  01f5:32 0095            jmp code_028d 

        code_01f8
  01f8:3c                 dup 
  01f9:35 02              ldi 2 
  01fb:1a                 eq? 
  01fc:31 66              bnt code_0264 
  01fe:39 06            pushi 6 // $6 loop
  0200:78               push1 
  0201:8b 00              lsl local0 
  0203:3c                 dup 
  0204:35 00              ldi 0 
  0206:1a                 eq? 
  0207:31 04              bnt code_020d 
  0209:35 03              ldi 3 
  020b:33 44              jmp code_0251 

        code_020d
  020d:3c                 dup 
  020e:35 01              ldi 1 
  0210:1a                 eq? 
  0211:31 04              bnt code_0217 
  0213:35 07              ldi 7 
  0215:33 3a              jmp code_0251 

        code_0217
  0217:3c                 dup 
  0218:35 02              ldi 2 
  021a:1a                 eq? 
  021b:31 04              bnt code_0221 
  021d:35 03              ldi 3 
  021f:33 30              jmp code_0251 

        code_0221
  0221:3c                 dup 
  0222:35 03              ldi 3 
  0224:1a                 eq? 
  0225:31 04              bnt code_022b 
  0227:35 06              ldi 6 
  0229:33 26              jmp code_0251 

        code_022b
  022b:3c                 dup 
  022c:35 04              ldi 4 
  022e:1a                 eq? 
  022f:31 04              bnt code_0235 
  0231:35 03              ldi 3 
  0233:33 1c              jmp code_0251 

        code_0235
  0235:3c                 dup 
  0236:35 05              ldi 5 
  0238:1a                 eq? 
  0239:31 04              bnt code_023f 
  023b:35 02              ldi 2 
  023d:33 12              jmp code_0251 

        code_023f
  023f:3c                 dup 
  0240:35 06              ldi 6 
  0242:1a                 eq? 
  0243:31 04              bnt code_0249 
  0245:35 06              ldi 6 
  0247:33 08              jmp code_0251 

        code_0249
  0249:3c                 dup 
  024a:35 07              ldi 7 
  024c:1a                 eq? 
  024d:31 02              bnt code_0251 
  024f:35 06              ldi 6 

        code_0251
  0251:3a                toss 
  0252:36                push 
  0253:39 7e            pushi 7e // $7e setCycle
  0255:78               push1 
  0256:51 16            class Fwd 
  0258:36                push 
  0259:72 01de          lofsa $043a // Fifi
  025c:4a 0c             send c 

  025e:35 04              ldi 4 
  0260:65 12             aTop seconds 
  0262:33 29              jmp code_028d 

        code_0264
  0264:3c                 dup 
  0265:35 03              ldi 3 
  0267:1a                 eq? 
  0268:31 23              bnt code_028d 
  026a:39 07            pushi 7 // $7 cel
  026c:78               push1 
  026d:7a               push2 
  026e:39 7e            pushi 7e // $7e setCycle
  0270:7a               push2 
  0271:51 1b            class Beg 
  0273:36                push 
  0274:7c            pushSelf 
  0275:72 01c2          lofsa $043a // Fifi
  0278:4a 0e             send e 

  027a:8b 00              lsl local0 
  027c:35 07              ldi 7 
  027e:22                 lt? 
  027f:31 04              bnt code_0285 
  0281:c3 00              +al local0 
  0283:33 04              jmp code_0289 

        code_0285
  0285:35 00              ldi 0 
  0287:a3 00              sal local0 

        code_0289
  0289:35 ff              ldi ff 
  028b:65 0a             aTop state 

        code_028d
  028d:3a                toss 
  028e:48                 ret 
    )

)

// 0434
(instance Fifi 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_028f
  028f:78               push1 
  0290:74 0121          lofss $03b4 // deliver,hold/*
  0293:43 25 02         callk Said 2 

  0296:31 1e              bnt code_02b6 
  0298:80 00db            lag global219 
  029b:31 12              bnt code_02af 
  029d:80 00e0            lag global224 
  02a0:31 0d              bnt code_02af 
  02a2:7a               push2 
  02a3:38 017c          pushi 17c // $17c sel_380
  02a6:76               push0 
  02a7:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02ad:33 04              jmp code_02b3 

        code_02af
  02af:76               push0 
  02b0:45 0d 00         callb procedure_000d 0 // DontHave 


        code_02b3
  02b3:32 00e0            jmp code_0396 

        code_02b6
  02b6:78               push1 
  02b7:74 00e7          lofss $03a1 // ask,raconter//*<about
  02ba:43 25 02         callk Said 2 

  02bd:31 0e              bnt code_02cd 
  02bf:7a               push2 
  02c0:38 017c          pushi 17c // $17c sel_380
  02c3:76               push0 
  02c4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02ca:32 00c9            jmp code_0396 

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

  02da:2f 09               bt code_02e5 
  02dc:78               push1 
  02dd:74 00e3          lofss $03c3 // look/fifi
  02e0:43 25 02         callk Said 2 

  02e3:31 38              bnt code_031d 

        code_02e5
  02e5:39 4c            pushi 4c // $4c claimed
  02e7:78               push1 
  02e8:78               push1 
  02e9:87 01              lap param1 
  02eb:4a 06             send 6 

  02ed:88 00cf            lsg global207 
  02f0:35 10              ldi 10 
  02f2:12                 and 
  02f3:18                 not 
  02f4:31 1a              bnt code_0310 
  02f6:88 00cf            lsg global207 
  02f9:35 10              ldi 10 
  02fb:14                  or 
  02fc:a0 00cf            sag global207 
  02ff:35 05              ldi 5 
  0301:a0 00d5            sag global213 
  0304:39 03            pushi 3 // $3 y
  0306:76               push0 
  0307:38 017c          pushi 17c // $17c sel_380
  030a:78               push1 
  030b:45 01 06         callb procedure_0001 6 // Say 

  030e:33 0b              jmp code_031b 

        code_0310
  0310:7a               push2 
  0311:38 017c          pushi 17c // $17c sel_380
  0314:7a               push2 
  0315:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_031b
  031b:33 79              jmp code_0396 

        code_031d
  031d:78               push1 
  031e:74 007b          lofss $039c // /fifi>
  0321:43 25 02         callk Said 2 

  0324:31 70              bnt code_0396 
  0326:78               push1 
  0327:74 0087          lofss $03b1 // get
  032a:43 25 02         callk Said 2 

  032d:31 0e              bnt code_033d 
  032f:7a               push2 
  0330:38 017c          pushi 17c // $17c sel_380
  0333:39 03            pushi 3 // $3 y
  0335:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  033b:33 59              jmp code_0396 

        code_033d
  033d:78               push1 
  033e:74 007c          lofss $03bd // abattre
  0341:43 25 02         callk Said 2 

  0344:31 0e              bnt code_0354 
  0346:7a               push2 
  0347:38 017c          pushi 17c // $17c sel_380
  034a:39 04            pushi 4 // $4 x
  034c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0352:33 42              jmp code_0396 

        code_0354
  0354:78               push1 
  0355:74 0068          lofss $03c0 // embrasser
  0358:43 25 02         callk Said 2 

  035b:31 0e              bnt code_036b 
  035d:7a               push2 
  035e:38 017c          pushi 17c // $17c sel_380
  0361:39 05            pushi 5 // $5 view
  0363:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0369:33 2b              jmp code_0396 

        code_036b
  036b:78               push1 
  036c:74 003f          lofss $03ae // embrace
  036f:43 25 02         callk Said 2 

  0372:31 0e              bnt code_0382 
  0374:7a               push2 
  0375:38 017c          pushi 17c // $17c sel_380
  0378:39 06            pushi 6 // $6 loop
  037a:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0380:33 14              jmp code_0396 

        code_0382
  0382:78               push1 
  0383:74 0043          lofss $03c9 // bonjour
  0386:43 25 02         callk Said 2 

  0389:31 0b              bnt code_0396 
  038b:7a               push2 
  038c:38 017c          pushi 17c // $17c sel_380
  038f:76               push0 
  0390:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0396
  0396:48                 ret 
  0397:00                bnot 
    )

)



