voila , sur ce script ci dessous : j’aimerai changer la vitesse d’exécution de l'automatisation mais sans succès .
j'ai beau changer la valeur 100 de $time , ou bien encore celle de sleep(50) je n'arrive pas a avoir une vitesse suffisante .
si quelqu’un pouvait me renseigner , merci d'avance.
Code : Tout sélectionner
Dim $Paused, $time, $pos
$time = 100 ;temps déplacement / click en millisec
HotKeySet("{F1}", "swap") ;start
HotKeySet("{F2}", "pause") ;pause ^^
HotKeySet("{F3}", "stop") ;Exit
Func swap()
$pos = MouseGetPos()
Send("e")
Sleep(50)
;1ère ligne
MouseClick("right" ,1780,620)
Sleep($time)
MouseClick("right" ,1820,620)
Sleep($time)
MouseClick("right" ,1870,620)
Sleep($time)
;2ème ligne
MouseClick("right" ,1780,725)
Sleep($time)
MouseClick("right" ,1820,725)
Sleep($time)
MouseClick("right" ,1870,725)
Sleep($time)
;3ème ligne
MouseClick("right" ,1725,825)
Sleep($time)
MouseClick("right" ,1780,825)
Sleep($time)
MouseClick("right" ,1820,800)
Sleep($time)
MouseClick("right" ,1870,800)
Sleep($time)
MouseClick("right" ,1825,850)
Sleep($time)
Send("{ALTdown}")
MouseClick("right" ,1870,850)
Send("{ALTup}")
Sleep($time)
Send("e")
MouseMove($pos[0],$pos[1],10)
EndFunc
Func stop()
Exit 1
EndFunc
While 1
Sleep(100)
WEnd
Func Pause()
$Paused = Not $Paused
While $Paused
Sleep(100)
WEnd
EndFunc
