зажать сочетание кнопок

[Safron9999]

Здравствуйте.
нужно зажать сочетание ctrl+alt затем кликнуть мышкой по определенной точке, затем отпустить ctrl+alt. подскажите в чем ошибка?
заранее спасибо!

HotKeySet('{HOME}', '_START')
HotKeySet('{END}', '_Exit')

While 1
    Sleep(100)
WEnd

Func _START()
While 1
Sleep(Random(550, 700, 1))
Send("{alt down}")
Send("{LSHIFT down}")
Sleep(Random(550, 700, 1))
MouseClick("left",40,181,1)
Sleep(Random(550, 700, 1))
Send("{alt up}")
Send("{LSHIFT up}")
WEnd
EndFunc


Func _Exit()
Exit
EndFunc

 

[alex33]

А что если перед словами up и down убрать пробел?

HotKeySet('{HOME}', '_START')
HotKeySet('{END}', '_Exit')

While 1
    Sleep(100)
WEnd

Func _START()
While 1
Sleep(Random(550, 700, 1))
Send("{altdown}")
Send("{LSHIFTdown}")
Sleep(Random(550, 700, 1))
MouseClick("left",40,181,1)
Sleep(Random(550, 700, 1))
Send("{altup}")
Send("{LSHIFTup}")
WEnd
EndFunc


Func _Exit()
Exit
EndFunc

 

[Safron9999]

Не помогло :(

 

[alex33]

Из описания к функции Send:

{ALTDOWN}
Удерживать ALT в нажатом состоянии, до {ALTUP}
...
{SHIFTDOWN}
Удерживать SHIFT в нажатом состоянии, до {SHIFTUP}

Я думаю дело в LSHIFT
Может так будет работать?

HotKeySet('{HOME}', '_START')
HotKeySet('{END}', '_Exit')

While 1
    Sleep(100)
WEnd

Func _START()
While 1
Sleep(Random(550, 700, 1))
Send("{altdown}")
Send("{SHIFTdown}")
Sleep(Random(550, 700, 1))
MouseClick("left",40,181,1)
Sleep(Random(550, 700, 1))
Send("{altup}")
Send("{SHIFTup}")
WEnd
EndFunc


Func _Exit()
Exit
EndFunc

 

[Safron9999]

не работает :(

 

[alex33]

Safron9999

не работает

У меня работает.
Рабочий код в Ответ #3, проверял в explorer

 

[Safron9999]

спасибо! все заработало!