<?xml version="1.0"?>
<device image="Mh.gif" initsequence="set 0 128; set 2 128">
	<information>
		<comment>basierend auf der Anleitung V 1.05</comment>
		<name>YPOC 250 pro</name>
		<panarea degree="530"/>
		<tiltarea degree="285"/>
		<author>Steffen Senf</author>
		<vendor>GLP</vendor>
	<version>1</version></information>
	<channels>
		<function channel="0" minvalue="0" maxvalue="255" name="Pan grob" fade="yes" type="pan"/>
		<function channel="1" minvalue="0" maxvalue="255" name="Pan fein" fade="yes" type="panfine"/>
		<function channel="2" minvalue="0" maxvalue="255" name="Tilt grob" fade="yes" type="tilt"/>
		<function channel="3" minvalue="0" maxvalue="255" name="Tilt fein" fade="yes" type="tiltfine"/>
		<function channel="4" minvalue="0" maxvalue="255" name="Farbe" fade="no" type="color" action="GetColor"/>
		<function channel="5" minvalue="0" maxvalue="255" name="Gobo 1" fade="no" type="gobo" action="GetGobo1"/>
		<function channel="6" minvalue="0" maxvalue="255" name="Gobo Rotation" fade="no"/>
		<function channel="7" minvalue="0" maxvalue="255" name="Gobo 2" fade="no" action="GetGobo2"/>
		<function channel="8" minvalue="0" maxvalue="255" name="Shutter" fade="no" action="GetShutter"/>
		<function channel="9" minvalue="0" maxvalue="255" name="Dimmer" fade="yes" type="dimmer"/>
		<function channel="10" minvalue="0" maxvalue="255" name="Focus" fade="no"/>
		<function channel="11" minvalue="0" maxvalue="255" name="Prisma" fade="no" action="GetPrisma"/>
		<function channel="12" minvalue="0" maxvalue="255" name="Iris" fade="no" action="GetIris"/>
		<function channel="13" minvalue="0" maxvalue="255" name="Special" fade="no" action="GetSpecial"/>
		<function channel="14" minvalue="0" maxvalue="255" name="Movement" fade="no" action="GetMovement"/>
		<function channel="15" minvalue="0" maxvalue="255" name="Speed" fade="no"/>
	</channels>
	<form width="415" height="569">
		<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="35" left="0" height="215" width="215"/>
		<!--Color-->
		<label top="40" left="220" caption="Color"/>
		<dropdown top="35" left="265" width="135" name="color_color" action="SetColor">
			<item caption="Offen" value="0"/>
			<item caption="Offen / Brilliant Blue" value="2"/>
			<item caption="Brilliant Blue" value="4"/>
			<item caption="Brilliant Blue / Blue" value="6"/>
			<item caption="Blue" value="8"/>
			<item caption="Blue / Blue Purple" value="10"/>
			<item caption="Blue Purple" value="12"/>
			<item caption="Blue Purple / Magenta" value="14"/>
			<item caption="Magenta" value="16"/>
			<item caption="Magenta / Pink" value="18"/>
			<item caption="Pink" value="20"/>
			<item caption="Pink / Orange" value="22"/>
			<item caption="Orange" value="24"/>
			<item caption="Orange / Canary" value="26"/>
			<item caption="Canary" value="28"/>
			<item caption="Canary / Italian Blue" value="30"/>
			<item caption="Italian Blue" value="32"/>
			<item caption="Italian Blue / Turquoise" value="34"/>
			<item caption="Turquoise" value="36"/>
			<item caption="Turquoise / Jade" value="38"/>
			<item caption="Jade" value="40"/>
			<item caption="Jade / Red" value="42"/>
			<item caption="Red" value="44"/>
			<item caption="Wechsel Stop" value="128"/>
			<item caption="Wechsel UZ" value="130"/>
			<item caption="Wechsel GUZ" value="192"/>
			<item caption="Audiowechsel langsam" value="254"/>
			<item caption="Audiowechsel schnell" value="255"/>
		</dropdown>
		<label top="60" left="220" caption="Speed"/>
		<slider top="60" left="265" height="25" width="135" startvalue="0" endvalue="61" tickfreq="6" smallchange="6" largechange="12" action="SetColor" name="color_speed"/>
		<label top="80" left="220" caption="Wechsel"/>
		<options top="80" left="268" action="SetColor" name="color_changespeed">
			<option top="0" left="0" caption="Schnell" value="1"/>
			<option top="0" left="60" caption="Langsam" value="0"/>
		</options>
		<line x1="205" y1="100" x2="395" y2="100"/>
		<!--Gobo 1-->
		<label top="120" left="220" caption="Gobo 1"/>
		<dropdown top="115" left="265" width="135" name="gobo1_gobo" action="SetGobo1">
			<item caption="Gobo 1 / Offen" value="0"/>
			<item caption="Gobo 2" value="8"/>
			<item caption="Gobo 3" value="16"/>
			<item caption="Gobo 4" value="24"/>
			<item caption="Gobo 5" value="32"/>
			<item caption="Gobo 6" value="40"/>
			<item caption="Gobo 7" value="48"/>
			<item caption="Gobo 8" value="56"/>
			<item caption="Wechsel Stop" value="128"/>
			<item caption="Wechsel UZ" value="130"/>
			<item caption="Wechsel GUZ" value="192"/>
			<item caption="Audiowechsel langsam" value="254"/>
			<item caption="Audiowechsel schnell" value="255"/>
		</dropdown>
		<label top="140" left="220" caption="Speed"/>
		<slider top="140" left="265" height="25" width="135" startvalue="0" endvalue="61" tickfreq="6" smallchange="6" largechange="12" action="SetGobo1" name="gobo1_speed"/>
		<label top="160" left="220" caption="Wechsel"/>
		<options top="160" left="268" action="SetGobo1" name="gobo1_changespeed">
			<option top="0" left="0" caption="Schnell" value="1"/>
			<option top="0" left="60" caption="Langsam" value="0"/>
		</options>
		<label top="190" left="220" caption="Rotation"/>
		<dropdown top="185" left="265" width="135" name="gobo1_rotation" action="SetGobo1Rotation">
			<item caption="Position 0...540&#xB0;" value="0"/>
			<item caption="Rotation STOP" value="128"/>
			<item caption="Rotation UZ" value="130"/>
			<item caption="Rotation GUZ" value="192"/>
			<item caption="Audiorotation langsam" value="254"/>
			<item caption="Audiorotation schnell" value="255"/>
		</dropdown>
		<label top="210" left="220" caption="Speed"/>
		<slider top="210" left="265" height="25" width="135" startvalue="0" endvalue="61" tickfreq="6" smallchange="6" largechange="12" action="SetGobo1Rotation" name="gobo1_rotation_speed"/>
		<label top="235" left="220" caption="Position"/>
		<slider top="235" left="265" height="25" width="135" startvalue="0" endvalue="127" tickfreq="10" smallchange="6" largechange="12" action="SetGobo1Rotation" name="gobo1_rotation_position"/>
		<line x1="0" y1="260" x2="395" y2="260"/>
		<!--Gobo 2-->
		<label top="275" left="220" caption="Gobo 2"/>
		<dropdown top="270" left="265" width="135" name="gobo2_gobo" action="SetGobo2">
			<item caption="Gobo 1 / Offen" value="0"/>
			<item caption="Gobo 2" value="4"/>
			<item caption="Gobo 3" value="8"/>
			<item caption="Gobo 4" value="12"/>
			<item caption="Gobo 5" value="16"/>
			<item caption="Gobo 6" value="20"/>
			<item caption="Gobo 7" value="24"/>
			<item caption="Gobo 8" value="28"/>
			<item caption="Gobo 9" value="32"/>
			<item caption="Gobo 10" value="36"/>
			<item caption="Wechsel Stop" value="128"/>
			<item caption="Wechsel UZ" value="130"/>
			<item caption="Wechsel GUZ" value="192"/>
			<item caption="Audiowechsel langsam" value="254"/>
			<item caption="Audiowechsel schnell" value="255"/>
		</dropdown>
		<label top="295" left="220" caption="Speed"/>
		<slider top="295" left="265" height="25" width="135" startvalue="0" endvalue="61" tickfreq="6" smallchange="6" largechange="12" action="SetGobo2" name="gobo2_speed"/>
		<label top="315" left="220" caption="Gobo2"/>
		<options top="315" left="260" action="SetGobo2" name="gobo2_changespeed">
			<option top="0" left="0" caption="Schnell" value="1"/>
			<option top="0" left="60" caption="Langsam" value="0"/>
		</options>
		<line x1="0" y1="335" x2="395" y2="335"/>
		<!--Dimmer-->
		<label top="273" left="0" caption="Dimmer"/>
		<slider top="268" left="40" height="25" width="170" startvalue="0" endvalue="255" tickfreq="6" smallchange="6" largechange="12" channel="9" name="dimmer_dimmer"/>
		<line x1="0" y1="294" x2="215" y2="294"/>
		<!--Focus-->
		<label top="307" left="0" caption="Focus"/>
		<slider top="302" left="40" height="25" width="170" startvalue="0" endvalue="255" tickfreq="6" smallchange="6" largechange="12" channel="10" name="focus_focus"/>
		<!--Shutter-->
		<label top="350" left="220" caption="Shutter"/>
		<dropdown top="345" left="265" width="135" name="shutter_state" action="SetShutter">
			<item caption="Geschlossen" value="0"/>
			<item caption="Random Strobe" value="16"/>
			<item caption="Strobe Pulse langsam" value="32"/>
			<item caption="Strobe Pulse mittel" value="39"/>
			<item caption="Strobe Pulse schnell" value="47"/>
			<item caption="Audioshutter" value="48"/>
			<item caption="Strobeeffekt" value="64"/>
			<item caption="Offen" value="255"/>
		</dropdown>
		<label top="370" left="220" caption="Speed"/>
		<slider top="370" left="265" height="25" width="135" startvalue="0" endvalue="175" tickfreq="10" smallchange="6" largechange="12" action="SetShutter" name="shutter_speed"/>
		<line x1="215" y1="395" x2="395" y2="395"/>
		<!--Prisma-->
		<label top="350" left="0" caption="Prisma"/>
		<dropdown top="345" left="40" width="170" name="prisma_state" action="SetPrisma">
			<item caption="Ausgeschwenkt" value="0"/>
			<item caption="Position 0...540&#xB0;" value="6"/>
			<item caption="Rotation STOP" value="128"/>
			<item caption="Rotation UZ" value="130"/>
			<item caption="Rotation GUZ" value="192"/>
			<item caption="Audiorotation langsam" value="254"/>
			<item caption="Audiorotation schnell" value="255"/>
		</dropdown>
		<label top="370" left="0" caption="Speed"/>
		<slider top="370" left="40" height="25" width="170" startvalue="0" endvalue="61" tickfreq="6" smallchange="6" largechange="12" action="SetPrisma" name="prisma_speed"/>
		<label top="395" left="0" caption="Position"/>
		<slider top="395" left="40" height="25" width="170" startvalue="6" endvalue="127" tickfreq="6" smallchange="6" largechange="12" action="SetPrisma" name="prisma_position"/>
		<line x1="0" y1="420" x2="215" y2="420"/>
		<!--Laser-->
		<label top="435" left="0" caption="Laser"/>
		<dropdown top="430" left="40" width="170" name="laser_state" action="SetLaser">
			<item caption="Off" value="0"/>
			<item caption="Random Flash" value="128"/>
			<item caption="Audio Flash" value="144"/>
			<item caption="Variable Flash" value="160"/>
			<item caption="On" value="192"/>
		</dropdown>
		<label top="460" left="0" caption="Speed"/>
		<slider top="456" left="40" height="25" width="170" startvalue="160" endvalue="191" tickfreq="6" smallchange="6" largechange="12" action="SetLaser" name="laser_speed"/>
		<!--Spezial-->
		<label top="410" left="220" caption="Special"/>
		<dropdown top="405" left="265" width="135" name="special_state" action="SetSpecial">
			<item caption="Off" value="0"/>
			<item caption="GoboShake +/-10" value="16"/>
			<item caption="GoboShake +/-20" value="32"/>
			<item caption="GoboShake +/-30" value="48"/>
			<item caption="FarbChaser C/C+1" value="64"/>
			<item caption="FarbChaser C/C+2" value="80"/>
			<item caption="Audio Pan/Tilt slow" value="96"/>
			<item caption="Audio Pan/Tilt fast" value="112"/>
		</dropdown>
		<label top="435" left="220" caption="Speed"/>
		<slider top="435" left="265" height="25" width="135" startvalue="0" endvalue="15" tickfreq="1" smallchange="1" largechange="5" action="SetSpecial" name="special_speed"/>
		<!--Buttons-->
		<command top="460" left="220" width="41" caption="Reset" clicksequence="save 13;set 13 250;hold 3000;restore 13"/>
		<command top="459" left="261" width="68" caption="Lampe aus" clicksequence="save 8; set 8 0; restore 8;save 13;set 13 230;hold 3000;restore 13"/>
		<command top="460" left="329" width="68" caption="Luefter aus" clicksequence="save 13;set 13 224;hold 3000;restore 13"/>
		<line x1="215" y1="35" x2="215" y2="549"/>
		<line y1="488" x1="8" y2="488" x2="408"/>
		<dropdown top="503" left="56" width="150" name="movement_function" channel="14">
			<item caption="keine Bewegung" value="0"/>
			<item caption="Pan 1" value="1"/>
			<item caption="Pan 2" value="8"/>
			<item caption="Pan 3" value="16"/>
			<item caption="Pan 4" value="24"/>
			<item caption="Tilt" value="32"/>
			<item caption="Pan / Tilt" value="64"/>
			<item caption="Pan / Tilt (invers)" value="96"/>
			<item caption="Circle" value="128"/>
			<item caption="Circle (invers)" value="160"/>
			<item caption="liegende Acht" value="192"/>
			<item caption="Random" value="224"/>
		</dropdown>
		<label top="504" left="0" caption="Movement"/>
		<slider top="536" left="56" height="25" width="150" startvalue="64" endvalue="95" tickfreq="6" smallchange="6" largechange="12" name="movement_speed" channel="14"/>
		<label top="533" left="8" caption="Speed"/>
		<dropdown top="504" left="256" width="150" name="iris_function" channel="12">
			<item caption="gro&#xDF; (offen) - klein" value="0"/>
			<item caption="Auffahren, random" value="128"/>
			<item caption="Zufahren, random" value="144"/>
			<item caption="Auffahren, Audio" value="160"/>
			<item caption="Zufahren, Audio" value="176"/>
			<item caption="Auffahren" value="192"/>
			<item caption="Zufahren" value="208"/>
			<item caption="Pulse Effekt" value="224"/>
			<item caption="Auf-/Zufahr-Effekt" value="240"/>
			<item caption="klein (geschlossen)" value="254"/>
		</dropdown>
		<slider top="536" left="256" height="25" width="150" startvalue="0" endvalue="127" tickfreq="6" smallchange="6" largechange="12" name="iris_open" channel="14"/>
		<label top="504" left="224" caption="Iris"/>
		<label top="533" left="224" caption="offen"/>
		<command top="8" left="328" width="68" caption="Lampe an" clicksequence="save 8;set 8 240;hold 3000;restore 8"/>
	</form>
	<code>
		<procedure name="INITCONTROLS">
   !call|GetColor$
   !call|GetGobo1$
   !call|GetGobo1Rotation$
   !call|GetGobo2$
   !call|GetShutter$
   !call|GetPrisma$
   !call|GetLaser$
   !call|GetSpecial$
		</procedure>
		<procedure name="SetGobo1">
  !if|{gobo1_gobo}|lt|65|
   !if|{gobo1_changespeed}|eq|1|
    !set_channel|5|{gobo1_gobo}$
   $
   !if|{gobo1_changespeed}|eq|0|
    !set_channel|5|({gobo1_gobo} + 64)$
   $
  $

  !if|{gobo1_gobo}|eq|128|
   !set_channel|5|{gobo1_gobo}$
  $

  !if|{gobo1_gobo}|eq|130|
   !set_channel|5|({gobo1_gobo} + {gobo1_speed})$
  $

  !if|{gobo1_gobo}|eq|192|
   !set_channel|5|({gobo1_gobo} + {gobo1_speed})$
  $

  !if|{gobo1_gobo}|gt|254|
   !set_channel|5|{gobo1_gobo}$
  $
		</procedure>
		<procedure name="GetGobo1">
   !if|{channel_5}|lt|64|
    !set_control|gobo1_gobo|{channel_5}$
    !set_control|gobo1_changespeed|1$
   $

   !if|({channel_5} &gt; 63) and ({channel_5} &lt; 121)|
    !set_control|gobo1_gobo|({channel_5} - 64)$
    !set_control|gobo1_changespeed|0$
   $

   !if|{channel_5}|eq|128|
    !set_control|gobo1_gobo|{channel_5}$
   $

   !if|{channel_5}|gt|253|
    !set_control|gobo1_gobo|{channel_5}$
   $

   !if|({channel_5} &gt; 129) and ({channel_5} &lt; 192)|
    !set_control|gobo1_gobo|130$
    !set_control|gobo1_speed|({channel_5} - 130)$
   $

   !if|({channel_5} &gt; 191) and ({channel_4} &lt; 254)|
    !set_control|gobo1_gobo|192$
    !set_control|gobo1_speed|({channel_5} - 192)$
   $
		</procedure>
		<procedure name="SetColor">
  !if|{color_color}|lt|45|
   !if|{color_changespeed}|eq|1|
    !set_channel|4|{color_color}$
    $
   !if|{color_changespeed}|eq|0|
    !set_channel|4|({color_color} + 64)$
   $
  $

   !if|{color_color}|eq|130|
   !set_channel|4|({color_color} + {color_speed})$
   $

   !if|{color_color}|eq|192|
   !set_channel|4|({color_color} + {color_speed})$
   $

   !if|{color_color}|eq|128|
   !set_channel|4|{color_color}$
   $

   !if|{color_color}|gt|253|
   !set_channel|4|{color_color}$
   $
		</procedure>
		<procedure name="GetColor">
   !if|{channel_4}|lt|45|
    !set_control|color_color|{channel_4}$
    !set_control|color_changespeed|1$
   $

   !if|({channel_4} &gt; 45) and ({channel_4} &lt; 111)|
    !set_control|color_color|({channel_4} - 64)$
    !set_control|color_changespeed|0$
   $

   !if|{channel_4}|eq|128|
    !set_control|color_color|{channel_4}$
   $

   !if|{channel_4}|gt|253|
    !set_control|color_color|{channel_4}$
   $

   !if|({channel_4} &gt; 129) and ({channel_4} &lt; 192)|
    !set_control|color_color|130$
    !set_control|color_speed|({channel_4} - 130)$
   $

   !if|({channel_4} &gt; 191) and ({channel_4} &lt; 254)|
    !set_control|color_color|192$
    !set_control|color_speed|({channel_4} - 192)$
   $
		</procedure>
		<procedure name="SetGobo1Rotation">
   !if|{gobo1_rotation}|eq|0|
    !set_channel|6|{gobo1_rotation_position}$
   $
   !if|{gobo1_rotation}|eq|128|
    !set_channel|6|{gobo1_rotation}$
   $
   !if|{gobo1_rotation}|eq|130|
   !set_channel|6|({gobo1_rotation} + {gobo1_rotation_speed})$
   $

   !if|{gobo1_rotation}|eq|192|
   !set_channel|6|({gobo1_rotation} + {gobo1_rotation_speed})$
   $

   !if|{gobo1_rotation}|gt|254|
    !set_channel|6|{gobo1_rotation}$
   $
		</procedure>
		<procedure name="GetGobo1Rotation">
   !if|{channel_6}|lt|0|
    !set_control|gobo1_rotation|0$
    !set_control|gobo1_rotation_position|{channel_6}$
   $
   !if|{channel_6}|eq|128|
    !set_control|gobo1_rotation|{channel_6}$
   $

   !if|{channel_6}|gt|254|
    !set_control|gobo1_rotation|{channel_6}$
   $

   !if|({channel_6} &gt; 129) and ({channel_6} &lt;192)|
    !set_control|gobo1_rotation|130$
    !set_control|gobo1_rotation_speed|({channel_6} - 130)$
   $

   !if|({channel_6} &gt; 191) and ({channel_6} &lt; 254)|
    !set_control|gobo1_rotation|192$
    !set_control|gobo1_rotation_speed|({channel_6} - 192)$
   $

		</procedure>
		<procedure name="SetGobo2">
  !if|{gobo2_gobo}|lt|65|
   !if|{gobo2_changespeed}|eq|1|
    !set_channel|7|{gobo2_gobo}$
   $
   !if|{gobo2_changespeed}|eq|0|
    !set_channel|7|({gobo2_gobo} + 64)$
   $
  $

  !if|{gobo2_gobo}|eq|128|
   !set_channel|7|{gobo2_gobo}$
  $

  !if|{gobo2_gobo}|eq|130|
   !set_channel|7|({gobo2_gobo} + {gobo2_speed})$
  $

  !if|{gobo2_gobo}|eq|192|
   !set_channel|7|({gobo2_gobo} + {gobo2_speed})$
  $

  !if|{gobo2_gobo}|gt|253|
   !set_channel|7|{gobo2_gobo}$
  $
		</procedure>
		<procedure name="GetGobo2">
   !if|{channel_7}|lt|64|
    !set_control|gobo2_gobo|{channel_7}$
    !set_control|gobo2_changespeed|1$
   $

   !if|({channel_7} &gt; 63) and ({channel_5} &lt; 127)|
    !set_control|gobo2_gobo|({channel_7} - 64)$
    !set_control|gobo2_changespeed|0$
   $

   !if|{channel_7}|eq|128|
    !set_control|gobo2_gobo|{channel_7}$
   $

   !if|{channel_7}|gt|253|
    !set_control|gobo2_gobo|{channel_7}$
   $

   !if|({channel_7} &gt; 129) and ({channel_7} &lt; 192)|
    !set_control|gobo2_gobo|130$
    !set_control|gobo2_speed|({channel_7} - 130)$
   $

   !if|({channel_7} &gt; 191) and ({channel_7} &lt; 254)|
    !set_control|gobo2_gobo|192$
    !set_control|gobo2_speed|({channel_7} - 192)$
   $
		</procedure>
		<procedure name="SetShutter">
   !if|{shutter_state}|lt|64|
    !set_channel|8|{shutter_state}$
   $
   !if|{shutter_state}|eq|64|
    !set_channel|8|({shutter_state} + {shutter_speed})$
   $
   !if|{shutter_state}|gt|240|
    !set_channel|8|{shutter_state}$
   $
		</procedure>
		<procedure name="GetShutter">
   !if|{channel_8}|lt|64|
    !set_control|shutter_state|{channel_8}$
   $
   !if|({channel_8} &gt; 63) and ({channel_8} &lt; 240)|
    !set_control|shutter_state|64$
    !set_control|shutter_speed|({channel_8} - 64)$
   $   
   !if|{channel_8}|gt|239|
    !set_control|shutter_state|240$
   $
		</procedure>
		<procedure name="SetPrisma">
   !if|{prisma_state}|lt|6|
    !set_channel|11|{prisma_state}$
   $
   !if|{prisma_state}|eq|6|
    !set_channel|11|({prisma_state} + {prisma_position})$
   $
   !if|{prisma_state}|eq|130|
    !set_channel|11|({prisma_state} + {prisma_speed})$
   $
   !if|{prisma_state}|eq|192|
    !set_channel|11|({prisma_state} + {prisma_speed})$
   $
   !if|{prisma_state}|gt|253|
    !set_channel|11|{prisma_state}$
   $
		</procedure>
		<procedure name="GetPrisma">
   !if|{channel_11}|lt|6|
    !set_control|prisma_state|{channel_11}$
   $
   !if|({channel_11} &gt; 5) and ({channel_11} &lt; 130)|
    !set_control|prisma_state|6$
    !set_control|prisma_position|({channel_11} - 6)$
   $
   !if|({channel_11} &gt; 129) and ({channel_11} &lt; 192)|
    !set_control|prisma_state|130$
    !set_control|prisma_speed|({channel_11} - 130)$
   $
   !if|({channel_11} &gt; 191) and ({channel_11} &lt; 254)|
    !set_control|prisma_state|192$
    !set_control|prisma_speed|({channel_11} - 192)$
   $
   !if|{channel_11}|gt|253|
    !set_control|prisma_state|{channel_11}$
   $
		</procedure>
		<procedure name="SetLaser">
   !if|{laser_state}|lt|128|
    !set_channel|13|{laser_state}$
   $
   !if|{laser_state}|eq|160|
    !set_channel|13|({laser_state} + {laser_speed})$
   $
   !if|{laser_state}|eq|192|
    !set_channel|13|{laser_state}$
   $
		</procedure>
		<procedure name="GetLaser">
   !if|{channel_13}|lt|128|
    !set_control|laser_state|{channel_13}$
   $
   !if|({channel_13} &gt; 159) and ({channel_13} &lt; 192)|
    !set_control|laser_state|160$
    !set_control|laser_speed|({channel_13} - 160)$
   $
   !if|{channel_13}|gt|192|
    !set_control|laser_state|192$
   $
		</procedure>
		<procedure name="SetSpecial">
  !if|{special_state}|lt|16|
   !set_channel|13|({special_state} + {special_speed})$
  $

  !if|{special_state}|eq|16|
   !set_channel|13|{special_state}$
  $

  !if|{special_state}|eq|127|
   !set_channel|13|{special_state}$
  $

		</procedure>
		<procedure name="GetSpecial">
   !if|({channel_13} &gt; -1) and ({channel_13} &lt; 16)|
    !set_control|special_state|0$
   $
   !if|({channel_13} &gt; 15) and ({channel_13} &lt; 32)|
    !set_control|special_state|16$
    !set_control|special_speed|({channel_13} - 16)$
   $
   !if|({channel_13} &gt; 31) and ({channel_13} &lt; 48)|
    !set_control|special_state|32$
    !set_control|special_speed|({channel_13} - 32)$
   $
   !if|({channel_13} &gt; 47) and ({channel_13} &lt; 64)|
    !set_control|special_state|48$
    !set_control|special_speed|({channel_13} - 48)$
   $
   !if|({channel_13} &gt; 63) and ({channel_13} &lt; 80)|
    !set_control|special_state|64$
    !set_control|special_speed|({channel_13} - 64)$
   $
   !if|({channel_13} &gt; 79) and ({channel_13} &lt; 96)|
    !set_control|special_state|80$
    !set_control|special_speed|({channel_13} - 80)$
   $
   !if|({channel_13} &gt; 95) and ({channel_13} &lt; 112)|
    !set_control|special_state|96$
   $
   !if|({channel_13} &gt; 111) and ({channel_13} &lt; 128)|
    !set_control|special_state|112$
   $


		</procedure>
	</code>
</device>
