(script 415)

(string
    string_025a "FndBody"
)

(said
)

(local
    local0 = $0007
    local1 = $0024
    local2 = $000a
    local3 = $002b
    local4 = $0005
    local5 = $0025
    local6 = $8000
    local7 = $0002
    local8 = $0030
    local9 = $000a
    local10 = $0032
    local11 = $0005
    local12 = $002e
    local13 = $0003
    local14 = $0032
    local15 = $8000
    local16 = $0002
    local17 = $0030
    local18 = $000a
    local19 = $0034
    local20 = $0005
    local21 = $002e
    local22 = $0006
    local23 = $0033
    local24 = $8000
    local25 = $0002
    local26 = $0033
    local27 = $0007
    local28 = $002c
    local29 = $000a
    local30 = $0033
    local31 = $0005
    local32 = $0031
    local33 = $0006
    local34 = $0034
    local35 = $0009
    local36 = $0035
    local37 = $8000
    local38 = $000a
    local39 = $0034
    local40 = $8000
    local41 = $000a
    local42 = $0034
    local43 = $8000
    local44 = $000a
    local45 = $0032
    local46 = $8000
    local47 = $f000
    local48 = $8000
    local49 = $0002
    local50 = $003c
    local51 = $000a
    local52 = $003f
    local53 = $0005
    local54 = $0039
    local55 = $0003
    local56 = $0039
    local57 = $8000
    local58 = $0002
    local59 = $003c
    local60 = $000a
    local61 = $0035
    local62 = $0005
    local63 = $0039
    local64 = $0006
    local65 = $003c
    local66 = $8000
    local67 = $0002
    local68 = $0040
    local69 = $0007
    local70 = $003a
    local71 = $000a
    local72 = $0040
    local73 = $0005
    local74 = $003c
    local75 = $0009
    local76 = $0040
    local77 = $8000
    local78 = $000a
    local79 = $0041
    local80 = $8000
    local81 = $000a
    local82 = $0041
    local83 = $8000
    local84 = $000a
    local85 = $003f
    local86 = $8000
    local87 = $f000
    local88 = $8000
    local89 = $8000
    local90 = $0002
    local91 = $0031
    local92 = $000a
    local93 = $0035
    local94 = $0005
    local95 = $002f
    local96 = $0006
    local97 = $0034
    local98 = $8000
    local99 = $0002
    local100 = $0034
    local101 = $0007
    local102 = $002d
    local103 = $000a
    local104 = $0034
    local105 = $0005
    local106 = $0032
    local107 = $0006
    local108 = $0035
    local109 = $0009
    local110 = $0036
    local111 = $8000
    local112 = $000a
    local113 = $0034
    local114 = $8000
    local115 = $000a
    local116 = $0032
    local117 = $8000
    local118 = $000a
    local119 = $0033
    local120 = $8000
    local121 = $f000
    local122 = $8000
    local123 = $8000
    local124 = $8000
    local125 = $0002
    local126 = $0031
    local127 = $0007
    local128 = $002a
    local129 = $000a
    local130 = $0031
    local131 = $0005
    local132 = $0030
    local133 = $0006
    local134 = $0032
    local135 = $0009
    local136 = $0033
    local137 = $8000
    local138 = $000a
    local139 = $0032
    local140 = $8000
    local141 = $000a
    local142 = $0032
    local143 = $8000
    local144 = $000a
    local145 = $0030
    local146 = $8000
    local147 = $f000
    local148 = $8000
    local149 = $8000
    local150 = $8000
    local151 = $8000
    local152 = $000a
    local153 = $0037
    local154 = $8000
    local155 = $000a
    local156 = $0037
    local157 = $8000
    local158 = $000a
    local159 = $0035
    local160 = $8000
    local161 = $f000
    local162 = $8000
    local163 = $8000
    local164 = $8000
    local165 = $8000
    local166 = $8000
    local167 = $000a
    local168 = $002d
    local169 = $8000
    local170 = $000a
    local171 = $002b
    local172 = $8000
    local173 = $f000
)

