Code: Select all
#R::
Gui, Font, s12, Arial
Gui, Add, Text,, 1. Select time`n2. Submit`n3. Close popup
Gui, Add, DateTime, vMyTime w150 1, hh:mm tt
Gui, Add, Edit, vMyNote w250, vMix Recording
Gui, Add, Button, Default, Submit
Gui, Show, , Url Input
Return
ButtonSubmit:
Gui, Submit, NoHide
If (MyTime > A_Now)
{
FormatTime, HrTime , %MyTime%, HH
FormatTime, MinTime , %MyTime%, m
NewTime := ((HrTime*3600 + MinTime*60)
- (A_Hour*3600 + A_Min*60 + A_Sec))*1000
FormatTime, Schedule, %MyTime%
MsgBox,4160,NOTE:, "%MyNote%" is scheduled for`n%Schedule%
#Persistent
RemMessage := "Recording Started!"
SetTimer, ShowReminder, %NewTime%
}
Else
{
MsgBox, The time must be later in the same day!
GuiControl,,MyTime, %A_Now%
}
Return
GuiClose:
Gui, Destroy
Return
ShowReminder:
FormatTime, RightNow
UrlDownloadToFile, http://127.0.0.1:8088/API/?Function=StartRecording, createtemp
MsgBox,4160,vMix,vMix Recording Started!
SetTimer, ShowReminder, Off
Return