Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 23:13

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

Advertisement



FEHLER ICH FLIPPE AUS

Discussion on FEHLER ICH FLIPPE AUS within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
Defkahn52's Avatar
 
elite*gold: 8
Join Date: Aug 2009
Posts: 1,503
Received Thanks: 396
FEHLER ICH FLIPPE AUS

Hi Leute
Ich habe vor ner Zeit mit AutoIT angefangen
Ich wollte einen PickUp Bot erstellen
ABER DIESES *zensiert* PROGRAMM ZEIGT EINEN FEHLER AN
immer steh da endfunc with no matching func
was stimmt nicht?
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PickUp Bot by Defkahn52", 212, 99, 193, 125)
$Button1 = GUICtrlCreateButton("Start (F5)", 8, 16, 83, 33)
$Button2 = GUICtrlCreateButton("Pause (F6)", 112, 16, 83, 33)
$Button3 = GUICtrlCreateButton("Exit (End)", 8, 56, 83, 33)
$Button4 = GUICtrlCreateButton("THX Drücken", 112, 56, 83, 33)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			
		Case $Button1
			While(1)
				Send ("{y}")
				Sleep(100)
			WEnd
		
	Case $Button2
		$Paused = NOT $Paused 
While $Paused 
sleep(100) 
ToolTip('Script ist pausiert',0,0) 
WEnd 
ToolTip("")

			
		Case $Button3
			Exit
			

		Case $Button4
			ShellExecute ("www.youtube.de")

	EndSwitch
WEnd

	HotKeySet ( "{F5}" , Start )
	HotKeySet ( "{F6}" , Pause )
	HotKeySet ( "{End}" , End )
	
	func Start ()
		While(1)
				Send ("{y}")
				Sleep(100)
			WEnd
		EndFunc

func Pause ()
$Paused = NOT $Paused 
While $Paused 
sleep(100) 
ToolTip('Script ist pausiert',0,0) 
WEnd 
ToolTip("")

func End ()
Exit
EndFunc
Defkahn52 is offline  
Old 10/31/2010, 21:41   #2
 
elite*gold: 0
Join Date: May 2010
Posts: 585
Received Thanks: 95
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PickUp Bot by Defkahn52", 212, 99, 193, 125)
$Button1 = GUICtrlCreateButton("Start (F5)", 8, 16, 83, 33)
$Button2 = GUICtrlCreateButton("Pause (F6)", 112, 16, 83, 33)
$Button3 = GUICtrlCreateButton("Exit (End)", 8, 56, 83, 33)
$Button4 = GUICtrlCreateButton("THX Drücken", 112, 56, 83, 33)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
While(1)
Send ("{y}")
Sleep(100)
WEnd

Case $Button2
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")


Case $Button3
Exit


Case $Button4
ShellExecute ("www.youtube.de")

EndSwitch
WEnd

HotKeySet ( "{F5}" , Start )
HotKeySet ( "{F6}" , Pause )
HotKeySet ( "{End}" , End )

func Start ()
While(1)
Send ("{y}")
Sleep(100)
WEnd
EndFunc

func Pause ()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")
EndFunc <--- da fehlt das Endfunc
func End ()
Exit
EndFunc
____
So funktioniert es bei mir.
Andman is offline  
Old 10/31/2010, 21:45   #3
 
Defkahn52's Avatar
 
elite*gold: 8
Join Date: Aug 2009
Posts: 1,503
Received Thanks: 396
wow bei mir auch^^
Aber was ist anders?
Defkahn52 is offline  
Old 10/31/2010, 21:48   #4
 
elite*gold: 175
Join Date: Jun 2010
Posts: 1,332
Received Thanks: 695
Das hat er rot markiert.
Mac Tavish is offline  
Old 10/31/2010, 21:49   #5
 
elite*gold: 0
Join Date: May 2010
Posts: 585
Received Thanks: 95
Quote:
Originally Posted by Defkahn52 View Post
wow bei mir auch^^
Aber was ist anders?
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PickUp Bot by Defkahn52", 212, 99, 193, 125)
$Button1 = GUICtrlCreateButton("Start (F5)", 8, 16, 83, 33)
$Button2 = GUICtrlCreateButton("Pause (F6)", 112, 16, 83, 33)
$Button3 = GUICtrlCreateButton("Exit (End)", 8, 56, 83, 33)
$Button4 = GUICtrlCreateButton("THX Drücken", 112, 56, 83, 33)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			
		Case $Button1
			While(1)
				Send ("{y}")
				Sleep(100)
			WEnd
		
	Case $Button2
		$Paused = NOT $Paused 
While $Paused 
sleep(100) 
ToolTip('Script ist pausiert',0,0) 
WEnd 
ToolTip("")

			
		Case $Button3
			Exit
			

		Case $Button4
			ShellExecute ("www.youtube.de")

	EndSwitch
