(script 408)

(string
    string_015e "ShdwyFig"
    string_0167 "figure"
)

(said
)

(local
)

// 00c8
(instance public ShdwyFig of Script
    (properties
        client $0
        state $ffff
        start $0
        timer $0
        cycles $0
        seconds $0
        lastSeconds $0
        register $0
        script $0
        caller $0
    )
    (method (dispose) // method_000c
  000c:39 58            pushi 58 // $58 dispose
  000e:76               push0 
  000f:57 05 04         super Script 4 

  0012:78               push1 
  0013:38 0198          pushi 198 // $198 sel_408
  0016:43 03 02         callk DisposeScript 2 

  0019:48                 ret 
    )

    (method (changeState) // method_001a
  001a:87 01              lap param1 
  001c:65 0a             aTop state 
  001e:36                push 
  001f:3c                 dup 
  0020:35 00              ldi 0 
  0022:1a                 eq? 
  0023:31 2a              bnt code_004f 
  0025:76               push0 
  0026:45 03 00         callb procedure_0003 0 // HandsOff 

  0029:7a               push2 
  002a:39 0b            pushi b // $b nsBottom
  002c:39 07            pushi 7 // $7 cel
  002e:43 08 04         callk DrawPic 4 

  0031:39 58            pushi 58 // $58 dispose
  0033:76               push0 
  0034:81 0a              lag gAddToPics 
  0036:4a 04             send 4 

  0038:39 58            pushi 58 // $58 dispose
  003a:76               push0 
  003b:81 34              lag gFeatures 
  003d:4a 04             send 4 

  003f:39 62            pushi 62 // $62 eachElementDo
  0041:78               push1 
  0042:38 0089          pushi 89 // $89 hide
  0045:81 05              lag gCast 
  0047:4a 06             send 6 

  0049:35 02              ldi 2 
  004b:65 10             aTop cycles 
  004d:33 71              jmp code_00c0 

        code_004f
  004f:3c                 dup 
  0050:35 01              ldi 1 
  0052:1a                 eq? 
  0053:31 3d              bnt code_0092 
  0055:39 06            pushi 6 // $6 loop
  0057:38 0198          pushi 198 // $198 sel_408
  005a:76               push0 
  005b:39 43            pushi 43 // $43 at
  005d:39 32            pushi 32 // $32 b-i2
  005f:39 0a            pushi a // $a nsLeft
  0061:39 58            pushi 58 // $58 dispose
  0063:46 00ff 0000 0c  calle ff procedure_0000 c // Print 

  0069:39 04            pushi 4 // $4 x
  006b:78               push1 
  006c:38 014a          pushi 14a // $14a eyesID
  006f:38 00c9          pushi c9 // $c9 ignoreActors
  0072:78               push1 
  0073:78               push1 
  0074:39 7e            pushi 7e // $7e setCycle
  0076:78               push1 
  0077:51 17            class Walk 
  0079:36                push 
  007a:38 00d3          pushi d3 // $d3 setMotion
  007d:39 04            pushi 4 // $4 x
  007f:51 1d            class MoveTo 
  0081:36                push 
  0082:39 f6            pushi f6 // $f6 carrying
  0084:38 008c          pushi 8c // $8c track
  0087:7c            pushSelf 
  0088:39 57            pushi 57 // $57 init
  008a:76               push0 
  008b:72 0074          lofsa $0102 // figure
  008e:4a 22             send 22 

  0090:33 2e              jmp code_00c0 

        code_0092
  0092:3c                 dup 
  0093:35 02              ldi 2 
  0095:1a                 eq? 
  0096:31 28              bnt code_00c0 
  0098:76               push0 
  0099:45 0f 00         callb procedure_000f 0 // cls 

  009c:39 58            pushi 58 // $58 dispose
  009e:76               push0 
  009f:39 54            pushi 54 // $54 delete
  00a1:76               push0 
  00a2:72 005d          lofsa $0102 // figure
  00a5:4a 08             send 8 

  00a7:7a               push2 
  00a8:89 0b              lsg gCurRoomNum 
  00aa:39 06            pushi 6 // $6 loop
  00ac:43 08 04         callk DrawPic 4 

  00af:78               push1 
  00b0:76               push0 
  00b1:45 05 02         callb procedure_0005 2 // SetFlag 

  00b4:76               push0 
  00b5:45 04 00         callb procedure_0004 0 // HandsOn 

  00b8:39 7a            pushi 7a // $7a setScript
  00ba:78               push1 
  00bb:76               push0 
  00bc:63 08             pToa client 
  00be:4a 06             send 6 


        code_00c0
  00c0:3a                toss 
  00c1:48                 ret 
    )

)

// 00fc
(instance figure of Act
    (properties
        y $8c
        x $0
        z $0
        heading $0
        yStep $2
        view $1fb
        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 $0
        xLast $0
        yLast $0
        xStep $5
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)



