Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Пользователь


Сообщения: 114
Благодарности: 2

Профиль | Сайт | Отправить PM | Цитировать


Привет, написал скрипт... но ненравится его некоректная работа.
Требуется:
;*** Стоп работает
;*** Пауза вкл/выкл работает
;*** Кликать с интервалом 10 (сотых) секунды правой и левой кнопкой мыши. включается и выключается отлично.
;*** Во время этих кликов, клавиша 1 всевремя просто включена и после двух минут включается на одну секунду клавиша 2. некоректно работает
Вот вырезка этого кода
PHP код: Выделить весь код

Opt ("SendKeyDelay"25       )

Opt ("WinTitleMatchMode"4  )
Opt ("SendKeyDownDelay"600  )
Opt ("MouseClickDownDelay"25)

Press Esc to terminate scriptPause/Break to "pause"

Global $Paused
HotKeySet
("{PAUSE}""TogglePause")
HotKeySet ("{F5}",  "Auto_2"     )
HotKeySet ("{F6}",  "Auto_3"     )
HotKeySet ("{F9}",  "Left_Click" )
HotkeySet ("{F10}""Stop"       )
HotKeySet ("{F8}""Right_Click")

;********** 
Auto 2 **********

Func Auto_2 ()
While (
1)
Call ("Manashield_A1")
Call ("Delay_1")
Call ("Evilspirit_A1")
Call ("Delay_1")
WEnd
EndFunc

;********** FunctionsDelay **********

Delay Interval In Between Skills.

Func Delay_1 ()
Sleep (1300)
EndFunc

Func Delay_2 
()
Sleep (100)
Sleep (100)
EndFunc

;********** FunctionsEvilspirit **********

Func Evilspirit_A1 ()
While 
1
HotKeySet
("{1}")
Sleep (10000)
WEnd
EndFunc

;********** FunctionsManashield **********

Func Manashield_A1 ()
    While 
1
Opt
("SendKeyDelay"120000)
HotKeySet("{2}")
Sleep (100)
WEnd
EndFunc 

помогите исправить что нетак...
Тоесть скрипт нажал клавишу 1 (не удерживая),всевремя кликает правой или левой кнопкой, как истекло например две минуты, нажимается клавиша 2 на две секунды и потом обратно всевремя включена клавиша 1 (не удерживая)
-
Вроде разобрался, просто еще раз мануал пересмотрел почитал.
PHP код: Выделить весь код

While 1

Opt
("SendKeyDelay"1000)
Sleep (100)
Send("{1 down}") ;Нажать клавишу 1
Sleep 
(10)
Send("{1 up}") ;Освободить клавишу 1
Sleep 
(120000)

Send("{2 down}") ;Нажать клавишу 2
Sleep 
(10)
Send("{2 up}") ;Освободить клавишу 2
Sleep 
(100)

WEnd 


Последний раз редактировалось kagorec, 03-11-2007 в 21:17.


Отправлено: 16:59, 03-11-2007 | #677