Для программы IP телефонии eyeBeam нужны 2 горячие клавиши. Как на мобильнике- например долго держишь срабатывает "быстрый набор" запрограммированного заранее номера.
функция StartScript() или MyExit() отрабатывает симулирование нажатий клавиш многократно.
Например я нажал F11 кратковременно - функция StartScript() отработала как мне нужно 1 раз набрав номер.
Если же я удерживаю F11 чуть дольше 0,5 или 1 секунды происходит многократныое выполнение функции StartScript(). Можно ли ограничить выполнение StartScript() 1-м разом например в минуту?
Или бы ло бы лучше чтобы она отрабатывала не по нажатию горячей клавиши, а по ее отпусканию.
функция StartScript() или MyExit() отрабатывает симулирование нажатий клавиш многократно.
Например я нажал F11 кратковременно - функция StartScript() отработала как мне нужно 1 раз набрав номер.
Если же я удерживаю F11 чуть дольше 0,5 или 1 секунды происходит многократныое выполнение функции StartScript(). Можно ли ограничить выполнение StartScript() 1-м разом например в минуту?
Или бы ло бы лучше чтобы она отрабатывала не по нажатию горячей клавиши, а по ее отпусканию.
Код:
TraySetIcon("Shell32.dll", -197) ;Изображение мобильного телефона
HotKeySet("{F11}", "StartScript") ;F11
HotKeySet("{F9}", "MyExit") ;F9
While 1
Sleep(100)
WEnd
Func StartScript()
Run('C:\Program Files (x86)\CounterPath\eyeBeam 1.5\eyeBeam.exe')
WinWaitActive("eyeBeam")
Send("{7}")
Sleep(500)
Send("{1}")
Sleep(500)
Send("{2}")
Sleep(500)
Send("{3}")
Sleep(500)
Send("{4}")
Sleep(500)
Send("{5}")
Sleep(500)
Send("{6}")
Sleep(500)
Send("{7}")
Sleep(500)
Send("{8}")
Sleep(500)
Send("{9}")
Sleep(500)
Send("{1}")
Sleep(500)
Send("{ENTER}")
Sleep(500)
WinSetState("eyeBeam", "", @SW_MINIMIZE)
EndFunc
Func MyExit()
WinSetState("eyeBeam", "", @SW_MAXIMIZE)
WinWaitActive("eyeBeam")
Sleep(100)
Send("{ESC}")
Sleep(100)
WinSetState("eyeBeam", "", @SW_MINIMIZE)
EndFunc