(script 320)

(string
    string_02a0 "Book"
    string_02a5 "Wilbur"
    string_02ac "myMusic"
    string_02b4 "page"
    string_02b9 "scene32a"
)

(said
)

(local
    local0 = $0000
)

// 015a
(instance Wilbur 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
    )
)

// 01a8
(instance Book 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
    )
)

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

// 0220
(instance public scene32a 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:7a               push2 
  0013:38 0087          pushi 87 // $87 clean
  0016:39 04            pushi 4 // $4 x
  0018:43 00 04         callk Load 4 

  001b:76               push0 
  001c:45 03 00         callb procedure_0003 0 // HandsOff 

  001f:39 2b            pushi 2b // $2b number
  0021:78               push1 
  0022:39 1b            pushi 1b // $1b elements
  0024:39 06            pushi 6 // $6 loop
  0026:78               push1 
  0027:39 ff            pushi ff // $ff checkAni
  0029:39 2a            pushi 2a // $2a play
  002b:76               push0 
  002c:72 01cd          lofsa $01fc // myMusic
  002f:4a 10             send 10 

  0031:39 05            pushi 5 // $5 view
  0033:78               push1 
  0034:38 01ad          pushi 1ad // $1ad sel_429
  0037:39 06            pushi 6 // $6 loop
  0039:78               push1 
  003a:76               push0 
  003b:39 07            pushi 7 // $7 cel
  003d:78               push1 
  003e:78               push1 
  003f:38 00c5          pushi c5 // $c5 posn
  0042:7a               push2 
  0043:38 00d8          pushi d8 // $d8 observeBlocks
  0046:39 67            pushi 67 // $67 first
  0048:39 42            pushi 42 // $42 setPri
  004a:78               push1 
  004b:78               push1 
  004c:39 57            pushi 57 // $57 init
  004e:76               push0 
  004f:38 00c6          pushi c6 // $c6 stopUpd
  0052:76               push0 
  0053:72 010a          lofsa $0160 // Wilbur
  0056:4a 28             send 28 

  0058:39 05            pushi 5 // $5 view
  005a:78               push1 
  005b:38 01ad          pushi 1ad // $1ad sel_429
  005e:39 06            pushi 6 // $6 loop
  0060:78               push1 
  0061:78               push1 
  0062:39 07            pushi 7 // $7 cel
  0064:78               push1 
  0065:76               push0 
  0066:38 00c5          pushi c5 // $c5 posn
  0069:7a               push2 
  006a:38 00d9          pushi d9 // $d9 ignoreBlocks
  006d:39 67            pushi 67 // $67 first
  006f:39 42            pushi 42 // $42 setPri
  0071:78               push1 
  0072:7a               push2 
  0073:39 57            pushi 57 // $57 init
  0075:76               push0 
  0076:38 0089          pushi 89 // $89 hide
  0079:76               push0 
  007a:72 0131          lofsa $01ae // Book
  007d:4a 28             send 28 

  007f:39 7a            pushi 7a // $7a setScript
  0081:78               push1 
  0082:74 01ed          lofss $0272 // page
  0085:54 06             self 6 

  0087:48                 ret 
    )

    (method (doit) // method_0088
  0088:39 3c            pushi 3c // $3c doit
  008a:76               push0 
  008b:57 37 04         super Rm 4 

  008e:48                 ret 
    )

    (method (dispose) // method_008f
  008f:39 58            pushi 58 // $58 dispose
  0091:76               push0 
  0092:57 37 04         super Rm 4 

  0095:48                 ret 
    )

    (method (handleEvent) // method_0096
  0096:39 6f            pushi 6f // $6f handleEvent
  0098:78               push1 
  0099:8f 01              lsp param1 
  009b:57 37 06         super Rm 6 

  009e:48                 ret 
    )

)

