Register for your free account! | Forgot your password?

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

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

Advertisement



Was ist bitteschön an dem script falsch ??

Discussion on Was ist bitteschön an dem script falsch ?? within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 75
Join Date: Oct 2010
Posts: 588
Received Thanks: 66
Question Was ist bitteschön an dem script falsch ??

sagt mir psls was an dem script falsch ist 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
clemgregor is offline  
Old 04/30/2011, 02:11   #2
 
Ludder231's Avatar
 
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
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
Ludder231 is offline  
Old 04/30/2011, 09:36   #3
 
elite*gold: 75
Join Date: Oct 2010
Posts: 588
Received Thanks: 66
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
clemgregor is offline  
Old 04/30/2011, 10:19   #4
 
Ludder231's Avatar
 
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
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 
PixelGetcolor968 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(354110)=0xFFFBFF Then
                 mouseclick
("primary" 3541101)
                 endif
                 if 
Pixelgetcolor(354110)=0xFFFBFF Then
                     mouseclick
("primary" 3541101)
                     
                
    Else
        
sleep (100)
    Endif
    
wend
EndFunc


func Ende
()
    exit
EndFunc 
Ludder231 is offline  
Old 04/30/2011, 10:26   #5
 
BlackHybrid's Avatar
 
elite*gold: 52
The Black Market: 101/0/0
Join Date: Oct 2010
Posts: 1,998
Received Thanks: 389
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.
BlackHybrid is offline  
Old 04/30/2011, 12:01   #6
 
Ludder231's Avatar
 
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
Aso ok, aber das mit dem if undso das ging ja nicht...
Ludder231 is offline  
Old 04/30/2011, 12:25   #7
 
ZeraPain's Avatar
 
elite*gold: 0
Join Date: Jan 2010
Posts: 360
Received Thanks: 249
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] = [[968223],[26318],[29349],[32378],[354110]]

Func _start()
    While 
1
        $zufall 
Random(02)
        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 
ZeraPain is offline  
Reply

Tags
script autoit bot


Similar Threads Similar Threads
Quest Script - was falsch?
10/31/2010 - Metin2 Private Server - 10 Replies
Hier das Script. quest siegerurkunde begin state start begin when 20020.chat."Urkunde kaufen" begin npc.open_shop(110) say ("Du kannst nun Siegerurkunden kaufen.") end
Was hab ich am Script falsch gemacht??
02/27/2010 - AutoIt - 2 Replies
Hallo erstmal also, ich bin ein echter anfänger in autoit und deshalb frage ich euch was habe ich an meinem script falsch gemacht??? Es sollte ein "Windows Titel" änderer werden. xD (Gramatik auch schlecht) Schaut euch mal meinen script an: GuiCreate("Windows Titel Changer",328,184,347,383) $button1=GuiCtrlCreateButton("Change it",53,83,215,50) $input1=GuiCtrlCreateInput("Titel bereits",36,17,249,20) $input2=GuiCtrlCreateInput("Titel der sein soll",36,49,249,20)...
Mein Script? Was ist da Falsch?
10/01/2009 - AutoIt - 4 Replies
Schaut euch mal bitte ein teil meines Script an ControlMove ("S4 Client",402, 548 ,500) Sleep (1000) ControlClick ("left" ,"S4 Client", 402 ,548) Mit meinem Script möchte ich also bestimmte mausklicks an das spiel senden also das das spiel dann im hintergrund läuft und ich im vordergrund surfen usw. kann. Jedoch erscheint folgender Fehler beim ausführen des scripts (siehe anhang^^)
Was bitteschön ist das[Sehr wichtig]
06/22/2009 - Metin2 Private Server - 4 Replies
Ich dachte mir wie ich vllt. Longjuyt2 auf Deutsch bringe. Hab die EXE von 2007 da reingepackt, geöffnet und es hat gepatcht. Dann kam das: http://s10.directupload.net/images/090622/qsp5nxv y.jpg k, hab auf Start oder so gedrückt: http://s6b.directupload.net/images/090622/al4hz22 j.png 6 Server? Dann bin ich mal auf's erste gegangen und es kam das: http://s7b.directupload.net/images/090622/p9scdj7 2.png



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


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.