Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 07:36

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Nostale Bot

Discussion on Nostale Bot within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
FizzeBu's Avatar
 
elite*gold: 6
Join Date: Mar 2010
Posts: 12,388
Received Thanks: 2,115
Nostale Bot

Hallo,

ich habe mir vorgenommen einen ganz einfachen Nostale Bot zu schreiben, den gibts schon oft, also kann er nicht so schwer sein. ich habe aber einige Probleme mit einer Funktion:
PHP Code:
    $nostalefenster WinGetHandle ("NosTale")
    
    If @
error Then
        MsgBox 
("Fehler""Nostale nicht gefunden. Der Bot wird sich jetzt schließen. Starte ihn wieder, wenn du auch Nostale gestartet hast.")
    Else
        While 
$atkv 0
            ControlSend 
("NosTale""""""{SPACE} 2")
            
ControlSend ("NosTale""""""$pickup 2")
        
WEnd    
    
EndIf 
Soo, als allererstes, passiert gar nichts wenn ich NosTale nicht offen habe und NosTale bekommt auch keine Leerstellen und Nullen von mir gesendet. Ich verstehe nicht warum
Wäre super wenn mir jemand weiterhelfen könnte
Danke schonmal im Vorraus;D
FizzeBu is offline  
Old 09/19/2010, 20:08   #2
 
elite*gold: 0
Join Date: Jul 2009
Posts: 2,241
Received Thanks: 848
Code:
    $nostalefenster = WinGetHandle ("NosTale")
    
    If @error Then
        MsgBox ("Fehler", "Nostale nicht gefunden. Der Bot wird sich jetzt schließen. Starte ihn wieder, wenn du auch Nostale gestartet hast.")
    Else
        While $atkv = 0
            ControlSend ("NosTale", "", "", "{SPACE} 2")
            ControlSend ("NosTale", "", "", "$pickup 2")
        WEnd    
    EndIf
Ich empfehle, dass der Bot wartet bis Nostale startet. Außerdem fällt mir noch auf, dass du $pickup nicht, und $atkv unzureichend definiert hast.
Und was soll "{SPACE} 2" sein? 2x Space?
(hängt davon ab, ob das dein vollständiges Script ist)

Code:
#include <Misc.au3>

If NOT WinExists("NosTale") Then WinWait("NosTale")
WinActivate("NosTale")

While 1
If _IsPressed("2D") Then   ;2D -> Einfügen
ControlSend ("NosTale", "", "", "{SPACE}" & "{SPACE}")
ControlSend ("NosTale", "", "", $pickup & $pickup)
ElseIf _IsPressed("2E") Then   ;2E -> Entfernen
Exit
EndIf
WEnd
_IsPressed fragt schlicht deine Tasta ab, ob eine Taste gedrückt wurde. Hier die Liste:
mipez is offline  
Thanks
1 User
Old 09/20/2010, 17:17   #3
 
FizzeBu's Avatar
 
elite*gold: 6
Join Date: Mar 2010
Posts: 12,388
Received Thanks: 2,115
$pickup liest aus einer inputbox ein zeichen aus, so kann man festlegen, auf welcher taste die pickup funktion ist. $atkv wird in einer anderen funktion verändert, dann soll der bot aufhören zu senden.

ich habe es mit deiner methode probiert, aber es klappt nich...
nostale ist aktiv, empfängt aber keine tasten...
naja ich werd weiter probieren


#edit: ich habs hingekriegt mit adminrechten... ohh maaan locker zwei stunden drangesessen und nach fehlern gesucht...
trozdem danke
FizzeBu is offline  
Old 09/22/2010, 20:59   #4
 
elite*gold: 0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
Falls du hilfe brauchst, kannst mich ja anschreiben
Helfe dir gerne^^
WiiZocker is offline  
Reply




All times are GMT +1. The time now is 07:36.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.