Sound Designers

Code : Tout sélectionner

use AppleScript version "2.4" -- Yosemite (10.10) or later
use scripting additions


tell application "System Events"
	tell application process "Pro Tools"
		set frontmost to true
		
		set window_edit to (1st window whose title contains "Edit: ")
		set ASgain to count (windows whose name contains "Audio Suite: Gain")
		
		if ASgain is 0 then
		click menu item "Gain" of menu "Avid" of menu item "Avid" of menu "AudioSuite" of menu bar item "AudioSuite" of menu bar 1

			
			repeat while ASgain is 0
				delay 0.05
				set ASgain to count (windows whose name contains "Audio Suite: Gain")
			end repeat
		end if
		tell pop up button 6 of window 1
			set {xPosition, yPosition} to position
			set {xSize, ySize} to size
			my cliClick("c:" & "=" & xPosition + (xSize div 2) & "," & yPosition + (ySize div 2))
			key code "84" --rappel preset 2----84 pour preset 2db et 86 pour 4
			key code "36"
		end tell
		tell (1st window whose name contains "Audio Suite") to click button "Render"
		repeat until not (exists (static text "Selection" of windows whose name contains "Audio Suite: Gain"))
			delay 0.2
		end repeat
		set plug to first window whose title contains "Audio Suite:"
		set f to get subrole of button of plug
		set closeBtnPos to my getPositionOfItemInList("AXCloseButton", f)
		click button closeBtnPos of plug
		
	end tell
end tell




----------------------------

on cliClick(coordinate)
	do shell script "usr/local/bin/cliclick -r " & coordinate
end cliClick


on getPositionOfItemInList(theItem, theList)
	repeat with a from 1 to count of theList
		if item a of theList is theItem then return a
	end repeat
	return 0
end getPositionOfItemInList