Hi Alexbyrd, the dropbox link isnt functional.
Thanks

Hi I thought the script idea maybe good for those who want to use on the VMIX GT Timers,
so have rewritten to work on the input you set the VMIX GT Timer on and
use the API to compare the countdown time checks.

Also as defined below have set variables so you can change several settings

Variables
InputNo = The Input the GT Timer is on
countdowncolor = The default colour of the countdown

wrapuptime = Presenters first warning for color change i.e 5 minutes = 500
wrapuptimecolor = Colour change for Presenters first warning i.e YELLOW

finalcall = Presenters Second warning for color change i.e 2 minutes = 200
finalcallcolor = Colour change for Presenters second warning i.e RED

flashcolor = When reach 00:00:00 the colour to flash with finalcallcolor

Countdown time checks are calculated by taking the time string and converting to Integer to compare
i.e string "00:05:00" = 5 minutes left = 500. so for example the wrapuptime variable is 500
The countdown value will always be lower than the check values in this format.


'************************************************************************************
'** Color Changing Countdown timer for standard VMIX GT timer - TimerCentre.gtzip **
'**
'** Set variables for your required colour change times
'**

'** InputNo = The input the time is setup on i.e input = 4
Dim InputNo as Integer = 24
'** Set the Countdown timer color when started.
dim countdowncolor AS String = "Orange"

'** wrapuptime = The first time color change to warn time nearly up
'** Countdown Time HH:MM:SS is converted to an integer. 01:10:00 = 11000
'** so 5 minute wrapup is 00:05:00 = 500.
dim wrapuptime as Integer = 500
dim wrapuptimecolor AS String = "Yellow"

'** finalcall = The second time colour change to warn end of presenting
'** Countdown Time HH:MM:SS is converted to an integer. 01:10:00 = 11000
'** so 2 minute finalcall is 00:02:00 = 200.
dim finalcall as Integer = 200
dim finalcallcolor AS String = "Red"

'** Set the flash colour with the finalcallcolor when countdown 00:00:00
dim flashcolor AS String = "Black"

'** set parameters
dim flashtimer as Boolean
dim x as new system.xml.xmldocument
Dim HHMMSS As String()
dim i as integer
dim timevar AS String
flashtimer = false
i = 1

Do Until i = 2

x.loadxml(API.XML())

'Fetch the current countdown time ************************************
dim xmlct As string = x.SelectSingleNode("//input[" & InputNo & "]/text[1]/text()").value

'** Create a time string HHMMSS ***************************************
HHMMSS = xmlct.Split(New Char() {":"c})
timevar = HHMMSS(0) & HHMMSS(1) & HHMMSS(2)

' Convert Time String HHMMSS into a integer i.e 00:05:00 = 500 *******
dim timevarint as integer = Convert.toInt32(timevar)

'** Check if countdowntimer reached wraptuptime and finalcall **********
If timevarint > wrapuptime then
API.Function("SetTextColour",Input:=InputNo,Value:=countdowncolor)
Else if timevarint < finalcall then
API.Function("SetTextColour",Input:=InputNo,Value:=finalcallcolor)
Else
API.Function("SetTextColour",Input:=InputNo,Value:=wrapuptimecolor)
End if

' Flash timer when out of time timevarint is 00:00:00 = 0
if timevarint < 1 then
if flashtimer = true then
API.Function("SetTextColour",Input:=InputNo,Value:=flashcolor)
flashtimer = false
Else
API.Function("SetTextColour",Input:=InputNo,Value:=finalcallcolor)
flashtimer = true
End if
End if

Sleep (1000)
Loop