(script 350)

(string
    string_0c66 "ColoEyes"
    string_0c6f "Colonel"
    string_0c77 "Fifi"
    string_0c7c "Smoke"
    string_0c82 "coloEyes"
    string_0c8b "coloFace"
    string_0c94 "coloMouth"
    string_0c9e "cycleMouth"
    string_0ca9 "fifiMouth"
    string_0cb3 "myMusic"
    string_0cbb "scene42a"
    string_0cc4 "speech42a"
    string_0cce "twice"
)

(said
)

(local
    local0 = $0000
    local1 = $0000
    local2 = $0000
    local3 = $0000
    local4 = $0001
    local5 = $0000
)

// 08c4
(instance Fifi of Act
    (properties
        y $0
        x $0
        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
    )
)

// 0928
(instance Smoke of Act
    (properties
        y $0
        x $0
        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
    )
)

// 098c
(instance fifiMouth of Prop
    (properties
        y $0
        x $0
        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
    )
)

// 09da
(instance Colonel of Prop
    (properties
        y $0
        x $0
        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
    )
)

// 0a28
(instance coloFace of Prop
    (properties
        y $0
        x $0
        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
    )
)

// 0a76
(instance coloMouth of Prop
    (properties
        y $0
        x $0
        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
    )
)

// 0ac4
(instance coloEyes of Prop
    (properties
        y $0
        x $0
        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
    )
)

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

