(script 335)

(string
    string_0558 "Eyes"
    string_055d "Hand"
    string_0562 "Head"
    string_0567 "Lillian"
    string_056f "movements"
    string_0579 "myMusic"
    string_0581 "scene44f"
    string_058a "twice"
    string_0590 "writing"
)

(said
)

(local
    local0 = $0000
)

// 0300
(instance Lillian 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
    )
)

// 034e
(instance Eyes 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
    )
)

// 039c
(instance Head 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
    )
)

// 03ea
(instance Hand 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
    )
)

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

// 0478
(instance public scene44f 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_000c
  000c:39 57            pushi 57 // $57 init
  000e:76               push0 
  000f:57 37 04         super Rm 4 

  0012:76               push0 
  0013:45 03 00         callb procedure_0003 0 // HandsOff 

  0016:7a               push2 
  0017:38 0087          pushi 87 // $87 clean
  001a:39 29            pushi 29 // $29 edit
  001c:43 00 04         callk Load 4 

  001f:7a               push2 
  0020:38 0080          pushi 80 // $80 timeLeft
  0023:38 0282          pushi 282 // $282 sel_642
  0026:43 00 04         callk Load 4 

  0029:39 05            pushi 5 // $5 view
  002b:38 0084          pushi 84 // $84 stop
  002e:39 1d            pushi 1d // $1d back
  0030:39 5e            pushi 5e // $5e respondsTo
  0032:39 5f            pushi 5f // $5f yourself
  0034:39 60            pushi 60 // $60 size
  0036:45 15 0a         callb procedure_0015 a // LoadMany 

  0039:7a               push2 
  003a:38 008f          pushi 8f // $8f moveTo
  003d:38 0196          pushi 196 // $196 sel_406
  0040:45 15 04         callb procedure_0015 4 // LoadMany 

  0043:39 2b            pushi 2b // $2b number
  0045:78               push1 
  0046:39 1b            pushi 1b // $1b elements
  0048:39 06            pushi 6 // $6 loop
  004a:78               push1 
  004b:39 ff            pushi ff // $ff checkAni
  004d:39 2a            pushi 2a // $2a play
  004f:76               push0 
  0050:72 0401          lofsa $0454 // myMusic
  0053:4a 10             send 10 

  0055:39 05            pushi 5 // $5 view
  0057:78               push1 
  0058:38 0206          pushi 206 // $206 sel_518
  005b:38 00c5          pushi c5 // $c5 posn
  005e:7a               push2 
  005f:38 00fa          pushi fa // $fa restart
  0062:39 6e            pushi 6e // $6e indexOf
  0064:39 06            pushi 6 // $6 loop
  0066:78               push1 
  0067:78               push1 
  0068:39 07            pushi 7 // $7 cel
  006a:78               push1 
  006b:76               push0 
  006c:39 42            pushi 42 // $42 setPri
  006e:78               push1 
  006f:78               push1 
  0070:39 57            pushi 57 // $57 init
  0072:76               push0 
  0073:38 00c6          pushi c6 // $c6 stopUpd
  0076:76               push0 
  0077:72 028c          lofsa $0306 // Lillian
  007a:4a 28             send 28 

  007c:39 05            pushi 5 // $5 view
  007e:78               push1 
  007f:38 0206          pushi 206 // $206 sel_518
  0082:38 00c5          pushi c5 // $c5 posn
  0085:7a               push2 
  0086:38 00f8          pushi f8 // $f8 newRoom
  0089:39 5d            pushi 5d // $5d isMemberOf
  008b:39 06            pushi 6 // $6 loop
  008d:78               push1 
  008e:76               push0 
  008f:39 07            pushi 7 // $7 cel
  0091:78               push1 
  0092:76               push0 
  0093:39 42            pushi 42 // $42 setPri
  0095:78               push1 
  0096:78               push1 
  0097:39 57            pushi 57 // $57 init
  0099:76               push0 
  009a:38 00c6          pushi c6 // $c6 stopUpd
  009d:76               push0 
  009e:72 0301          lofsa $03a2 // Head
  00a1:4a 28             send 28 

  00a3:88 00a5            lsg gAct 
  00a6:35 05              ldi 5 
  00a8:1a                 eq? 
  00a9:31 2b              bnt code_00d6 
  00ab:39 05            pushi 5 // $5 view
  00ad:78               push1 
  00ae:38 0206          pushi 206 // $206 sel_518
  00b1:38 00c5          pushi c5 // $c5 posn
  00b4:7a               push2 
  00b5:38 00e1          pushi e1 // $e1 alterEgo
  00b8:39 76            pushi 76 // $76 script
  00ba:38 00c8          pushi c8 // $c8 setLoop
  00bd:78               push1 
  00be:39 05            pushi 5 // $5 view
  00c0:39 07            pushi 7 // $7 cel
  00c2:78               push1 
  00c3:76               push0 
  00c4:39 42            pushi 42 // $42 setPri
  00c6:78               push1 
  00c7:7a               push2 
  00c8:39 7a            pushi 7a // $7a setScript
  00ca:78               push1 
  00cb:74 042c          lofss $04fa // writing
  00ce:39 57            pushi 57 // $57 init
  00d0:76               push0 
  00d1:72 031c          lofsa $03f0 // Hand
  00d4:4a 2a             send 2a 


        code_00d6
  00d6:39 05            pushi 5 // $5 view
  00d8:78               push1 
  00d9:38 0206          pushi 206 // $206 sel_518
  00dc:38 00c5          pushi c5 // $c5 posn
  00df:7a               push2 
  00e0:38 00ed          pushi ed // $ed put
  00e3:39 49            pushi 49 // $49 semanticFail
  00e5:39 06            pushi 6 // $6 loop
  00e7:78               push1 
  00e8:7a               push2 
  00e9:39 07            pushi 7 // $7 cel
  00eb:78               push1 
  00ec:76               push0 
  00ed:39 42            pushi 42 // $42 setPri
  00ef:78               push1 
  00f0:7a               push2 
  00f1:39 7a            pushi 7a // $7a setScript
  00f3:78               push1 
  00f4:74 0433          lofss $052a // movements
  00f7:39 57            pushi 57 // $57 init
  00f9:76               push0 
  00fa:38 00c6          pushi c6 // $c6 stopUpd
  00fd:76               push0 
  00fe:72 0253          lofsa $0354 // Eyes
  0101:4a 2e             send 2e 

  0103:39 7a            pushi 7a // $7a setScript
  0105:78               push1 
  0106:74 03c1          lofss $04ca // twice
  0109:54 06             self 6 

  010b:48                 ret 
    )

    (method (doit) // method_010c
  010c:39 3c            pushi 3c // $3c doit
  010e:76               push0 
  010f:57 37 04         super Rm 4 

  0112:48                 ret 
    )

    (method (dispose) // method_0113
  0113:39 58            pushi 58 // $58 dispose
  0115:76               push0 
  0116:57 37 04         super Rm 4 

  0119:48                 ret 
    )

    (method (handleEvent) // method_011a
  011a:39 6f            pushi 6f // $6f handleEvent
  011c:78               push1 
  011d:8f 01              lsp param1 
  011f:57 37 06         super Rm 6 

  0122:48                 ret 
    )

)