// 026c
(instance page 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_009f
  009f:87 01              lap param1 
  00a1:65 0a             aTop state 
  00a3:36                push 
  00a4:3c                 dup 
  00a5:35 00              ldi 0 
  00a7:1a                 eq? 
  00a8:31 48              bnt code_00f2 
  00aa:88 009a            lsg gClarenceWilburState 
  00ad:35 04              ldi 4 
  00af:20                 ge? 
  00b0:31 3a              bnt code_00ec 
  00b2:80 00d8            lag global216 
  00b5:18                 not 
  00b6:31 06              bnt code_00be 
  00b8:35 ff              ldi ff 
  00ba:65 0a             aTop state 
  00bc:33 2e              jmp code_00ec 

        code_00be
  00be:89 76              lsg gMustDos 
  00c0:35 08              ldi 8 
  00c2:12                 and 
  00c3:18                 not 
  00c4:31 1b              bnt code_00e1 
  00c6:89 76              lsg gMustDos 
  00c8:35 08              ldi 8 
  00ca:14                  or 
  00cb:a1 76              sag gMustDos 
  00cd:39 7a            pushi 7a // $7a setScript
  00cf:78               push1 
  00d0:7a               push2 
  00d1:38 0196          pushi 196 // $196 sel_406
  00d4:76               push0 
  00d5:43 02 04         callk ScriptID 4 

  00d8:36                push 
  00d9:54 06             self 6 

  00db:35 ff              ldi ff 
  00dd:65 0a             aTop state 
  00df:33 0b              jmp code_00ec 

        code_00e1
  00e1:39 76            pushi 76 // $76 script
  00e3:76               push0 
  00e4:54 04             self 4 

  00e6:31 04              bnt code_00ec 
  00e8:35 ff              ldi ff 
  00ea:65 0a             aTop state 

        code_00ec
  00ec:35 01              ldi 1 
  00ee:65 10             aTop cycles 
  00f0:33 60              jmp code_0152 

        code_00f2
  00f2:3c                 dup 
  00f3:35 01              ldi 1 
  00f5:1a                 eq? 
  00f6:31 14              bnt code_010c 
  00f8:39 03            pushi 3 // $3 y
  00fa:38 0140          pushi 140 // $140 upRoomNo
  00fd:76               push0 
  00fe:39 58            pushi 58 // $58 dispose
  0100:46 00ff 0000 06  calle ff procedure_0000 6 // Print 

  0106:35 04              ldi 4 
  0108:65 12             aTop seconds 
  010a:33 46              jmp code_0152 

        code_010c
  010c:3c                 dup 
  010d:35 02              ldi 2 
  010f:1a                 eq? 
  0110:31 1b              bnt code_012d 
  0112:38 00ca          pushi ca // $ca show
  0115:76               push0 
  0116:39 07            pushi 7 // $7 cel
  0118:78               push1 
  0119:76               push0 
  011a:38 00a4          pushi a4 // $a4 cycleSpeed
  011d:78               push1 
  011e:78               push1 
  011f:39 7e            pushi 7e // $7e setCycle
  0121:7a               push2 
  0122:51 1a            class End 
  0124:36                push 
  0125:7c            pushSelf 
  0126:72 0085          lofsa $01ae // Book
  0129:4a 18             send 18 

  012b:33 25              jmp code_0152 

        code_012d
  012d:3c                 dup 
  012e:35 03              ldi 3 
  0130:1a                 eq? 
  0131:31 0f              bnt code_0142 
  0133:38 0089          pushi 89 // $89 hide
  0136:76               push0 
  0137:72 0074          lofsa $01ae // Book
  013a:4a 04             send 4 

  013c:35 03              ldi 3 
  013e:65 12             aTop seconds 
  0140:33 10              jmp code_0152 

        code_0142
  0142:3c                 dup 
  0143:35 04              ldi 4 
  0145:1a                 eq? 
  0146:31 0a              bnt code_0152 
  0148:38 00f8          pushi f8 // $f8 newRoom
  014b:78               push1 
  014c:89 0c              lsg gPrevRoomNum 
  014e:81 02              lag gCurRoom 
  0150:4a 06             send 6 


        code_0152
  0152:3a                toss 
  0153:48                 ret 
    )

)