// 0b3c
(instance public scene42a of Rm
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
        picture $3e
        style $7
        horizon $0
        controls $0
        north $0
        east $0
        south $0
        west $0
        curPic $0
        picAngle $0
        vanishingX $a0
        vanishingY $8ad0
        vertAngle $0
    )
    (method (init) // method_00b2
  00b2:39 57            pushi 57 // $57 init
  00b4:76               push0 
  00b5:57 37 04         super Rm 4 

  00b8:7a               push2 
  00b9:38 0087          pushi 87 // $87 clean
  00bc:39 04            pushi 4 // $4 x
  00be:43 00 04         callk Load 4 

  00c1:76               push0 
  00c2:45 03 00         callb procedure_0003 0 // HandsOff 

  00c5:39 2b            pushi 2b // $2b number
  00c7:78               push1 
  00c8:39 1b            pushi 1b // $1b elements
  00ca:39 06            pushi 6 // $6 loop
  00cc:78               push1 
  00cd:39 ff            pushi ff // $ff checkAni
  00cf:39 2a            pushi 2a // $2a play
  00d1:76               push0 
  00d2:72 0a43          lofsa $0b18 // myMusic
  00d5:4a 10             send 10 

  00d7:88 00ad            lsg gSpyFlags 
  00da:35 40              ldi 40 
  00dc:12                 and 
  00dd:18                 not 
  00de:30 0155            bnt code_0236 
  00e1:88 0173            lsg global371 
  00e4:35 01              ldi 1 
  00e6:1c                 ne? 
  00e7:30 014c            bnt code_0236 
  00ea:88 00ad            lsg gSpyFlags 
  00ed:35 40              ldi 40 
  00ef:14                  or 
  00f0:a0 00ad            sag gSpyFlags 
  00f3:35 01              ldi 1 
  00f5:a1 7c              sag global124 
  00f7:7a               push2 
  00f8:38 0087          pushi 87 // $87 clean
  00fb:39 29            pushi 29 // $29 edit
  00fd:43 00 04         callk Load 4 

  0100:7a               push2 
  0101:38 008f          pushi 8f // $8f moveTo
  0104:38 0196          pushi 196 // $196 sel_406
  0107:45 15 04         callb procedure_0015 4 // LoadMany 

  010a:7a               push2 
  010b:38 0080          pushi 80 // $80 timeLeft
  010e:38 0282          pushi 282 // $282 sel_642
  0111:43 00 04         callk Load 4 

  0114:39 05            pushi 5 // $5 view
  0116:38 0084          pushi 84 // $84 stop
  0119:39 5e            pushi 5e // $5e respondsTo
  011b:39 5f            pushi 5f // $5f yourself
  011d:39 60            pushi 60 // $60 size
  011f:39 1d            pushi 1d // $1d back
  0121:45 15 0a         callb procedure_0015 a // LoadMany 

  0124:39 05            pushi 5 // $5 view
  0126:78               push1 
  0127:38 012f          pushi 12f // $12f numLoops
  012a:39 06            pushi 6 // $6 loop
  012c:78               push1 
  012d:39 04            pushi 4 // $4 x
  012f:39 07            pushi 7 // $7 cel
  0131:78               push1 
  0132:76               push0 
  0133:38 00c5          pushi c5 // $c5 posn
  0136:7a               push2 
  0137:38 0093          pushi 93 // $93 advance
  013a:39 50            pushi 50 // $50 title
  013c:39 42            pushi 42 // $42 setPri
  013e:78               push1 
  013f:39 05            pushi 5 // $5 view
  0141:38 00a4          pushi a4 // $a4 cycleSpeed
  0144:78               push1 
  0145:7a               push2 
  0146:39 57            pushi 57 // $57 init
  0148:76               push0 
  0149:38 0089          pushi 89 // $89 hide
  014c:76               push0 
  014d:72 097a          lofsa $0aca // coloEyes
  0150:4a 2e             send 2e 

  0152:39 05            pushi 5 // $5 view
  0154:78               push1 
  0155:38 012f          pushi 12f // $12f numLoops
  0158:39 06            pushi 6 // $6 loop
  015a:78               push1 
  015b:39 03            pushi 3 // $3 y
  015d:39 07            pushi 7 // $7 cel
  015f:78               push1 
  0160:76               push0 
  0161:38 00c5          pushi c5 // $c5 posn
  0164:7a               push2 
  0165:38 0091          pushi 91 // $91 isType
  0168:39 58            pushi 58 // $58 dispose
  016a:39 42            pushi 42 // $42 setPri
  016c:78               push1 
  016d:7a               push2 
  016e:39 57            pushi 57 // $57 init
  0170:76               push0 
  0171:38 0089          pushi 89 // $89 hide
  0174:76               push0 
  0175:72 0904          lofsa $0a7c // coloMouth
  0178:4a 28             send 28 

  017a:39 05            pushi 5 // $5 view
  017c:78               push1 
  017d:38 012f          pushi 12f // $12f numLoops
  0180:39 06            pushi 6 // $6 loop
  0182:78               push1 
  0183:39 05            pushi 5 // $5 view
  0185:39 07            pushi 7 // $7 cel
  0187:78               push1 
  0188:76               push0 
  0189:38 00c5          pushi c5 // $c5 posn
  018c:7a               push2 
  018d:38 0092          pushi 92 // $92 checkState
  0190:39 58            pushi 58 // $58 dispose
  0192:39 42            pushi 42 // $42 setPri
  0194:78               push1 
  0195:39 03            pushi 3 // $3 y
  0197:38 00a4          pushi a4 // $a4 cycleSpeed
  019a:78               push1 
  019b:78               push1 
  019c:39 57            pushi 57 // $57 init
  019e:76               push0 
  019f:38 0089          pushi 89 // $89 hide
  01a2:76               push0 
  01a3:72 0888          lofsa $0a2e // coloFace
  01a6:4a 2e             send 2e 

  01a8:39 05            pushi 5 // $5 view
  01aa:78               push1 
  01ab:38 0131          pushi 131 // $131 numOfLoops
  01ae:38 00c5          pushi c5 // $c5 posn
  01b1:7a               push2 
  01b2:38 008c          pushi 8c // $8c track
  01b5:39 66            pushi 66 // $66 isEmpty
  01b7:39 06            pushi 6 // $6 loop
  01b9:78               push1 
  01ba:7a               push2 
  01bb:39 07            pushi 7 // $7 cel
  01bd:78               push1 
  01be:76               push0 
  01bf:39 42            pushi 42 // $42 setPri
  01c1:78               push1 
  01c2:78               push1 
  01c3:38 00a4          pushi a4 // $a4 cycleSpeed
  01c6:78               push1 
  01c7:78               push1 
  01c8:38 00c9          pushi c9 // $c9 ignoreActors
  01cb:78               push1 
  01cc:78               push1 
  01cd:39 57            pushi 57 // $57 init
  01cf:76               push0 
  01d0:72 080d          lofsa $09e0 // Colonel
  01d3:4a 30             send 30 

  01d5:39 05            pushi 5 // $5 view
  01d7:78               push1 
  01d8:38 0131          pushi 131 // $131 numOfLoops
  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 00c5          pushi c5 // $c5 posn
  01e6:7a               push2 
  01e7:38 00a2          pushi a2 // $a2 setCel
  01ea:39 66            pushi 66 // $66 isEmpty
  01ec:39 42            pushi 42 // $42 setPri
  01ee:78               push1 
  01ef:39 03            pushi 3 // $3 y
  01f1:38 00a4          pushi a4 // $a4 cycleSpeed
  01f4:78               push1 
  01f5:7a               push2 
  01f6:39 57            pushi 57 // $57 init
  01f8:76               push0 
  01f9:72 06ce          lofsa $08ca // Fifi
  01fc:4a 2a             send 2a 

  01fe:39 05            pushi 5 // $5 view
  0200:78               push1 
  0201:38 012f          pushi 12f // $12f numLoops
  0204:39 06            pushi 6 // $6 loop
  0206:78               push1 
  0207:7a               push2 
  0208:39 07            pushi 7 // $7 cel
  020a:78               push1 
  020b:76               push0 
  020c:38 00c5          pushi c5 // $c5 posn
  020f:7a               push2 
  0210:38 00ad          pushi ad // $ad distance
  0213:39 55            pushi 55 // $55 z
  0215:38 00a4          pushi a4 // $a4 cycleSpeed
  0218:78               push1 
  0219:78               push1 
  021a:39 42            pushi 42 // $42 setPri
  021c:78               push1 
  021d:39 04            pushi 4 // $4 x
  021f:39 57            pushi 57 // $57 init
  0221:76               push0 
  0222:38 0089          pushi 89 // $89 hide
  0225:76               push0 
  0226:72 0769          lofsa $0992 // fifiMouth
  0229:4a 2e             send 2e 

  022b:39 7a            pushi 7a // $7a setScript
  022d:78               push1 
  022e:74 095d          lofss $0b8e // speech42a
  0231:54 06             self 6 

  0233:32 0120            jmp code_0356 

        code_0236
  0236:39 05            pushi 5 // $5 view
  0238:78               push1 
  0239:38 0137          pushi 137 // $137 downID
  023c:38 00c5          pushi c5 // $c5 posn
  023f:7a               push2 
  0240:39 65            pushi 65 // $65 contains
  0242:39 69            pushi 69 // $69 last
  0244:39 06            pushi 6 // $6 loop
  0246:78               push1 
  0247:78               push1 
  0248:39 07            pushi 7 // $7 cel
  024a:78               push1 
  024b:76               push0 
  024c:39 42            pushi 42 // $42 setPri
  024e:78               push1 
  024f:78               push1 
  0250:39 57            pushi 57 // $57 init
  0252:76               push0 
  0253:38 00c6          pushi c6 // $c6 stopUpd
  0256:76               push0 
  0257:72 0786          lofsa $09e0 // Colonel
  025a:4a 28             send 28 

  025c:39 05            pushi 5 // $5 view
  025e:78               push1 
  025f:38 0137          pushi 137 // $137 downID
  0262:38 00c5          pushi c5 // $c5 posn
  0265:7a               push2 
  0266:39 72            pushi 72 // $72 cycles
  0268:39 58            pushi 58 // $58 dispose
  026a:39 06            pushi 6 // $6 loop
  026c:78               push1 
  026d:76               push0 
  026e:39 07            pushi 7 // $7 cel
  0270:78               push1 
  0271:76               push0 
  0272:39 42            pushi 42 // $42 setPri
  0274:78               push1 
  0275:7a               push2 
  0276:39 57            pushi 57 // $57 init
  0278:76               push0 
  0279:38 00c6          pushi c6 // $c6 stopUpd
  027c:76               push0 
  027d:72 07ae          lofsa $0a2e // coloFace
  0280:4a 28             send 28 

  0282:39 05            pushi 5 // $5 view
  0284:78               push1 
  0285:38 0137          pushi 137 // $137 downID
  0288:38 00c5          pushi c5 // $c5 posn
  028b:7a               push2 
  028c:39 72            pushi 72 // $72 cycles
  028e:39 03            pushi 3 // $3 y
  0290:76               push0 
  0291:72 079a          lofsa $0a2e // coloFace
  0294:4a 04             send 4 

  0296:36                push 
  0297:35 0f              ldi f 
  0299:04                 sub 
  029a:36                push 
  029b:39 06            pushi 6 // $6 loop
  029d:78               push1 
  029e:7a               push2 
  029f:39 07            pushi 7 // $7 cel
  02a1:78               push1 
  02a2:76               push0 
  02a3:39 42            pushi 42 // $42 setPri
  02a5:78               push1 
  02a6:39 03            pushi 3 // $3 y
  02a8:39 7a            pushi 7a // $7a setScript
  02aa:78               push1 
  02ab:74 094c          lofss $0bfa // ColoEyes
  02ae:39 57            pushi 57 // $57 init
  02b0:76               push0 
  02b1:38 00c6          pushi c6 // $c6 stopUpd
  02b4:76               push0 
  02b5:72 0812          lofsa $0aca // coloEyes
  02b8:4a 2e             send 2e 

  02ba:39 05            pushi 5 // $5 view
  02bc:78               push1 
  02bd:38 0137          pushi 137 // $137 downID
  02c0:38 00c5          pushi c5 // $c5 posn
  02c3:7a               push2 
  02c4:39 72            pushi 72 // $72 cycles
  02c6:39 58            pushi 58 // $58 dispose
  02c8:39 06            pushi 6 // $6 loop
  02ca:78               push1 
  02cb:39 04            pushi 4 // $4 x
  02cd:39 07            pushi 7 // $7 cel
  02cf:78               push1 
  02d0:76               push0 
  02d1:39 42            pushi 42 // $42 setPri
  02d3:78               push1 
  02d4:7a               push2 
  02d5:38 00a4          pushi a4 // $a4 cycleSpeed
  02d8:78               push1 
  02d9:78               push1 
  02da:39 57            pushi 57 // $57 init
  02dc:76               push0 
  02dd:38 0089          pushi 89 // $89 hide
  02e0:76               push0 
  02e1:72 0798          lofsa $0a7c // coloMouth
  02e4:4a 2e             send 2e 

  02e6:72 05e1          lofsa $08ca // Fifi
  02e9:a3 03              sal local3 
  02eb:39 05            pushi 5 // $5 view
  02ed:78               push1 
  02ee:38 0137          pushi 137 // $137 downID
  02f1:38 00c5          pushi c5 // $c5 posn
  02f4:7a               push2 
  02f5:38 0080          pushi 80 // $80 timeLeft
  02f8:38 0088          pushi 88 // $88 fade
  02fb:38 00c8          pushi c8 // $c8 setLoop
  02fe:78               push1 
  02ff:78               push1 
  0300:38 00a2          pushi a2 // $a2 setCel
  0303:78               push1 
  0304:78               push1 
  0305:39 42            pushi 42 // $42 setPri
  0307:78               push1 
  0308:39 03            pushi 3 // $3 y
  030a:39 38            pushi 38 // $38 moveSpeed
  030c:78               push1 
  030d:78               push1 
  030e:39 12            pushi 12 // $12 illegalBits
  0310:78               push1 
  0311:76               push0 
  0312:38 00c9          pushi c9 // $c9 ignoreActors
  0315:78               push1 
  0316:78               push1 
  0317:39 57            pushi 57 // $57 init
  0319:76               push0 
  031a:38 0089          pushi 89 // $89 hide
  031d:76               push0 
  031e:83 03              lal local3 
  0320:4a 3a             send 3a 

  0322:39 05            pushi 5 // $5 view
  0324:78               push1 
  0325:38 0137          pushi 137 // $137 downID
  0328:38 00c8          pushi c8 // $c8 setLoop
  032b:78               push1 
  032c:39 03            pushi 3 // $3 y
  032e:39 7e            pushi 7e // $7e setCycle
  0330:78               push1 
  0331:51 17            class Walk 
  0333:36                push 
  0334:39 42            pushi 42 // $42 setPri
  0336:78               push1 
  0337:39 03            pushi 3 // $3 y
  0339:39 12            pushi 12 // $12 illegalBits
  033b:78               push1 
  033c:76               push0 
  033d:38 00c9          pushi c9 // $c9 ignoreActors
  0340:78               push1 
  0341:78               push1 
  0342:39 57            pushi 57 // $57 init
  0344:76               push0 
  0345:38 0089          pushi 89 // $89 hide
  0348:76               push0 
  0349:72 05e2          lofsa $092e // Smoke
  034c:4a 2c             send 2c 

  034e:39 7a            pushi 7a // $7a setScript
  0350:78               push1 
  0351:74 08d6          lofss $0c2a // twice
  0354:54 06             self 6 


        code_0356
  0356:48                 ret 
    )

    (method (doit) // method_0357
  0357:39 3c            pushi 3c // $3c doit
  0359:76               push0 
  035a:57 37 04         super Rm 4 

  035d:48                 ret 
    )

    (method (dispose) // method_035e
  035e:39 58            pushi 58 // $58 dispose
  0360:76               push0 
  0361:57 37 04         super Rm 4 

  0364:48                 ret 
    )

    (method (handleEvent) // method_0365
  0365:39 6f            pushi 6f // $6f handleEvent
  0367:78               push1 
  0368:8f 01              lsp param1 
  036a:57 37 06         super Rm 6 

  036d:48                 ret 
    )

)

