22-- @author Ben Smith
33-- @link bensmithsound.uk
44-- @source Rich Walsh (adapted)
5- -- @version 3.0
5+ -- @version 3.1
66-- @testedmacos 10.14.6
77-- @testedqlab 4.6.10
88-- @about Create a fade down cue for the selected audio/video/fade/group cue
99-- @separateprocess TRUE
1010
1111-- @changelog
12+ -- v3.1 + corrected function name
1213-- v3.0 + moved common functions to external script
1314-- v2.1 + allows assignment of UDVs from the script calling this one
1415-- v2.0 + subroutines
@@ -44,14 +45,14 @@ tell application id "com.figure53.Qlab.4" to tell front workspace
4445 -- Make a fade for each an audio or video file
4546
4647 if originalCueType is in {" Audio" , " Video" } then
47- my createFadeDown (originalCue, userLevel, userPrefix)
48+ my createFade (originalCue, userLevel, userPrefix)
4849
4950 -- Make a fade for an audio or video cue, from a fade cue which targets the original cue
5051
5152 else if originalCueType is " Fade" then
5253 set originalCueTarget to cue target of originalCue
5354 if q type of originalCueTarget is not " Group" then
54- my createFadeDown (originalCueTarget, userLevel, userPrefix)
55+ my createFade (originalCueTarget, userLevel, userPrefix)
5556 end if
5657
5758 -- Make a fade for each audio file in a selected group
@@ -64,7 +65,7 @@ end tell
6465
6566-- FUNCTIONS ------------------------------
6667
67- on createFadeDown (theCue, userLevel, userPrefix )
68+ on createFade (theCue, userLevel, userPrefix )
6869 tell application id " com.figure53.Qlab.4" to tell front workspace
6970 make type " Fade"
7071 set newCue to last item of (selected as list )
@@ -73,7 +74,7 @@ on createFadeDown(theCue, userLevel, userPrefix)
7374 newCue setLevel row 0 column 0 db userLevel
7475 set q name of newCue to userPrefix & q display name of theCue
7576 end tell
76- end createFadeDown
77+ end createFade
7778
7879on createGroup (theCue, userLevel, userPrefix )
7980 tell application id " com.figure53.Qlab.4" to tell front workspace
@@ -90,15 +91,15 @@ on createGroup(theCue, userLevel, userPrefix)
9091 set q name of fadeGroup to userPrefix & theCueName
9192 repeat with eachCue in cuesToFade
9293 if q type of eachCue is in {" Audio" , " Video" } then
93- my createFadeDown (eachCue, userLevel, userPrefix)
94+ my createFade (eachCue, userLevel, userPrefix)
9495 set newCue to last item of (selected as list )
9596 set newCueID to uniqueID of newCue
9697 move cue id newCueID of parent of newCue to end of fadeGroup
9798 else if q type of eachCue is in {" Fade" } then
9899 try
99100 if q display name of eachCue does not start with " Fade in: " then
100101 set eachCueTarget to cue target of eachCue
101- my createFadeDown (eachCueTarget, userLevel, userPrefix)
102+ my createFade (eachCueTarget, userLevel, userPrefix)
102103 set newCue to last item of (selected as list )
103104 set newCueID to uniqueID of newCue
104105 move cue id newCueID of parent of newCue to end of fadeGroup
0 commit comments