(script 240)

(string
    string_060c "Colonel"
    string_0614 "Glow"
    string_0619 "colonel"
    string_0621 "colonelActions"
    string_0630 "coloroom"
    string_0639 "smoke1"
    string_0640 "smoke2"
    string_0647 ""
)

(said
    said_0436 /colonel
    said_043a get,bouger,appuyer/fauteuilroulant
    said_0446 get/butt
    said_044c ecouter/colonel
    said_0452 look/butt
    said_0458 look/colonel
    said_045e bonjour>
)

(synonym
    butt | cigar | cigare | megot = cigarette
    colonel | henri = person | personne
    colonel | henri = fellow | gars | gentleman | guy | homme | man | type
)

(local
    local0 = $0000
    local1 = $0000
)

// 0468
(instance Colonel 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
    )
    (method (handleEvent) // method_0040
  0040:39 03            pushi 3 // $3 y
  0042:7c            pushSelf 
  0043:8f 01              lsp param1 
  0045:39 03            pushi 3 // $3 y
  0047:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  004d:31 1b              bnt code_006a 
  004f:88 00cf            lsg global207 
  0052:34 0200            ldi 200 
  0055:12                 and 
  0056:18                 not 
  0057:31 11              bnt code_006a 
  0059:39 4c            pushi 4c // $4c claimed
  005b:78               push1 
  005c:78               push1 
  005d:87 01              lap param1 
  005f:4a 06             send 6 

  0061:78               push1 
  0062:74 05b4          lofss $0619 // colonel
  0065:45 19 02         callb procedure_0019 2 // DoLook 

  0068:33 34              jmp code_009e 

        code_006a
  006a:88 00cf            lsg global207 
  006d:34 0200            ldi 200 
  0070:12                 and 
  0071:31 2b              bnt code_009e 
  0073:39 03            pushi 3 // $3 y
  0075:7c            pushSelf 
  0076:8f 01              lsp param1 
  0078:39 03            pushi 3 // $3 y
  007a:46 00ff 0005 06  calle ff procedure_0005 6 // MousedOn 

  0080:2f 09               bt code_008b 
  0082:78               push1 
  0083:74 03d2          lofss $0458 // look/colonel
  0086:43 25 02         callk Said 2 

  0089:31 13              bnt code_009e 

        code_008b
  008b:39 4c            pushi 4c // $4c claimed
  008d:78               push1 
  008e:78               push1 
  008f:87 01              lap param1 
  0091:4a 06             send 6 

  0093:7a               push2 
  0094:38 00f0          pushi f0 // $f0 targetObj
  0097:76               push0 
  0098:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_009e
  009e:48                 ret 
    )

)

// 04ba
(instance smoke1 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
    )
)

// 0508
(instance smoke2 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
    )
)

