Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1421 connectés 

  FORUM HardWare.fr
  Windows & Software
  Logiciels

  Help Script AutoIt

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Help Script AutoIt

n°2936397
tazbox
Posté le 23-03-2010 à 15:09:55  profilanswer
 

Bonjour, j'ai télécharger Autoit pour pouvoir faire des macro sur mon clavier, mais j'ai un problème avec un script.
 
J'ai fais un script qui me permet de taper plusieurs touche du clavier grace à la touche f1.  
Quand j'appuie sur la touche f1 j'ai les touche =)àç qui s'exécute.  
J'ai voulu améliorer le script pour pouvoir attribuer d'autre touche à f1 tout en pouvant switch entre les deux combinaison de touches que je veux exécuter avec f1.  
 
Combinaison 1 =)àç
Combinaison 2 _è-(  
 
Je voudrais switch entre les deux combinaison grace à la touche f4. Le problème c'est que j'arrive à switch une première fois mais pas une seconde fois.  
Au lancement du script je commence avec la combinaison 1, puis quand je fais f4 je switch sur la combinaison 2, mais impossible de revenir sur la combinaison 1.
 
Si quelqu'un pouvait m'aidé ca serait sympa.
 
Voila le script
 

Code :
  1. Opt('SendKeyDelay', 1)
  2. Opt('SendKeyDownDelay', 1)
  3. Opt('MouseClickDownDelay', 1)
  4. HotKeySet("{F1}","cast" )
  5. HotKeySet("{F4}","_switch" )
  6. Dim $test=0
  7. While 1
  8.     Sleep(100)
  9. WEnd
  10. Func cast()
  11. If $test=0 Then
  12.     Send("=" )
  13.     Send(" )" )
  14.     Send("à" )
  15.     Send("ç" )
  16. Else
  17.     Send("_" )
  18.     Send("è" )
  19.     Send("-" )
  20.     Send("(" )
  21. EndIf
  22. EndFunc
  23. Func _switch()
  24. $test=1
  25. EndFunc


 
Merci d'avance

mood
Publicité
Posté le 23-03-2010 à 15:09:55  profilanswer
 

n°2936460
billgatesa​nonym
Posté le 23-03-2010 à 17:22:35  profilanswer
 

Esssayer

Func _switch()
If $test=1 Then
  $test=0
Else
  $test=1
EndIf
EndFunc

Ou

Func _switch()
  $test = 1 - $test
EndFunc


n°2936462
tazbox
Posté le 23-03-2010 à 17:36:51  profilanswer
 

Merci pour ton aide bill, mais j'ai finalement trouver en cherchant un peut.
 
suffisait de rajouter

Code :
  1. HotKeySet("{NUMPAD2}","_EndSwitch" )

et  
 

Code :
  1. EndFunc
  2. Func _EndSwitch()
  3. $test=0
  4. EndFunc


 
Ce qui donne  
 

Code :
  1. Opt('SendKeyDelay', 1)
  2. Opt('SendKeyDownDelay', 1)
  3. Opt('MouseClickDownDelay', 1)
  4. HotKeySet("{F1}","cast" )
  5. HotKeySet("{NUMPAD1}","_switch" )
  6. HotKeySet("{NUMPAD2}","_EndSwitch" )
  7. Dim $test=0
  8. While 1
  9.     Sleep(100)
  10. WEnd
  11. Func cast()
  12. If $test=0 Then
  13.     Send("=" )
  14.     Send(" )" )
  15.     Send("à" )
  16.     Send("ç" )
  17. Else
  18.     Send("_" )
  19.     Send("è" )
  20.     Send("-" )
  21.     Send("(" )
  22. EndIf
  23. EndFunc
  24. Func _switch()
  25. $test=1
  26. EndFunc
  27. Func _EndSwitch()
  28. $test=0
  29. EndFunc


Message édité par tazbox le 23-03-2010 à 17:37:48

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Windows & Software
  Logiciels

  Help Script AutoIt

 

Sujets relatifs
Ouvrir la boîte "Executer" via un script[HELP] Micro usb qui ne marche pas
Processus java.exe qui prend plein de ressources - Help !Problème restauration Medion/Sim 2010 ... Help !
Une moyenne de 3 BSOD par jour !!! Help !!Help! mon PC reboot tout seul
Lenteur anormale de mon ordinateurBug ram detecter help me :)
plantage + ecran bleu + redémarage HELPPlantage de PC, help svp !
Plus de sujets relatifs à : Help Script AutoIt


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR