<?xml version="1.0" encoding="ISO-8859-1"?>
<device image="Ledbar252.gif" initsequence="set 0 0; set 1 0; set 2 0; set 3 0; set 4 0; set 5 0; set 6 0; set 7 0; set 8 0; set 9 255; set 10 255; set 11 255">
  <information>
    <name>LED Light Bar RGB</name>
    <author>Uwe Prenner</author>
    <vendor>Showtec</vendor>
    <comment>9+3 Kanal Version RGB-VD</comment>
  </information>
  <channels>
    <function channel="0" minvalue="0" maxvalue="255" name="Rot 1" fade="yes" type="r" />
    <function channel="1" minvalue="0" maxvalue="255" name="Grün 1" fade="yes" type="g" />
    <function channel="2" minvalue="0" maxvalue="255" name="Blau 1" fade="yes" type="b" />
    <function channel="3" minvalue="0" maxvalue="255" name="Rot 2" fade="yes" type="r" />
    <function channel="4" minvalue="0" maxvalue="255" name="Grün 2" fade="yes" type="g" />
    <function channel="5" minvalue="0" maxvalue="255" name="Blau 2" fade="yes" type="b" />
    <function channel="6" minvalue="0" maxvalue="255" name="Rot 3" fade="yes" type="r" />
    <function channel="7" minvalue="0" maxvalue="255" name="Grün 3" fade="yes" type="g" />
    <function channel="8" minvalue="0" maxvalue="255" name="Blau 3" fade="yes" type="b" />
    <virtual channel="9" minvalue="0" maxvalue="255" name="VR Dim1" fade="yes" type="dimmer">
      <channel channel="0" />
      <channel channel="1" />
      <channel channel="2" />
    </virtual>
    <virtual channel="10" minvalue="0" maxvalue="255" name="VR Dim2" fade="yes" type="dimmer">
      <channel channel="3" />
      <channel channel="4" />
      <channel channel="5" />
    </virtual>
    <virtual channel="11" minvalue="0" maxvalue="255" name="VR Dim3" fade="yes" type="dimmer">
      <channel channel="6" />
      <channel channel="7" />
      <channel channel="8" />
    </virtual>
  </channels>
  <form width="170" height="182">
    <deviceimage top="0" left="0" />
    <devicename top="0" left="40" />
    <deviceadress top="16" left="40" />
    
    <onoff top="30" left="4" width="40" height="20" caption="Seg.1" color="#888888" name="Seg1" action ="SetSeg1" />
    <onoff top="30" left="44" width="40" height="20" caption="Seg.2" color="#888888" name="Seg2" action ="SetSeg2" />
    <onoff top="30" left="84" width="40" height="20" caption="Seg.3" color="#888888" name="Seg3" action ="SetSeg3" />


    <onoff top="50" left="4" width="40" height="20" caption="Clear" color="#888888" name="CLR1" action ="SetSeg1CLR" />
    <onoff top="50" left="44" width="40" height="20" caption="Clear" color="#888888" name="CLR2" action ="SetSeg2CLR" />
    <onoff top="50" left="84" width="40" height="20" caption="Clear" color="#888888" name="CLR3" action ="SetSeg3CLR" />
    <onoff top="50" left="124" width="40" height="20" caption="Kanal" color="#888888" name="Kanal" action ="SetKanal" />
    <colorpicker top="72" left="4" height="60" width="160" mode="rgb" layout="1" name="ColPicker" action="SetColPicker" />

    <slider top="132" left="0" height="25" width="165" startvalue="0" endvalue="255" name="Dimmer" action="SetDimmer" />

    <dropdown top="156" left="8" width="145" name="LEE_Color" action="SetDropCol">
      <item caption="Primary Red (106)" value="106" />
      <item caption="Primary Blue (120)" value="120" />
      <item caption="Primary Green (139)" value="139" />
    </dropdown>
    
  </form>
    <code>
    <procedure name="INITCONTROLS">
      !call|INIT$
    </procedure>
    <procedure name="SetKanal">
    !set_control|Kanal|{Kanal}$
    </procedure>
    <procedure name="INIT">
      !set_control|Dimmer|255$
    </procedure>
    <procedure name="SetSeg1">
      !if|({Seg1}=1)and({Kanal}=0)|
        !set_channel|0|{ColPicker:1}$
        !set_channel|1|{ColPicker:2}$
        !set_channel|2|{ColPicker:3}$
        !set_channel|9|{Dimmer}$
      $
      !if|({Seg1}=1)and({Kanal}=1)|
        !set_control|ColPicker:1|{channel_0}$
        !set_control|ColPicker:2|{channel_1}$
        !set_control|ColPicker:3|{channel_2}$
        !set_control|Dimmer|{channel_9}$
      $
    </procedure>
    <procedure name="SetSeg2">
      !if|({Seg2}=1)and({Kanal}=0)|
        !set_channel|3|{ColPicker:1}$
        !set_channel|4|{ColPicker:2}$
        !set_channel|5|{ColPicker:3}$
        !set_channel|10|{Dimmer}$
      $
      !if|({Seg2}=1)and({Kanal}=1)|
        !set_control|ColPicker:1|{channel_3}$
        !set_control|ColPicker:2|{channel_4}$
        !set_control|ColPicker:3|{channel_5}$
        !set_control|Dimmer|{channel_10}$
      $
    </procedure>
    <procedure name="SetSeg3">
      !if|({Seg3}=1)and({Kanal}=0)|
        !set_channel|6|{ColPicker:1}$
        !set_channel|7|{ColPicker:2}$
        !set_channel|8|{ColPicker:3}$
        !set_channel|11|{Dimmer}$
      $
      !if|({Seg3}=1)and({Kanal}=1)|
        !set_control|ColPicker:1|{channel_6}$
        !set_control|ColPicker:2|{channel_7}$
        !set_control|ColPicker:3|{channel_8}$
        !set_control|Dimmer|{channel_11}$
      $
    </procedure>
    <procedure name="SetSeg1CLR">
      !if|({CLR1}=1)|
        !set_channel|0|0$
        !set_channel|1|0$
        !set_channel|2|0$
      $
      !set_control|CLR1|0$
    </procedure>
    <procedure name="SetSeg2CLR">
      !if|({CLR2}=1)|
        !set_channel|3|0$
        !set_channel|4|0$
        !set_channel|5|0$
      $
      !set_control|CLR2|0$
    </procedure>
    <procedure name="SetSeg3CLR">
      !if|({CLR3}=1)|
        !set_channel|6|0$
        !set_channel|7|0$
        !set_channel|8|0$
      $
      !set_control|CLR3|0$
    </procedure>
    <procedure name="SetColPicker">
      !if|({Seg1}=1)|
      !set_channel|0|{ColPicker:1}$
      !set_channel|1|{ColPicker:3}$
      !set_channel|2|{ColPicker:3}$
      $
      !if|({Seg2}=1)|
      !set_channel|3|{ColPicker:1}$
      !set_channel|4|{ColPicker:2}$
      !set_channel|5|{ColPicker:3}$
      $
      !if|({Seg3}=1)|
      !set_channel|6|{ColPicker:1}$
      !set_channel|7|{ColPicker:2}$
      !set_channel|8|{ColPicker:3}$
      $
    </procedure>
    <procedure name="SetDimmer">
      !if|({Seg1}=1)|
      !set_channel|9|{Dimmer}$
      $
      !if|({Seg2}=1)|
      !set_channel|10|{Dimmer}$
      $
      !if|({Seg3}=1)|
      !set_channel|11|{Dimmer}$
      $
    </procedure>
        <procedure name="SetDropCol">
      !if|({LEE_Color}=106)|
        !if|({Seg1}=1)|
          !set_channel|0|255$
          !set_channel|1|0$
          !set_channel|2|0$
        $
        !if|({Seg1}=2)|
          !set_channel|3|255$
          !set_channel|4|0$
          !set_channel|5|0$
        $
        !if|({Seg1}=3)|
          !set_channel|6|255$
          !set_channel|7|0$
          !set_channel|8|0$
        $
        !set_control|ColPicker:1|255$
        !set_control|ColPicker:2|0$
        !set_control|ColPicker:3|0$
      $
      !if|({LEE_Color}=120)|
        !if|({Seg1}=1)|
          !set_channel|0|0$
          !set_channel|1|0$
          !set_channel|2|255$
        $
        !if|({Seg1}=2)|
          !set_channel|3|0$
          !set_channel|4|0$
          !set_channel|5|255$
        $
        !if|({Seg1}=3)|
          !set_channel|6|0$
          !set_channel|7|0$
          !set_channel|8|255$
        $
        !set_control|ColPicker:1|0$
        !set_control|ColPicker:2|0$
        !set_control|ColPicker:3|255$
      $
      !if|({LEE_Color}=139)|
        !if|({Seg1}=1)|
          !set_channel|0|0$
          !set_channel|1|255$
          !set_channel|2|0$
        $
        !if|({Seg1}=2)|
          !set_channel|3|0$
          !set_channel|4|255$
          !set_channel|5|0$
        $
        !if|({Seg1}=3)|
          !set_channel|6|0$
          !set_channel|7|255$
          !set_channel|8|0$
        $
        !set_control|ColPicker:1|0$
        !set_control|ColPicker:2|255$
        !set_control|ColPicker:3|0$
      $
    </procedure>
  </code>
</device>