// 0b88
(instance speech42a of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (handleEvent) // method_036e
  036e:39 6f            pushi 6f // $6f handleEvent
  0370:78               push1 
  0371:8f 01              lsp param1 
  0373:57 05 06         super Script 6 

  0376:39 4c            pushi 4c // $4c claimed
  0378:76               push0 
  0379:87 01              lap param1 
  037b:4a 04             send 4 

  037d:18                 not 
  037e:31 39              bnt code_03b9 
  0380:63 18             pToa script 
  0382:18                 not 
  0383:31 34              bnt code_03b9 
  0385:39 04            pushi 4 // $4 x
  0387:39 22            pushi 22 // $22 type
  0389:76               push0 
  038a:87 01              lap param1 
  038c:4a 04             send 4 

  038e:1a                 eq? 
  038f:31 28              bnt code_03b9 
  0391:39 28            pushi 28 // $28 message
  0393:76               push0 
  0394:87 01              lap param1 
  0396:4a 04             send 4 

  0398:36                push 
  0399:35 53              ldi 53 
  039b:1a                 eq? 
  039c:2f 0d               bt code_03ab 
  039e:39 28            pushi 28 // $28 message
  03a0:76               push0 
  03a1:87 01              lap param1 
  03a3:4a 04             send 4 

  03a5:36                push 
  03a6:35 73              ldi 73 
  03a8:1a                 eq? 
  03a9:31 0e              bnt code_03b9 

        code_03ab
  03ab:76               push0 
  03ac:45 0f 00         callb procedure_000f 0 // cls 

  03af:38 00f8          pushi f8 // $f8 newRoom
  03b2:78               push1 
  03b3:89 0c              lsg gPrevRoomNum 
  03b5:81 02              lag gCurRoom 
  03b7:4a 06             send 6 


        code_03b9
  03b9:48                 ret 
    )

    (method (doit) // method_03ba
  03ba:39 3c            pushi 3c // $3c doit
  03bc:76               push0 
  03bd:57 05 04         super Script 4 

  03c0:83 04              lal local4 
  03c2:18                 not 
  03c3:31 3a              bnt code_03ff 
  03c5:eb 05              -sl local5 
  03c7:35 00              ldi 0 
  03c9:24                 le? 
  03ca:31 33              bnt code_03ff 
  03cc:7a               push2 
  03cd:39 0a            pushi a // $a nsLeft
  03cf:39 1e            pushi 1e // $1e mode
  03d1:43 40 04         callk Random 4 

  03d4:a3 05              sal local5 
  03d6:38 00a5          pushi a5 // $a5 cycler
  03d9:76               push0 
  03da:72 06ed          lofsa $0aca // coloEyes
  03dd:4a 04             send 4 

  03df:31 0f              bnt code_03f0 
  03e1:39 7e            pushi 7e // $7e setCycle
  03e3:78               push1 
  03e4:76               push0 
  03e5:38 0089          pushi 89 // $89 hide
  03e8:76               push0 
  03e9:72 06de          lofsa $0aca // coloEyes
  03ec:4a 0a             send a 

  03ee:33 0f              jmp code_03ff 

        code_03f0
  03f0:39 7e            pushi 7e // $7e setCycle
  03f2:78               push1 
  03f3:51 16            class Fwd 
  03f5:36                push 
  03f6:38 00ca          pushi ca // $ca show
  03f9:76               push0 
  03fa:72 06cd          lofsa $0aca // coloEyes
  03fd:4a 0a             send a 


        code_03ff
  03ff:67 0a             pTos state 
  0401:35 0e              ldi e 
  0403:1a                 eq? 
  0404:31 72              bnt code_0478 
  0406:39 76            pushi 76 // $76 script
  0408:76               push0 
  0409:72 0586          lofsa $0992 // fifiMouth
  040c:4a 04             send 4 

  040e:18                 not 
  040f:31 54              bnt code_0465 
  0411:39 3b            pushi 3b // $3b mover
  0413:76               push0 
  0414:72 04b3          lofsa $08ca // Fifi
  0417:4a 04             send 4 

  0419:18                 not 
  041a:31 49              bnt code_0465 
  041c:39 05            pushi 5 // $5 view
  041e:78               push1 
  041f:38 0131          pushi 131 // $131 numOfLoops
  0422:38 00c8          pushi c8 // $c8 setLoop
  0425:78               push1 
  0426:78               push1 
  0427:39 04            pushi 4 // $4 x
  0429:78               push1 
  042a:39 04            pushi 4 // $4 x
  042c:76               push0 
  042d:72 049a          lofsa $08ca // Fifi
  0430:4a 04             send 4 

  0432:36                push 
  0433:35 2b              ldi 2b 
  0435:02                 add 
  0436:36                push 
  0437:72 0490          lofsa $08ca // Fifi
  043a:4a 12             send 12 

  043c:38 00a2          pushi a2 // $a2 setCel
  043f:78               push1 
  0440:38 00a6          pushi a6 // $a6 lastCel
  0443:76               push0 
  0444:72 0483          lofsa $08ca // Fifi
  0447:4a 04             send 4 

  0449:36                push 
  044a:39 7e            pushi 7e // $7e setCycle
  044c:78               push1 
  044d:51 17            class Walk 
  044f:36                push 
  0450:38 00d3          pushi d3 // $d3 setMotion
  0453:39 04            pushi 4 // $4 x
  0455:51 1d            class MoveTo 
  0457:36                push 
  0458:38 0145          pushi 145 // $145 highLiteY
  045b:39 66            pushi 66 // $66 isEmpty
  045d:7c            pushSelf 
  045e:72 0469          lofsa $08ca // Fifi
  0461:4a 18             send 18 

  0463:33 13              jmp code_0478 

        code_0465
  0465:39 04            pushi 4 // $4 x
  0467:76               push0 
  0468:72 045f          lofsa $08ca // Fifi
  046b:4a 04             send 4 

  046d:36                push 
  046e:34 00f5            ldi f5 
  0471:1e                 gt? 
  0472:31 04              bnt code_0478 
  0474:76               push0 
  0475:45 0f 00         callb procedure_000f 0 // cls 


        code_0478
  0478:48                 ret 
    )

    (method (changeState) // method_0479
  0479:39 2d            pushi 2d // $2d client
  047b:76               push0 
  047c:72 0747          lofsa $0bc6 // cycleMouth
  047f:4a 04             send 4 

  0481:31 0b              bnt code_048e 
  0483:35 01              ldi 1 
  0485:a3 01              sal local1 
  0487:35 01              ldi 1 
  0489:65 10             aTop cycles 
  048b:32 024a            jmp code_06d8 

        code_048e
  048e:87 01              lap param1 
  0490:65 0a             aTop state 
  0492:36                push 
  0493:3c                 dup 
  0494:35 00              ldi 0 
  0496:1a                 eq? 
  0497:31 41              bnt code_04da 
  0499:80 00d8            lag global216 
  049c:18                 not 
  049d:31 06              bnt code_04a5 
  049f:35 ff              ldi ff 
  04a1:65 0a             aTop state 
  04a3:33 2e              jmp code_04d3 

        code_04a5
  04a5:89 76              lsg gMustDos 
  04a7:35 08              ldi 8 
  04a9:12                 and 
  04aa:18                 not 
  04ab:31 1b              bnt code_04c8 
  04ad:89 76              lsg gMustDos 
  04af:35 08              ldi 8 
  04b1:14                  or 
  04b2:a1 76              sag gMustDos 
  04b4:39 7a            pushi 7a // $7a setScript
  04b6:78               push1 
  04b7:7a               push2 
  04b8:38 0196          pushi 196 // $196 sel_406
  04bb:76               push0 
  04bc:43 02 04         callk ScriptID 4 

  04bf:36                push 
  04c0:54 06             self 6 

  04c2:35 ff              ldi ff 
  04c4:65 0a             aTop state 
  04c6:33 0b              jmp code_04d3 

        code_04c8
  04c8:39 76            pushi 76 // $76 script
  04ca:76               push0 
  04cb:54 04             self 4 

  04cd:31 04              bnt code_04d3 
  04cf:35 ff              ldi ff 
  04d1:65 0a             aTop state 

        code_04d3
  04d3:35 01              ldi 1 
  04d5:65 10             aTop cycles 
  04d7:32 01fd            jmp code_06d7 

        code_04da
  04da:3c                 dup 
  04db:35 01              ldi 1 
  04dd:1a                 eq? 
  04de:31 3d              bnt code_051d 
  04e0:39 0e            pushi e // $e lsLeft
  04e2:38 015e          pushi 15e // $15e sel_350
  04e5:76               push0 
  04e6:39 64            pushi 64 // $64 allTrue
  04e8:39 30            pushi 30 // $30 b-moveCnt
  04ea:39 08            pushi 8 // $8 underBits
  04ec:39 6a            pushi 6a // $6a prev
  04ee:38 0100          pushi 100 // $100 notify
  04f1:39 66            pushi 66 // $66 isEmpty
  04f3:39 0f            pushi f // $f lsBottom
  04f5:39 67            pushi 67 // $67 first
  04f7:39 ff            pushi ff // $ff checkAni
  04f9:39 69            pushi 69 // $69 last
  04fb:76               push0 
  04fc:39 6b            pushi 6b // $6b addToFront
  04fe:43 1b 1c         callk Display 1c 

  0501:a3 02              sal local2 
  0503:39 7e            pushi 7e // $7e setCycle
  0505:78               push1 
  0506:51 1a            class End 
  0508:36                push 
  0509:72 04d4          lofsa $09e0 // Colonel
  050c:4a 06             send 6 

  050e:39 7e            pushi 7e // $7e setCycle
  0510:7a               push2 
  0511:51 1a            class End 
  0513:36                push 
  0514:7c            pushSelf 
  0515:72 03b2          lofsa $08ca // Fifi
  0518:4a 08             send 8 

  051a:32 01ba            jmp code_06d7 

        code_051d
  051d:3c                 dup 
  051e:35 02              ldi 2 
  0520:1a                 eq? 
  0521:31 3c              bnt code_055f 
  0523:78               push1 
  0524:76               push0 
  0525:40 fb03 02        call proc_002c 2 

  0529:39 05            pushi 5 // $5 view
  052b:78               push1 
  052c:38 012f          pushi 12f // $12f numLoops
  052f:39 06            pushi 6 // $6 loop
  0531:78               push1 
  0532:78               push1 
  0533:39 07            pushi 7 // $7 cel
  0535:78               push1 
  0536:76               push0 
  0537:72 04a6          lofsa $09e0 // Colonel
  053a:4a 12             send 12 

  053c:39 05            pushi 5 // $5 view
  053e:78               push1 
  053f:38 012f          pushi 12f // $12f numLoops
  0542:39 06            pushi 6 // $6 loop
  0544:78               push1 
  0545:76               push0 
  0546:39 07            pushi 7 // $7 cel
  0548:78               push1 
  0549:76               push0 
  054a:72 037d          lofsa $08ca // Fifi
  054d:4a 12             send 12 

  054f:7a               push2 
  0550:38 015e          pushi 15e // $15e sel_350
  0553:78               push1 
  0554:40 faef 04        call proc_0047 4 

  0558:35 07              ldi 7 
  055a:65 12             aTop seconds 
  055c:32 0178            jmp code_06d7 

        code_055f
  055f:3c                 dup 
  0560:35 03              ldi 3 
  0562:1a                 eq? 
  0563:31 19              bnt code_057e 
  0565:78               push1 
  0566:78               push1 
  0567:40 fac1 02        call proc_002c 2 

  056b:76               push0 
  056c:45 0f 00         callb procedure_000f 0 // cls 

  056f:39 7e            pushi 7e // $7e setCycle
  0571:7a               push2 
  0572:51 1a            class End 
  0574:36                push 
  0575:7c            pushSelf 
  0576:72 0467          lofsa $09e0 // Colonel
  0579:4a 08             send 8 

  057b:32 0159            jmp code_06d7 

        code_057e
  057e:3c                 dup 
  057f:35 04              ldi 4 
  0581:1a                 eq? 
  0582:31 22              bnt code_05a6 
  0584:39 07            pushi 7 // $7 cel
  0586:78               push1 
  0587:76               push0 
  0588:38 00ca          pushi ca // $ca show
  058b:76               push0 
  058c:39 7e            pushi 7e // $7e setCycle
  058e:78               push1 
  058f:51 1a            class End 
  0591:36                push 
  0592:72 0499          lofsa $0a2e // coloFace
  0595:4a 10             send 10 

  0597:39 7e            pushi 7e // $7e setCycle
  0599:7a               push2 
  059a:51 1a            class End 
  059c:36                push 
  059d:7c            pushSelf 
  059e:72 0329          lofsa $08ca // Fifi
  05a1:4a 08             send 8 

  05a3:32 0131            jmp code_06d7 

        code_05a6
  05a6:3c                 dup 
  05a7:35 05              ldi 5 
  05a9:1a                 eq? 
  05aa:31 18              bnt code_05c4 
  05ac:39 7e            pushi 7e // $7e setCycle
  05ae:7a               push2 
  05af:51 1b            class Beg 
  05b1:36                push 
  05b2:7c            pushSelf 
  05b3:72 0314          lofsa $08ca // Fifi
  05b6:4a 08             send 8 

  05b8:38 0089          pushi 89 // $89 hide
  05bb:76               push0 
  05bc:72 046f          lofsa $0a2e // coloFace
  05bf:4a 04             send 4 

  05c1:32 0113            jmp code_06d7 

        code_05c4
  05c4:3c                 dup 
  05c5:35 06              ldi 6 
  05c7:1a                 eq? 
  05c8:31 0f              bnt code_05d9 
  05ca:39 7e            pushi 7e // $7e setCycle
  05cc:7a               push2 
  05cd:51 1b            class Beg 
  05cf:36                push 
  05d0:7c            pushSelf 
  05d1:72 040c          lofsa $09e0 // Colonel
  05d4:4a 08             send 8 

  05d6:32 00fe            jmp code_06d7 

        code_05d9
  05d9:3c                 dup 
  05da:35 07              ldi 7 
  05dc:1a                 eq? 
  05dd:31 16              bnt code_05f5 
  05df:78               push1 
  05e0:76               push0 
  05e1:40 fa47 02        call proc_002c 2 

  05e5:7a               push2 
  05e6:38 015e          pushi 15e // $15e sel_350
  05e9:7a               push2 
  05ea:40 fa8a 04        call proc_0078 4 

  05ee:35 07              ldi 7 
  05f0:65 12             aTop seconds 
  05f2:32 00e2            jmp code_06d7 

        code_05f5
  05f5:3c                 dup 
  05f6:35 08              ldi 8 
  05f8:1a                 eq? 
  05f9:31 11              bnt code_060c 
  05fb:7a               push2 
  05fc:38 015e          pushi 15e // $15e sel_350
  05ff:39 03            pushi 3 // $3 y
  0601:40 fa42 04        call proc_0047 4 

  0605:35 07              ldi 7 
  0607:65 12             aTop seconds 
  0609:32 00cb            jmp code_06d7 

        code_060c
  060c:3c                 dup 
  060d:35 09              ldi 9 
  060f:1a                 eq? 
  0610:31 19              bnt code_062b 
  0612:78               push1 
  0613:78               push1 
  0614:40 fa14 02        call proc_002c 2 

  0618:76               push0 
  0619:45 0f 00         callb procedure_000f 0 // cls 

  061c:39 7e            pushi 7e // $7e setCycle
  061e:7a               push2 
  061f:51 1a            class End 
  0621:36                push 
  0622:7c            pushSelf 
  0623:72 03ba          lofsa $09e0 // Colonel
  0626:4a 08             send 8 

  0628:32 00ac            jmp code_06d7 

        code_062b
  062b:3c                 dup 
  062c:35 0a              ldi a 
  062e:1a                 eq? 
  062f:31 22              bnt code_0653 
  0631:39 07            pushi 7 // $7 cel
  0633:78               push1 
  0634:76               push0 
  0635:38 00ca          pushi ca // $ca show
  0638:76               push0 
  0639:39 7e            pushi 7e // $7e setCycle
  063b:78               push1 
  063c:51 1a            class End 
  063e:36                push 
  063f:72 03ec          lofsa $0a2e // coloFace
  0642:4a 10             send 10 

  0644:39 7e            pushi 7e // $7e setCycle
  0646:7a               push2 
  0647:51 1a            class End 
  0649:36                push 
  064a:7c            pushSelf 
  064b:72 027c          lofsa $08ca // Fifi
  064e:4a 08             send 8 

  0650:32 0084            jmp code_06d7 

        code_0653
  0653:3c                 dup 
  0654:35 0b              ldi b 
  0656:1a                 eq? 
  0657:31 17              bnt code_0670 
  0659:39 7e            pushi 7e // $7e setCycle
  065b:7a               push2 
  065c:51 1b            class Beg 
  065e:36                push 
  065f:7c            pushSelf 
  0660:72 0267          lofsa $08ca // Fifi
  0663:4a 08             send 8 

  0665:38 0089          pushi 89 // $89 hide
  0668:76               push0 
  0669:72 03c2          lofsa $0a2e // coloFace
  066c:4a 04             send 4 

  066e:33 67              jmp code_06d7 

        code_0670
  0670:3c                 dup 
  0671:35 0c              ldi c 
  0673:1a                 eq? 
  0674:31 0e              bnt code_0684 
  0676:39 7e            pushi 7e // $7e setCycle
  0678:7a               push2 
  0679:51 1b            class Beg 
  067b:36                push 
  067c:7c            pushSelf 
  067d:72 0360          lofsa $09e0 // Colonel
  0680:4a 08             send 8 

  0682:33 53              jmp code_06d7 

        code_0684
  0684:3c                 dup 
  0685:35 0d              ldi d 
  0687:1a                 eq? 
  0688:31 16              bnt code_06a0 
  068a:78               push1 
  068b:76               push0 
  068c:40 f99c 02        call proc_002c 2 

  0690:7a               push2 
  0691:38 015e          pushi 15e // $15e sel_350
  0694:39 04            pushi 4 // $4 x
  0696:40 f9de 04        call proc_0078 4 

  069a:35 0a              ldi a 
  069c:65 12             aTop seconds 
  069e:33 37              jmp code_06d7 

        code_06a0
  06a0:3c                 dup 
  06a1:35 0e              ldi e 
  06a3:1a                 eq? 
  06a4:31 15              bnt code_06bb 
  06a6:38 00c6          pushi c6 // $c6 stopUpd
  06a9:76               push0 
  06aa:72 0333          lofsa $09e0 // Colonel
  06ad:4a 04             send 4 

  06af:7a               push2 
  06b0:38 015e          pushi 15e // $15e sel_350
  06b3:39 05            pushi 5 // $5 view
  06b5:40 f98e 04        call proc_0047 4 

  06b9:33 1c              jmp code_06d7 

        code_06bb
  06bb:3c                 dup 
  06bc:35 0f              ldi f 
  06be:1a                 eq? 
  06bf:31 16              bnt code_06d7 
  06c1:c0 00c0            +ag gFifiState 
  06c4:88 00ad            lsg gSpyFlags 
  06c7:35 40              ldi 40 
  06c9:14                  or 
  06ca:a0 00ad            sag gSpyFlags 
  06cd:38 00f8          pushi f8 // $f8 newRoom
  06d0:78               push1 
  06d1:89 0c              lsg gPrevRoomNum 
  06d3:81 02              lag gCurRoom 
  06d5:4a 06             send 6 


        code_06d7
  06d7:3a                toss 

        code_06d8
  06d8:48                 ret 
    )

)

// 0bc0
(instance cycleMouth 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_06d9
  06d9:39 3c            pushi 3c // $3c doit
  06db:76               push0 
  06dc:57 05 04         super Script 4 

  06df:83 01              lal local1 
  06e1:31 08              bnt code_06eb 
  06e3:35 00              ldi 0 
  06e5:a3 01              sal local1 
  06e7:35 01              ldi 1 
  06e9:65 10             aTop cycles 

        code_06eb
  06eb:48                 ret 
    )

    (method (changeState) // method_06ec
  06ec:87 01              lap param1 
  06ee:65 0a             aTop state 
  06f0:36                push 
  06f1:3c                 dup 
  06f2:35 00              ldi 0 
  06f4:1a                 eq? 
  06f5:31 18              bnt code_070f 
  06f7:39 07            pushi 7 // $7 cel
  06f9:78               push1 
  06fa:76               push0 
  06fb:39 7e            pushi 7e // $7e setCycle
  06fd:78               push1 
  06fe:51 16            class Fwd 
  0700:36                push 
  0701:38 00ca          pushi ca // $ca show
  0704:76               push0 
  0705:63 08             pToa client 
  0707:4a 10             send 10 

  0709:83 00              lal local0 
  070b:65 10             aTop cycles 
  070d:33 18              jmp code_0727 

        code_070f
  070f:3c                 dup 
  0710:35 01              ldi 1 
  0712:1a                 eq? 
  0713:31 12              bnt code_0727 
  0715:39 7a            pushi 7a // $7a setScript
  0717:78               push1 
  0718:76               push0 
  0719:38 0089          pushi 89 // $89 hide
  071c:76               push0 
  071d:63 08             pToa client 
  071f:4a 0a             send a 

  0721:39 2d            pushi 2d // $2d client
  0723:78               push1 
  0724:76               push0 
  0725:54 06             self 6 


        code_0727
  0727:3a                toss 
  0728:48                 ret 
    )

)

