Je me suis lancé depuis peu dans la programmation AutoIt, et je m'améliore en me donnant de petit objectifs ! Cependant, j'ai actuellement besoin d'aide car je ne comprend pas comment réaliser ce que je souhaite faire !
Pour vous dire voilà le code qui me pose en parti problème :
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ExitSpam
Exit
Case $SpamON
$TextToSpam = GUICtrlRead ($WhatToSpam)
Sleep (250)
Send ("{ALTDOWN}")
Sleep (250)
Send ("{TAB}")
Sleep (250)
Send ("{ALTUP}")
Sleep (250)
$SpamSwitch = 1
Case $SpamOFF
$SpamSwitch = 0
EndSwitch
If GUICtrlRead ($SpamSpeedSelector) = 0 Then
$SpamSpeed = 1000
Else
If GUICtrlRead ($SpamSpeedSelector) = 1 Then
$SpamSpeed = 500
Else
If GUICtrlRead ($SpamSpeedSelector) = 2 Then
$SpamSpeed = 250
Else
If GUICtrlRead ($SpamSpeedSelector) = 3 Then
$SpamSpeed = 100
Else
$SpamSpeed = 50
EndIf
EndIf
EndIf
EndIf
If $SpamSwitch = 1 Then
Send ($TextToSpam)
$HowMuchSpammed = $HowMuchSpammed + 1
GUICtrlSetData ($HowMuchSpammedView, $HowMuchSpammed)
If GUICtrlRead ($PressEnter) = 1 Then
Send ("{enter}")
Else
EndIf
Sleep ($SpamSpeed)
ElseIf $SpamSwitch <> 2 Then
MsgBox (262144 & 0 & 64, "SpamBot", "Spam has ended")
$SpamSwitch = 2
EndIf
WEnd
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ExitSpam
Exit
Case $SpamON
$TextToSpam = GUICtrlRead ($WhatToSpam)
Sleep (250)
Send ("{ALTDOWN}")
Sleep (250)
Send ("{TAB}")
Sleep (250)
Send ("{ALTUP}")
Sleep (250)
$SpamSwitch = 1
Case $SpamOFF
$SpamSwitch = 0
EndSwitch
If GUICtrlRead ($SpamSpeedSelector) = 0 Then
$SpamSpeed = 1000
Else
If GUICtrlRead ($SpamSpeedSelector) = 1 Then
$SpamSpeed = 500
Else
If GUICtrlRead ($SpamSpeedSelector) = 2 Then
$SpamSpeed = 250
Else
If GUICtrlRead ($SpamSpeedSelector) = 3 Then
$SpamSpeed = 100
Else
$SpamSpeed = 50
EndIf
EndIf
EndIf
EndIf
If $SpamSwitch = 1 Then
Send ($TextToSpam)
$HowMuchSpammed = $HowMuchSpammed + 1
GUICtrlSetData ($HowMuchSpammedView, $HowMuchSpammed)
If GUICtrlRead ($PressEnter) = 1 Then
Send ("{enter}")
Else
EndIf
Sleep ($SpamSpeed)
ElseIf $SpamSwitch <> 2 Then
MsgBox (262144 & 0 & 64, "SpamBot", "Spam has ended")
$SpamSwitch = 2
EndIf
WEnd
Selon vous quelle serait mon erreur ?
Merci de votre réponse.
(Si jamais je dois ajouter d'autre renseignements dites le moi.)