C'est pour ça que je demande votre aide pour un peux mieux comprendre :
Dans le script qui va suivre ( qui est un logiciel qui permet de se connecter automatiquement a dofus : trouvé ici : http://www.autoitscript.fr/forum/viewto ... f=6&t=2853) , je voudrais rajouter une partie "Serveur" tout comme la partie "Personnage" pour que l'on puisse choisir son serveur . La deuxième astuce que je souhaiterais c'est comment faire pour ouvrir un fichier (ici config.xml) et le modifier grâce au script .
Bref , je suis pas très compréhensible .. J'éspère que vous vous en sortirez .
Script :
Code : Tout sélectionner
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
; Utiliser pour la compatibilité avec Win98 (Y).
#AutoIt3Wrapper_UseAnsi=N
; Icone(s) à rajouter dans les ressources de l'application compilée (Accepte les chemins relatifs).
#AutoIt3Wrapper_Res_Icon_Add=gm.ico
; Icone de l'application compilée.
#AutoIt3Wrapper_Icon=gm.ico
#AutoIt3Wrapper_outfile=Auto dofus.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Tidy_Stop_OnError=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Dim $Pseudo[2], $Mot_de_passe[1], $Chemin_dofus_exe[1], $Pixel_color[10], $i[5], $Coord[2] , $email
$Ini_dir = @ScriptDir & "\Parametres"
$Orange = 0xFF9900
$i = 1
$e = 1
$u = 1
$Autologin = GUICreate ( "Auto-Dofus", 178, 230, @DesktopWidth/2, @DesktopHeight/2 )
$Pseudo = GUICtrlCreateInput ( "Pseudo", 8, 8, 161, 21, BitOR ( $ES_CENTER,$ES_AUTOHSCROLL ) )
$Mot_de_passe = GUICtrlCreateInput ( "Motdepasse", 8, 32, 161, 21, BitOR ( $ES_CENTER,$ES_PASSWORD,$ES_AUTOHSCROLL ) )
$Chemin_dofus_exe = GUICtrlCreateInput ( @ScriptDir & "\Dofus.exe", 8, 96, 121, 21, BitOR ( $ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$WS_HSCROLL,$WS_VSCROLL ) )
$Parcourir = GUICtrlCreateButton ( "...", 136, 96, 35, 25, 0 )
$Personnage = GUICtrlCreateCombo("Personnage", 8, 64, 161, 25)
GUICtrlSetData(-1, "Personnage 1|Personnage 2|Personnage 3|Personnage 4|Personnage 5")
$Sauvegarder = GUICtrlCreateButton ( "Sauvegarder", 8, 128, 163, 25, 0 )
$Go = GUICtrlCreateButton ( "Go", 8, 160, 163, 65, 0 )
GUISetState ()
If FileExists ( $Ini_dir ) Then
GUICtrlSetData ( $Pseudo, IniRead ( $Ini_dir, "Login", "Pseudo", "Pseudo" ) )
GUICtrlSetData ( $Mot_de_passe, IniRead ( $Ini_dir, "Login", "Mot de passe", "Motdepasse" ) )
GUICtrlSetData ( $Chemin_dofus_exe, IniRead ( $Ini_dir, "Login", "Chemin dofus.exe", @ScriptDir & "\Dofus.exe" ) )
GUICtrlSetData ( $Personnage, "Personnage 1|Personnage 2|Personnage 3|Personnage 4|Personnage 5", IniRead ( $Ini_dir , "Login", "Personnage", "Personnage" ) )
Else
GUICtrlSetState ( $Pseudo, @SW_DISABLE )
GUICtrlSetState ( $Mot_de_passe, @SW_DISABLE )
GUICtrlSetState ( $Parcourir, @SW_DISABLE )
GUICtrlSetState ( $Personnage, @SW_DISABLE )
EndIf
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Pseudo
If GUICtrlRead ( $Pseudo ) <> "Pseudo" Then GUICtrlSetState ( $Mot_de_passe, @SW_ENABLE )
Case $Mot_de_passe
If GUICtrlRead ( $Mot_de_passe ) <> "motdepasse" Then GUICtrlSetState ( $Personnage, @SW_ENABLE )
Case $Personnage
If GUICtrlRead ( $Personnage ) <> "Personnage" Then GUICtrlSetState ( $Parcourir, @SW_ENABLE )
Case $Parcourir
$Filedir = FileOpenDialog ( "Veuillez indiquer le chemin jusqu'au fichier dofus.exe", @ScriptDir, "Executables (Dofus.exe)" )
GUICtrlSetData ( $Chemin_dofus_exe, $Filedir )
Case $Sauvegarder
If FileExists ( $Ini_dir ) Then IniDelete ( $Ini_dir, "Login" )
IniWrite ( $Ini_dir, "Login", "Pseudo", GUICtrlRead ( $Pseudo ) )
IniWrite ( $Ini_dir, "Login", "Mot de passe", GUICtrlRead ( $Mot_de_passe ) )
IniWrite ( $Ini_dir, "Login", "Chemin dofus.exe", GUICtrlRead ( $Chemin_dofus_exe ) )
IniWrite ( $Ini_dir, "Login", "Personnage", GUICtrlRead ( $Personnage ) )
Case $Go
$perso = GUICtrlRead ( $Personnage )
If $perso = "Personnage 1" Then
$x = 148
elseif $perso = "Personnage 2" Then
$x = 306
ElseIf $perso = "Personnage 3" Then
$x = 467
ElseIf $perso = "Personnage 4" Then
$x = 629
ElseIf $perso = "Personnage 5" Then
$x = 785
EndIf
$Pseudo0 = GUICtrlRead ( $Pseudo )
$Mot_de_passe0 = GUICtrlRead ( $Mot_de_passe )
$Chemin_dofus_exe0 = GUICtrlRead ( $Chemin_dofus_exe )
Run ( $Chemin_dofus_exe0 )
WinWait ( "Dofus" )
If Not WinActive("Dofus","") Then WinActivate("Dofus","")
WinWaitActive("Dofus","")
Sleep ( 100 )
$Win_Dofus_pos = WinGetPos ( "[active]" )
If @error Then
MsgBox ( 0, "error", "Erreur" )
Exit
EndIf
While $i = 1
PixelSearch ( 0, 0, 1920, 1080, $Orange )
If Not @error Then $i = 0
WEnd
Sleep ( 100 )
Send ( $Pseudo0 & "{TAB}" & $Mot_de_passe0 )
$Coord = PixelSearch ( $Win_Dofus_pos[0], $Win_Dofus_pos[1], $Win_Dofus_pos[2], $Win_Dofus_pos[3], $Orange )
For $a = 1 To 3
$d = 1
For $i = 0 To 4
$Pixel_color[$i] = PixelGetColor ( Random ( $Win_Dofus_pos[0], $Win_Dofus_pos[2] ), Random ( $Win_Dofus_pos[1], $Win_Dofus_pos[3] ) )
Next
While $u = 1
$coord = PixelSearch( $Win_Dofus_pos[0], $Win_Dofus_pos[1], $Win_Dofus_pos[2], $Win_Dofus_pos[3], $Orange )
If Not @error Then $u = 0
WEnd
Sleep ( 100 )
If $a = 3 Then
MouseClick ( "left", (($x/938)*$Win_Dofus_pos[2])+$Win_Dofus_pos[0], ((435/776)*$Win_Dofus_pos[3])+$Win_Dofus_pos[1] )
MouseClick ( "left", ((378/758)*$Win_Dofus_pos[2])+$Win_Dofus_pos[0], ((489/612)*$Win_Dofus_pos[3])+$Win_Dofus_pos[1] )
Else
MouseClick ( "left", $Coord[0], $Coord[1], 2 )
EndIf
$n = 1
While $n = 1
If PixelGetColor ( 674, 531 ) = 0x000000 Then $n = 0
WEnd
while $d = 1
$s = 0
For $m = 1 to 3
$pixel = PixelGetColor ( Random ( $Win_Dofus_pos[0], $Win_Dofus_pos[2] ), Random ( $Win_Dofus_pos[1], $Win_Dofus_pos[3] ) )
If $pixel = 0x000000 Then $s = $s + 1
Next
If Not $s = 3 Then $d = 0
WEnd
While $e = 1
$p = 0
For $i = 0 To 3
$Pixel_color[$i+4] = PixelGetColor ( Random($Win_Dofus_pos[0], $Win_Dofus_pos[2]), Random($Win_Dofus_pos[1], $Win_Dofus_pos[3]) )
Next
For $i = 0 To 3
If $Pixel_color[$i] <> $Pixel_color[$i+4] Then $p = $p+1
Next
If $p = 4 Then $e = 0
WEnd
Next
Exit
EndSwitch
WEnd
Cordialement ,
xNr.
