Auto-It...

    Publicités

Users Who Are Viewing This Thread (Total: 1, Members: 0, Guests: 1)

Status
Not open for further replies.

Kein34

Membre
Jan 11, 2012
79
0
572
Salut, je veux créer mon propre Aimbot, mais quelque chose me pose problème...et aucun message d'erreur ne s'affiche In-Game. En faite, il y a juste le Aimbot qui ne fonctionnent pas ! xD
Voila mon code source dans le auto-it:

HotKeySet("{a}", "_Start")
HotKeySet("{z}", "_Pause")
HotKeySet("{e}", "_Close")

Func _Start()
While 1
Dim $fov[4] = [0,0, 1077,78]
$color = 0x717171
$aim = PixelSearch($fov[0], $fov[1], $fov[2], $fov[3], $color)
If Not @error Then
MouseClick("left", $aim[0], $aim[1], 1, 0)
EndIf
WEnd
EndFunc

Func _Pause()
While 1
Sleep(50)
WEnd
EndFunc

Func _Close()
Exit
EndFunc

While 1
Sleep(20)
WEnd


Voila !
Mais je tiens à vous avertir, cela est mon premier essai de Cheat sur un jeu ( c'est pourquoi j'ai pris un petit jeu xD ) et je n'y connais pas grand chose en Cheat...sauf un peu en Auto-It (grâce à un ami)...
Décevant je sais...Mais je tiens à dire que je ferai tout pour réussir, quite à lire des tutoriels en toute langue !
J'espère qu'une âme charitable passera par là...

Merci d'avance de vos réponses !
 

Kein34

Membre
Jan 11, 2012
79
0
572
Tout d'abord Merci de ton aide ! Mais, je n'y connais pas grand chose...peux-tu m'expliquer ce que sont des "msgbox"...U_u
Désolé...:arf:
 

Evaelis

La Voix de la Sagesse
V
Ancien staff
Apr 28, 2010
22,949
468
1,699
Valhalla
Bah des boites de dialogue, autant on sait que tu as c/c ton code mais ne pas savoir ça ...
 

Kein34

Membre
Jan 11, 2012
79
0
572
Ui, je sais que c'est des boites de dialogues, mais ce que je n'ai pas compris, c'est comment en mettre sur le Auto-It...
Désoler de m'être mal exprimé ;)

Et Evaelis, tu m'a l'air d'être une grande programeuse, pourrais-tu s'il te plait m'éclaircir sur ce beau monde de cheat ! U_u

Merci d'avance de ton aide.
 
Last edited:

Cyrion

._.
V
Ancien staff
Jul 8, 2010
2,524
2
944
www.bufferoverflow.fr
s'il te plait, arrête d'écrire "sur le Auto-it". Autoit est un langage de programmation style macro, pas un programme.

Deuxièmement, tu fais un pixelsearch sur 1077 de large par 78 de haut ?

Je crois pas que tes ennemis soient seulement dans le haut de ton écran.
Si tu sais pas te servir d'une fonction, va voir dans l'aide d'Autoit.(Au pire, apprend l'Autoit pour de vrai)
 

Kein34

Membre
Jan 11, 2012
79
0
572
Cyrion, désolé de vous embêter tels un "NOOB" avec des questions idiotes...
Je suis désolé, mais je tiens à faire ce Aimbot...

Maintenant, à propos du pixelsearch: je n'ai pas compris où il fallait mettre cette sorte de croix d'Auto-It windows Info...
Je pensais qu'il fallait le mettre en haut à gauche de mon écran, puis en bas à droite. A priori, je me suis tromper...
Merci de m'éclaircir sur ce sujet ;)
 

SnowShovel

Membre actif
Feb 13, 2013
170
0
221
Bonjour Kein34.

Je suis peut être mal placer pour t'aider car moi aussi j'ai des problèmes avec mon AimBot, mes de toute façon si je dit faux, ont me corrigera très vite :d

Je te conseille d'utilsier la fonction WinWaitActive( "LeNomDeTaFênetre" ) afin que ton aimbot trouve directement la fenêtre de ton jeux.

Cordialement.
 

Cyrion

