Page 2 sur 2
Re: [..] Mouse 3
Posté : sam. 11 avr. 2009 11:21
par Yogui
Après tout dépend de ce que tu veux faire :s
je n'en sais pas assez pour vraiment aider
j'ai fait ce petit script :
► Afficher le texte
Code : Tout sélectionner
#include <MouseSetOnEvent_UDF.au3>
HotKeySet("{ESC}", "_terminate")
Dim $i = 3, $sens = 1
While 1 ; tant que 1 = 1 alors
;~ _MouseSetOnEvent($MOUSE_WHELLDOWN_EVENT, "mouse_welldown_event")
_MouseSetOnEvent($MOUSE_WHELLSCROLL_EVENT, "mouse_well")
WEnd
Func mouse_well()
If $i = 3 Then
$i = 2
Send("{F3}")
$sens = 1
ElseIf $i = 2 And $sens = 1 Then
Send("{F2}")
$i = 1
ElseIf $i = 1 Then
Send("{F1}")
$i = 2
$sens = 2
ElseIf $i = 2 And $sens = 2 Then
Send("{F2}")
$i = 3
EndIf
EndFunc ;==>mouse_well
Func _terminate()
Exit
EndFunc ;==>_terminate
c'est plus mieux que je puisse faire mais je ne prend pas en compte le sens de rotation de la molette arrivé à 3 je change de sens pour aller vers 1 et une fois à 1 je change de sens pour aller vers 3 c'est de la bidouille mais ...
Re: [..] Mouse 3
Posté : sam. 11 avr. 2009 12:22
par Jerome
Génial, c'est nickel ce qu'il me fallait .
Cependant, a un moment le script se ferme, moyen de regler sa ?
Et de rajouter F4 ?
Re: [..] Mouse 3
Posté : sam. 11 avr. 2009 14:21
par Yogui
chez moi le seul moment ou le script coupe c'est lorsque je fais Echap sinon il ne coupe pas... sachant que pour mes tests j'ai emplacer les send par des traytip
ajouter un F4 avec un peu de logique
mais bon
► Afficher le texte
Code : Tout sélectionner
#include <MouseSetOnEvent_UDF.au3>
HotKeySet("{ESC}", "_terminate")
Dim $i = 4, $sens = 1
While 1 ; tant que 1 = 1 alors
;~ _MouseSetOnEvent($MOUSE_WHELLDOWN_EVENT, "mouse_welldown_event")
_MouseSetOnEvent($MOUSE_WHELLSCROLL_EVENT, "mouse_well")
WEnd
Func mouse_well()
If $i = 4 Then
$i = 3
Send("{F4}")
$sens = 1
ElseIf $i = 3 And $sens = 1 Then
Send("{F3}")
$i = 2
ElseIf $i = 2 And $sens = 1 Then
Send("{F2}")
$i = 1
ElseIf $i = 1 Then
Send("{F1}")
$i = 2
$sens = 2
ElseIf $i = 2 And $sens = 2 Then
Send("{F2}")
$i = 3
ElseIf $i = 3 And $sens = 2 Then
Send("{F3}")
$i = 4
ElseIf $i = 4 And $sens = 2 Then
Send("{F4}")
$i = 3
$sens = 1
EndIf
EndFunc ;==>mouse_well
Func _terminate()
Exit
EndFunc ;==>_terminate
Re: [..] Mouse 3
Posté : sam. 11 avr. 2009 14:44
par Jerome
Oui merci
Par contre oui, le script se ferme tous seul au bout d'un moment, et je n'appuie pas sur "echap"