// 04c4
(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 (changeState) // method_0123
  0123:87 01              lap param1 
  0125:65 0a             aTop state 
  0127:36                push 
  0128:3c                 dup 
  0129:35 00              ldi 0 
  012b:1a                 eq? 
  012c:31 40              bnt code_016e 
  012e:80 00d8            lag global216 
  0131:18                 not 
  0132:31 06              bnt code_013a 
  0134:35 ff              ldi ff 
  0136:65 0a             aTop state 
  0138:33 2e              jmp code_0168 

        code_013a
  013a:89 76              lsg gMustDos 
  013c:35 02              ldi 2 
  013e:12                 and 
  013f:18                 not 
  0140:31 1b              bnt code_015d 
  0142:89 76              lsg gMustDos 
  0144:35 02              ldi 2 
  0146:14                  or 
  0147:a1 76              sag gMustDos 
  0149:39 7a            pushi 7a // $7a setScript
  014b:78               push1 
  014c:7a               push2 
  014d:38 0196          pushi 196 // $196 sel_406
  0150:76               push0 
  0151:43 02 04         callk ScriptID 4 

  0154:36                push 
  0155:54 06             self 6 

  0157:35 ff              ldi ff 
  0159:65 0a             aTop state 
  015b:33 0b              jmp code_0168 

        code_015d
  015d:39 76            pushi 76 // $76 script
  015f:76               push0 
  0160:54 04             self 4 

  0162:31 04              bnt code_0168 
  0164:35 ff              ldi ff 
  0166:65 0a             aTop state 

        code_0168
  0168:35 01              ldi 1 
  016a:65 10             aTop cycles 
  016c:33 4c              jmp code_01ba 

        code_016e
  016e:3c                 dup 
  016f:35 01              ldi 1 
  0171:1a                 eq? 
  0172:31 36              bnt code_01aa 
  0174:88 00a5            lsg gAct 
  0177:35 05              ldi 5 
  0179:1a                 eq? 
  017a:31 15              bnt code_0191 
  017c:39 05            pushi 5 // $5 view
  017e:38 014f          pushi 14f // $14f serveState
  0181:76               push0 
  0182:39 46            pushi 46 // $46 width
  0184:38 00f0          pushi f0 // $f0 targetObj
  0187:39 58            pushi 58 // $58 dispose
  0189:46 00ff 0000 0a  calle ff procedure_0000 a // Print 

  018f:33 13              jmp code_01a4 

        code_0191
  0191:39 05            pushi 5 // $5 view
  0193:38 014f          pushi 14f // $14f serveState
  0196:78               push1 
  0197:39 46            pushi 46 // $46 width
  0199:38 00f0          pushi f0 // $f0 targetObj
  019c:39 58            pushi 58 // $58 dispose
  019e:46 00ff 0000 0a  calle ff procedure_0000 a // Print 


        code_01a4
  01a4:35 08              ldi 8 
  01a6:65 12             aTop seconds 
  01a8:33 10              jmp code_01ba 

        code_01aa
  01aa:3c                 dup 
  01ab:35 02              ldi 2 
  01ad:1a                 eq? 
  01ae:31 0a              bnt code_01ba 
  01b0:38 00f8          pushi f8 // $f8 newRoom
  01b3:78               push1 
  01b4:89 0c              lsg gPrevRoomNum 
  01b6:81 02              lag gCurRoom 
  01b8:4a 06             send 6 


        code_01ba
  01ba:3a                toss 
  01bb:48                 ret 
    )

)

