<?xml version="1.0" encoding="ISO-8859-1"?>
<device image="scanner.gif" initsequence="set 0 128;set 1 128;set 3 0">
  <information>
    <name>varyscan 3 mp</name>
  </information>
  <channels>
    <function channel="1" minvalue="0" maxvalue="255" name="Pan" fade="yes" type="pan" />
    <function channel="0" minvalue="0" maxvalue="255" name="Tilt" fade="yes" type="tilt" />
    <function channel="2" minvalue="0" maxvalue="254" name="Gobo" fade="no" type="gobo" action="GetGobo"/>
    <function channel="3" minvalue="0" maxvalue="255" name="Farbe" fade="no" type="color" />
    <function channel="4" minvalue="0" maxvalue="255" name="Dimmer/shutter" fade="yes" type="dimmer" />
    <function channel="5" minvalue="0" maxvalue="255" name="Goborotation" fade="yes" type="gobor" />
  </channels>
  <form width="380" height="250">
    <deviceimage top="0" left="0" width="33" height="33" />
    <devicename top="0" left="40" width="129" height="17" />
    <deviceadress top="16" left="40" width="129" height="17" />
    <position top="40" left="8" height="178" width="190" />
    <slider top="19" left="197" height="41" width="177" startvalue="0" endvalue="128" channel="4" />
    <label top="3" left="237" caption="Dimmer" />
    <slider top="69" left="197" height="41" width="177" startvalue="140" endvalue="243" channel="4" />
    <label top="58" left="241" caption="Blitzer" />
    <dropdown top="117" left="197" width="177" channel="3">
      <item caption="Weiß" value="0" />
      <item caption="gelb" value="16" />
      <item caption="pink dunkel" value="24" />
      <item caption="hellblau" value="32" />
      <item caption="grün" value="40" />
      <item caption="blau" value="48" />
      <item caption="rot" value="56" />
      <item caption="türkis" value="64" />
      <item caption="pink hell" value="72" />
      <item caption="orange" value="80" />
      <item caption="magenta" value="88" />
      <item caption="4 Farb" value="96" />
    </dropdown>
    <dropdown name="gobodrop" action="SetGobo" width="177" left="197" top="145">
      <item caption="Spot" value="0" />
      <item caption="Flood" value="-1" />
      <item caption="Spirale" value="1" />
      <item caption="Spot mittel" value="2" />
      <item caption="Sterne" value="3" />
      <item caption="Spot klein" value="4" />
      <item caption="Kreis" value="5" />
      <item caption="4 Punkte" value="6" />
      <item caption="Punktlinie" value="7" />
      <item caption="3 Punkte" value="8" />
      <item caption="Punktkreis" value="9" />
      <item caption="Linie" value="10" />
      <item caption="Dreieck" value="11" />
    </dropdown>
    <slider top="201" left="197" height="28" width="81" startvalue="192" endvalue="223" channel="5" />
    <slider top="201" left="273" height="28" width="89" startvalue="224" endvalue="255" channel="5" />
    <label top="228" left="209" caption="Gobo Speed mitte=stillstand" />
    <dropdown name="goboeffect" action="SetGobo" width="177" left="197" top="173">
      <item caption="ohne Effekt" value="0" />
      <item caption="Kunstlichtfilter" value="1" />
      <item caption="Tageslichtfilter" value="2" />
      <item caption="Prisma" value="3" />
    </dropdown>
  </form>
  <code>
    <procedure name="SetGobo">
!if|{gobodrop}|gt|0|
 !set_channel|2|(({gobodrop}*16) + ({goboeffect}*4)+5)$
|
 !if|{gobodrop}|eq|-1|
  !set_channel|2|17$
 $
 !if|{gobodrop}|eq|0|
  !set_channel|2|(({gobodrop}*16)+({goboeffect}*4)+1)$
 $
$
    </procedure>
    <procedure name="GetGobo">
!if|({channel_2} &lt; 17)|
 !set_control|gobodrop|0$
 !set_control|goboeffect|({channel_2}-1)/4$
|
!if|({channel_2} &gt; 17)|
  !set_control|goboeffect|((({channel_2}-5) mod 16)/4)$
  !set_control|gobodrop|(({channel_2}-(({channel_2}-5) mod 16)-5)/16)$
 $
!if|{channel_2}|eq|17|
  !set_control|gobodrop|-1$
 $
$
    </procedure>
    <procedure name="INITCONTROLS">
   !call|GetGobo$
   </procedure>
  </code>
</device>