(script 405)

(string
    string_0488 "Gator"
    string_048e "GrabEgo"
    string_0496 "gatorBody"
    string_04a0 "gatorHead"
    string_04aa "myIcon"
    string_04b1 "scream"
)

(said
    said_02e8 look/alligator
)

(local
    local0 = $0000
)

// 02f4
(instance public Gator of Rgn
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
    )
    (method (init) // method_000c
  000c:39 57            pushi 57 // $57 init
  000e:76               push0 
  000f:57 36 04         super Rgn 4 

  0012:7a               push2 
  0013:38 0084          pushi 84 // $84 stop
  0016:39 0a            pushi a // $a nsLeft
  0018:43 00 04         callk Load 4 

  001b:80 00df            lag gDetailLevel 
  001e:31 1d              bnt code_003d 
  0020:39 03            pushi 3 // $3 y
  0022:76               push0 
  0023:81 00              lag gEgo 
  0025:4a 04             send 4 

  0027:36                push 
  0028:34 00a1            ldi a1 
  002b:1e                 gt? 
  002c:31 0f              bnt code_003d 
  002e:7a               push2 
  002f:78               push1 
  0030:39 03            pushi 3 // $3 y
  0032:43 40 04         callk Random 4 

  0035:36                push 
  0036:35 02              ldi 2 
  0038:1a                 eq? 
  0039:31 02              bnt code_003d 
  003b:35 01              ldi 1 

        code_003d
  003d:a3 00              sal local0 
  003f:31 77              bnt code_00b8 
  0041:39 04            pushi 4 // $4 x
  0043:76               push0 
  0044:81 00              lag gEgo 
  0046:4a 04             send 4 

  0048:36                push 
  0049:34 00a0            ldi a0 
  004c:22                 lt? 
  004d:31 28              bnt code_0077 
  004f:38 00c8          pushi c8 // $c8 setLoop
  0052:78               push1 
  0053:76               push0 
  0054:38 00c5          pushi c5 // $c5 posn
  0057:7a               push2 
  0058:39 e4            pushi e4 // $e4 echo
  005a:38 00ad          pushi ad // $ad distance
  005d:72 02fc          lofsa $035c // gatorHead
  0060:4a 0e             send e 

  0062:38 00c8          pushi c8 // $c8 setLoop
  0065:78               push1 
  0066:7a               push2 
  0067:38 00c5          pushi c5 // $c5 posn
  006a:7a               push2 
  006b:39 d8            pushi d8 // $d8 observeBlocks
  006d:38 00ad          pushi ad // $ad distance
  0070:72 034d          lofsa $03c0 // gatorBody
  0073:4a 0e             send e 

  0075:33 29              jmp code_00a0 

        code_0077
  0077:38 00c8          pushi c8 // $c8 setLoop
  007a:78               push1 
  007b:78               push1 
  007c:38 00c5          pushi c5 // $c5 posn
  007f:7a               push2 
  0080:38 015d          pushi 15d // $15d sel_349
  0083:38 00ad          pushi ad // $ad distance
  0086:72 02d3          lofsa $035c // gatorHead
  0089:4a 0e             send e 

  008b:38 00c8          pushi c8 // $c8 setLoop
  008e:78               push1 
  008f:39 03            pushi 3 // $3 y
  0091:38 00c5          pushi c5 // $c5 posn
  0094:7a               push2 
  0095:38 0169          pushi 169 // $169 sel_361
  0098:38 00ad          pushi ad // $ad distance
  009b:72 0322          lofsa $03c0 // gatorBody
  009e:4a 0e             send e 


        code_00a0
  00a0:39 57            pushi 57 // $57 init
  00a2:76               push0 
  00a3:38 0089          pushi 89 // $89 hide
  00a6:76               push0 
  00a7:72 02b2          lofsa $035c // gatorHead
  00aa:4a 08             send 8 

  00ac:39 57            pushi 57 // $57 init
  00ae:76               push0 
  00af:38 0089          pushi 89 // $89 hide
  00b2:76               push0 
  00b3:72 030a          lofsa $03c0 // gatorBody
  00b6:4a 08             send 8 


        code_00b8
  00b8:48                 ret 
    )

    (method (doit) // method_00b9
  00b9:39 65            pushi 65 // $65 contains
  00bb:78               push1 
  00bc:74 029d          lofss $035c // gatorHead
  00bf:81 05              lag gCast 
  00c1:4a 06             send 6 

  00c3:31 3b              bnt code_0100 
  00c5:38 00c5          pushi c5 // $c5 posn
  00c8:7a               push2 
  00c9:39 06            pushi 6 // $6 loop
  00cb:76               push0 
  00cc:72 028d          lofsa $035c // gatorHead
  00cf:4a 04             send 4 

  00d1:36                push 
  00d2:35 01              ldi 1 
  00d4:12                 and 
  00d5:31 0e              bnt code_00e5 
  00d7:39 04            pushi 4 // $4 x
  00d9:76               push0 
  00da:72 02e3          lofsa $03c0 // gatorBody
  00dd:4a 04             send 4 

  00df:36                push 
  00e0:35 0c              ldi c 
  00e2:04                 sub 
  00e3:33 0c              jmp code_00f1 

        code_00e5
  00e5:39 04            pushi 4 // $4 x
  00e7:76               push0 
  00e8:72 02d5          lofsa $03c0 // gatorBody
  00eb:4a 04             send 4 

  00ed:36                push 
  00ee:35 0c              ldi c 
  00f0:02                 add 

        code_00f1
  00f1:36                push 
  00f2:39 03            pushi 3 // $3 y
  00f4:76               push0 
  00f5:72 02c8          lofsa $03c0 // gatorBody
  00f8:4a 04             send 4 

  00fa:36                push 
  00fb:72 025e          lofsa $035c // gatorHead
  00fe:4a 08             send 8 


        code_0100
  0100:83 00              lal local0 
  0102:31 58              bnt code_015c 
  0104:39 06            pushi 6 // $6 loop
  0106:76               push0 
  0107:72 0252          lofsa $035c // gatorHead
  010a:4a 04             send 4 

  010c:31 0e              bnt code_011c 
  010e:39 04            pushi 4 // $4 x
  0110:76               push0 
  0111:81 00              lag gEgo 
  0113:4a 04             send 4 

  0115:36                push 
  0116:34 0113            ldi 113 
  0119:22                 lt? 
  011a:2f 18               bt code_0134 

        code_011c
  011c:39 06            pushi 6 // $6 loop
  011e:76               push0 
  011f:72 023a          lofsa $035c // gatorHead
  0122:4a 04             send 4 

  0124:18                 not 
  0125:31 35              bnt code_015c 
  0127:39 04            pushi 4 // $4 x
  0129:76               push0 
  012a:81 00              lag gEgo 
  012c:4a 04             send 4 

  012e:36                push 
  012f:35 37              ldi 37 
  0131:1e                 gt? 
  0132:31 28              bnt code_015c 

        code_0134
  0134:39 7e            pushi 7e // $7e setCycle
  0136:78               push1 
  0137:51 16            class Fwd 
  0139:36                push 
  013a:38 00ca          pushi ca // $ca show
  013d:76               push0 
  013e:72 021b          lofsa $035c // gatorHead
  0141:4a 0a             send a 

  0143:39 7e            pushi 7e // $7e setCycle
  0145:78               push1 
  0146:51 17            class Walk 
  0148:36                push 
  0149:39 7a            pushi 7a // $7a setScript
  014b:78               push1 
  014c:74 01dd          lofss $032c // GrabEgo
  014f:38 00ca          pushi ca // $ca show
  0152:76               push0 
  0153:72 026a          lofsa $03c0 // gatorBody
  0156:4a 10             send 10 

  0158:35 00              ldi 0 
  015a:a3 00              sal local0 

        code_015c
  015c:39 3c            pushi 3c // $3c doit
  015e:76               push0 
  015f:57 36 04         super Rgn 4 

  0162:48                 ret 
    )

    (method (dispose) // method_0163
  0163:39 58            pushi 58 // $58 dispose
  0165:76               push0 
  0166:57 36 04         super Rgn 4 

  0169:48                 ret 
    )

    (method (handleEvent) // method_016a
  016a:39 4c            pushi 4c // $4c claimed
  016c:76               push0 
  016d:87 01              lap param1 
  016f:4a 04             send 4 

  0171:31 03              bnt code_0176 
  0173:35 01              ldi 1 
  0175:48                 ret 

        code_0176
  0176:39 22            pushi 22 // $22 type
  0178:76               push0 
  0179:87 01              lap param1 
  017b:4a 04             send 4 

  017d:36                push 
  017e:34 0080            ldi 80 
  0181:1a                 eq? 
  0182:31 26              bnt code_01aa 
  0184:78               push1 
  0185:74 0160          lofss $02e8 // look/alligator
  0188:43 25 02         callk Said 2 

  018b:31 1d              bnt code_01aa 
  018d:39 65            pushi 65 // $65 contains
  018f:78               push1 
  0190:74 022d          lofss $03c0 // gatorBody
  0193:81 05              lag gCast 
  0195:4a 06             send 6 

  0197:31 0d              bnt code_01a6 
  0199:7a               push2 
  019a:38 0195          pushi 195 // $195 sel_405
  019d:76               push0 
  019e:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  01a4:33 04              jmp code_01aa 

        code_01a6
  01a6:76               push0 
  01a7:45 12 00         callb procedure_0012 0 // NotHere 


        code_01aa
  01aa:48                 ret 
    )

)

