AutoHotkey Community

#Persistent                                           ; didnt think this would be needed but is
settitlematchmode, 2
Detecthiddenwindows, on
ifwinnotexist, VirtualDub



{
run, F:\Downloaded Programs\VirtualDub-1.6.9\VirtualDub.exe    ;  C:\Downloaded Programs\VirtualDub-1.6.9\VirtualDub.exe
winwait, VirtualDub
winactivate, VirtualDub
send, !f                                              ; puts it in to capture mode along with line below
Send, p
sleep, 300
winactivate, VirtualDub
send, !v
send, {enter}
}

sleep, 1000

winhide, VirtualDub

SetTimer, record , 600000                               ;records 10 mins at a time (will be 10mins or more once working

record:

ifwinexist, [capture in progress]
{
ControlSend, #327701, {esc}, VirtualDub
sleep, 500
}
start:
sleep, 500
ifwinexist, [FILE EXISTS]
{
ControlSend, #327701, {]}, VirtualDub
sleep, 100
gosub start
}
else
ControlSend, #327701, {F5}, VirtualDub

return

OnExit, ExitSub
ExitSub:
winshow, VirtualDub
ExitApp

#Persistent                                           ; needed since there are no hotkeys - use exitapp to close when you want
settitlematchmode, 2
Detecthiddenwindows, on
OnExit, ExitSub                                     ; this directive needs to be up at the top.

ifwinnotexist, VirtualDub
{
run, F:\Downloaded Programs\VirtualDub-1.6.9\VirtualDub.exe    ;  C:\Downloaded Programs\VirtualDub-1.6.9\VirtualDub.exe
winwait, VirtualDub
winactivate, VirtualDub
send, !f                                              ; puts it in to capture mode along with line below
Send, p
sleep, 300
winactivate, VirtualDub
send, !v
send, {enter}
}

sleep, 1000

winhide, VirtualDub

SetTimer, record , 600000                               ;records 10 mins at a time (will be 10mins or more once working

return          ;added return here, since the timer will make this happen automatically. add a gosub, record if you want the first instance to run right away


record:

ifwinexist, [capture in progress]
{
ControlSend, #327701, {esc}, VirtualDub
sleep, 500
}
start:
sleep, 500
ifwinexist, [FILE EXISTS]
{
ControlSend, #327701, {]}, VirtualDub
sleep, 100
gosub start
}
else
ControlSend, #327701, {F5}, VirtualDub

return

ExitSub:
winshow, VirtualDub
ExitApp