WEnd

	HotKeySet ( "{F5}" , Start )
	HotKeySet ( "{F6}" , Pause )
	HotKeySet ( "{End}" , End )
	
	func Start ()
		While(1)
				Send ("{y}")
				Sleep(100)
			WEnd
		EndFunc

func Pause ()
$Paused = NOT $Paused 
While $Paused 
sleep(100) 
ToolTip('Script ist pausiert',0,0) 
WEnd 
ToolTip("")
[COLOR="Red"]Endfunc[/COLOR]
func End ()
Exit
EndFunc
Du musst das in rot bei dir rein schreiben, oder einfach den hier kopieren und bei dir einfügen.
Andman is offline  
Old 10/31/2010, 21:49   #6
 
elite*gold: 0
Join Date: Feb 2009
Posts: 542
Received Thanks: 112
PHP Code:
#include <WindowsConstants.au3>
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 GUICreate("PickUp Bot by Defkahn52"21299193125)
$Button1 GUICtrlCreateButton("Start (F5)"8168333)
$Button2 GUICtrlCreateButton("Pause (F6)"112168333)
$Button3 GUICtrlCreateButton("Exit (End)"8568333)
$Button4 GUICtrlCreateButton("THX Drücken"112568333)
GUICtrlSetFont(-188000"MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

HotKeySet "{F5}" "Start" )
    
HotKeySet "{F6}" "Pause" )
    
HotKeySet "{End}" "_end" )


While 
1
    $nMsg 
GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit

        Case 
$Button1
            
While 1
                Send 
("{y}")
                
Sleep(100)
            
WEnd

    
Case $Button2
        $Paused 