// 0326
(instance GrabEgo 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_01ab
  01ab:3f 01             link 1 // (var $1)
  01ad:87 01              lap param1 
  01af:65 0a             aTop state 
  01b1:36                push 
  01b2:3c                 dup 
  01b3:35 00              ldi 0 
  01b5:1a                 eq? 
  01b6:31 15              bnt code_01cd 
  01b8:38 00d3          pushi d3 // $d3 setMotion
  01bb:39 04            pushi 4 // $4 x
  01bd:51 20            class Chase 
  01bf:36                push 
  01c0:89 00              lsg gEgo 
  01c2:39 23            pushi 23 // $23 window
  01c4:7c            pushSelf 
  01c5:72 01f8          lofsa $03c0 // gatorBody
  01c8:4a 0c             send c 

  01ca:32 0105            jmp code_02d2 

        code_01cd
  01cd:3c                 dup 
  01ce:35 01              ldi 1 
  01d0:1a                 eq? 
  01d1:31 38              bnt code_020b 
  01d3:76               push0 
  01d4:45 03 00         callb procedure_0003 0 // HandsOff 

  01d7:38 00c6          pushi c6 // $c6 stopUpd
  01da:76               push0 
  01db:72 01e2          lofsa $03c0 // gatorBody
  01de:4a 04             send 4 

  01e0:39 06            pushi 6 // $6 loop
  01e2:78               push1 
  01e3:39 06            pushi 6 // $6 loop
  01e5:76               push0 
  01e6:72 0173          lofsa $035c // gatorHead
  01e9:4a 04             send 4 

  01eb:36                push 
  01ec:35 04              ldi 4 
  01ee:02                 add 
  01ef:36                push 
  01f0:39 07            pushi 7 // $7 cel
  01f2:78               push1 
  01f3:76               push0 
  01f4:39 7e            pushi 7e // $7e setCycle
  01f6:7a               push2 
  01f7:51 1a            class End 
  01f9:36                push 
  01fa:7c            pushSelf 
  01fb:72 015e          lofsa $035c // gatorHead
  01fe:4a 14             send 14 

  0200:38 0089          pushi 89 // $89 hide
  0203:76               push0 
  0204:81 00              lag gEgo 
  0206:4a 04             send 4 

  0208:32 00c7            jmp code_02d2 

        code_020b
  020b:3c                 dup 
  020c:35 02              ldi 2 
  020e:1a                 eq? 
  020f:31 2b              bnt code_023c 
  0211:39 2a            pushi 2a // $2a play
  0213:76               push0 
  0214:72 0249          lofsa $0460 // scream
  0217:4a 04             send 4 

  0219:39 06            pushi 6 // $6 loop
  021b:78               push1 
  021c:39 06            pushi 6 // $6 loop
  021e:76               push0 
  021f:72 013a          lofsa $035c // gatorHead
  0222:4a 04             send 4 

  0224:36                push 
  0225:35 02              ldi 2 
  0227:02                 add 
  0228:36                push 
  0229:39 07            pushi 7 // $7 cel
  022b:78               push1 
  022c:76               push0 
  022d:39 7e            pushi 7e // $7e setCycle
  022f:7a               push2 
  0230:51 1a            class End 
  0232:36                push 
  0233:7c            pushSelf 
  0234:72 0125          lofsa $035c // gatorHead
  0237:4a 14             send 14 

  0239:32 0096            jmp code_02d2 

        code_023c
  023c:3c                 dup 
  023d:35 03              ldi 3 
  023f:1a                 eq? 
  0240:31 52              bnt code_0294 
  0242:39 06            pushi 6 // $6 loop
  0244:78               push1 
  0245:39 06            pushi 6 // $6 loop
  0247:76               push0 
  0248:72 0111          lofsa $035c // gatorHead
  024b:4a 04             send 4 

  024d:36                push 
  024e:35 02              ldi 2 
  0250:02                 add 
  0251:36                push 
  0252:39 07            pushi 7 // $7 cel
  0254:78               push1 
  0255:76               push0 
  0256:39 7e            pushi 7e // $7e setCycle
  0258:78               push1 
  0259:51 16            class Fwd 
  025b:36                push 
  025c:72 00fd          lofsa $035c // gatorHead
  025f:4a 12             send 12 

  0261:38 00a3          pushi a3 // $a3 startUpd
  0264:76               push0 
  0265:38 00d3          pushi d3 // $d3 setMotion
  0268:39 04            pushi 4 // $4 x
  026a:51 1d            class MoveTo 
  026c:36                push 
  026d:39 06            pushi 6 // $6 loop
  026f:76               push0 
  0270:72 00e9          lofsa $035c // gatorHead
  0273:4a 04             send 4 

  0275:36                push 
  0276:35 01              ldi 1 
  0278:12                 and 
  0279:31 04              bnt code_027f 
  027b:35 b0              ldi b0 
  027d:33 03              jmp code_0282 

        code_027f
  027f:34 0190            ldi 190 

        code_0282
  0282:36                push 
  0283:39 03            pushi 3 // $3 y
  0285:76               push0 
  0286:72 0137          lofsa $03c0 // gatorBody
  0289:4a 04             send 4 

  028b:36                push 
  028c:7c            pushSelf 
  028d:72 0130          lofsa $03c0 // gatorBody
  0290:4a 10             send 10 

  0292:33 3e              jmp code_02d2 

        code_0294
  0294:3c                 dup 
  0295:35 04              ldi 4 
  0297:1a                 eq? 
  0298:31 38              bnt code_02d2 
  029a:39 58            pushi 58 // $58 dispose
  029c:76               push0 
  029d:72 01c0          lofsa $0460 // scream
  02a0:4a 04             send 4 

  02a2:38 00a6          pushi a6 // $a6 lastCel
  02a5:76               push0 
  02a6:72 017b          lofsa $0424 // myIcon
  02a9:4a 04             send 4 

  02ab:a5 00              sat temp0 
  02ad:72 0174          lofsa $0424 // myIcon
  02b0:a0 0080            sag global128 
  02b3:35 00              ldi 0 
  02b5:a0 0081            sag global129 
  02b8:85 00              lat temp0 
  02ba:a0 0082            sag global130 
  02bd:35 01              ldi 1 
  02bf:a0 0084            sag global132 
  02c2:7a               push2 
  02c3:38 0195          pushi 195 // $195 sel_405
  02c6:78               push1 
  02c7:45 13 04         callb procedure_0013 4 // EgoDead 

  02ca:39 7a            pushi 7a // $7a setScript
  02cc:78               push1 
  02cd:76               push0 
  02ce:63 08             pToa client 
  02d0:4a 06             send 6 


        code_02d2
  02d2:3a                toss 
  02d3:48                 ret 
    )

)

