Eigener LvlBot

11/10/2009 15:22 davidder#1
Hi
ich wollte mal nen eigenen Farmbot scripten nach der [Only registered and activated users can see links. Click Here To Register...]
aber immer wenn ich ins spiel gehe und den HotKey drück kommt "Error in expression" hier mal der script:
Code:
HotKeySet ( "{Numpad1}" , "Start" )
HotKeySet ( "{Numpad3}" , "Ende" )
Opt('PixelCoordMode', 2)
Opt('MouseCoordMode', 2)
While (1) ;
	Sleep (200) ;
WEnd
func Start ()
	while 1
		$farbeschwarz = 0x000000
		$relog = PixelGetColor (600,35)
		If $relog = $farbeschwarz Then
			Sleep (200)
			IniWrite ("reloger.ini","auslogger","AUSGELOGGT am     "&@hour&":"&@min,"1")
			Send ("j")
			sleep (500)
			WinActivate ("METIN2")
			sleep (2000)
			MouseClick ("left"[,578,740])
			MouseClick ("left"[,830,500])
			MouseClick ("left"[,760,850])
			TrayTip ("Relogger","der bot loggt sich ein",5)
			sleep (2000)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			sleep(1000)
Send ("LOGINID",0)
Send ("{Enter}",0)
Send ("PASSWORT",0)
Send ("{Enter}",0)
sleep(10000)
mouseclick ("left" , 225 , 600)
Sleep(10000)
Send ("j")
Sleep(500)
send("{f1}")
send ("{SPACE down}")
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("{SPACE up}")
sleep(500)
send("{f1}")
elseif 
	$reborn = PixelGetColor (144,103)
	$reborn_pixel =0xC7C7C7
	$reborn = $reborn_pixel Then
	sleep(10000)
	mouseclick ("left" , 150, 100)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	sleep (10000)
send ("{numpad1}")
Else
	send("{f1}")
send ("{SPACE down}")
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("{SPACE up}")
sleep(500)
send("{f1}")
EndIf
WEnd
endfunc

Func Ende ()
Exit 
EndFunc
könnt ihr mir helfen ? :o
11/11/2009 15:17 davidder#2
natoll... danke für die antwort...
11/12/2009 17:58 davidder#3
#push
11/12/2009 18:02 hackerbym2#4
schwierig werde mal kucken aber net aufgeben
nur looser geben auf^^:D

Ich guck...
11/12/2009 18:51 davidder#5
Cool danke endlich mal jmd der sich das anschaut :D
11/14/2009 14:38 davidder#6
#push
11/14/2009 15:15 .Yazzn™#7
wie is der geproggt?
AutoIt , vb , c# , c++ , delphi oder was?
11/14/2009 15:45 *Bart*#8
hmm ich glaub er hat aufgegeben ^^ ich selbst hab danit keine ahnung
11/14/2009 17:27 davidder#9
ich geb nie auf :D
des is Autoit...
11/15/2009 10:11 .Yazzn™#10
#push
der code is lang und unübersichtlich -.-
11/15/2009 10:26 .Yazzn™#11
spam
11/15/2009 16:12 AllesVergeben#12
Code:
HotKeySet ( "{Numpad1}" , "Start" )
HotKeySet ( "{Numpad3}" , "Ende" )
Opt('PixelCoordMode', 2)
Opt('MouseCoordMode', 2)
While (1) ;
	Sleep (200) ;
WEnd
func Start ()
	while 1
		$farbeschwarz = 0x000000
		$relog = PixelGetColor (600,35)
		If $relog = $farbeschwarz Then
			Sleep (200)
			IniWrite ("reloger.ini","auslogger","AUSGELOGGT am     "&@hour&":"&@min,"1")
			Send ("j")
			sleep (500)
			WinActivate ("METIN2")
			sleep (2000)
			MouseClick ("left",578,740)
			MouseClick ("left",830,500)
			MouseClick ("left",760,850)
			TrayTip ("Relogger","der bot loggt sich ein",5)
			sleep (2000)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			Send("{BS}")
			sleep(100)
			sleep(1000)
Send ("LOGINID",0)
Send ("{Enter}",0)
Send ("PASSWORT",0)
Send ("{Enter}",0)
sleep(10000)
mouseclick ("left" , 225 , 600)
Sleep(10000)
Send ("j")
Sleep(500)
send("{f1}")
send ("{SPACE down}")
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("{SPACE up}")
sleep(500)
send("{f1}")
else
	$reborn = PixelGetColor (144,103)
	$reborn_pixel =0xC7C7C7
	If $reborn = $reborn_pixel Then
	sleep(10000)
	mouseclick ("left" , 150, 100)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	send ("{1 down}")
	sleep (100)
	send ("{1 up}")
	sleep(50)
	sleep (10000)
send ("{numpad1}")
Else
	send("{f1}")
send ("{SPACE down}")
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("y")
sleep(1000)
send ("{SPACE up}")
sleep(500)
send("{f1}")
EndIf
endif
WEnd
endfunc

Func Ende ()
Exit
EndFunc

So geht's auf jedenfall mal auf. Deine Fehler:

Du hattest mouseclick ("left", [xxx, yyy])
Es geht so: Mouseclick ("left", xxx, yyy)

2.: du hattest die If bedingung vergessen


Außerdem musst du nicht so viele ys und Zeilen haben, aber das löst du schön selber, das hilft beim lernen! ;)


mfG
11/21/2009 10:56 davidder#13
thx ich glaub jetzt müst er gehen...