beetletun levelbot

02/21/2009 13:58 Psychopath1991#1
ich bin am proggen eines levelbots für das gebiet beetletun soll folgender masen ablaufen mein char +2 helden gehen in das gebiet die helden killen die mops und mein char levelt wenn ich die momentanen probleme gelöst habe soll er noch einsammeln usw bin halt noch ein kompletter vollnoob am proggen und wollte mal fragen ob sich einer meine source mal anschauen kann^^
(hab mich etwas am levelbot für das tut orientiert)


Func _start
If CheckArea(20264, -12502) Then
PrepMoveTo()
MoveTo(1, 20223.50390625, -12435.408203125)
StopMoveTo()
RandomSleep(9000, 9100)
PrepMoveTo()
MoveTo(1, 21050.439453125, -11658.380859375)
StopMoveTo()
RandomSleep(9000, 9100
PrepMoveTo()
MoveTo(1, 22259.404296875, -11695.8251953125)
StopMoveTo()
RandomSleep(9000, 9100
PrepMoveTo()
MoveTo(1, -13620.9814453125, 15510.4169921875)
StopMoveTo()
Sleep(9000, 9100


Send("{enter}")
Send("/")
Send("r")
Send("e")
Send("s")
Send("i")
Send("g")
Send("n")
Send("{enter}")

Sleep("9000")

MouseClick("Left", 507, 411) sign()
RandomSleep(500, 510)
ControlClick("Guild Wars","","","left",1,500, 389)
RandomSleep(8000, 8100)

EndIf
EndFunc
02/21/2009 14:05 NBA#2
code bitte in [code] sowie [/code.] (ohne . )
02/21/2009 14:12 kknb#3
wenn du den ganzen spass jetzt noch in eine schleife verpackst macht der das sogar mehr wie einmal, send noch gegen controlsend oder keysend aus der tt6 tauschen dann läufts sogar im hintergrund. ansonsten versteh ich den sinn deines posts nicht.
02/21/2009 14:24 xSharkoonX#4
Quote:
Originally Posted by NBA View Post
code bitte in [code] sowie [/code.] (ohne . )
/ot
lol eine sehr sehr schlaue antwort !
als ob du bei dem kleinen code keine übersicht hast lol
\ot

b2t:
also dein code sieht sehr simpel aus
Sleep("9000") wenn du daraus sleep(random(9000,9010)) machst hast du schonmal mehr zufälle in deinem bot^^

ich empfehle dir deinen ganzen bot oder große teile mal rein zustellen denn

MouseClick("Left", 507, 411) sign()

müsste eig

MouseClick("Left", 507, 411)
sign()

sein oder?


Sleep(9000, 9100

dann so --> Sleep(random(9000,9100))

mfg
sharkoon
02/21/2009 16:01 Psychopath1991#5
ok ich habs jetz folgender masen geändert

Func _start
If CheckArea(20264, -12502) Then
PrepMoveTo()
MoveTo(1, 20223.50390625, -12435.408203125)
StopMoveTo()
Sleep(random(9000,9100))
PrepMoveTo()
MoveTo(1, 21050.439453125, -11658.380859375)
StopMoveTo()
Sleep(random(9000,9100))
PrepMoveTo()
MoveTo(1, 22259.404296875, -11695.8251953125)
StopMoveTo()
Sleep(random(9000,9100))
PrepMoveTo()
MoveTo(1, -13620.9814453125, 15510.4169921875)
StopMoveTo()
Sleep(random(9000,9100))


Send("{enter}")
Send("/")
Send("r")
Send("e")
Send("s")
Send("i")
Send("g")
Send("n")
Send("{enter}")

Sleep("9000")

MouseClick("Left", 507, 411)
sign()
RandomSleep(500, 510)
ControlClick("Guild Wars","","","left",1,500, 389)
RandomSleep(8000, 8100)

EndIf
EndFunc


leider kommt immer nach dem compilen und öffnen der datei der fehler

Line -1:

Error: Badly formatted "Func" statement
02/21/2009 16:22 N.E.O.#6
Func _start()
02/21/2009 17:35 Psychopath1991#7
mh das hab ich behoben allerdings lässt sich das ganze noch nicht starten wie kann ich hier im forum was hochladen? dann lad ich mal alles hoch was ich hab
02/21/2009 17:49 NBA#8
Nunja als .rar oder .zip archiv....so gesehen hätte ich den FTP auf dem ich das als exe hochladen würde aber...siehe sig...

(erweitert, anhänge, anhänge reinstellen)
02/21/2009 17:49 bunney#9
while 1
_sart()
wend
02/21/2009 18:28 Psychopath1991#10
ok also zumindest kommt jetz keine fehlermeldung mehr aber ich weiß nich wie ich ihn zum laufen bringe^^


hier der scan xD hab nich gleich gesehen wie das geht^^

Antivir: Nothing found
ArcaVir: Nothing found
Avast: Nothing found
AVG: Nothing found
BitDefender: Nothing found
F-Prot: Nothing found
Norman: Nothing found
Rising: Nothing found
VirusBlokAda32: Nothing found
VirusBuster: Nothing found
02/22/2009 12:06 aLasca#11
Quote:
Originally Posted by Psychopath1991 View Post
ok also zumindest kommt jetz keine fehlermeldung mehr aber ich weiß nich wie ich ihn zum laufen bringe^^


hier der scan xD hab nich gleich gesehen wie das geht^^

Antivir: Nothing found
ArcaVir: Nothing found
Avast: Nothing found
AVG: Nothing found
BitDefender: Nothing found
F-Prot: Nothing found
Norman: Nothing found
Rising: Nothing found
VirusBlokAda32: Nothing found
VirusBuster: Nothing found
So geht bei mir alles:

PHP Code:
Opt("SendKeyDelay"100)
Opt("SendKeyDownDelay"100)

Func _start()

    If 
CheckArea(20264, -12502Then
        PrepMoveTo
()
        
MoveTo(120223.50390625, -12435.408203125)
        
StopMoveTo()
        
Sleep(Random(90009100))
        
PrepMoveTo()
        
MoveTo(121050.439453125, -11658.380859375)
        
StopMoveTo()
        
Sleep(Random(90009100))
        
PrepMoveTo()
        
MoveTo(122259.404296875, -11695.8251953125)
        
StopMoveTo()
        
Sleep(Random(90009100))
        
PrepMoveTo()
        
MoveTo(1, -13620.981445312515510.4169921875)
        
StopMoveTo()
        
Sleep(Random(90009100))
    EndIf


    
Send("{enter}")
    
Send("resign")
    
Send("{enter}")

    
Sleep(9000)

    
MouseClick("Left"507411)
    
sign()
    
RandomSleep(500510)
    
ControlClick("Guild Wars""""""left"1500389)
    
RandomSleep(80008100)
EndFunc   ;==>_start

While True
    _start
()
WEnd 
02/22/2009 12:44 Psychopath1991#12
Mh habs ausprobiert aber jetz zeigt er in zeile -1 einen fehler an

Opt("SendKeyDelay", 100)
Opt("SendKeyDownDelay", 100)

kannst du mir mal sagen für was die zeilen gut sind? sagt mir nämlich ganix^^
02/22/2009 12:58 Illuminatus#13
Quote:
Originally Posted by Psychopath1991 View Post
Mh habs ausprobiert aber jetz zeigt er in zeile -1 einen fehler an

Opt("SendKeyDelay", 100)
Opt("SendKeyDownDelay", 100)

kannst du mir mal sagen für was die zeilen gut sind? sagt mir nämlich ganix^^
Da der Psychopath sich hier für alle posts bedankt will ich auchn THX :-)

Zu deiner Frage: :rtfm:

Code Tags werden übrigens sowas von overrated...
02/22/2009 13:05 N.E.O.#14
Quote:
Originally Posted by Psychopath1991 View Post
Mh habs ausprobiert aber jetz zeigt er in zeile -1 einen fehler an

Opt("SendKeyDelay", 100)
Opt("SendKeyDownDelay", 100)

kannst du mir mal sagen für was die zeilen gut sind? sagt mir nämlich ganix^^
TT6.au3 + TT6.ini in den Scriptordner schieben.

Wie schnell eine Taste gesendet werden soll, die Abstände dazwischen.
02/22/2009 13:29 Psychopath1991#15
ich bedank mich für alles was mich weiterbringt allerdings bin ich noch keinen meter weiter selbst wenn ich das von alasca kopiere kommt immernoch in zeile -1 der fehler das es ne unbekannte funktion is