// 0bf4
(instance ColoEyes 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_0729
  0729:87 01              lap param1 
  072b:65 0a             aTop state 
  072d:36                push 
  072e:3c                 dup 
  072f:35 00              ldi 0 
  0731:1a                 eq? 
  0732:31 43              bnt code_0777 
  0734:35 ff              ldi ff 
  0736:65 0a             aTop state 
  0738:8b 04              lsl local4 
  073a:35 01              ldi 1 
  073c:10                 xor 
  073d:a3 04              sal local4 
  073f:31 14              bnt code_0755 
  0741:38 0089          pushi 89 // $89 hide
  0744:76               push0 
  0745:72 0382          lofsa $0aca // coloEyes
  0748:4a 04             send 4 

  074a:7a               push2 
  074b:7a               push2 
  074c:39 03            pushi 3 // $3 y
  074e:43 40 04         callk Random 4 

  0751:65 12             aTop seconds 
  0753:33 22              jmp code_0777 

        code_0755
  0755:39 07            pushi 7 // $7 cel
  0757:78               push1 
  0758:7a               push2 
  0759:78               push1 
  075a:38 752f          pushi 752f // $752f sel_29999
  075d:43 40 04         callk Random 4 

  0760:36                push 
  0761:34 2710            ldi 2710 
  0764:08                 div 
  0765:36                push 
  0766:38 00c7          pushi c7 // $c7 forceUpd
  0769:76               push0 
  076a:38 00ca          pushi ca // $ca show
  076d:76               push0 
  076e:72 0359          lofsa $0aca // coloEyes
  0771:4a 0e             send e 

  0773:35 03              ldi 3 
  0775:65 10             aTop cycles 

        code_0777
  0777:3a                toss 
  0778:48                 ret 
    )

)

