LICENSE.txt

(*
	Korg Controller applescript for Wirecast and Black Magic ATEM

	Version: 1.0

	This script is a combination of multiple scripts that were found on the internet on how to control Wirecast using AppleScript.
	I am not sure who I need to credit all of the different code to.  I have restructured and added features to it and also tried
	to comment the code as well as write easy to follow instructions on how to use it.

	This code has added to it the use of a korg NanoPad for playing back up to 15 DDRs.  This separates the DDR from the
	nanoKontrol.  I left the original Intro, Outro and DDR on there but the problem is these buttons on the nanoKontrol
	are not designed to be a "toggle" but momentary.  Even though you can change the buttons to toggle and momentary,
	they do not seem to work reliably.

	The other addition you will see is that this script can also control an ATEM switcher at the same time it is using Wireast.
	You may ask why you would want to do this, I have a detiled explanation on my website at mikemyers.me under projects.
	I am using the ATEM as the switcher and Wirecast as teh graphics and DDR.

	This script also has an iPad interface using TouchOSC and OSCBridge.  All of the code can be retrieved by going to the 
	projects section on mikemyers.me or by viewing the github: https://github.com/netnutmike/Wirecast

	Note that there are different versions of this same script with just a few lines comment out to switch from an ATEM / Wirecast
	hybrid to a Wirecast Only as well as a different workflow setup for the NanoKontrol2.  The quickest way is to search for ATEM in the code
	to see where to make changes.

  VERSION HISTORY:

	07/10/13 - Initial Public Release of Version 1.0
*)



(*
	FUNCTION: button

	DESCRIPTION:
		This function is called when a buton is pressed.  There is another function that determines which button is pressed.  This function is
		portable between different scripts and only the button detection routine needs to be swapped out.
*)

script button

	#This button press will take the channel number live with a cut
	on top(channelnumber)
		# For the ATEM hybrid uncomment the atemliveswitch, otherwise uncomment the liverow
		my switcher's liverow("normal", "cam" & channelnumber)
		--my switcher's atemliveswitch(channelnumber)
		my switcher's setTransition("1", "fast")
		my switcher's removelower("foreground", "Blank Shot")
		my switcher's setTransition("2", "normal")
		my switcher's liverow("normal", "theshot")
	end top

	#This button press will take the channel number and put it into preview
	on bottom(channelnumber)
		# For the ATEM hybrid uncomment the atempreview, otherwise uncomment the previewrow
		my switcher's previewrow("normal", "cam" & channelnumber)
		--my switcher's atempreview(channelnumber)
	end bottom

	
	on topspecial(channelnumber)
		my switcher's liverow("normal", "cam" & channelnumber)
	end topspecial

	on bottomspecial(channelnumber)
		my switcher's previewrow("normal", "cam" & channelnumber)
	end bottomspecial
	
	#This button will put a doublebox based on channel number live
	on rightTwist(channelnumber)
		my switcher's liverow("normal", "cam" & channelnumber & "-db")
	end rightTwist
	
	#This button will put a doublebox based on teh channel into preview
	on leftTwist(channelnumber)
		my switcher's previewrow("normal", "cam" & channelnumber & "-db")
	end leftTwist
	
	#This function does one of 2 things, depending on the workflow that is desired
	#If it is the original workflow then a fx(graphic) will be brought into live view
	#If it is the optional workflow, then a lower 3rd for the selected channel will be live
	on fx(channelnumber)
		# For the ATEM hybrid uncomment the atemliveswitch, otherwise uncomment the liverow
		my switcher's liverow("normal", "cam" & channelnumber)
		--my switcher's atemliveswitch(channelnumber)
		my switcher's setTransition("3", "fast")
		my switcher's lower("foreground", "chl3rd-" & channelnumber)
		my switcher's setTransition("2", "normal")
	end fx

	on fxspecial(channelnumber)
		my switcher's setTransition("3", "fast")
		my switcher's lower("foreground", "chl3rd-" & channelnumber)
		my switcher's setTransition("2", "normal")
	end fxspecial
	

	#Display Lower 3rd
	on upSlide(channelnumber)
		my switcher's setTransition("3", "fast")
		my switcher's lower("foreground", "l3rd-" & channelnumber)
		my switcher's setTransition("2", "normal")
	end upSlide

	#Remove Lower 3rd
	on downSlide(channelnumber)
		my switcher's setTransition("3", "fast")
		my switcher's removelower("foreground", "Blank Shot")
		my switcher's setTransition("2", "normal")
	end downSlide

	#Take Button
	on play(state)
		if state is "down" then
			my switcher's take()
		end if
	end play

	#The Auto Button
	on stopMe()
		my switcher's auto()
	end stopMe

	#Record Button
	on recordMe(state)
		if state is "down" then
			my switcher's startRecord()
		end if
		if state is "up" then
			my switcher's stopRecord()
		end if
	end recordMe
	
	#Play The Master DDR
	on ddr(state)
		if state is "down" then
			my switcher's takeddr()
		end if
		if state is "up" then
			my switcher's removeddr()
		end if
	end ddr
	
	#Stop DDR
	on StopDDRPlayer()
		my switcher's removeddr()
	end StopDDRPlayer

	#This is the play DDR for the nanoPad.  the ddrnum is the number of the ddr to play
	on DDRPlayer(ddrnum)
		my switcher's playddr("ddr" & ddrnum)
	end DDRPlayer

	#Play intro video, consider using DDR with nanoPad, it is more reliable
	on intro(state)
		if state is "down" then
			my switcher's takeintro()
		end if
		if state is "up" then
			my switcher's removeintro()
		end if
	end intro
	
	#Play outro video, consider using DDR with nanoPad, it is more reliable
	on outro(state)
		if state is "down" then
			my switcher's takeoutro()
		end if
		if state is "up" then
			my switcher's removeoutro()
		end if
	end outro
	