._.
V
Ancien staff
Jul 8, 2010
2,524
2
944
www.bufferoverflow.fr
Tu as dû faire une fausse manœuvre car je doute que ta résolution d'écran soit de 1077x78 :mdr1:

Met ta résolution d'écran tout simplement.
 

SnowShovel

Membre actif
Feb 13, 2013
170
0
221
Tu as dû faire une fausse manœuvre car je doute que ta résolution d'écran soit de 1077x78 :mdr1:

Met ta résolution d'écran tout simplement.

Coucou Cyrion.

Voila tout marche parfaitement, j'ai résolut mes problèmes grâce à vous.

Voila un second problème et apparue, mon Aimbot ne fonctionne pas en jeux, il reste inactif, alors j'ai modifier le script et ajouter

"WinWaitActive( "BlackShot" )" Soit le nom de la fenêtre de mon jeux.

Et en jeux toujours rien, j'ai donc supprimer "WinWaitActive( "BlackShot" )" j'ai ouvert paint, j'ai fait la couleur bleux (comme mon aimbot doit chercher la couleur bleux :d)

et je les mis en fond d'écran au millieux (en mode centrer)

Je lance le Aimbot j'appuie sur ma touche "O" pour démarrer l'Aimbot, et la le Aimbot place bien sa souris sur la couleur (de mon
fond d'écran).

Alors comment faire détectez a AutoIt la fenêtre de mon jeux.

PS: impossible de lancer mon jeux en mode fenêtrer, il n'ont pas activer cette fonction.

Même avec des logicielles pour le lancer en fenêtrer, et même en rajoutant -w a la fin du chemin d'accès.

Donc je pense que AutoIT ne détecte pas ma fenêtre du jeux (En pleine écran).

Merci de ton aide.

Cordialement.
 

Kein34

Membre
Jan 11, 2012
79
0
572
Tout d'abord Merci ! SnowShovel, ça me plait que tu vienne poser tes questions et découvertes ici xD ( c'est parfait ! )
Maintenant, Comment as-tu fait pour activer le Aimbot avec une touche ? Et je vais essayer ce que tu m'a dit à propos des résolutions...

Ps: Je peux jouer en mode fenêtre avec mon Game.

Merci encore ;)

---------- Message ajouté à 07h42 ---------- Le message précédent était à 07h23 ----------


J'ai mis des msgbox un peu partout...
Voila ce que ça donne:

HotKeySet("{a}", "_Start")
HotKeySet("{z}", "_Pause")
HotKeySet("{e}", "_Close")

Func _Start()
While 1
Dim $fov[4] = [0,0, 1077,78]
Code : Autre1
MsgBox(0, "ça fonctionne1")
$color = 0x717171
Code : Autre1
MsgBox(0, "ça fonctionne2")
$aim = PixelSearch($fov[0], $fov[1], $fov[2], $fov[3], $color)
Code : Autre1
MsgBox(0, "ça fonctionne")
If Not @error Then
MouseClick("left", $aim[0], $aim[1], 1, 0)
Code : Autre1
MsgBox(0, "ça fonctionne3")
EndIf
WEnd
EndFunc
Code : Autre1
MsgBox(0, "ça fonctionne4")
Func _Pause()
While 1
Sleep(50)
WEnd
EndFunc
Code : Autre1
MsgBox(0, "ça fonctionne5")
Func _Close()
Exit
EndFunc
Code : Autre1
MsgBox(0, "ça fonctionne6")
While 1
Sleep(20)
WEnd
Code : Autre1
MsgBox(0, "ça fonctionne7")


C'est bon ? Et je n'ai pas compris quelles sont les touches d'activation...c'est en clavier Qwerty ou...?
Et j'ai aussi ajouter le WinWaitActive ( je l'ai mis juste après "Dim $fov[4]" ) Et ça m'affiche un message d'erreur...: Screen: Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Merci encore ;)
 
Last edited:

Cyrion

._.
V
Ancien staff
Jul 8, 2010
2,524
2
944
www.bufferoverflow.fr
Parfois, je me demande si les gens savent lire ..