// 0556
(instance public coloroom of Rgn
    (properties
        script $0
        number $0
        timer $0
        keep $0
        initialized $0
    )
    (method (init) // method_009f
  009f:3f 03             link 3 // (var $3)
  00a1:39 57            pushi 57 // $57 init
  00a3:76               push0 
  00a4:57 36 04         super Rgn 4 

  00a7:34 00af            ldi af 
  00aa:a5 01              sat temp1 
  00ac:34 008c            ldi 8c 
  00af:a5 02              sat temp2 
  00b1:88 00a5            lsg gAct 
  00b4:3c                 dup 
  00b5:35 01              ldi 1 
  00b7:1a                 eq? 
  00b8:31 10              bnt code_00ca 
  00ba:34 00fd            ldi fd 
  00bd:a5 00              sat temp0 
  00bf:34 0085            ldi 85 
  00c2:a5 01              sat temp1 
  00c4:35 62              ldi 62 
  00c6:a5 02              sat temp2 
  00c8:33 42              jmp code_010c 

        code_00ca
  00ca:3c                 dup 
  00cb:35 02              ldi 2 
  00cd:1a                 eq? 
  00ce:31 07              bnt code_00d7 
  00d0:34 011d            ldi 11d 
  00d3:a5 00              sat temp0 
  00d5:33 35              jmp code_010c 

        code_00d7
  00d7:3c                 dup 
  00d8:35 03              ldi 3 
  00da:1a                 eq? 
  00db:31 10              bnt code_00ed 
  00dd:34 0124            ldi 124 
  00e0:a5 00              sat temp0 
  00e2:34 00e5            ldi e5 
  00e5:a5 01              sat temp1 
  00e7:35 5f              ldi 5f 
  00e9:a5 02              sat temp2 
  00eb:33 1f              jmp code_010c 

        code_00ed
  00ed:3c                 dup 
  00ee:35 05              ldi 5 
  00f0:1a                 eq? 
  00f1:31 07              bnt code_00fa 
  00f3:34 0176            ldi 176 
  00f6:a5 00              sat temp0 
  00f8:33 12              jmp code_010c 

        code_00fa
  00fa:3c                 dup 
  00fb:35 06              ldi 6 
  00fd:1a                 eq? 
  00fe:31 07              bnt code_0107 
  0100:34 0177            ldi 177 
  0103:a5 00              sat temp0 
  0105:33 05              jmp code_010c 

        code_0107
  0107:34 0178            ldi 178 
  010a:a5 00              sat temp0 

        code_010c
  010c:3a                toss 
  010d:7a               push2 
  010e:38 0087          pushi 87 // $87 clean
  0111:39 04            pushi 4 // $4 x
  0113:43 00 04         callk Load 4 

  0116:39 03            pushi 3 // $3 y
  0118:38 008f          pushi 8f // $8f moveTo
  011b:38 00f3          pushi f3 // $f3 close
  011e:8d 00              lst temp0 
  0120:45 15 06         callb procedure_0015 6 // LoadMany 

  0123:7a               push2 
  0124:38 0080          pushi 80 // $80 timeLeft
  0127:38 038d          pushi 38d // $38d sel_909
  012a:43 00 04         callk Load 4 

  012d:34 0200            ldi 200 
  0130:a0 00d0            sag global208 
  0133:85 00              lat temp0 
  0135:a0 0182            sag global386 
  0138:39 05            pushi 5 // $5 view
  013a:78               push1 
  013b:38 0130          pushi 130 // $130 loopIndex
  013e:39 04            pushi 4 // $4 x
  0140:78               push1 
  0141:8d 01              lst temp1 
  0143:39 03            pushi 3 // $3 y
  0145:78               push1 
  0146:8d 02              lst temp2 
  0148:39 57            pushi 57 // $57 init
  014a:76               push0 
  014b:38 00c6          pushi c6 // $c6 stopUpd
  014e:76               push0 
  014f:39 7a            pushi 7a // $7a setScript
  0151:78               push1 
  0152:74 0439          lofss $058e // colonelActions
  0155:72 0316          lofsa $046e // Colonel
  0158:4a 20             send 20 

  015a:39 05            pushi 5 // $5 view
  015c:78               push1 
  015d:38 0130          pushi 130 // $130 loopIndex
  0160:39 06            pushi 6 // $6 loop
  0162:78               push1 
  0163:7a               push2 
  0164:39 07            pushi 7 // $7 cel
  0166:78               push1 
  0167:76               push0 
  0168:38 00c5          pushi c5 // $c5 posn
  016b:7a               push2 
  016c:39 04            pushi 4 // $4 x
  016e:76               push0 
  016f:72 02fc          lofsa $046e // Colonel
  0172:4a 04             send 4 

  0174:36                push 
  0175:35 06              ldi 6 
  0177:02                 add 
  0178:36                push 
  0179:39 03            pushi 3 // $3 y
  017b:76               push0 
  017c:72 02ef          lofsa $046e // Colonel
  017f:4a 04             send 4 

  0181:36                push 
  0182:35 1e              ldi 1e 
  0184:04                 sub 
  0185:36                push 
  0186:39 42            pushi 42 // $42 setPri
  0188:78               push1 
  0189:78               push1 
  018a:39 03            pushi 3 // $3 y
  018c:76               push0 
  018d:72 02de          lofsa $046e // Colonel
  0190:4a 04             send 4 

  0192:36                push 
  0193:43 65 02         callk CoordPri 2 

  0196:36                push 
  0197:39 57            pushi 57 // $57 init
  0199:76               push0 
  019a:38 0089          pushi 89 // $89 hide
  019d:76               push0 
  019e:72 031f          lofsa $04c0 // smoke1
  01a1:4a 28             send 28 

  01a3:39 05            pushi 5 // $5 view
  01a5:78               push1 
  01a6:38 0130          pushi 130 // $130 loopIndex
  01a9:39 06            pushi 6 // $6 loop
  01ab:78               push1 
  01ac:39 03            pushi 3 // $3 y
  01ae:39 07            pushi 7 // $7 cel
  01b0:78               push1 
  01b1:76               push0 
  01b2:38 00c5          pushi c5 // $c5 posn
  01b5:7a               push2 
  01b6:39 04            pushi 4 // $4 x
  01b8:76               push0 
  01b9:72 02b2          lofsa $046e // Colonel
  01bc:4a 04             send 4 

  01be:36                push 
  01bf:35 0b              ldi b 
  01c1:02                 add 
  01c2:36                push 
  01c3:39 03            pushi 3 // $3 y
  01c5:76               push0 
  01c6:72 02a5          lofsa $046e // Colonel
  01c9:4a 04             send 4 

  01cb:36                push 
  01cc:35 18              ldi 18 
  01ce:04                 sub 
  01cf:36                push 
  01d0:39 42            pushi 42 // $42 setPri
  01d2:78               push1 
  01d3:78               push1 
  01d4:39 03            pushi 3 // $3 y
  01d6:76               push0 
  01d7:72 0294          lofsa $046e // Colonel
  01da:4a 04             send 4 

  01dc:36                push 
  01dd:43 65 02         callk CoordPri 2 

  01e0:36                push 
  01e1:39 57            pushi 57 // $57 init
  01e3:76               push0 
  01e4:38 0089          pushi 89 // $89 hide
  01e7:76               push0 
  01e8:72 0323          lofsa $050e // smoke2
  01eb:4a 28             send 28 

  01ed:38 00c5          pushi c5 // $c5 posn
  01f0:7a               push2 
  01f1:39 04            pushi 4 // $4 x
  01f3:76               push0 
  01f4:72 0277          lofsa $046e // Colonel
  01f7:4a 04             send 4 

  01f9:36                push 
  01fa:35 0a              ldi a 
  01fc:02                 add 
  01fd:36                push 
  01fe:39 03            pushi 3 // $3 y
  0200:76               push0 
  0201:72 026a          lofsa $046e // Colonel
  0204:4a 04             send 4 

  0206:36                push 
  0207:39 55            pushi 55 // $55 z
  0209:78               push1 
  020a:39 1d            pushi 1d // $1d back
  020c:39 57            pushi 57 // $57 init
  020e:76               push0 
  020f:38 0089          pushi 89 // $89 hide
  0212:76               push0 
  0213:72 03a8          lofsa $05be // Glow
  0216:4a 16             send 16 

  0218:48                 ret 
    )

    (method (doit) // method_0219
  0219:39 3c            pushi 3c // $3c doit
  021b:76               push0 
  021c:57 36 04         super Rgn 4 

  021f:48                 ret 
    )

    (method (dispose) // method_0220
  0220:39 58            pushi 58 // $58 dispose
  0222:76               push0 
  0223:57 36 04         super Rgn 4 

  0226:48                 ret 
    )

    (method (handleEvent) // method_0227
  0227:39 4c            pushi 4c // $4c claimed
  0229:76               push0 
  022a:87 01              lap param1 
  022c:4a 04             send 4 

  022e:31 03              bnt code_0233 
  0230:35 01              ldi 1 
  0232:48                 ret 

        code_0233
  0233:39 22            pushi 22 // $22 type
  0235:76               push0 
  0236:87 01              lap param1 
  0238:4a 04             send 4 

  023a:36                push 
  023b:34 0080            ldi 80 
  023e:1a                 eq? 
  023f:30 0108            bnt code_034a 
  0242:78               push1 
  0243:74 01f4          lofss $043a // get,bouger,appuyer/fauteuilroulant
  0246:43 25 02         callk Said 2 

  0249:31 0e              bnt code_0259 
  024b:7a               push2 
  024c:38 00f0          pushi f0 // $f0 targetObj
  024f:78               push1 
  0250:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0256:32 00f1            jmp code_034a 

        code_0259
  0259:78               push1 
  025a:74 01f5          lofss $0452 // look/butt
  025d:43 25 02         callk Said 2 

  0260:31 14              bnt code_0276 
  0262:78               push1 
  0263:39 0d            pushi d // $d lsTop
  0265:45 05 02         callb procedure_0005 2 // SetFlag 

  0268:7a               push2 
  0269:38 00f0          pushi f0 // $f0 targetObj
  026c:7a               push2 
  026d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  0273:32 00d4            jmp code_034a 

        code_0276
  0276:78               push1 
  0277:74 01d2          lofss $044c // ecouter/colonel
  027a:43 25 02         callk Said 2 

  027d:31 0f              bnt code_028e 
  027f:7a               push2 
  0280:38 00f0          pushi f0 // $f0 targetObj
  0283:39 03            pushi 3 // $3 y
  0285:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  028b:32 00bc            jmp code_034a 

        code_028e
  028e:78               push1 
  028f:74 01b4          lofss $0446 // get/butt
  0292:43 25 02         callk Said 2 

  0295:31 0f              bnt code_02a6 
  0297:7a               push2 
  0298:38 00f0          pushi f0 // $f0 targetObj
  029b:39 04            pushi 4 // $4 x
  029d:46 00ff 0000 04  calle ff procedure_0000 4 // Print 

  02a3:32 00a4            jmp code_034a 

        code_02a6
  02a6:78               push1 
  02a7:74 01b4          lofss $045e // bonjour>
  02aa:43 25 02         callk Said 2 

  02ad:30 009a            bnt code_034a 
  02b0:78               push1 
  02b1:74 0182          lofss $0436 // /colonel
  02b4:43 25 02         callk Said 2 

  02b7:30 0090            bnt code_034a 
  02ba:35 0a              ldi a 
  02bc:a0 00d5            sag global213 
  02bf:88 00a5            lsg gAct 
  02c2:3c                 dup 
  02c3:35 07              ldi 7 
  02c5:1a                 eq? 
  02c6:31 37              bnt code_02ff 
  02c8:8b 01              lsl local1 
  02ca:3c                 dup 
  02cb:35 00              ldi 0 
  02cd:1a                 eq? 
  02ce:31 0d              bnt code_02dd 
  02d0:39 03            pushi 3 // $3 y
  02d2:78               push1 
  02d3:38 00f0          pushi f0 // $f0 targetObj
  02d6:39 05            pushi 5 // $5 view
  02d8:45 01 06         callb procedure_0001 6 // Say 

  02db:33 1f              jmp code_02fc 

        code_02dd
  02dd:3c                 dup 
  02de:35 01              ldi 1 
  02e0:1a                 eq? 
  02e1:31 0d              bnt code_02f0 
  02e3:39 03            pushi 3 // $3 y
  02e5:78               push1 
  02e6:38 00f0          pushi f0 // $f0 targetObj
  02e9:39 06            pushi 6 // $6 loop
  02eb:45 01 06         callb procedure_0001 6 // Say 

  02ee:33 0c              jmp code_02fc 

        code_02f0
  02f0:7a               push2 
  02f1:38 00f0          pushi f0 // $f0 targetObj
  02f4:39 07            pushi 7 // $7 cel
  02f6:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_02fc
  02fc:3a                toss 
  02fd:33 48              jmp code_0347 

        code_02ff
  02ff:8b 01              lsl local1 
  0301:3c                 dup 
  0302:35 00              ldi 0 
  0304:1a                 eq? 
  0305:31 0d              bnt code_0314 
  0307:39 03            pushi 3 // $3 y
  0309:78               push1 
  030a:38 00f0          pushi f0 // $f0 targetObj
  030d:39 08            pushi 8 // $8 underBits
  030f:45 01 06         callb procedure_0001 6 // Say 

  0312:33 32              jmp code_0346 

        code_0314
  0314:3c                 dup 
  0315:35 01              ldi 1 
  0317:1a                 eq? 
  0318:31 0d              bnt code_0327 
  031a:39 03            pushi 3 // $3 y
  031c:78               push1 
  031d:38 00f0          pushi f0 // $f0 targetObj
  0320:39 09            pushi 9 // $9 nsTop
  0322:45 01 06         callb procedure_0001 6 // Say 

  0325:33 1f              jmp code_0346 

        code_0327
  0327:3c                 dup 
  0328:35 02              ldi 2 
  032a:1a                 eq? 
  032b:31 0d              bnt code_033a 
  032d:39 03            pushi 3 // $3 y
  032f:78               push1 
  0330:38 00f0          pushi f0 // $f0 targetObj
  0333:39 0a            pushi a // $a nsLeft
  0335:45 01 06         callb procedure_0001 6 // Say 

  0338:33 0c              jmp code_0346 

        code_033a
  033a:7a               push2 
  033b:38 00f0          pushi f0 // $f0 targetObj
  033e:39 0b            pushi b // $b nsBottom
  0340:46 00ff 0000 04  calle ff procedure_0000 4 // Print 


        code_0346
  0346:3a                toss 

        code_0347
  0347:3a                toss 
  0348:c3 01              +al local1 

        code_034a
  034a:48                 ret 
    )

)