NOT $Paused
While $Paused
sleep
(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip
("")


        Case 
$Button3
            
Exit


        Case 
$Button4
            ShellExecute 
("www.youtube.de")

    EndSwitch
WEnd



    func Start 
()
        While 
1
                Send 
("{y}")
                
Sleep(100)
            
WEnd
        EndFunc

func Pause 
()
$Paused NOT $Paused
While $Paused
sleep
(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip
("")
EndFunc

Func _end
()

Exit

EndFunc 
hab nicht alle fehler beseitigt


€ oh bin ein bischen spät ;D ihr wart schneller -.-
maxi39 is offline  
Old 10/31/2010, 21:57   #7
 
Defkahn52's Avatar
 
elite*gold: 8
Join Date: Aug 2009
Posts: 1,503
Received Thanks: 396
eine frage noch
Wieso klappen die Hotkeys bei mir nicht?
Defkahn52 is offline  
Old 10/31/2010, 22:01   #8
 
lolkop's Avatar
 
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
weil du die unter deiner hauptschleife stehen hast...
alles was darunter steht wird niemals erreicht...
lolkop is offline  
Old 10/31/2010, 22:06   #9
 
Defkahn52's Avatar
 
elite*gold: 8
Join Date: Aug 2009
Posts: 1,503
Received Thanks: 396
oh^^
achso danke
Defkahn52 is offline  
Old 10/31/2010, 22:14   #10
 
Defkahn52's Avatar
 
elite*gold: 8
Join Date: Aug 2009
Posts: 1,503
Received Thanks: 396
lol wenn ich meine hotkeys nach oben hole kommt ein fehlercode irgendwa mit f5
#include <GUIConstants.au3>


#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PickUp Bot by Defkahn52", 212, 99, 193, 125)
$Button1 = GUICtrlCreateButton("Start (F5)", 8, 16, 83, 33)
$Button2 = GUICtrlCreateButton("Pause (F6)", 112, 16, 83, 33)
$Button3 = GUICtrlCreateButton("Exit (End)", 8, 56, 83, 33)
$Button4 = GUICtrlCreateButton("THX Drücken", 112, 56, 83, 33)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Global $Paused

HotKeySet ( "{F5}" , Start )
HotKeySet ( "{F6}" , Pause )
HotKeySet ( "{End}" , End )

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
While(1)
Send ("{y}")
Sleep(100)
WEnd

Case $Button2
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")


Case $Button3
Exit


Case $Button4
ShellExecute ("www.youtube.de")

EndSwitch
WEnd


func Start ()
While(1)
Send ("{y}")
Sleep(100)
WEnd
EndFunc

func Pause ()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")
EndFunc

func End ()
Exit
EndFunc
Defkahn52 is offline  
Old 10/31/2010, 22:41   #11
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
schau dir ambesten nochmal(!?!) die tut´s 1-4 an...

Code:
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PickUp Bot by Defkahn52", 212, 99, 193, 125)
$Button1 = GUICtrlCreateButton("Start (F5)", 8, 16, 83, 33)
$Button2 = GUICtrlCreateButton("Pause (F6)", 112, 16, 83, 33)
$Button3 = GUICtrlCreateButton("Exit (End)", 8, 56, 83, 33)
$Button4 = GUICtrlCreateButton("THX Drücken", 112, 56, 83, 33)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Global $Paused

HotKeySet ( "{F5}" , [COLOR="Red"]"[/COLOR]Start [COLOR="Red"]"[/COLOR])
HotKeySet ( "{F6}" ,  [COLOR="Red"]"[/COLOR]Pause [COLOR="Red"]"[/COLOR] )
HotKeySet ( "{End}" ,  [COLOR="Red"]"[/COLOR]End [COLOR="Red"]"[/COLOR])

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit

Case $Button1
While(1)
Send ("{y}")
Sleep(100)
WEnd

Case $Button2
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")


Case $Button3
Exit


Case $Button4
ShellExecute ("www.youtube.de")

EndSwitch
WEnd


func Start ()
While(1)
Send ("{y}")
Sleep(100)
WEnd
EndFunc

func Pause ()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")
EndFunc

func End ()
Exit
EndFunc
omer36 is offline  
Old 10/31/2010, 22:47   #12
 
elite*gold: 0
Join Date: Feb 2009
Posts: 542
Received Thanks: 112
und gewöhn dir
Quote:
While(1)
ab, mach
Quote:
while 1
maxi39 is offline  
Old 11/01/2010, 13:25   #13
 
Shadow992's Avatar
 
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,878
Quote:
Originally Posted by maxi39 View Post
und gewöhn dir ab, mach
Warum sollte er sich das abgewöhnen?
Wenn man mit Hochsprachen programmiert, dann muss man auch meistens
While (1) benutzen, von daher versteh ich nicht warum er es anders machen sollte.
Shadow992 is offline  
Old 11/01/2010, 13:57   #14
 
lolkop's Avatar
 
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
Quote:
Originally Posted by Shadow992 View Post
Warum sollte er sich das abgewöhnen?
Wenn man mit Hochsprachen programmiert, dann muss man auch meistens
While (1) benutzen, von daher versteh ich nicht warum er es anders machen sollte.
wenn man eine sprache nutzt, egal welche, dann sollte man sie auch mit der zugehörigen syntax nutzen...

wenn du in c++, java, ... schreibst i=i+1; oder i+=1; werden dir auch sofort 1000 leute antworten, dass du dir angewöhnen solltest i++; zu nutzen...
lolkop is offline  
Thanks
1 User
Reply


Similar Threads Similar Threads
[FEHLER] Eigener Server Fehler ...
05/18/2012 - Metin2 Private Server - 7 Replies
Hi Com, seit ein paar tagen hab ich einen fehler beim VirutalPC meines eigenen servers. Wenn ich den server starten will, also ./start eingebe kommt ununterbrochen diese meldung mv:rename cores/core 2 to cores/core 1: No such file or directory... Hab schon den server nochmal neu aufgesetzt und alles versucht...klappt aber net ! Vllt liegts daran dass ich vor ein paar tagen (als der des letzte mal funktionierte) im roten reich noch ca. 200 extra npc´s gespawnt hab :D Manche sagen...
[Ärgerlich] fehler über fehler.. xD wtf
05/18/2012 - Metin2 Private Server - 14 Replies
Guten abend .^^ so da bei mir die npc's nicht mehr gingen, kompletten "hongkong" ordner neu gemacht in filezilla.. mit den quest dateien usw von Momo.^^ Joa jetzt erst das.. : myimg.de - kostenloses Bilderhosting Dann kommen 8 timed out (normaler weise server gestartet). Bleibt dann bei "Du wirst verbunden" hängen.. so der hängt da ungefähr 3 min.. Dann gehts los: Als erstes : Connection refused -> Networt unreachable und zu guter letzt der gehasste core fehler :rtfm::mad: Soviele Fehler...
*fehler* mc.exe - kein Datenträger *fehler*
10/16/2010 - Metin2 Private Server - 11 Replies
hii com. seid. 2 stunden taucht bei mir immer wieder dieser fehler: mc.exe - kein Datenträger. Es befindet sich kein Datenträger im Laufwerk. Legen Sie einen Datenträger in Laufwerk \Device\Harddisk\DR1 ein. wann kommt der fehler ?!
Wo ist der Fehler???
07/27/2010 - Metin2 Private Server - 0 Replies
Kurz und knapp: Wo ist der Fehler? Bin auf 85, versuche es auf 86 und auch auf 84, aber die Quest funkt nicht >.< Ich habe die richtig implementiert, daran liegts nicht...
[Hilfe]DB fehler und char fehler
07/25/2010 - Metin2 Private Server - 3 Replies
hallo ich habe die SF von bjoern.ebert17 folgende fehler : 1 ich kann keinen account erstellen bei Player wenn ich AccountID eingeben will kann ich das nicht kann nur zahlen eingeben wie kann ich einen account erstellen? 2 auf dem account von bjoern.ebert17 kann ich keinen char erstellen zb ich will einen char machen namens hallo = Du kannst diesen Charakter nicht erstellen oder so was kann ich dagegen tun ( egal ob ich Test oder so nehme kein name tut) Bitte um schnelle hilfe



All times are GMT +1. The time now is 23:14.


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.