Was ist bitteschön an dem script falsch ??

04/29/2011 23:07 clemgregor#1
sagt mir psls was an dem script falsch ist :rolleyes: und wenn möglich pstet das script richtig denn das wird nähmlich ein antwortbot für metin2

Code:
#include <Array.au3>
HotkeySet ( "{F5}" , "Start")
HotkeySet ( "{F7}" , "Ende")

global $zufall
global $text[4]

$text[1]= "Sry kz probier grade GAAANZ viele muscheln zu fangen xD {ENTER}"

$text[2]= "Man warum fange ich keine muscheln ?{ENTER}" 

$text[3]= "Immer schreiben mich iwelche noobs an die was von mir wollen omg{ENTER}"

 
while 1
	sleep(500)
Wend

func start ()
	while 2
	$zufall = random (1,3)
	if PixelGetcolor( 968 , 223 )=0xFFFBFF then
		mouseclick("primary" ,968 , 223 ,1) 
		send($text[$zufall])
	if PixelGetcolor(263 , 18)=	0xFFFBFF then
		 mouseclick("primary" ,261 , 18 ,1) 
		if else PixelGetcolor(293 , 49)=0xFFFBFF then
			 mouseclick("primary" ,293 , 49 ,1) 
			 if else PixelGetcolor(323 , 78)=0xFFFBFF then
			 mouseclick("primary" ,323 , 78 ,1) 
			 if else Pixelgetcolor(354, 110)=0xFFFBFF Then
				 mouseclick("primary" , 354, 110, 1)
				 if else Pixelgetcolor(354, 110)=0xFFFBFF Then
					 mouseclick("primary" , 354, 110, 1)
				ElseIf
				 
Wend
	Else
		sleep (100)
	Endif

EndFunc


func Ende()
	exit
EndFunc
04/30/2011 02:11 Ludder231#2
Ich bin gerade mit meinem Dsi on und kann das nicht so interpretieren, aber was geht überhaupt an deinem script niicht?

2. oben bei dem random(1,3) vllt. muss da random($text[1], $text[3])

werde mir das aber morgen am pc nomma durchlesen
04/30/2011 09:36 clemgregor#3
ok thx
PS: der script läst sich net starten es kommt immer : C:\Users\Desktop\Metin2 hack.au3 (37) : ==> "Wend" statement with no matching "While" statement.:
Wend
04/30/2011 10:19 Ludder231#4
Also da ich nicht so daer profi bin weiß iuch nicht ob es so klappt..

PHP Code:
#include <Array.au3>
HotkeySet ( "{F5}" , "Start")
HotkeySet ( "{F7}" , "Ende")

global $zufall
global $text[4]

$text[0]= "Sry kz probier grade GAAANZ viele muscheln zu fangen xD {ENTER}"

$text[1]= "Man warum fange ich keine muscheln ?{ENTER}" 

$text[2]= "Immer schreiben mich iwelche noobs an die was von mir wollen omg{ENTER}"

 
while 1
    sleep(500)
Wend

func start ()
    while 1
    $zufall = random ($text[0],$text[2])
    if PixelGetcolor( 968 , 223 )=0xFFFBFF then
        mouseclick("primary" ,968 , 223 ,1) 
        send($text[$zufall])
        endif
    if PixelGetcolor(263 , 18)=    0xFFFBFF then
         mouseclick("primary" ,261 , 18 ,1) 
         endif
         if PixelGetcolor(293 , 49)=0xFFFBFF then
             mouseclick("primary" ,293 , 49 ,1)
             endif
              if PixelGetcolor(323 , 78)=0xFFFBFF then
             mouseclick("primary" ,323 , 78 ,1) 
             endif
              if Pixelgetcolor(354, 110)=0xFFFBFF Then
                 mouseclick("primary" , 354, 110, 1)
                 endif
                 if Pixelgetcolor(354, 110)=0xFFFBFF Then
                     mouseclick("primary" , 354, 110, 1)
                     
                
    Else
        sleep (100)
    Endif
    wend
EndFunc


func Ende()
    exit
EndFunc 
04/30/2011 10:26 BlackHybrid#5
Das mit dem Random war schon richtig so, da er sich eine zufällige Zahl raussucht und und ins Array setzt. Wenns für die Offi Server ist klappts nicht, weil die Befehle wie Send etc. geblockt werden.
04/30/2011 12:01 Ludder231#6
Aso ok, aber das mit dem if undso das ging ja nicht...
04/30/2011 12:25 ZeraPain#7
basics lernen..
kann ja nicht funktionieren wie du das gemacht hast.

PHP Code:
HotKeySet("{F5}", "_start")
HotKeySet("{F7}", "_exit")

Dim $text[3]
$text[0] = "Sry kz probier grade GAAANZ viele muscheln zu fangen xD {ENTER}"
$text[1] = "Man warum fange ich keine muscheln ?{ENTER}"
$text[2] = "Immer schreiben mich iwelche noobs an die was von mir wollen omg{ENTER}"

Dim $array[5][2] = [[968, 223],[263, 18],[293, 49],[323, 78],[354, 110]]

Func _start()
    While 1
        $zufall = Random(0, 2)
        For $i = 0 To 4
            If PixelGetColor($array[$i][0], $array[$i][1]) = 0xFFFBFF Then
                MouseClick("left", $array[$i][0], $array[$i][1], 1)
                Send($text[$zufall])
            EndIf
        Next
        Sleep(100)
    WEnd
EndFunc   ;==>_start

Func _exit()
    Exit
EndFunc   ;==>_exit

While 1
    Sleep(100)
WEnd