end script


(*
	This function is the interface to the actual swithers (Wirecast and ATEM for now)
*)

script switcher
	property myDoc : "1"
	property normal_layer : "1"
	property foreground_layer : "1"
	property background_layer : "1"
	property title_layer : "1"
	property audio_layer : "1"
	property preview : "cam1"
	property program : "cam1"
	property fxstore : "cam1-fx"
	property buffer : "cam1"
	property cgstore : "l3rd-1"
	property wirecast : application "Wirecast"
	
	
	# This function is called for jsut about every function to make sure that the interface to Wirecast is properly setup
	on setup()
		--tell application "Wirecast"
		--	activate
		--end tell
		tell application "Wirecast"
			set my myDoc to last document
			set my normal_layer to the layer named "normal" of myDoc
			set my foreground_layer to the layer named "foreground" of myDoc
			set my background_layer to the layer named "background" of myDoc
			set my title_layer to the layer named "text" of myDoc
			set my audio_layer to the layer named "audio" of myDoc
			set my myDoc's auto live to false
		end tell
	end setup
	

	#This function tells wirecast what type of transition is used for auto and the speed of the transition
	on setTransition(anumber, speed)
		tell application "Wirecast"
			set my myDoc's active transition popup to anumber
			set my myDoc's transition speed to speed
		end tell
	end setTransition
	
	#take is a "hard cut" from what is in preview to live
	on take()
		setup()
		tell application "Wirecast"
			set the active shot of the layer named "Foreground" of myDoc to the shot named cgstore of myDoc
			go myDoc
			set the active shot of the layer named "Normal" of myDoc to the shot named program of myDoc
			
			set the active shot of the layer named "Foreground" of myDoc to the shot named "Blank Shot" of myDoc
		
			end tell
		set buffer to program
		set program to preview
		set preview to buffer
	end take
	
	#auto will put what is in preview onto live using the transition and speed set
	on auto()
		setup()
		tell application "Wirecast"
			set my myDoc's transition speed to "fast"
			set my myDoc's active transition popup to 1
			set the active shot of the layer named "Foreground" of myDoc to the shot named cgstore of myDoc
			go myDoc
			set the active shot of the layer named "Normal" of myDoc to the shot named program of myDoc
			set my myDoc's active transition popup to 2
			
			set the active shot of the layer named "Foreground" of myDoc to the shot named "Blank Shot" of myDoc		
			end tell
		set buffer to program
		set program to preview
		set preview to buffer
	end auto
	
	#displays the fx
	on fxrow(layername, shotname)
		setup()
		tell application "Wirecast"
			set the active shot of the layer named "Background" of my myDoc to the shot named shotname of my myDoc
			set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
			set the active shot of the layer named "Foreground" of my myDoc to the shot named cgstore of my myDoc
			go myDoc
			set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
			set the active shot of the layer named "Foreground" of my myDoc to the shot named "Blank Shot" of my myDoc
		end tell
	end fxrow
	
	#does a hard cut to the shot
	on liverow(layername, shotname)
		setup()
		tell application "Wirecast"
			set the active shot of the layer named layername of my myDoc to the shot named shotname of my myDoc
			set program to the shot named shotname of my myDoc
			set the active shot of the layer named "Foreground" of my myDoc to the shot named cgstore of my myDoc
			go myDoc
			set the active shot of the layer named layername of my myDoc to the shot named preview of my myDoc
			set the active shot of the layer named "Foreground" of my myDoc to the shot named "Blank Shot" of my myDoc
		end tell
		set program to shotname
	end liverow

	#used to put the lower rd live
	on liverowl3(layername, shotname)
		setup()
		tell application "Wirecast"
			set the active shot of the layer named layername of my myDoc to the shot named shotname of my myDoc
			set program to the shot named shotname of my myDoc
			set the active shot of the layer named "Foreground" of my myDoc to the shot named cgstore of my myDoc
			go myDoc
			set the active shot of the layer named layername of my myDoc to the shot named preview of my myDoc
			set the active shot of the layer named "Foreground" of my myDoc to the shot named "Blank Shot" of my myDoc
		end tell
		set program to shotname
	end liverow
	
	#put the shot into preview
	on previewrow(layername, shotname)
		setup()
		tell application "Wirecast"
			set the active shot of the layer named layername of my myDoc to the shot named shotname of my myDoc
			set preview to the shot named shotname of my myDoc
		end tell
		set preview to shotname
	end previewrow
	
	#start broadcasting
	on startBroadcast()
		setup()
		tell application "Wirecast"
			start broadcasting myDoc
		end tell
	end startBroadcast
	
	#stop broadcasting
	on stopBroadcast()
		setup()
		tell application "Wirecast"
			stop broadcasting myDoc
		end tell
	end stopBroadcast
	
	#start record
	on startRecord()
		setup()
		tell application "Wirecast"
			start recording myDoc
		end tell
	end startRecord
	
	#stop record
	on stopRecord()
		setup()
		tell application "Wirecast"
			stop recording myDoc
		end tell
	end stopRecord
	
	on takeddr()
		tell application "Wirecast"
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "ddr" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
		set the active shot of the layer named "Audio" of my myDoc to the shot named "Blank Shot" of my myDoc
		go myDoc
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "Blank Shot" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
		end tell
	end takeddr

	on playddr(ddrname)
		tell application "Wirecast"
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named ddrname of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
		set the active shot of the layer named "Audio" of my myDoc to the shot named "Blank Shot" of my myDoc
		go myDoc
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "Blank Shot" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
		end tell
	end playddr
	
	on removeddr()
		tell application "Wirecast"
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "Blank Shot" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
		set the active shot of the layer named "Audio" of my myDoc to the shot named "audio" of my myDoc
		go myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
		end tell	
	end removeddr
	
	on takeintro()
		tell application "Wirecast"
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "intro" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
		set the active shot of the layer named "Audio" of my myDoc to the shot named "Blank Shot" of my myDoc
		go myDoc
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "Blank Shot" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
		end tell
	end takeintro
	
	on removeintro()
		tell application "Wirecast"
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "Blank Shot" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
		set the active shot of the layer named "Audio" of my myDoc to the shot named "audio" of my myDoc
		go myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
		end tell	
	end removeintro
	
	on takeoutro()
		tell application "Wirecast"
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "outro" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
		set the active shot of the layer named "Audio" of my myDoc to the shot named "Blank Shot" of my myDoc
		go myDoc
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "Blank Shot" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
		end tell
	end takeoutro
	
	on removeoutro()
		tell application "Wirecast"
		set the active shot of the layer named "Master Layer 1" of my myDoc to the shot named "Blank Shot" of my myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
		set the active shot of the layer named "Audio" of my myDoc to the shot named "audio" of my myDoc
		go myDoc
		set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
		end tell	
	end removeoutro
	
	
	#put channel number on the live bus on the ATEM switcher
	on atemliveswitch(channelnumber)
		setup()
		tell application "ATEM Software Control"
			activate
		end tell

		tell application "System Events"
			keystroke channelnumber  using {control down}
		end tell
	end atemliveswitch

	#put channel number on the preview but on the ATEM
	on atempreview(channelnumber)
		setup()
		tell application "ATEM Software Control"
			activate
		end tell

		tell application "System Events"
			keystroke channelnumber 
		end tell
	end atempreview

	#activate a lower 3rd
	on lower(layername, shotname)
		setup()
		tell application "Wirecast"
			set the active shot of the layer named layername of my myDoc to the shot named shotname of my myDoc
			set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
			go myDoc
			set the active shot of the layer named layername of my myDoc to the shot named "Blank Shot" of my myDoc
			set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
			set cgstore to the shot named shotname of my myDoc
		end tell
		set cgstore to shotname
	end lower
	

	#remove a lower 3rd
	on removelower(layername, shotname)
		setup()
		tell application "Wirecast"
			set the active shot of the layer named layername of my myDoc to the shot named shotname of my myDoc
			set the active shot of the layer named "Normal" of my myDoc to the shot named program of my myDoc
			go myDoc
			set the active shot of the layer named "Normal" of my myDoc to the shot named preview of my myDoc
			set cgstore to the shot named "Blank Shot" of my myDoc
		end tell
		set cgstore to "Blank Shot"
	end removelower
	
	