// 0c24
(instance twice 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_0779
  0779:39 3c            pushi 3c // $3c doit
  077b:76               push0 
  077c:57 05 04         super Script 4 

  077f:67 0a             pTos state 
  0781:35 03              ldi 3 
  0783:1a                 eq? 
  0784:31 20              bnt code_07a6 
  0786:39 07            pushi 7 // $7 cel
  0788:76               push0 
  0789:72 01a2          lofsa $092e // Smoke
  078c:4a 04             send 4 

  078e:36                push 
  078f:78               push1 
  0790:74 019b          lofss $092e // Smoke
  0793:43 0e 02         callk NumCels 2 

  0796:36                push 
  0797:35 01              ldi 1 
  0799:04                 sub 
  079a:1a                 eq? 
  079b:31 09              bnt code_07a6 
  079d:38 0089          pushi 89 // $89 hide
  07a0:76               push0 
  07a1:72 018a          lofsa $092e // Smoke
  07a4:4a 04             send 4 


        code_07a6
  07a6:48                 ret 
    )

    (method (changeState) // method_07a7
  07a7:87 01              lap param1 
  07a9:65 0a             aTop state 
  07ab:36                push 
  07ac:3c                 dup 
  07ad:35 00              ldi 0 
  07af:1a                 eq? 
  07b0:31 4d              bnt code_07ff 
  07b2:39 03            pushi 3 // $3 y
  07b4:38 015e          pushi 15e // $15e sel_350
  07b7:39 06            pushi 6 // $6 loop
  07b9:39 58            pushi 58 // $58 dispose
  07bb:46 00ff 0000 06  calle ff procedure_0000 6 // Print 

  07c1:39 07            pushi 7 // $7 cel
  07c3:78               push1 
  07c4:76               push0 
  07c5:38 00c7          pushi c7 // $c7 forceUpd
  07c8:76               push0 
  07c9:72 0262          lofsa $0a2e // coloFace
  07cc:4a 0a             send a 

  07ce:39 03            pushi 3 // $3 y
  07d0:78               push1 
  07d1:39 03            pushi 3 // $3 y
  07d3:76               push0 
  07d4:72 0257          lofsa $0a2e // coloFace
  07d7:4a 04             send 4 

  07d9:36                push 
  07da:35 0f              ldi f 
  07dc:04                 sub 
  07dd:36                push 
  07de:38 00c7          pushi c7 // $c7 forceUpd
  07e1:76               push0 
  07e2:72 02e5          lofsa $0aca // coloEyes
  07e5:4a 0a             send a 

  07e7:38 00ca          pushi ca // $ca show
  07ea:76               push0 
  07eb:38 00d3          pushi d3 // $d3 setMotion
  07ee:39 04            pushi 4 // $4 x
  07f0:51 1d            class MoveTo 
  07f2:36                push 
  07f3:39 74            pushi 74 // $74 lastSeconds
  07f5:39 74            pushi 74 // $74 lastSeconds
  07f7:7c            pushSelf 
  07f8:83 03              lal local3 
  07fa:4a 10             send 10 

  07fc:32 00bc            jmp code_08bb 

        code_07ff
  07ff:3c                 dup 
  0800:35 01              ldi 1 
  0802:1a                 eq? 
  0803:31 1e              bnt code_0823 
  0805:38 00c6          pushi c6 // $c6 stopUpd
  0808:76               push0 
  0809:83 03              lal local3 
  080b:4a 04             send 4 

  080d:38 00ca          pushi ca // $ca show
  0810:76               push0 
  0811:39 7e            pushi 7e // $7e setCycle
  0813:78               push1 
  0814:51 16            class Fwd 
  0816:36                push 
  0817:72 0262          lofsa $0a7c // coloMouth
  081a:4a 0a             send a 

  081c:35 03              ldi 3 
  081e:65 12             aTop seconds 
  0820:32 0098            jmp code_08bb 

        code_0823
  0823:3c                 dup 
  0824:35 02              ldi 2 
  0826:1a                 eq? 
  0827:31 20              bnt code_0849 
  0829:39 7e            pushi 7e // $7e setCycle
  082b:78               push1 
  082c:51 1a            class End 
  082e:36                push 
  082f:72 024a          lofsa $0a7c // coloMouth
  0832:4a 06             send 6 

  0834:38 00d3          pushi d3 // $d3 setMotion
  0837:39 04            pushi 4 // $4 x
  0839:51 1d            class MoveTo 
  083b:36                push 
  083c:38 0080          pushi 80 // $80 timeLeft
  083f:38 0088          pushi 88 // $88 fade
  0842:7c            pushSelf 
  0843:83 03              lal local3 
  0845:4a 0c             send c 

  0847:33 72              jmp code_08bb 

        code_0849
  0849:3c                 dup 
  084a:35 03              ldi 3 
  084c:1a                 eq? 
  084d:31 5c              bnt code_08ab 
  084f:38 0089          pushi 89 // $89 hide
  0852:76               push0 
  0853:83 03              lal local3 
  0855:4a 04             send 4 

  0857:39 07            pushi 7 // $7 cel
  0859:78               push1 
  085a:78               push1 
  085b:38 00c7          pushi c7 // $c7 forceUpd
  085e:76               push0 
  085f:72 01cc          lofsa $0a2e // coloFace
  0862:4a 0a             send a 

  0864:38 0089          pushi 89 // $89 hide
  0867:76               push0 
  0868:72 0211          lofsa $0a7c // coloMouth
  086b:4a 04             send 4 

  086d:39 03            pushi 3 // $3 y
  086f:78               push1 
  0870:39 03            pushi 3 // $3 y
  0872:76               push0 
  0873:72 01b8          lofsa $0a2e // coloFace
  0876:4a 04             send 4 

  0878:36                push 
  0879:35 10              ldi 10 
  087b:04                 sub 
  087c:36                push 
  087d:38 00c7          pushi c7 // $c7 forceUpd
  0880:76               push0 
  0881:72 0246          lofsa $0aca // coloEyes
  0884:4a 0a             send a 

  0886:38 00ca          pushi ca // $ca show
  0889:76               push0 
  088a:39 07            pushi 7 // $7 cel
  088c:78               push1 
  088d:76               push0 
  088e:38 00c5          pushi c5 // $c5 posn
  0891:7a               push2 
  0892:39 71            pushi 71 // $71 timer
  0894:39 4f            pushi 4f // $4f restore
  0896:38 00d3          pushi d3 // $d3 setMotion
  0899:39 04            pushi 4 // $4 x
  089b:51 1d            class MoveTo 
  089d:36                push 
  089e:38 0080          pushi 80 // $80 timeLeft
  08a1:39 65            pushi 65 // $65 contains
  08a3:7c            pushSelf 
  08a4:72 0087          lofsa $092e // Smoke
  08a7:4a 1e             send 1e 

  08a9:33 10              jmp code_08bb 

        code_08ab
  08ab:3c                 dup 
  08ac:35 04              ldi 4 
  08ae:1a                 eq? 
  08af:31 0a              bnt code_08bb 
  08b1:38 00f8          pushi f8 // $f8 newRoom
  08b4:78               push1 
  08b5:89 0c              lsg gPrevRoomNum 
  08b7:81 02              lag gCurRoom 
  08b9:4a 06             send 6 


        code_08bb
  08bb:3a                toss 
  08bc:48                 ret 
  08bd:00                bnot 
    )

)