De 1- Tu n'as toujours pas changer ton pixelsearch
2- Les touches d'activation sont au début du code , soit a,z,e , Qwerty ou non , ça change rien.
3-Ton erreur, si tu sais lire , tu devrais voir que tu as mis un double quote en trop.
4-Essaie pas de coder quelque chose sans connaitre le langage, on dirait que tu fais seulement du copier/coller et que tu nous demandes de la corriger.
 

Kein34

Membre
Jan 11, 2012
79
0
572
Mais non...je vais rectifier tout ça ! ( et je pensais qu'il suffisait de mettre la ligne WinWaitActive, et la résolution ne sera pas pris en compte...)
Je n'ai pas compris le problème du doubles quot...
code source:

HotKeySet("{o}", "_Start")
HotKeySet("{b}", "_Pause")
HotKeySet("{n}", "_Close")

Func _Start()
While 1
Dim $fov[4] = [0,0, 1366,768]
"WinWaitActive ( "ROMUSTRIKE" )"
Code : Autre1
MsgBox(0, "ça fonctionne1")
$color = 0x717171
Code : Autre1
MsgBox(0, "ça fonctionne2")
$aim = PixelSearch($fov[0], $fov[1], $fov[2], $fov[3], $color)
Code : Autre1
MsgBox(0, "ça fonctionne")
If Not @error Then
MouseClick("left", $aim[0], $aim[1], 1, 0)
Code : Autre1
MsgBox(0, "ça fonctionne3")
EndIf
WEnd
EndFunc
Code : Autre1
MsgBox(0, "ça fonctionne4")
Func _Pause()
While 1
Sleep(50)
WEnd
EndFunc
Code : Autre1
MsgBox(0, "ça fonctionne5")
Func _Close()
Exit
EndFunc
Code : Autre1
MsgBox(0, "ça fonctionne6")
While 1
Sleep(20)
WEnd
Code : Autre1
MsgBox(0, "ça fonctionne7")


J'ai aussi changer les touches d'activation...Et la fenêtre Error reviens encore, je n'ai pas compris ce problème de double quot.

Merci beaucoup de votre aide...
 

Kein34

Membre
Jan 11, 2012
79
0
572
Oh Zut ! Quelle idiot je fais...
Mais une nouvelle Error est arrivé: Screen: Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Thank you Cyrion

Edit: Problème résolu ! Voila !

Je test...

---------- Message ajouté à 09h06 ---------- Le message précédent était à 08h57 ----------

Et comment voir si ça marche, sans pour autant être In-Game, car c'est dérangeant...
Et je dois appuyer sur "o" pour l'activer ?
Et dois-je faire Compil Script ?

Merci ! ça avance...

---------- Message ajouté à 12h25 ---------- Le message précédent était à 09h06 ----------

Aimbot Fini ! Grâce à la généreuse et sublime Evaelis ! Mille Merci Evaelis...

Mais il y a maintenant un gros problème: Lorsque je met la couleur jaune dans la ligne "color", et que je vais sur paint et que j'active mon Aimbot ( avec touche "o" ), le viseur se met sur la couleur Jaune et donc ça fonctionne ! C'est top !
Mas In-Game, ça ne fait pas la même chose...le viseur ne se met pas sur la couleur et la souris bouge un peu dans tous les sens...

Je pense que le problème viens du problème de la résolution du jeu...
Et j'ai donc mis le jeu en 1366x768 en fenêtre mais ça ne marche touours pas...HELP !

Merci d'avance de votre aide !
 
Last edited:

SnowShovel

Membre actif
Feb 13, 2013
170
0
221
Oh Zut ! Quelle idiot je fais...
Mais une nouvelle Error est arrivé: Screen: Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Thank you Cyrion

Edit: Problème résolu ! Voila !

Je test...

---------- Message ajouté à 09h06 ---------- Le message précédent était à 08h57 ----------

Et comment voir si ça marche, sans pour autant être In-Game, car c'est dérangeant...
Et je dois appuyer sur "o" pour l'activer ?
Et dois-je faire Compil Script ?

Merci ! ça avance...

---------- Message ajouté à 12h25 ---------- Le message précédent était à 09h06 ----------

Aimbot Fini ! Grâce à la généreuse et sublime Evaelis ! Mille Merci Evaelis...

Mais il y a maintenant un gros problème: Lorsque je met la couleur jaune dans la ligne "color", et que je vais sur paint et que j'active mon Aimbot ( avec touche "o" ), le viseur se met sur la couleur Jaune et donc ça fonctionne ! C'est top !
Mas In-Game, ça ne fait pas la même chose...le viseur ne se met pas sur la couleur et la souris bouge un peu dans tous les sens...

Je pense que le problème viens du problème de la résolution du jeu...
Et j'ai donc mis le jeu en 1366x768 en fenêtre mais ça ne marche touours pas...HELP !

Merci d'avance de votre aide !

Pour ton problème.

Dim $fov[4] = [0,0, 1077,78] a la place de 1077,78, essaye la résolution de ton écran.

Et en jeux utilise la résolution que tu utilise pour ton bureau.
 

Kein34

Membre
Jan 11, 2012
79
0
572
Oui, ça a déja éé réctifié, voila mon code source:

HotKeySet("{t}", "_Start")
HotKeySet("{v}", "_Pause")
HotKeySet("{n}", "_Close")

Func _Start()
While 1
$color = 0x070A09
$aim = PixelSearch(0,0,1366,768, $color)
If Not @error Then
If $aim <> 0 Then
MouseClick("left", $aim[0], $aim[1], 1, 0)
EndIf
EndIf
WEnd
EndFunc
Func _Pause()
While 1
Sleep(50)
WEnd
EndFunc
Func _Close()
Exit
EndFunc
While 1
Sleep(20)
WEnd
MsgBox(0, "ça fonctionne7","oui")


Mais le problem, c'est que ça marche sur Paint, mais pas sur le jeu ! Je ne sais pas comment résoudre ce problème...

Ps: IdSkype: b.s1mP
 

Cyrion

._.
V
Ancien staff
Jul 8, 2010
2,524
2
944
www.bufferoverflow.fr

Kein34

Membre
Jan 11, 2012
79
0
572
ah looooooool ! Et à propos d'Evaelis, ui, je croyais que c'était une femme mais après Skype, j'ai compris que c'est un mec xD

---------- Message ajouté à 19h15 ---------- Le message précédent était à 19h11 ----------

Et non Cyrion ! Tu ne parle pas pour rien ! xD
J'ai eu pour la première fois un message d'erreur sur le jeu: Screen: Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Après avoir fait ces modifications de WinGetHandle...

Code-source:

HotKeySet("{t}", "_Start")
HotKeySet("{v}", "_Pause")
HotKeySet("{n}", "_Close")

Func _Start()
While 1
$color = 0xE9A8A8
$aim = PixelSearch(WinGetHandle ( "[CLASS: ROMUSTRIKE]" , "INTERNET" ) )
If Not @error Then
If $aim <> 0 Then
MouseClick("left", $aim[0], $aim[1], 1, 0)
EndIf
EndIf
WEnd
EndFunc
Func _Pause()
While 1
Sleep(50)
WEnd
EndFunc
Func _Close()
Exit
EndFunc
While 1
Sleep(20)
WEnd
MsgBox(0, "ça fonctionne7","oui")


Merci encore ;) de ton aide !
 
Last edited:

Cyrion

._.
V
Ancien staff
Jul 8, 2010
2,524
2
944
www.bufferoverflow.fr
Le dernier paramètre de la fonction PixelSearch est un handle de la fenêtre où nous voulons que le pixelsearch se fasse.

WinGetHandle prend en paramètre le nom de la fenêtre et retourne le handle.
 

Kein34

Membre
Jan 11, 2012
79
0
572
Oui ! Volontiers Snow ;)

PS: Ce sera plus rapide via Skype ;)
IdSkype: b.s1mP
 

Walkun

Membre
Jun 1, 2010
10
0
566
25
Déja ce ne sont pas des MsgBox (pour le premier qui a répondu) mais des commentaires qui l'aideront à mieux lire son code.
 

ragnarock

Membre actif
Mar 22, 2010
194
0
917
les message boxes c'est pas pour comprendre le code, c'est pour vérifier la valeur des variables ou voir si le code passe bien à un endroit, dans un if par exemple (ou autre) ...
 
Status
Not open for further replies.