concepts utilisés :
* manipulation de la souris (déplacement, clics)
* création et utilisation de fonctions personnalisées
* utilisation de variables globales
* activation d'une fenêtre
* mise en pause du script pour un temps fixe.
Cet exemple est réglé pour fonctionner si une fenêtre firefox est ouverte. Adaptez le à votre navigateur internet en utilisant l'outil "au3Info", accessible dans le menu "outils" de SciTE, ou via le raccourci Ctrl+F6.
Créez votre propre scénario de test en modifiant la section "ENTRY_POINT" !
Code : Tout sélectionner
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.6.0
Auteur: SeigneurBelial
About this Script :
Made by SrBelial.
Terms of Use :
Please consider that you won't receive any support from me.
Please consider that this script is standalone script.
Please consider keeping this header,
or only my name (SrBelial or SrB) if you want to use or modify this script.
#ce ----------------------------------------------------------------------------
;~ ================================================================================
;~ ===__________________________________VARS____________________________________===
;~ ================================================================================
Global $origin[2]
Global $speed = 25
;~ ================================================================================
;~ ===_________________________________ENTRY_POINT______________________________===
;~ ================================================================================
WinActivate("[class:MozillaUIWindowClass]")
startScroll(800, 500)
multiplyScrollSpeed(2)
chooseDirection(-1, 0)
sleep(3000)
chooseDirection(1, 0)
;~ ================================================================================
;~ ===_________________________________FUNCTIONS________________________________===
;~ ================================================================================
Func startScroll($x, $y)
$origin[0] = $x
$origin[1] = $y
MouseMove($x, $y, 0)
MouseClick("middle")
EndFunc
Func stopScroll()
MouseMove($origin[0], $origin[1], 0)
MouseClick("middle")
Exit
EndFunc
Func multiplyScrollSpeed($factor)
$speed = $speed * $factor
EndFunc
Func chooseDirection($down = 0, $right = 0)
MouseMove($origin[0] + ($speed * $right), $origin[1] + ($speed * $down), 20)
Endfunc