(procedure proc_000c
  000c:3e 01f4           link 1f4 // (var $1f4)
  000f:78               push1 
  0010:59 01            &rest 1 
  0012:5b 04 00           lea 4 0 
  0015:36                push 
  0016:43 4d 02         callk GetFarText 2 

  0019:78               push1 
  001a:5b 04 00           lea 4 0 
  001d:36                push 
  001e:43 4a 02         callk StrLen 2 

  0021:36                push 
  0022:35 03              ldi 3 
  0024:08                 div 
  0025:36                push 
  0026:35 01              ldi 1 
  0028:02                 add 
  0029:a3 00              sal local0 
  002b:48                 ret 
)

(procedure proc_002c
  002c:87 01              lap param1 
  002e:a3 04              sal local4 
  0030:31 0b              bnt code_003d 
  0032:38 0089          pushi 89 // $89 hide
  0035:76               push0 
  0036:72 0a91          lofsa $0aca // coloEyes
  0039:4a 04             send 4 

  003b:33 09              jmp code_0046 

        code_003d
  003d:38 00ca          pushi ca // $ca show
  0040:76               push0 
  0041:72 0a86          lofsa $0aca // coloEyes
  0044:4a 04             send 4 


        code_0046
  0046:48                 ret 
)

(procedure proc_0047
  0047:76               push0 
  0048:59 01            &rest 1 
  004a:41 bf 00          call proc_000c 0 

  004d:39 7a            pushi 7a // $7a setScript
  004f:78               push1 
  0050:74 0b73          lofss $0bc6 // cycleMouth
  0053:72 093c          lofsa $0992 // fifiMouth
  0056:4a 06             send 6 

  0058:39 0a            pushi a // $a nsLeft
  005a:59 01            &rest 1 
  005c:39 43            pushi 43 // $43 at
  005e:38 00a0          pushi a0 // $a0 cycleDone
  0061:39 73            pushi 73 // $73 seconds
  0063:39 21            pushi 21 // $21 font
  0065:39 04            pushi 4 // $4 x
  0067:39 46            pushi 46 // $46 width
  0069:38 008c          pushi 8c // $8c track
  006c:39 1e            pushi 1e // $1e mode
  006e:78               push1 
  006f:39 58            pushi 58 // $58 dispose
  0071:46 00ff 0000 14  calle ff procedure_0000 14 // Print 

  0077:48                 ret 
)

