Inversion des mouvements de la souris

brossden · Message par **brossden** » mar. 26/sept./2006 11:33

Un petit soft pour rire (si vous le lancer sur le poste d'un collège à son insus !)

Pour arrêter appuyer sur <Echap>

ExamineDesktops()
Structure Souris
  X.l
  Y.l
EndStructure

Pos.Souris
Pos\X=100
Pos\Y=100

GetCursorPos_(Pos)

Pre.Souris
Pre\X=Pos\X
Pre\Y=Pos\Y

Repeat
  Event.l=WaitWindowEvent(1)
  GetCursorPos_(Pos)
  Pre\X + (Pre\X-Pos\X)

  If Pre\X<0
    Pre\X=10
  EndIf
  Pre\Y + (Pre\Y-Pos\Y)
  If Pre\Y<0
    Pre\Y=10
  EndIf

  SetCursorPos_(Pre\X,Pre\Y)
Until GetAsyncKeyState_(#VK_escape)

Backup · Message par **Backup** » mar. 26/sept./2006 13:53

Marrant en effet

Droopy · Message par **Droopy** » mar. 26/sept./2006 14:38

très sympa en effet

brossden · Message par **brossden** » mar. 26/sept./2006 15:15

Merci !

N'en jetez plus !!

Patrick88 · Message par **Patrick88** » mar. 26/sept./2006 16:59

avec les gestionnaires de carte graphique style ati ou nvidia, il est possible de faire tourner l'écran de 180 degré , il suffit ensuite de déplacer la barre de menu en "bas" , et de laisser faire, chouissif

y'a aussi , retirer la boule de la souris et remplacer par un truc lourd, mais ça se perd avec les souris optique...

pis y faut travailler dans un bureau...

pat