// 00cc
(instance public FndBody 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_00b7
  00b7:39 58            pushi 58 // $58 dispose
  00b9:76               push0 
  00ba:57 05 04         super Script 4 

  00bd:78               push1 
  00be:38 019f          pushi 19f // $19f sel_415
  00c1:43 03 02         callk DisposeScript 2 

  00c4:48                 ret 
  00c5:00                bnot 
    )

)


// EXPORTED procedure #1 (proc415_1)
(procedure proc_000e
  000e:3f 37             link 37 // (var $37)
  0010:88 00a5            lsg gAct 
  0013:35 03              ldi 3 
  0015:1a                 eq? 
  0016:31 12              bnt code_002a 
  0018:80 0087            lag global135 
  001b:18                 not 
  001c:31 0c              bnt code_002a 
  001e:35 2b              ldi 2b 
  0020:a3 11              sal local17 
  0022:35 34              ldi 34 
  0024:a3 3b              sal local59 
  0026:35 2c              ldi 2c 
  0028:a3 5b              sal local91 

        code_002a
  002a:35 00              ldi 0 
  002c:a5 00              sat temp0 
  002e:35 01              ldi 1 
  0030:a5 01              sat temp1 

        code_0032
  0032:8d 01              lst temp1 
  0034:87 01              lap param1 
  0036:1c                 ne? 
  0037:31 15              bnt code_004e 
  0039:85 00              lat temp0 
  003b:9b 00             lsli local0 
  003d:34 f000            ldi f000 
  0040:1a                 eq? 
  0041:31 07              bnt code_004a 
  0043:8d 01              lst temp1 
  0045:35 01              ldi 1 
  0047:0e                 shl 
  0048:a5 01              sat temp1 

        code_004a
  004a:c5 00              +at temp0 
  004c:33 e4              jmp code_0032 

        code_004e
  004e:35 02              ldi 2 
  0050:a5 02              sat temp2 

        code_0052
  0052:8d 02              lst temp2 
  0054:80 00a5            lag gAct 
  0057:24                 le? 
  0058:31 10              bnt code_006a 
  005a:85 00              lat temp0 
  005c:9b 00             lsli local0 
  005e:34 8000            ldi 8000 
  0061:1a                 eq? 
  0062:31 02              bnt code_0066 
  0064:c5 02              +at temp2 

        code_0066
  0066:c5 00              +at temp0 
  0068:33 e8              jmp code_0052 

        code_006a
  006a:35 01              ldi 1 
  006c:31 40              bnt code_00ae 
  006e:85 00              lat temp0 
  0070:9b 00             lsli local0 
  0072:35 01              ldi 1 
  0074:04                 sub 
  0075:36                push 
  0076:35 07              ldi 7 
  0078:06                 mul 
  0079:a5 03              sat temp3 
  007b:36                push 
  007c:c5 00              +at temp0 
  007e:9b 00             lsli local0 
  0080:35 10              ldi 10 
  0082:08                 div 
  0083:02                 add 
  0084:a5 03              sat temp3 
  0086:78               push1 
  0087:85 00              lat temp0 
  0089:9b 00             lsli local0 
  008b:35 10              ldi 10 
  008d:0a                 mod 
  008e:0e                 shl 
  008f:a5 04              sat temp4 
  0091:85 03              lat temp3 
  0093:98 00e1           lsgi global225 
  0096:85 04              lat temp4 
  0098:00                bnot 
  0099:12                 and 
  009a:36                push 
  009b:85 03              lat temp3 
  009d:b0 00e1           sagi global225 
  00a0:c5 00              +at temp0 
  00a2:9b 00             lsli local0 
  00a4:34 8000            ldi 8000 
  00a7:1a                 eq? 
  00a8:31 02              bnt code_00ac 
  00aa:33 02              jmp code_00ae 

        code_00ac
  00ac:33 bc              jmp code_006a 

        code_00ae
  00ae:39 58            pushi 58 // $58 dispose
  00b0:76               push0 
  00b1:72 001e          lofsa $00d2 // FndBody
  00b4:4a 04             send 4 

  00b6:48                 ret 
)