(procedure proc_0078
  0078:76               push0 
  0079:59 01            &rest 1 
  007b:41 8e 00          call proc_000c 0 

  007e:8b 00              lsl local0 
  0080:8b 00              lsl local0 
  0082:35 04              ldi 4 
  0084:08                 div 
  0085:02                 add 
  0086:a3 00              sal local0 
  0088:39 7a            pushi 7a // $7a setScript
  008a:78               push1 
  008b:74 0b38          lofss $0bc6 // cycleMouth
  008e:72 09eb          lofsa $0a7c // coloMouth
  0091:4a 06             send 6 

  0093:39 0a            pushi a // $a nsLeft
  0095:59 01            &rest 1 
  0097:39 43            pushi 43 // $43 at
  0099:39 14            pushi 14 // $14 brLeft
  009b:39 73            pushi 73 // $73 seconds
  009d:39 21            pushi 21 // $21 font
  009f:39 04            pushi 4 // $4 x
  00a1:39 46            pushi 46 // $46 width
  00a3:38 008c          pushi 8c // $8c track
  00a6:39 1e            pushi 1e // $1e mode
  00a8:78               push1 
  00a9:39 58            pushi 58 // $58 dispose
  00ab:46 00ff 0000 14  calle ff procedure_0000 14 // Print 

  00b1:48                 ret 
)

