Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 14:30

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

Advertisement



Bot problem

Discussion on Bot problem within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 22
Join Date: Nov 2009
Posts: 394
Received Thanks: 47
Bot problem

hab n problem mit meinem Bot wenn ich auf der 2. seite (Tabelsheet2) daten ins input eingebe und auf speichern klicke kommt fehlermeldung Error parenig functional call oder so hier die souce


Help pls
*Bart* is offline  
Old 03/16/2010, 18:36   #2
 
elite*gold: 0
Join Date: Oct 2009
Posts: 141
Received Thanks: 26
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 GUICreate("Multibot"245433224140)
GUISetIcon("D:\005.ico")
$Tab1 GUICtrlCreateTab(88233233)
GUICtrlSetResizing(-1$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 GUICtrlCreateTabItem("Infos")
$Label1 GUICtrlCreateLabel("Multibot"64406928)
GUICtrlSetFont(-1154000"MS Sans Serif")
$Label2 GUICtrlCreateLabel("Hotkeys:"16724617)
$Label3 GUICtrlCreateLabel("Num 1 = Einloggen"16969417)
$Label4 GUICtrlCreateLabel("Num 2 = Ausloggen"161209717)
$Label5 GUICtrlCreateLabel("Num 3 = Char wechseln"1614411717)
$Label6 GUICtrlCreateLabel("Num 4 = Hide Bot"161688817)
$Label7 GUICtrlCreateLabel("Num 5 = Show Bot"161929317)
$Label8 GUICtrlCreateLabel("Num 6 = Exit Bot"162168317)
$Button2 GUICtrlCreateButton("Metin starten"1528081330)
$Button3 GUICtrlCreateButton("Hide Bot"15212881330)
$Button4 GUICtrlCreateButton("Exit Bot"15217681330)

$TabSheet2 GUICtrlCreateTabItem("Einlogger")    
$id GUICtrlCreateInput(Iniread(@Scriptdir "\Speicher.ini""Input""Wert""" ), 404011321)
$pw GUICtrlCreateInput(Iniread(@Scriptdir "\Speicher.ini""Input2""Wert""" ), 407211321)
$id2 GUICtrlCreateInput(Iniread(@Scriptdir "\Speicher.ini""Input3""Wert""" ), 4010411321)
$pw3 GUICtrlCreateInput(Iniread(@Scriptdir "\Speicher.ini""Input4""Wert""" ), 4013611321)
$Button1 GUICtrlCreateButton("Speichern"16013673250)   

$Label9 GUICtrlCreateLabel("1."16401317)
$Label10 GUICtrlCreateLabel("2."161041317)
$Label11 GUICtrlCreateLabel("Id, pw eingeben dann auf Speichern klicken"1616821317)
$Label13 GUICtrlCreateLabel("In metin ins Id Fenster klicken"1618414417)
$Label14 GUICtrlCreateLabel("und Num. 1 drücken für ersten einlogger"1620019417)
$Label15 GUICtrlCreateLabel("Num 2 für 2. einlogger"1621610817)
GUICtrlCreateTabItem("")
$Pic1 GUICtrlCreatePic("C:\Users\321\Desktop\2205.ico.jpg"16248217145BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Label12 GUICtrlCreateLabel("mady by *Bart* on Elitepvpers.com"6440016617)
GUICtrlSetFont(-114000"MS Sans Serif")
GUICtrlSetColor(-10x646464)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

HotKeySet ("{NUMPAD5}""start")
HotKeySet ("{NUMPAD6}""start1")
HotKeySet ("{NUMPAD4}""start2")
HotKeySet ("{NUMPAD3}""start3")
HotKeySet ("{NUMPAD1}""start4")
HotKeySet ("{NUMPAD7}""start5")
HotKeySet ("{NUMPAD2}""start6")

Func start()
WinSetState ("Multibot""", @SW_hide)
EndFunc

Func start1
()
WinSetState ("Multibot""", @SW_show)
EndFunc

Func start2
()
Send ("{Enter}")
Send("/Phase_select")
Send ("{Enter}")
Send ("{Enter}")
EndFunc

Func start3
()
Send ("{Enter}")
Send("/logout")
Send ("{Enter}")
Send ("{Enter}")
EndFunc

Func start4
()
Send (GUICtrlRead ($id))
Send ("{Enter}")
Send (GUICtrlRead ($pw))
Send ("{Enter}")
EndFunc

Func start6
()
Send (GUICtrlRead ($id2))
Send ("{Enter}")
Send (GUICtrlRead ($pw3))
Send ("{Enter}")
EndFunc

Func start5
()
Exit
EndFunc

While 1
    $nMsg 
GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit
        Case 
$Button1
            $read1 
GUICtrlRead($id)
            
$read2 GUICtrlRead($pw)
            
$read3 GUICtrlRead($id2)
            
$read4 GUICtrlRead($pw3)
        
            
IniWrite(@ScriptDir "\Speicher.ini""Input""Wert",$read1)
            
IniWrite(@ScriptDir "\Speicher.ini""Input2""Wert",$read2)
            
IniWrite(@ScriptDir "\Speicher.ini""Input3""Wert",$read3)
            
IniWrite(@ScriptDir "\Speicher.ini""Input4""Wert",$read4)
        Case 
$Button3
            WinSetState 
("Multibot""", @SW_hide)
        Case 
$Button4
            
Exit
        Case 
$Button2
            Run 
("C:\Program Files\Metin2\Metin2")
    EndSwitch

Wend 
So gehts 100 % jedenfalls bei mir
-MARKS- is offline  
Thanks
1 User
Reply


Similar Threads Similar Threads
Having problem Wierd problem with [GUIDE-DETIALED] How to setup a server!
02/10/2010 - EO PServer Hosting - 1 Replies
Hellow, I just used this guide, to set up an EO private server. Everything is correct, but my AccountServer Keeps bugging. Can someOne help me ( via TeamViewer, .. ) ? Thnx, Greets Joris
[Problem] Problem with server starting - cannot find quest index for PaxHeader
12/22/2009 - Metin2 Private Server - 1 Replies
Hello! I have this same problem as here when i'm starting my server: http://www.elitepvpers.com/forum/metin2-pserver-di scussions-questions/307143-metin2-serverfiles-ques t-index-fehler.html But I didn't know the answer.. how to repair this? Greetings



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


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.