(script 291)

(string
    string_01e6 "ClarAct4"
    string_01ef ""
)

(said
)

(local
    local0 = $0000
    local1 = $0123
    local2 = $0000
    local3 = $0123
    local4 = $0001
    local5 = $0123
    local6 = $0002
    local7 = $0123
    local8 = $0003
    local9 = $0123
    local10 = $0004
    local11 = $0123
    local12 = $0005
    local13 = $0123
    local14 = $0006
    local15 = $0123
    local16 = $0007
    local17 = $0123
    local18 = $0008
    local19 = $0123
    local20 = $0009
    local21 = $0123
    local22 = $000a
    local23 = $0123
    local24 = $000b
    local25 = $0123
    local26 = $000c
    local27 = $0123
    local28 = $000d
)

// 0176
(instance public ClarAct4 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 0123          pushi 123 // $123 yTilt
  0016:43 03 02         callk DisposeScript 2 

  0019:48                 ret 
    )

    (method (handleEvent) // method_001a
  001a:3f 01             link 1 // (var $1)
  001c:39 4c            pushi 4c // $4c claimed
  001e:76               push0 
  001f:87 01              lap param1 
  0021:4a 04             send 4 

  0023:31 03              bnt code_0028 
  0025:32 013e            jmp code_0166 

        code_0028
  0028:39 22            pushi 22 // $22 type
  002a:76               push0 
  002b:87 01              lap param1 
  002d:4a 04             send 4 

  002f:36                push 
  0030:34 0080            ldi 80 
  0033:1a                 eq? 
  0034:30 012f            bnt code_0166 
  0037:80 00d4            lag global212 
  003a:30 0129            bnt code_0166 
  003d:35 ff              ldi ff 
  003f:a3 00              sal local0 
  0041:88 00d4            lsg global212 
  0044:3c                 dup 
  0045:35 01              ldi 1 
  0047:1a                 eq? 
  0048:31 23              bnt code_006d 
  004a:89 0b              lsg gCurRoomNum 
  004c:35 11              ldi 11 
  004e:1a                 eq? 
  004f:31 15              bnt code_0066 
  0051:88 00d3            lsg global211 
  0054:34 0100            ldi 100 
  0057:1a                 eq? 
  0058:31 06              bnt code_0060 
  005a:35 00              ldi 0 
  005c:a3 00              sal local0 
  005e:33 04              jmp code_0064 

        code_0060
  0060:35 01              ldi 1 
  0062:a3 00              sal local0 

        code_0064
  0064:33 04              jmp code_006a 

        code_0066
  0066:35 04              ldi 4 
  0068:a3 00              sal local0 

        code_006a
  006a:32 00a0            jmp code_010d 

        code_006d
  006d:3c                 dup 
  006e:35 02              ldi 2 
  0070:1a                 eq? 
  0071:31 22              bnt code_0095 
  0073:89 0b              lsg gCurRoomNum 
  0075:35 11              ldi 11 
  0077:1a                 eq? 
  0078:31 15              bnt code_008f 
  007a:88 00d3            lsg global211 
  007d:34 0100            ldi 100 
  0080:1a                 eq? 
  0081:31 06              bnt code_0089 
  0083:35 02              ldi 2 
  0085:a3 00              sal local0 
  0087:33 04              jmp code_008d 

        code_0089
  0089:35 03              ldi 3 
  008b:a3 00              sal local0 

        code_008d
  008d:33 04              jmp code_0093 

        code_008f
  008f:35 04              ldi 4 
  0091:a3 00              sal local0 

        code_0093
  0093:33 78              jmp code_010d 

        code_0095
  0095:3c                 dup 
  0096:35 03              ldi 3 
  0098:1a                 eq? 
  0099:31 13              bnt code_00ae 
  009b:89 0b              lsg gCurRoomNum 
  009d:35 11              ldi 11 
  009f:1a                 eq? 
  00a0:31 06              bnt code_00a8 
  00a2:35 05              ldi 5 
  00a4:a3 00              sal local0 
  00a6:33 04              jmp code_00ac 

        code_00a8
  00a8:35 06              ldi 6 
  00aa:a3 00              sal local0 

        code_00ac
  00ac:33 5f              jmp code_010d 

        code_00ae
  00ae:3c                 dup 
  00af:35 04              ldi 4 
  00b1:1a                 eq? 
  00b2:31 13              bnt code_00c7 
  00b4:89 0b              lsg gCurRoomNum 
  00b6:35 11              ldi 11 
  00b8:1a                 eq? 
  00b9:31 06              bnt code_00c1 
  00bb:35 07              ldi 7 
  00bd:a3 00              sal local0 
  00bf:33 04              jmp code_00c5 

        code_00c1
  00c1:35 06              ldi 6 
  00c3:a3 00              sal local0 

        code_00c5
  00c5:33 46              jmp code_010d 

        code_00c7
  00c7:3c                 dup 
  00c8:35 05              ldi 5 
  00ca:1a                 eq? 
  00cb:31 06              bnt code_00d3 
  00cd:35 08              ldi 8 
  00cf:a3 00              sal local0 
  00d1:33 3a              jmp code_010d 

        code_00d3
  00d3:3c                 dup 
  00d4:35 06              ldi 6 
  00d6:1a                 eq? 
  00d7:31 06              bnt code_00df 
  00d9:35 09              ldi 9 
  00db:a3 00              sal local0 
  00dd:33 2e              jmp code_010d 

        code_00df
  00df:3c                 dup 
  00e0:35 07              ldi 7 
  00e2:1a                 eq? 
  00e3:31 06              bnt code_00eb 
  00e5:35 0a              ldi a 
  00e7:a3 00              sal local0 
  00e9:33 22              jmp code_010d 

        code_00eb
  00eb:3c                 dup 
  00ec:35 08              ldi 8 
  00ee:1a                 eq? 
  00ef:31 06              bnt code_00f7 
  00f1:35 0b              ldi b 
  00f3:a3 00              sal local0 
  00f5:33 16              jmp code_010d 

        code_00f7
  00f7:3c                 dup 
  00f8:35 09              ldi 9 
  00fa:1a                 eq? 
  00fb:31 06              bnt code_0103 
  00fd:35 0c              ldi c 
  00ff:a3 00              sal local0 
  0101:33 0a              jmp code_010d 

        code_0103
  0103:3c                 dup 
  0104:35 0a              ldi a 
  0106:1a                 eq? 
  0107:31 04              bnt code_010d 
  0109:35 0d              ldi d 
  010b:a3 00              sal local0 

        code_010d
  010d:3a                toss 
  010e:8b 00              lsl local0 
  0110:35 ff              ldi ff 
  0112:1c                 ne? 
  0113:31 51              bnt code_0166 
  0115:8b 00              lsl local0 
  0117:35 01              ldi 1 
  0119:0e                 shl 
  011a:a5 00              sat temp0 
  011c:39 4c            pushi 4c // $4c claimed
  011e:78               push1 
  011f:78               push1 
  0120:80 00d1            lag global209 
  0123:4a 06             send 6 

  0125:8b 00              lsl local0 
  0127:35 08              ldi 8 
  0129:1a                 eq? 
  012a:31 14              bnt code_0140 
  012c:39 03            pushi 3 // $3 y
  012e:8b 00              lsl local0 
  0130:85 00              lat temp0 
  0132:9b 01             lsli local1 
  0134:c5 00              +at temp0 
  0136:9b 01             lsli local1 
  0138:46 00f3 0001 06  calle f3 procedure_0001 6 // proc243_1 

  013e:33 26              jmp code_0166 

        code_0140
  0140:8b 00              lsl local0 
  0142:35 04              ldi 4 
  0144:20                 ge? 
  0145:31 11              bnt code_0158 
  0147:7a               push2 
  0148:85 00              lat temp0 
  014a:9b 01             lsli local1 
  014c:c5 00              +at temp0 
  014e:9b 01             lsli local1 
  0150:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0156:33 0e              jmp code_0166 

        code_0158
  0158:39 03            pushi 3 // $3 y
  015a:78               push1 
  015b:85 00              lat temp0 
  015d:9b 01             lsli local1 
  015f:c5 00              +at temp0 
  0161:9b 01             lsli local1 
  0163:45 01 06         callb procedure_0001 6 // Say 


        code_0166
  0166:39 7a            pushi 7a // $7a setScript
  0168:78               push1 
  0169:76               push0 
  016a:63 08             pToa client 
  016c:4a 06             send 6 

  016e:48                 ret 
  016f:00                bnot 
    )

)