// 0588
(instance colonelActions 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_034b
  034b:87 01              lap param1 
  034d:65 0a             aTop state 
  034f:36                push 
  0350:3c                 dup 
  0351:35 00              ldi 0 
  0353:1a                 eq? 
  0354:31 24              bnt code_037a 
  0356:39 07            pushi 7 // $7 cel
  0358:78               push1 
  0359:76               push0 
  035a:38 0089          pushi 89 // $89 hide
  035d:76               push0 
  035e:72 01ad          lofsa $050e // smoke2
  0361:4a 0a             send a 

  0363:39 06            pushi 6 // $6 loop
  0365:78               push1 
  0366:76               push0 
  0367:39 07            pushi 7 // $7 cel
  0369:78               push1 
  036a:76               push0 
  036b:39 7e            pushi 7e // $7e setCycle
  036d:7a               push2 
  036e:51 1a            class End 
  0370:36                push 
  0371:7c            pushSelf 
  0372:72 00f9          lofsa $046e // Colonel
  0375:4a 14             send 14 

  0377:32 00b5            jmp code_042f 

        code_037a
  037a:3c                 dup 
  037b:35 01              ldi 1 
  037d:1a                 eq? 
  037e:31 1e              bnt code_039e 
  0380:38 00ca          pushi ca // $ca show
  0383:76               push0 
  0384:39 06            pushi 6 // $6 loop
  0386:78               push1 
  0387:78               push1 
  0388:39 07            pushi 7 // $7 cel
  038a:78               push1 
  038b:76               push0 
  038c:39 7e            pushi 7e // $7e setCycle
  038e:78               push1 
  038f:51 16            class Fwd 
  0391:36                push 
  0392:72 0229          lofsa $05be // Glow
  0395:4a 16             send 16 

  0397:35 12              ldi 12 
  0399:65 10             aTop cycles 
  039b:32 0091            jmp code_042f 

        code_039e
  039e:3c                 dup 
  039f:35 02              ldi 2 
  03a1:1a                 eq? 
  03a2:31 2a              bnt code_03ce 
  03a4:38 0089          pushi 89 // $89 hide
  03a7:76               push0 
  03a8:72 0213          lofsa $05be // Glow
  03ab:4a 04             send 4 

  03ad:39 06            pushi 6 // $6 loop
  03af:78               push1 
  03b0:76               push0 
  03b1:39 07            pushi 7 // $7 cel
  03b3:78               push1 
  03b4:78               push1 
  03b5:74 00b6          lofss $046e // Colonel
  03b8:43 0e 02         callk NumCels 2 

  03bb:36                push 
  03bc:35 01              ldi 1 
  03be:04                 sub 
  03bf:36                push 
  03c0:39 7e            pushi 7e // $7e setCycle
  03c2:7a               push2 
  03c3:51 1b            class Beg 
  03c5:36                push 
  03c6:7c            pushSelf 
  03c7:72 00a4          lofsa $046e // Colonel
  03ca:4a 14             send 14 

  03cc:33 61              jmp code_042f 

        code_03ce
  03ce:3c                 dup 
  03cf:35 03              ldi 3 
  03d1:1a                 eq? 
  03d2:31 21              bnt code_03f5 
  03d4:39 7e            pushi 7e // $7e setCycle
  03d6:78               push1 
  03d7:51 16            class Fwd 
  03d9:36                push 
  03da:38 00ca          pushi ca // $ca show
  03dd:76               push0 
  03de:72 012d          lofsa $050e // smoke2
  03e1:4a 0a             send a 

  03e3:38 00ca          pushi ca // $ca show
  03e6:76               push0 
  03e7:39 7e            pushi 7e // $7e setCycle
  03e9:7a               push2 
  03ea:51 1a            class End 
  03ec:36                push 
  03ed:7c            pushSelf 
  03ee:72 00cf          lofsa $04c0 // smoke1
  03f1:4a 0c             send c 

  03f3:33 3a              jmp code_042f 

        code_03f5
  03f5:3c                 dup 
  03f6:35 04              ldi 4 
  03f8:1a                 eq? 
  03f9:31 13              bnt code_040e 
  03fb:39 07            pushi 7 // $7 cel
  03fd:78               push1 
  03fe:76               push0 
  03ff:38 0089          pushi 89 // $89 hide
  0402:76               push0 
  0403:72 00ba          lofsa $04c0 // smoke1
  0406:4a 0a             send a 

  0408:35 01              ldi 1 
  040a:65 10             aTop cycles 
  040c:33 21              jmp code_042f 

        code_040e
  040e:3c                 dup 
  040f:35 05              ldi 5 
  0411:1a                 eq? 
  0412:31 1b              bnt code_042f 
  0414:7a               push2 
  0415:78               push1 
  0416:39 64            pushi 64 // $64 allTrue
  0418:43 40 04         callk Random 4 

  041b:36                push 
  041c:35 1e              ldi 1e 
  041e:22                 lt? 
  041f:31 06              bnt code_0427 
  0421:35 ff              ldi ff 
  0423:65 0a             aTop state 
  0425:33 04              jmp code_042b 

        code_0427
  0427:35 04              ldi 4 
  0429:65 0a             aTop state 

        code_042b
  042b:35 05              ldi 5 
  042d:65 12             aTop seconds 

        code_042f
  042f:3a                toss 
  0430:48                 ret 
  0431:00                bnot 
    )

)

// 05b8
(instance Glow of Prop
    (properties
        y $0
        x $0
        z $0
        heading $0
        yStep $2
        view $130
        loop $1
        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
    )
)