// 04f4
(instance writing 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_01bc
  01bc:87 01              lap param1 
  01be:65 0a             aTop state 
  01c0:36                push 
  01c1:3c                 dup 
  01c2:35 00              ldi 0 
  01c4:1a                 eq? 
  01c5:31 16              bnt code_01dd 
  01c7:38 00d3          pushi d3 // $d3 setMotion
  01ca:39 04            pushi 4 // $4 x
  01cc:51 1d            class MoveTo 
  01ce:36                push 
  01cf:38 00e1          pushi e1 // $e1 alterEgo
  01d2:39 76            pushi 76 // $76 script
  01d4:7c            pushSelf 
  01d5:72 0218          lofsa $03f0 // Hand
  01d8:4a 0c             send c 

  01da:32 0096            jmp code_0273 

        code_01dd
  01dd:3c                 dup 
  01de:35 01              ldi 1 
  01e0:1a                 eq? 
  01e1:31 58              bnt code_023b 
  01e3:7a               push2 
  01e4:78               push1 
  01e5:39 08            pushi 8 // $8 underBits
  01e7:43 40 04         callk Random 4 

  01ea:36                push 
  01eb:35 01              ldi 1 
  01ed:1c                 ne? 
  01ee:31 36              bnt code_0226 
  01f0:35 00              ldi 0 
  01f2:65 0a             aTop state 
  01f4:38 00a2          pushi a2 // $a2 setCel
  01f7:78               push1 
  01f8:39 ff            pushi ff // $ff checkAni
  01fa:39 7e            pushi 7e // $7e setCycle
  01fc:78               push1 
  01fd:51 16            class Fwd 
  01ff:36                push 
  0200:38 00c5          pushi c5 // $c5 posn
  0203:7a               push2 
  0204:38 00e1          pushi e1 // $e1 alterEgo
  0207:7a               push2 
  0208:76               push0 
  0209:39 03            pushi 3 // $3 y
  020b:43 40 04         callk Random 4 

  020e:04                 sub 
  020f:36                push 
  0210:39 76            pushi 76 // $76 script
  0212:7a               push2 
  0213:76               push0 
  0214:39 03            pushi 3 // $3 y
  0216:43 40 04         callk Random 4 

  0219:04                 sub 
  021a:36                push 
  021b:72 01d2          lofsa $03f0 // Hand
  021e:4a 14             send 14 

  0220:35 02              ldi 2 
  0222:65 10             aTop cycles 
  0224:33 13              jmp code_0239 

        code_0226
  0226:38 00d3          pushi d3 // $d3 setMotion
  0229:39 04            pushi 4 // $4 x
  022b:51 1d            class MoveTo 
  022d:36                push 
  022e:38 00e1          pushi e1 // $e1 alterEgo
  0231:39 76            pushi 76 // $76 script
  0233:7c            pushSelf 
  0234:72 01b9          lofsa $03f0 // Hand
  0237:4a 0c             send c 


        code_0239
  0239:33 38              jmp code_0273 

        code_023b
  023b:3c                 dup 
  023c:35 02              ldi 2 
  023e:1a                 eq? 
  023f:31 1e              bnt code_025f 
  0241:38 00a2          pushi a2 // $a2 setCel
  0244:78               push1 
  0245:76               push0 
  0246:39 7e            pushi 7e // $7e setCycle
  0248:78               push1 
  0249:76               push0 
  024a:38 00d3          pushi d3 // $d3 setMotion
  024d:39 04            pushi 4 // $4 x
  024f:51 1d            class MoveTo 
  0251:36                push 
  0252:38 00e4          pushi e4 // $e4 echo
  0255:39 73            pushi 73 // $73 seconds
  0257:7c            pushSelf 
  0258:72 0195          lofsa $03f0 // Hand
  025b:4a 18             send 18 

  025d:33 14              jmp code_0273 

        code_025f
  025f:3c                 dup 
  0260:35 03              ldi 3 
  0262:1a                 eq? 
  0263:31 0e              bnt code_0273 
  0265:35 ff              ldi ff 
  0267:65 0a             aTop state 
  0269:7a               push2 
  026a:39 05            pushi 5 // $5 view
  026c:39 0a            pushi a // $a nsLeft
  026e:43 40 04         callk Random 4 

  0271:65 10             aTop cycles 

        code_0273
  0273:3a                toss 
  0274:48                 ret 
    )

)