// 0356
(instance gatorHead of Act
    (properties
        y $0
        x $0
        z $0
        heading $0
        yStep $2
        view $d0
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $4000
        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
    )
)

// 03ba
(instance gatorBody of Act
    (properties
        y $0
        x $0
        z $0
        heading $0
        yStep $4
        view $d0
        loop $0
        cel $0
        priority $0
        underBits $0
        signal $4000
        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 $6
        moveSpeed $0
        blocks $0
        baseSetter $0
        mover $0
        looper $0
        viewer $0
        avoider $0
    )
)

// 041e
(instance myIcon of DCIcon
    (properties
        type $4
        state $0
        nsTop $0
        nsLeft $0
        nsBottom $0
        nsRight $0
        key $0
        said $0
        value $0
        view $28a
        loop $0
        cel $0
        cycler $0
        cycleSpeed $10
        signal $0
        count $ffff
    )
    (method (init) // method_02d4
  02d4:39 57            pushi 57 // $57 init
  02d6:78               push1 
  02d7:7c            pushSelf 
  02d8:39 56            pushi 56 // $56 new
  02da:76               push0 
  02db:51 1a            class End 
  02dd:4a 04             send 4 

  02df:65 20             aTop cycler 
  02e1:4a 06             send 6 

  02e3:48                 ret 
    )

)

// 045a
(instance scream of Sound
    (properties
        state $0
        number $35
        priority $f
        loop $1
        handle $0
        signal $0
        prevSignal $0
        client $0
        owner $0
    )
)