end script


(*
	the runme is the default function, it reads the midi input and then calls the correct button function
*)

on runme(message)
	
	-- transport controls
	
	if (item 1 of message = 176) and (item 2 of message = 4) and (item 3 of message = 127) then
		my button's play("down")
	end if

	if (item 1 of message = 176) and (item 2 of message = 4) and (item 3 of message = 0) then
		my button's play("up")
	end if

	if (item 1 of message = 176) and (item 2 of message = 5) and (item 3 of message = 127) then
		my button's recordMe("down")
	end if

	if (item 1 of message = 176) and (item 2 of message = 5) and (item 3 of message = 0) then
		my button's recordMe("up")
	end if
	
	if (item 1 of message = 176) and (item 2 of message = 6) and (item 3 of message = 0) then
		my button's DDR("up")
	end if

	if (item 1 of message = 176) and (item 2 of message = 6) and (item 3 of message = 127) then
		my button's DDR("down")
	end if
	
	if (item 1 of message = 176) and (item 2 of message = 7) and (item 3 of message = 0) then
		my button's intro("up")
	end if

	if (item 1 of message = 176) and (item 2 of message = 7) and (item 3 of message = 127) then
		my button's intro("down")
	end if
	
	if (item 1 of message = 176) and (item 2 of message = 8) and (item 3 of message = 0) then
		my button's outro("up")
	end if

	if (item 1 of message = 176) and (item 2 of message = 8) and (item 3 of message = 127) then
		my button's outro("down")
	end if

	if (item 1 of message = 176) and (item 2 of message = 102) and (item 3 of message = 127) then
		my button's fastForward("down")
	end if

	if (item 1 of message = 176) and (item 2 of message = 103) and (item 3 of message = 127) then
		my button's loop("down")
	end if

	if (item 1 of message = 176) and (item 2 of message = 3) and (item 3 of message = 127) then
		my button's stopMe()
	end if

	if (item 1 of message = 176) and (item 2 of message = 104) and (item 3 of message = 127) then
		my button's rewind("down")
	end if
	
	-----------------------------------------
	-- Channel 1 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 11) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's top("1")

	end if

	if (item 1 of message = 176) and (item 2 of message = 12) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottom("1")

	end if

	if (item 1 of message = 176) and (item 2 of message = 13) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist("1")

	end if

	if (item 1 of message = 176) and (item 2 of message = 10) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fx("1")
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 13) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist("1")

	end if

	if (item 1 of message = 176) and (item 2 of message = 14) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide("1")

	end if

	if (item 1 of message = 176) and (item 2 of message = 14) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide("1")

	end if

	-----------------------------------------
	-- Channel 2 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 21) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's top("2")

	end if

	if (item 1 of message = 176) and (item 2 of message = 22) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottom("2")

	end if

	if (item 1 of message = 176) and (item 2 of message = 23) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist("2")
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 20) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fx("2")
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 23) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist("2")

	end if

	if (item 1 of message = 176) and (item 2 of message = 24) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide("2")

	end if

	if (item 1 of message = 176) and (item 2 of message = 24) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide("2")

	end if
	
	-----------------------------------------
	-- Channel 3 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 31) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's top("3")

	end if

	if (item 1 of message = 176) and (item 2 of message = 32) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottom("3")

	end if

	if (item 1 of message = 176) and (item 2 of message = 33) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist("3")
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 33) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist("3")

	end if

	if (item 1 of message = 176) and (item 2 of message = 34) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide("3")

	end if

	if (item 1 of message = 176) and (item 2 of message = 34) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide("3")

	end if

	if (item 1 of message = 176) and (item 2 of message = 30) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fx(3)
		
	end if

	-----------------------------------------
	-- Channel 4 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 41) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's top("4")

	end if

	if (item 1 of message = 176) and (item 2 of message = 42) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottom("4")

	end if

	if (item 1 of message = 176) and (item 2 of message = 43) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist("4")
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 43) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist("4")

	end if

	if (item 1 of message = 176) and (item 2 of message = 44) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide("4")

	end if

	if (item 1 of message = 176) and (item 2 of message = 44) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide("4")

	end if

	if (item 1 of message = 176) and (item 2 of message = 40) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fx("4")
		
	end if

	-----------------------------------------
	-- Channel 5 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 51) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's top("5")

	end if

	if (item 1 of message = 176) and (item 2 of message = 52) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottom("5")

	end if

	if (item 1 of message = 176) and (item 2 of message = 53) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist("5")
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 53) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist("5")

	end if

	if (item 1 of message = 176) and (item 2 of message = 54) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide("5")

	end if

	if (item 1 of message = 176) and (item 2 of message = 54) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide("5")

	end if

	if (item 1 of message = 176) and (item 2 of message = 50) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fx("5")
		
	end if


	-----------------------------------------
	-- Channel 6 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 61) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's top("6")

	end if

	if (item 1 of message = 176) and (item 2 of message = 62) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottom("6")

	end if

	if (item 1 of message = 176) and (item 2 of message = 63) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist("6")
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 63) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist("6")
	end if

	if (item 1 of message = 176) and (item 2 of message = 64) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide("6")

	end if

	if (item 1 of message = 176) and (item 2 of message = 64) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide("6")

	end if

	if (item 1 of message = 176) and (item 2 of message = 60) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fx("6")
		
	end if

	
	-----------------------------------------
	-- Channel 7 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 71) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's topspecial(7)

	end if

	if (item 1 of message = 176) and (item 2 of message = 72) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottomspecial(7)

	end if

	if (item 1 of message = 176) and (item 2 of message = 73) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist(7)
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 73) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist(7)

	end if

	if (item 1 of message = 176) and (item 2 of message = 74) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide(7)

	end if

	if (item 1 of message = 176) and (item 2 of message = 74) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide(7)

	end if

	if (item 1 of message = 176) and (item 2 of message = 70) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fxspecial(7)
		
	end if


	-----------------------------------------
	-- Channel 8 block
	-----------------------------------------
	
	if (item 1 of message = 176) and (item 2 of message = 81) and (item 3 of message > 0) then

		-- do stuff for top button
		my button's topspecial(8)

	end if

	if (item 1 of message = 176) and (item 2 of message = 82) and (item 3 of message > 0) then

		-- do stuff for bottom button
		my button's bottomspecial(8)

	end if

	if (item 1 of message = 176) and (item 2 of message = 83) and (item 3 of message = 0) then
		
		-- do stuff left twist
		my button's leftTwist(8)
		
	end if

	if (item 1 of message = 176) and (item 2 of message = 83) and (item 3 of message = 127) then
		
		-- do stuff right twist
		my button's rightTwist(8)

	end if

	if (item 1 of message = 176) and (item 2 of message = 84) and (item 3 of message = 0) then
		
		-- do stuff down slide
		my button's downSlide(8)

	end if

	if (item 1 of message = 176) and (item 2 of message = 84) and (item 3 of message = 127) then
		
		-- do stuff up slide
		my button's upSlide(8)

	end if

	if (item 1 of message = 176) and (item 2 of message = 80) and (item 3 of message = 127) then
		
		-- do stuff fx
		my button's fxspecial(8)
		
	end if
	
	if (item 1 of message = 176) and (item 2 of message = 80) and (item 3 of message = 127) then
		
		-- do stuff ddr
		my button's fx(8)
		
	end if


	-----------------------------------------
	-- ddr controls
	-----------------------------------------

	if (item 1 of message = 176) and (item 2 of message = 106) and (item 3 of message = 127) then
		my button's StopDDRPlayer()
	end if

	if (item 1 of message = 176) and (item 2 of message = 91) and (item 3 of message = 127) then
		my button's DDRPlayer(1)
	end if

	if (item 1 of message = 176) and (item 2 of message = 92) and (item 3 of message = 127) then
		my button's DDRPlayer(2)
	end if

	if (item 1 of message = 176) and (item 2 of message = 93) and (item 3 of message = 127) then
		my button's DDRPlayer(3)
	end if

	if (item 1 of message = 176) and (item 2 of message = 94) and (item 3 of message = 127) then
		my button's DDRPlayer(4)
	end if

	if (item 1 of message = 176) and (item 2 of message = 95) and (item 3 of message = 127) then
		my button's DDRPlayer(5)
	end if

	if (item 1 of message = 176) and (item 2 of message = 96) and (item 3 of message = 127) then
		my button's DDRPlayer(6)
	end if

	if (item 1 of message = 176) and (item 2 of message = 97) and (item 3 of message = 127) then
		my button's DDRPlayer(7)
	end if

	if (item 1 of message = 176) and (item 2 of message = 98) and (item 3 of message = 127) then
		my button's DDRPlayer(8)
	end if

	if (item 1 of message = 176) and (item 2 of message = 99) and (item 3 of message = 127) then
		my button's DDRPlayer(9)
	end if
	
	if (item 1 of message = 176) and (item 2 of message = 100) and (item 3 of message = 127) then
		my button's DDRPlayer(10)
	end if

	if (item 1 of message = 176) and (item 2 of message = 101) and (item 3 of message = 127) then
		my button's DDRPlayer(11)
	end if

	if (item 1 of message = 176) and (item 2 of message = 102) and (item 3 of message = 127) then
		my button's DDRPlayer(12)
	end if

	if (item 1 of message = 176) and (item 2 of message = 103) and (item 3 of message = 127) then
		my button's DDRPlayer(13)
	end if

	if (item 1 of message = 176) and (item 2 of message = 104) and (item 3 of message = 127) then
		my button's DDRPlayer(14)
	end if

	if (item 1 of message = 176) and (item 2 of message = 105) and (item 3 of message = 127) then
		my button's DDRPlayer(15)
	end if
	
end runme