// 0524
(instance movements 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_0275
  0275:3f 01             link 1 // (var $1)
  0277:87 01              lap param1 
  0279:65 0a             aTop state 
  027b:36                push 
  027c:3c                 dup 
  027d:35 00              ldi 0 
  027f:1a                 eq? 
  0280:31 76              bnt code_02f8 
  0282:39 07            pushi 7 // $7 cel
  0284:76               push0 
  0285:72 011a          lofsa $03a2 // Head
  0288:4a 04             send 4 

  028a:a5 00              sat temp0 
  028c:7a               push2 
  028d:78               push1 
  028e:39 07            pushi 7 // $7 cel
  0290:43 40 04         callk Random 4 

  0293:36                push 
  0294:35 01              ldi 1 
  0296:1a                 eq? 
  0297:31 10              bnt code_02a9 
  0299:39 07            pushi 7 // $7 cel
  029b:78               push1 
  029c:8d 00              lst temp0 
  029e:35 01              ldi 1 
  02a0:10                 xor 
  02a1:a5 00              sat temp0 
  02a3:36                push 
  02a4:72 00fb          lofsa $03a2 // Head
  02a7:4a 06             send 6 


        code_02a9
  02a9:39 07            pushi 7 // $7 cel
  02ab:78               push1 
  02ac:39 07            pushi 7 // $7 cel
  02ae:76               push0 
  02af:72 00a2          lofsa $0354 // Eyes
  02b2:4a 04             send 4 

  02b4:36                push 
  02b5:35 01              ldi 1 
  02b7:10                 xor 
  02b8:36                push 
  02b9:39 03            pushi 3 // $3 y
  02bb:78               push1 
  02bc:39 49            pushi 49 // $49 semanticFail
  02be:85 00              lat temp0 
  02c0:02                 add 
  02c1:36                push 
  02c2:38 00c7          pushi c7 // $c7 forceUpd
  02c5:76               push0 
  02c6:72 008b          lofsa $0354 // Eyes
  02c9:4a 10             send 10 

  02cb:35 ff              ldi ff 
  02cd:65 0a             aTop state 
  02cf:39 07            pushi 7 // $7 cel
  02d1:76               push0 
  02d2:72 007f          lofsa $0354 // Eyes
  02d5:4a 04             send 4 

  02d7:31 16              bnt code_02ef 
  02d9:39 06            pushi 6 // $6 loop
  02db:78               push1 
  02dc:7a               push2 
  02dd:7a               push2 
  02de:39 04            pushi 4 // $4 x
  02e0:43 40 04         callk Random 4 

  02e3:36                push 
  02e4:72 006d          lofsa $0354 // Eyes
  02e7:4a 06             send 6 

  02e9:35 02              ldi 2 
  02eb:65 10             aTop cycles 
  02ed:33 09              jmp code_02f8 

        code_02ef
  02ef:7a               push2 
  02f0:78               push1 
  02f1:39 03            pushi 3 // $3 y
  02f3:43 40 04         callk Random 4 

  02f6:65 12             aTop seconds 

        code_02f8
  02f8:3a                toss 
  02f9:48                 ret 
    )

)



