(script 261)

(string
    string_09e4 "Fifi"
    string_09e9 "Rudy"
    string_09ee "kissact3"
    string_09f7 "lieDown"
    string_09ff "myMusic"
    string_0a07 "mySound"
    string_0a0f "playRecord"
    string_0a1a "reading"
    string_0a22 "slapHim"
)

(said
    said_0768 /fifi>
    said_076d ask,raconter//*<about
    said_077a awaken/fifi
    said_0780 embrace
    said_0783 get
    said_0786 deliver,hold/*/fifi
    said_0792 deliver,hold/*<fifi
    said_079e abattre
    said_07a1 embrasser
    said_07a4 ecouter/fifi
    said_07aa look/fifi
    said_07b0 look[<at]/bed
    said_07bb bonjour/fifi
)

(local
    local0 = $0000
    local1 = $0000
)

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

// 07f2
(instance public kissact3 of Rgn
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
    )
    (method (init) // method_000c
  000c:39 57            pushi 57 // $57 init
  000e:76               push0 
  000f:57 36 04         super Rgn 4 

  0012:80 00a3            lag global163 
  0015:18                 not 
  0016:31 35              bnt code_004d 
  0018:39 03            pushi 3 // $3 y
  001a:38 008f          pushi 8f // $8f moveTo
  001d:38 00f3          pushi f3 // $f3 close
  0020:38 011f          pushi 11f // $11f update
  0023:45 15 06         callb procedure_0015 6 // LoadMany 

  0026:34 011f            ldi 11f 
  0029:a0 017d            sag global381 
  002c:39 03            pushi 3 // $3 y
  002e:38 0084          pushi 84 // $84 stop
  0031:38 00e0          pushi e0 // $e0 vanishingY
  0034:38 00e5          pushi e5 // $e5 prevDir
  0037:45 15 06         callb procedure_0015 6 // LoadMany 

  003a:39 03            pushi 3 // $3 y
  003c:38 0080          pushi 80 // $80 timeLeft
  003f:38 01da          pushi 1da // $1da sel_474
  0042:38 0388          pushi 388 // $388 sel_904
  0045:45 15 06         callb procedure_0015 6 // LoadMany 

  0048:35 10              ldi 10 
  004a:a0 00d0            sag global208 

        code_004d
  004d:7a               push2 
  004e:38 0087          pushi 87 // $87 clean
  0051:39 04            pushi 4 // $4 x
  0053:43 00 04         callk Load 4 

  0056:7a               push2 
  0057:38 0082          pushi 82 // $82 owner
  005a:38 03d9          pushi 3d9 // $3d9 sel_985
  005d:43 00 04         callk Load 4 

  0060:89 76              lsg gMustDos 
  0062:35 02              ldi 2 
  0064:12                 and 
  0065:18                 not 
  0066:31 72              bnt code_00da 
  0068:88 0172            lsg global370 
  006b:35 01              ldi 1 
  006d:1a                 eq? 
  006e:31 6a              bnt code_00da 
  0070:7a               push2 
  0071:38 0087          pushi 87 // $87 clean
  0074:39 29            pushi 29 // $29 edit
  0076:45 15 04         callb procedure_0015 4 // LoadMany 

  0079:7a               push2 
  007a:38 008f          pushi 8f // $8f moveTo
  007d:38 0196          pushi 196 // $196 sel_406
  0080:45 15 04         callb procedure_0015 4 // LoadMany 

  0083:39 03            pushi 3 // $3 y
  0085:38 0080          pushi 80 // $80 timeLeft
  0088:38 0282          pushi 282 // $282 sel_642
  008b:38 01d8          pushi 1d8 // $1d8 sel_472
  008e:45 15 06         callb procedure_0015 6 // LoadMany 

  0091:39 05            pushi 5 // $5 view
  0093:38 0084          pushi 84 // $84 stop
  0096:39 1d            pushi 1d // $1d back
  0098:39 5e            pushi 5e // $5e respondsTo
  009a:39 5f            pushi 5f // $5f yourself
  009c:39 60            pushi 60 // $60 size
  009e:45 15 0a         callb procedure_0015 a // LoadMany 

  00a1:38 00c5          pushi c5 // $c5 posn
  00a4:7a               push2 
  00a5:38 0097          pushi 97 // $97 open
  00a8:39 71            pushi 71 // $71 timer
  00aa:39 06            pushi 6 // $6 loop
  00ac:78               push1 
  00ad:78               push1 
  00ae:39 57            pushi 57 // $57 init
  00b0:76               push0 
  00b1:72 0864          lofsa $0918 // Rudy
  00b4:4a 12             send 12 

  00b6:39 05            pushi 5 // $5 view
  00b8:78               push1 
  00b9:38 01cc          pushi 1cc // $1cc sel_460
  00bc:39 06            pushi 6 // $6 loop
  00be:78               push1 
  00bf:76               push0 
  00c0:39 07            pushi 7 // $7 cel
  00c2:78               push1 
  00c3:76               push0 
  00c4:39 12            pushi 12 // $12 illegalBits
  00c6:78               push1 
  00c7:76               push0 
  00c8:38 00c5          pushi c5 // $c5 posn
  00cb:7a               push2 
  00cc:39 79            pushi 79 // $79 cue
  00ce:39 71            pushi 71 // $71 timer
  00d0:39 57            pushi 57 // $57 init
  00d2:76               push0 
  00d3:72 08a6          lofsa $097c // Fifi
  00d6:4a 24             send 24 

  00d8:33 69              jmp code_0143 

        code_00da
  00da:89 76              lsg gMustDos 
  00dc:35 02              ldi 2 
  00de:12                 and 
  00df:31 33              bnt code_0114 
  00e1:35 01              ldi 1 
  00e3:a3 01              sal local1 
  00e5:39 05            pushi 5 // $5 view
  00e7:78               push1 
  00e8:38 01d8          pushi 1d8 // $1d8 sel_472
  00eb:39 06            pushi 6 // $6 loop
  00ed:78               push1 
  00ee:78               push1 
  00ef:39 12            pushi 12 // $12 illegalBits
  00f1:78               push1 
  00f2:76               push0 
  00f3:38 00c5          pushi c5 // $c5 posn
  00f6:7a               push2 
  00f7:38 00d8          pushi d8 // $d8 observeBlocks
  00fa:39 76            pushi 76 // $76 script
  00fc:39 42            pushi 42 // $42 setPri
  00fe:78               push1 
  00ff:39 0a            pushi a // $a nsLeft
  0101:38 00a4          pushi a4 // $a4 cycleSpeed
  0104:78               push1 
  0105:39 14            pushi 14 // $14 brLeft
  0107:39 7e            pushi 7e // $7e setCycle
  0109:78               push1 
  010a:51 16            class Fwd 
  010c:36                push 
  010d:72 086c          lofsa $097c // Fifi
  0110:4a 2c             send 2c 

  0112:33 27              jmp code_013b 

        code_0114
  0114:39 05            pushi 5 // $5 view
  0116:78               push1 
  0117:38 01ce          pushi 1ce // $1ce sel_462
  011a:39 06            pushi 6 // $6 loop
  011c:78               push1 
  011d:76               push0 
  011e:39 07            pushi 7 // $7 cel
  0120:78               push1 
  0121:76               push0 
  0122:39 12            pushi 12 // $12 illegalBits
  0124:78               push1 
  0125:76               push0 
  0126:38 00c5          pushi c5 // $c5 posn
  0129:7a               push2 
  012a:39 76            pushi 76 // $76 script
  012c:39 4c            pushi 4c // $4c claimed
  012e:72 084b          lofsa $097c // Fifi
  0131:4a 20             send 20 

  0133:39 7a            pushi 7a // $7a setScript
  0135:78               push1 
  0136:74 0755          lofss $088e // reading
  0139:54 06             self 6 


        code_013b
  013b:39 57            pushi 57 // $57 init
  013d:76               push0 
  013e:72 083b          lofsa $097c // Fifi
  0141:4a 04             send 4 


        code_0143
  0143:48                 ret 
    )

    (method (doit) // method_0144
  0144:39 76            pushi 76 // $76 script
  0146:76               push0 
  0147:54 04             self 4 

  0149:18                 not 
  014a:31 2a              bnt code_0176 
  014c:39 04            pushi 4 // $4 x
  014e:76               push0 
  014f:81 00              lag gEgo 
  0151:4a 04             send 4 

  0153:36                push 
  0154:35 41              ldi 41 
  0156:1e                 gt? 
  0157:31 1d              bnt code_0176 
  0159:83 01              lal local1 
  015b:18                 not 
  015c:31 18              bnt code_0176 
  015e:39 65            pushi 65 // $65 contains
  0160:78               push1 
  0161:74 07b4          lofss $0918 // Rudy
  0164:81 05              lag gCast 
  0166:4a 06             send 6 

  0168:31 0c              bnt code_0176 
  016a:76               push0 
  016b:45 03 00         callb procedure_0003 0 // HandsOff 

  016e:39 7a            pushi 7a // $7a setScript
  0170:78               push1 
  0171:74 06b6          lofss $082a // slapHim
  0174:54 06             self 6 


        code_0176
  0176:39 3c            pushi 3c // $3c doit
  0178:76               push0 
  0179:57 36 04         super Rgn 4 

  017c:48                 ret 
    )

    (method (dispose) // method_017d
  017d:78               push1 
  017e:38 03d9          pushi 3d9 // $3d9 sel_985
  0181:43 03 02         callk DisposeScript 2 

  0184:39 58            pushi 58 // $58 dispose
  0186:76               push0 
  0187:57 36 04         super Rgn 4 

  018a:48                 ret 
    )

    (method (handleEvent) // method_018b
  018b:39 6f            pushi 6f // $6f handleEvent
  018d:78               push1 
  018e:8f 01              lsp param1 
  0190:57 36 06         super Rgn 6 

  0193:39 4c            pushi 4c // $4c claimed
  0195:76               push0 
  0196:87 01              lap param1 
  0198:4a 04             send 4 

  019a:31 01              bnt code_019d 
  019c:48                 ret 

        code_019d
  019d:48                 ret 
    )

)

// 0824
(instance slapHim 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_019e
  019e:67 0a             pTos state 
  01a0:35 01              ldi 1 
  01a2:20                 ge? 
  01a3:31 3c              bnt code_01e1 
  01a5:67 0a             pTos state 
  01a7:35 05              ldi 5 
  01a9:20                 ge? 
  01aa:31 0a              bnt code_01b6 
  01ac:7a               push2 
  01ad:74 07cc          lofss $097c // Fifi
  01b0:74 0765          lofss $0918 // Rudy
  01b3:45 02 04         callb procedure_0002 4 // LookAt 


        code_01b6
  01b6:67 0a             pTos state 
  01b8:35 03              ldi 3 
  01ba:1a                 eq? 
  01bb:31 24              bnt code_01e1 
  01bd:39 07            pushi 7 // $7 cel
  01bf:76               push0 
  01c0:72 07b9          lofsa $097c // Fifi
  01c3:4a 04             send 4 

  01c5:36                push 
  01c6:35 04              ldi 4 
  01c8:1a                 eq? 
  01c9:31 16              bnt code_01e1 
  01cb:39 2b            pushi 2b // $2b number
  01cd:78               push1 
  01ce:39 70            pushi 70 // $70 start
  01d0:39 06            pushi 6 // $6 loop
  01d2:78               push1 
  01d3:78               push1 
  01d4:39 3f            pushi 3f // $3f priority
  01d6:78               push1 
  01d7:39 05            pushi 5 // $5 view
  01d9:39 2a            pushi 2a // $2a play
  01db:76               push0 
  01dc:72 05ef          lofsa $07ce // myMusic
  01df:4a 16             send 16 


        code_01e1
  01e1:39 3c            pushi 3c // $3c doit
  01e3:76               push0 
  01e4:57 05 04         super Script 4 

  01e7:48                 ret 
    )

    (method (changeState) // method_01e8
  01e8:87 01              lap param1 
  01ea:65 0a             aTop state 
  01ec:36                push 
  01ed:3c                 dup 
  01ee:35 00              ldi 0 
  01f0:1a                 eq? 
  01f1:31 4f              bnt code_0242 
  01f3:80 00d8            lag global216 
  01f6:18                 not 
  01f7:31 06              bnt code_01ff 
  01f9:35 ff              ldi ff 
  01fb:65 0a             aTop state 
  01fd:33 3c              jmp code_023b 

        code_01ff
  01ff:89 76              lsg gMustDos 
  0201:35 02              ldi 2 
  0203:12                 and 
  0204:18                 not 
  0205:31 29              bnt code_0230 
  0207:89 76              lsg gMustDos 
  0209:35 02              ldi 2 
  020b:14                  or 
  020c:a1 76              sag gMustDos 
  020e:88 00ad            lsg gSpyFlags 
  0211:35 08              ldi 8 
  0213:14                  or 
  0214:a0 00ad            sag gSpyFlags 
  0217:35 00              ldi 0 
  0219:a0 0172            sag global370 
  021c:39 7a            pushi 7a // $7a setScript
  021e:78               push1 
  021f:7a               push2 
  0220:38 0196          pushi 196 // $196 sel_406
  0223:76               push0 
  0224:43 02 04         callk ScriptID 4 

  0227:36                push 
  0228:54 06             self 6 

  022a:35 ff              ldi ff 
  022c:65 0a             aTop state 
  022e:33 0b              jmp code_023b 

        code_0230
  0230:39 76            pushi 76 // $76 script
  0232:76               push0 
  0233:54 04             self 4 

  0235:31 04              bnt code_023b 
  0237:35 ff              ldi ff 
  0239:65 0a             aTop state 

        code_023b
  023b:35 01              ldi 1 
  023d:65 10             aTop cycles 
  023f:32 01e2            jmp code_0424 

        code_0242
  0242:3c                 dup 
  0243:35 01              ldi 1 
  0245:1a                 eq? 
  0246:31 29              bnt code_0271 
  0248:35 01              ldi 1 
  024a:a0 00a3            sag global163 
  024d:a3 01              sal local1 
  024f:39 05            pushi 5 // $5 view
  0251:78               push1 
  0252:38 0183          pushi 183 // $183 sel_387
  0255:38 00a4          pushi a4 // $a4 cycleSpeed
  0258:78               push1 
  0259:7a               push2 
  025a:39 07            pushi 7 // $7 cel
  025c:78               push1 
  025d:76               push0 
  025e:39 06            pushi 6 // $6 loop
  0260:78               push1 
  0261:76               push0 
  0262:39 7e            pushi 7e // $7e setCycle
  0264:7a               push2 
  0265:51 1a            class End 
  0267:36                push 
  0268:7c            pushSelf 
  0269:72 06ac          lofsa $0918 // Rudy
  026c:4a 20             send 20 

  026e:32 01b3            jmp code_0424 

        code_0271
  0271:3c                 dup 
  0272:35 02              ldi 2 
  0274:1a                 eq? 
  0275:31 36              bnt code_02ad 
  0277:38 0089          pushi 89 // $89 hide
  027a:76               push0 
  027b:72 069a          lofsa $0918 // Rudy
  027e:4a 04             send 4 

  0280:39 05            pushi 5 // $5 view
  0282:78               push1 
  0283:38 01d3          pushi 1d3 // $1d3 sel_467
  0286:38 00c9          pushi c9 // $c9 ignoreActors
  0289:78               push1 
  028a:78               push1 
  028b:38 00c5          pushi c5 // $c5 posn
  028e:7a               push2 
  028f:39 72            pushi 72 // $72 cycles
  0291:39 71            pushi 71 // $71 timer
  0293:39 07            pushi 7 // $7 cel
  0295:78               push1 
  0296:76               push0 
  0297:39 06            pushi 6 // $6 loop
  0299:78               push1 
  029a:7a               push2 
  029b:39 7e            pushi 7e // $7e setCycle
  029d:78               push1 
  029e:51 16            class Fwd 
  02a0:36                push 
  02a1:72 06d8          lofsa $097c // Fifi
  02a4:4a 26             send 26 

  02a6:35 03              ldi 3 
  02a8:65 12             aTop seconds 
  02aa:32 0177            jmp code_0424 

        code_02ad
  02ad:3c                 dup 
  02ae:35 03              ldi 3 
  02b0:1a                 eq? 
  02b1:31 36              bnt code_02e9 
  02b3:39 06            pushi 6 // $6 loop
  02b5:78               push1 
  02b6:76               push0 
  02b7:38 00a4          pushi a4 // $a4 cycleSpeed
  02ba:78               push1 
  02bb:78               push1 
  02bc:39 7e            pushi 7e // $7e setCycle
  02be:7a               push2 
  02bf:51 1a            class End 
  02c1:36                push 
  02c2:7c            pushSelf 
  02c3:72 06b6          lofsa $097c // Fifi
  02c6:4a 14             send 14 

  02c8:39 0b            pushi b // $b nsBottom
  02ca:38 0105          pushi 105 // $105 north
  02cd:76               push0 
  02ce:39 43            pushi 43 // $43 at
  02d0:39 5a            pushi 5a // $5a showSelf
  02d2:39 19            pushi 19 // $19 time
  02d4:39 21            pushi 21 // $21 font
  02d6:39 04            pushi 4 // $4 x
  02d8:39 46            pushi 46 // $46 width
  02da:39 7d            pushi 7d // $7d set
  02dc:39 53            pushi 53 // $53 draw
  02de:39 58            pushi 58 // $58 dispose
  02e0:46 00ff 0000 16  calle ff procedure_0000 16 // Print 

  02e6:32 013b            jmp code_0424 

        code_02e9
  02e9:3c                 dup 
  02ea:35 04              ldi 4 
  02ec:1a                 eq? 
  02ed:31 3c              bnt code_032b 
  02ef:38 00ca          pushi ca // $ca show
  02f2:76               push0 
  02f3:39 06            pushi 6 // $6 loop
  02f5:78               push1 
  02f6:78               push1 
  02f7:39 07            pushi 7 // $7 cel
  02f9:78               push1 
  02fa:76               push0 
  02fb:38 00a4          pushi a4 // $a4 cycleSpeed
  02fe:78               push1 
  02ff:7a               push2 
  0300:39 7e            pushi 7e // $7e setCycle
  0302:7a               push2 
  0303:51 1a            class End 
  0305:36                push 
  0306:7c            pushSelf 
  0307:72 060e          lofsa $0918 // Rudy
  030a:4a 1e             send 1e 

  030c:39 06            pushi 6 // $6 loop
  030e:78               push1 
  030f:78               push1 
  0310:38 00c5          pushi c5 // $c5 posn
  0313:7a               push2 
  0314:39 72            pushi 72 // $72 cycles
  0316:39 71            pushi 71 // $71 timer
  0318:38 00a4          pushi a4 // $a4 cycleSpeed
  031b:78               push1 
  031c:78               push1 
  031d:39 7e            pushi 7e // $7e setCycle
  031f:78               push1 
  0320:51 1a            class End 
  0322:36                push 
  0323:72 0656          lofsa $097c // Fifi
  0326:4a 1a             send 1a 

  0328:32 00f9            jmp code_0424 

        code_032b
  032b:3c                 dup 
  032c:35 05              ldi 5 
  032e:1a                 eq? 
  032f:31 58              bnt code_0389 
  0331:76               push0 
  0332:45 0f 00         callb procedure_000f 0 // cls 

  0335:39 05            pushi 5 // $5 view
  0337:78               push1 
  0338:38 01cc          pushi 1cc // $1cc sel_460
  033b:39 42            pushi 42 // $42 setPri
  033d:78               push1 
  033e:39 ff            pushi ff // $ff checkAni
  0340:39 7e            pushi 7e // $7e setCycle
  0342:78               push1 
  0343:51 17            class Walk 
  0345:36                push 
  0346:38 00c9          pushi c9 // $c9 ignoreActors
  0349:78               push1 
  034a:76               push0 
  034b:72 062e          lofsa $097c // Fifi
  034e:4a 18             send 18 

  0350:39 06            pushi 6 // $6 loop
  0352:78               push1 
  0353:7a               push2 
  0354:38 00a4          pushi a4 // $a4 cycleSpeed
  0357:78               push1 
  0358:76               push0 
  0359:39 7e            pushi 7e // $7e setCycle
  035b:78               push1 
  035c:51 16            class Fwd 
  035e:36                push 
  035f:72 05b6          lofsa $0918 // Rudy
  0362:4a 12             send 12 

  0364:35 04              ldi 4 
  0366:65 12             aTop seconds 
  0368:39 0b            pushi b // $b nsBottom
  036a:38 0105          pushi 105 // $105 north
  036d:78               push1 
  036e:39 43            pushi 43 // $43 at
  0370:39 5a            pushi 5a // $5a showSelf
  0372:39 19            pushi 19 // $19 time
  0374:39 21            pushi 21 // $21 font
  0376:39 04            pushi 4 // $4 x
  0378:39 46            pushi 46 // $46 width
  037a:39 50            pushi 50 // $50 title
  037c:39 53            pushi 53 // $53 draw
  037e:39 58            pushi 58 // $58 dispose
  0380:46 00ff 0000 16  calle ff procedure_0000 16 // Print 

  0386:32 009b            jmp code_0424 

        code_0389
  0389:3c                 dup 
  038a:35 06              ldi 6 
  038c:1a                 eq? 
  038d:31 4e              bnt code_03dd 
  038f:76               push0 
  0390:45 0f 00         callb procedure_000f 0 // cls 

  0393:39 0b            pushi b // $b nsBottom
  0395:38 0105          pushi 105 // $105 north
  0398:7a               push2 
  0399:39 43            pushi 43 // $43 at
  039b:39 7d            pushi 7d // $7d set
  039d:39 19            pushi 19 // $19 time
  039f:39 21            pushi 21 // $21 font
  03a1:39 04            pushi 4 // $4 x
  03a3:39 46            pushi 46 // $46 width
  03a5:39 50            pushi 50 // $50 title
  03a7:39 53            pushi 53 // $53 draw
  03a9:39 58            pushi 58 // $58 dispose
  03ab:46 00ff 0000 16  calle ff procedure_0000 16 // Print 

  03b1:39 05            pushi 5 // $5 view
  03b3:78               push1 
  03b4:38 017c          pushi 17c // $17c sel_380
  03b7:39 7e            pushi 7e // $7e setCycle
  03b9:78               push1 
  03ba:51 17            class Walk 
  03bc:36                push 
  03bd:38 00d4          pushi d4 // $d4 setAvoider
  03c0:78               push1 
  03c1:39 56            pushi 56 // $56 new
  03c3:76               push0 
  03c4:51 21            class Avoid 
  03c6:4a 04             send 4 

  03c8:36                push 
  03c9:38 00d3          pushi d3 // $d3 setMotion
  03cc:39 04            pushi 4 // $4 x
  03ce:51 1d            class MoveTo 
  03d0:36                push 
  03d1:39 2c            pushi 2c // $2c handle
  03d3:39 79            pushi 79 // $79 cue
  03d5:7c            pushSelf 
  03d6:72 053f          lofsa $0918 // Rudy
  03d9:4a 1e             send 1e 

  03db:33 47              jmp code_0424 

        code_03dd
  03dd:3c                 dup 
  03de:35 07              ldi 7 
  03e0:1a                 eq? 
  03e1:31 19              bnt code_03fc 
  03e3:76               push0 
  03e4:45 0f 00         callb procedure_000f 0 // cls 

  03e7:38 00d3          pushi d3 // $d3 setMotion
  03ea:39 04            pushi 4 // $4 x
  03ec:51 1d            class MoveTo 
  03ee:36                push 
  03ef:39 2c            pushi 2c // $2c handle
  03f1:38 00f4          pushi f4 // $f4 description
  03f4:7c            pushSelf 
  03f5:72 0520          lofsa $0918 // Rudy
  03f8:4a 0c             send c 

  03fa:33 28              jmp code_0424 

        code_03fc
  03fc:3c                 dup 
  03fd:35 08              ldi 8 
  03ff:1a                 eq? 
  0400:31 22              bnt code_0424 
  0402:39 58            pushi 58 // $58 dispose
  0404:76               push0 
  0405:72 0510          lofsa $0918 // Rudy
  0408:4a 04             send 4 

  040a:39 7a            pushi 7a // $7a setScript
  040c:78               push1 
  040d:74 044e          lofss $085e // lieDown
  0410:72 0569          lofsa $097c // Fifi
  0413:4a 06             send 6 

  0415:78               push1 
  0416:38 03d9          pushi 3d9 // $3d9 sel_985
  0419:43 03 02         callk DisposeScript 2 

  041c:39 7a            pushi 7a // $7a setScript
  041e:78               push1 
  041f:76               push0 
  0420:63 08             pToa client 
  0422:4a 06             send 6 


        code_0424
  0424:3a                toss 
  0425:48                 ret 
    )

)

// 0858
(instance lieDown 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_0426
  0426:87 01              lap param1 
  0428:65 0a             aTop state 
  042a:36                push 
  042b:3c                 dup 
  042c:35 00              ldi 0 
  042e:1a                 eq? 
  042f:31 43              bnt code_0474 
  0431:88 00a3            lsg global163 
  0434:35 01              ldi 1 
  0436:1a                 eq? 
  0437:31 0e              bnt code_0447 
  0439:39 7a            pushi 7a // $7a setScript
  043b:78               push1 
  043c:74 047f          lofss $08be // playRecord
  043f:39 57            pushi 57 // $57 init
  0441:76               push0 
  0442:80 0175            lag global373 
  0445:4a 0a             send a 


        code_0447
  0447:35 01              ldi 1 
  0449:a0 00a3            sag global163 
  044c:88 017d            lsg global381 
  044f:34 fee0            ldi fee0 
  0452:12                 and 
  0453:a0 017d            sag global381 
  0456:38 00a4          pushi a4 // $a4 cycleSpeed
  0459:78               push1 
  045a:76               push0 
  045b:39 12            pushi 12 // $12 illegalBits
  045d:78               push1 
  045e:76               push0 
  045f:38 00d3          pushi d3 // $d3 setMotion
  0462:39 04            pushi 4 // $4 x
  0464:51 1d            class MoveTo 
  0466:36                push 
  0467:38 00d8          pushi d8 // $d8 observeBlocks
  046a:39 76            pushi 76 // $76 script
  046c:7c            pushSelf 
  046d:72 050c          lofsa $097c // Fifi
  0470:4a 18             send 18 

  0472:33 58              jmp code_04cc 

        code_0474
  0474:3c                 dup 
  0475:35 01              ldi 1 
  0477:1a                 eq? 
  0478:31 2b              bnt code_04a5 
  047a:39 05            pushi 5 // $5 view
  047c:78               push1 
  047d:38 01d8          pushi 1d8 // $1d8 sel_472
  0480:39 06            pushi 6 // $6 loop
  0482:78               push1 
  0483:76               push0 
  0484:39 07            pushi 7 // $7 cel
  0486:78               push1 
  0487:76               push0 
  0488:38 00a4          pushi a4 // $a4 cycleSpeed
  048b:78               push1 
  048c:78               push1 
  048d:39 42            pushi 42 // $42 setPri
  048f:78               push1 
  0490:39 0a            pushi a // $a nsLeft
  0492:38 00c9          pushi c9 // $c9 ignoreActors
  0495:78               push1 
  0496:78               push1 
  0497:39 7e            pushi 7e // $7e setCycle
  0499:7a               push2 
  049a:51 1a            class End 
  049c:36                push 
  049d:7c            pushSelf 
  049e:72 04db          lofsa $097c // Fifi
  04a1:4a 2c             send 2c 

  04a3:33 27              jmp code_04cc 

        code_04a5
  04a5:3c                 dup 
  04a6:35 02              ldi 2 
  04a8:1a                 eq? 
  04a9:31 21              bnt code_04cc 
  04ab:39 06            pushi 6 // $6 loop
  04ad:78               push1 
  04ae:78               push1 
  04af:38 00a4          pushi a4 // $a4 cycleSpeed
  04b2:78               push1 
  04b3:39 06            pushi 6 // $6 loop
  04b5:39 7e            pushi 7e // $7e setCycle
  04b7:78               push1 
  04b8:51 16            class Fwd 
  04ba:36                push 
  04bb:72 04be          lofsa $097c // Fifi
  04be:4a 12             send 12 

  04c0:76               push0 
  04c1:45 04 00         callb procedure_0004 0 // HandsOn 

  04c4:39 7a            pushi 7a // $7a setScript
  04c6:78               push1 
  04c7:76               push0 
  04c8:63 08             pToa client 
  04ca:4a 06             send 6 


        code_04cc
  04cc:3a                toss 
  04cd:48                 ret 
    )

)

// 0888
(instance reading 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_04ce
  04ce:87 01              lap param1 
  04d0:65 0a             aTop state 
  04d2:36                push 
  04d3:3c                 dup 
  04d4:35 00              ldi 0 
  04d6:1a                 eq? 
  04d7:31 12              bnt code_04eb 
  04d9:39 06            pushi 6 // $6 loop
  04db:78               push1 
  04dc:76               push0 
  04dd:39 7e            pushi 7e // $7e setCycle
  04df:7a               push2 
  04e0:51 1a            class End 
  04e2:36                push 
  04e3:7c            pushSelf 
  04e4:72 0495          lofsa $097c // Fifi
  04e7:4a 0e             send e 

  04e9:33 14              jmp code_04ff 

        code_04eb
  04eb:3c                 dup 
  04ec:35 01              ldi 1 
  04ee:1a                 eq? 
  04ef:31 0e              bnt code_04ff 
  04f1:35 ff              ldi ff 
  04f3:65 0a             aTop state 
  04f5:7a               push2 
  04f6:39 08            pushi 8 // $8 underBits
  04f8:39 10            pushi 10 // $10 lsRight
  04fa:43 40 04         callk Random 4 

  04fd:65 12             aTop seconds 

        code_04ff
  04ff:3a                toss 
  0500:48                 ret 
    )

)

// 08b8
(instance playRecord 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_0501
  0501:87 01              lap param1 
  0503:65 0a             aTop state 
  0505:36                push 
  0506:3c                 dup 
  0507:35 00              ldi 0 
  0509:1a                 eq? 
  050a:31 36              bnt code_0542 
  050c:39 7e            pushi 7e // $7e setCycle
  050e:78               push1 
  050f:51 16            class Fwd 
  0511:36                push 
  0512:63 08             pToa client 
  0514:4a 06             send 6 

  0516:39 2b            pushi 2b // $2b number
  0518:78               push1 
  0519:39 2b            pushi 2b // $2b number
  051b:76               push0 
  051c:72 03cf          lofsa $08ee // mySound
  051f:4a 04             send 4 

  0521:36                push 
  0522:34 00e5            ldi e5 
  0525:1a                 eq? 
  0526:31 05              bnt code_052d 
  0528:34 00e0            ldi e0 
  052b:33 03              jmp code_0530 

        code_052d
  052d:34 00e5            ldi e5 

        code_0530
  0530:36                push 
  0531:39 06            pushi 6 // $6 loop
  0533:78               push1 
  0534:78               push1 
  0535:39 2a            pushi 2a // $2a play
  0537:78               push1 
  0538:7c            pushSelf 
  0539:72 03b2          lofsa $08ee // mySound
  053c:4a 12             send 12 

  053e:35 ff              ldi ff 
  0540:65 0a             aTop state 

        code_0542
  0542:3a                toss 
  0543:48                 ret 
    )

)

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

// 0912
(instance Rudy of Act
    (properties
        y $77
        x $47
        z $0
        heading $0
        yStep $2
        view $17c
        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
    )
)

// 0976
(instance Fifi of Act
    (properties
        y $71
        x $72
        z $0
        heading $0
        yStep $2
        view $1d3
        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_0544
  0544:39 04            pushi 4 // $4 x
  0546:76               push0 
  0547:81 00              lag gEgo 
  0549:4a 04             send 4 

  054b:36                push 
  054c:35 40              ldi 40 
  054e:1e                 gt? 
  054f:30 0210            bnt code_0762 
  0552:35 05              ldi 5 
  0554:a0 00d5            sag global213 
  0557:39 03            pushi 3 // $3 y
  0559:7c            pushSelf 
  055a:8f 01              lsp param1 
  055c:39 03            pushi 3 // $3 y
  055e:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0564:2f 09               bt code_056f 
  0566:78               push1 
  0567:74 0240          lofss $07aa // look/fifi
  056a:43 25 02         callk Said 2 

  056d:31 4e              bnt code_05bd 

        code_056f
  056f:88 00cf            lsg global207 
  0572:35 10              ldi 10 
  0574:12                 and 
  0575:18                 not 
  0576:31 1b              bnt code_0593 
  0578:35 05              ldi 5 
  057a:a0 00d5            sag global213 
  057d:88 00cf            lsg global207 
  0580:35 10              ldi 10 
  0582:14                  or 
  0583:a0 00cf            sag global207 
  0586:39 03            pushi 3 // $3 y
  0588:76               push0 
  0589:38 0105          pushi 105 // $105 north
  058c:39 03            pushi 3 // $3 y
  058e:45 01 06         callb procedure_0001 6 // Say 

  0591:33 1f              jmp code_05b2 

        code_0593
  0593:80 00a3            lag global163 
  0596:31 0e              bnt code_05a6 
  0598:7a               push2 
  0599:38 0105          pushi 105 // $105 north
  059c:39 04            pushi 4 // $4 x
  059e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05a4:33 0c              jmp code_05b2 

        code_05a6
  05a6:7a               push2 
  05a7:38 0105          pushi 105 // $105 north
  05aa:39 05            pushi 5 // $5 view
  05ac:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_05b2
  05b2:39 4c            pushi 4c // $4c claimed
  05b4:78               push1 
  05b5:78               push1 
  05b6:87 01              lap param1 
  05b8:4a 06             send 6 

  05ba:32 01a5            jmp code_0762 

        code_05bd
  05bd:80 00a3            lag global163 
  05c0:31 18              bnt code_05da 
  05c2:78               push1 
  05c3:74 01de          lofss $07a4 // ecouter/fifi
  05c6:43 25 02         callk Said 2 

  05c9:31 0f              bnt code_05da 
  05cb:7a               push2 
  05cc:38 0105          pushi 105 // $105 north
  05cf:39 06            pushi 6 // $6 loop
  05d1:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  05d7:32 0188            jmp code_0762 

        code_05da
  05da:80 00a3            lag global163 
  05dd:31 31              bnt code_0610 
  05df:78               push1 
  05e0:74 01af          lofss $0792 // deliver,hold/*<fifi
  05e3:43 25 02         callk Said 2 

  05e6:2f 09               bt code_05f1 
  05e8:78               push1 
  05e9:74 019a          lofss $0786 // deliver,hold/*/fifi
  05ec:43 25 02         callk Said 2 

  05ef:31 1f              bnt code_0610 

        code_05f1
  05f1:80 00db            lag global219 
  05f4:31 13              bnt code_0609 
  05f6:80 00e0            lag global224 
  05f9:31 0e              bnt code_0609 
  05fb:7a               push2 
  05fc:38 0105          pushi 105 // $105 north
  05ff:39 06            pushi 6 // $6 loop
  0601:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0607:33 04              jmp code_060d 

        code_0609
  0609:76               push0 
  060a:45 0d 00         callb procedure_000d 0 // DontHave 


        code_060d
  060d:32 0152            jmp code_0762 

        code_0610
  0610:80 00a3            lag global163 
  0613:31 18              bnt code_062d 
  0615:78               push1 
  0616:74 0197          lofss $07b0 // look[<at]/bed
  0619:43 25 02         callk Said 2 

  061c:31 0f              bnt code_062d 
  061e:7a               push2 
  061f:38 0105          pushi 105 // $105 north
  0622:39 04            pushi 4 // $4 x
  0624:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  062a:32 0135            jmp code_0762 

        code_062d
  062d:80 00a3            lag global163 
  0630:31 18              bnt code_064a 
  0632:78               push1 
  0633:74 0144          lofss $077a // awaken/fifi
  0636:43 25 02         callk Said 2 

  0639:31 0f              bnt code_064a 
  063b:7a               push2 
  063c:38 0105          pushi 105 // $105 north
  063f:39 07            pushi 7 // $7 cel
  0641:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0647:32 0118            jmp code_0762 

        code_064a
  064a:80 00a3            lag global163 
  064d:31 31              bnt code_0680 
  064f:78               push1 
  0650:74 011a          lofss $076d // ask,raconter//*<about
  0653:43 25 02         callk Said 2 

  0656:31 28              bnt code_0680 
  0658:8b 00              lsl local0 
  065a:3c                 dup 
  065b:35 00              ldi 0 
  065d:1a                 eq? 
  065e:31 0e              bnt code_066e 
  0660:7a               push2 
  0661:38 0105          pushi 105 // $105 north
  0664:39 07            pushi 7 // $7 cel
  0666:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  066c:33 0c              jmp code_067a 

        code_066e
  066e:7a               push2 
  066f:38 0105          pushi 105 // $105 north
  0672:39 06            pushi 6 // $6 loop
  0674:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_067a
  067a:3a                toss 
  067b:c3 00              +al local0 
  067d:32 00e2            jmp code_0762 

        code_0680
  0680:78               push1 
  0681:74 0137          lofss $07bb // bonjour/fifi
  0684:43 25 02         callk Said 2 

  0687:31 76              bnt code_06ff 
  0689:80 00a3            lag global163 
  068c:31 25              bnt code_06b3 
  068e:8b 00              lsl local0 
  0690:3c                 dup 
  0691:35 00              ldi 0 
  0693:1a                 eq? 
  0694:31 0e              bnt code_06a4 
  0696:7a               push2 
  0697:38 0105          pushi 105 // $105 north
  069a:39 07            pushi 7 // $7 cel
  069c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  06a2:33 0c              jmp code_06b0 

        code_06a4
  06a4:7a               push2 
  06a5:38 0105          pushi 105 // $105 north
  06a8:39 06            pushi 6 // $6 loop
  06aa:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_06b0
  06b0:3a                toss 
  06b1:33 48              jmp code_06fb 

        code_06b3
  06b3:8b 00              lsl local0 
  06b5:3c                 dup 
  06b6:35 00              ldi 0 
  06b8:1a                 eq? 
  06b9:31 0d              bnt code_06c8 
  06bb:39 03            pushi 3 // $3 y
  06bd:78               push1 
  06be:38 0105          pushi 105 // $105 north
  06c1:39 08            pushi 8 // $8 underBits
  06c3:45 01 06         callb procedure_0001 6 // Say 

  06c6:33 32              jmp code_06fa 

        code_06c8
  06c8:3c                 dup 
  06c9:35 01              ldi 1 
  06cb:1a                 eq? 
  06cc:31 0d              bnt code_06db 
  06ce:39 03            pushi 3 // $3 y
  06d0:78               push1 
  06d1:38 0105          pushi 105 // $105 north
  06d4:39 09            pushi 9 // $9 nsTop
  06d6:45 01 06         callb procedure_0001 6 // Say 

  06d9:33 1f              jmp code_06fa 

        code_06db
  06db:3c                 dup 
  06dc:35 02              ldi 2 
  06de:1a                 eq? 
  06df:31 0d              bnt code_06ee 
  06e1:39 03            pushi 3 // $3 y
  06e3:78               push1 
  06e4:38 0105          pushi 105 // $105 north
  06e7:39 0a            pushi a // $a nsLeft
  06e9:45 01 06         callb procedure_0001 6 // Say 

  06ec:33 0c              jmp code_06fa 

        code_06ee
  06ee:7a               push2 
  06ef:38 0105          pushi 105 // $105 north
  06f2:39 0b            pushi b // $b nsBottom
  06f4:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_06fa
  06fa:3a                toss 

        code_06fb
  06fb:c3 00              +al local0 
  06fd:33 63              jmp code_0762 

        code_06ff
  06ff:78               push1 
  0700:74 0065          lofss $0768 // /fifi>
  0703:43 25 02         callk Said 2 

  0706:31 5a              bnt code_0762 
  0708:78               push1 
  0709:74 0077          lofss $0783 // get
  070c:43 25 02         callk Said 2 

  070f:31 0e              bnt code_071f 
  0711:7a               push2 
  0712:38 0105          pushi 105 // $105 north
  0715:39 0c            pushi c // $c nsRight
  0717:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  071d:33 43              jmp code_0762 

        code_071f
  071f:78               push1 
  0720:74 007b          lofss $079e // abattre
  0723:43 25 02         callk Said 2 

  0726:31 0e              bnt code_0736 
  0728:7a               push2 
  0729:38 0105          pushi 105 // $105 north
  072c:39 0d            pushi d // $d lsTop
  072e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0734:33 2c              jmp code_0762 

        code_0736
  0736:78               push1 
  0737:74 0067          lofss $07a1 // embrasser
  073a:43 25 02         callk Said 2 

  073d:31 0e              bnt code_074d 
  073f:7a               push2 
  0740:38 0105          pushi 105 // $105 north
  0743:39 0e            pushi e // $e lsLeft
  0745:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  074b:33 15              jmp code_0762 

        code_074d
  074d:78               push1 
  074e:74 002f          lofss $0780 // embrace
  0751:43 25 02         callk Said 2 

  0754:31 0c              bnt code_0762 
  0756:7a               push2 
  0757:38 0105          pushi 105 // $105 north
  075a:39 0f            pushi f // $f lsBottom
  075c:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0762
  0762:48                 ret 
  0763:00                bnot 
    )

)



