4Story Bot [EXCLUSIVE FEATURE]

~~Mattthias~~ · 02/23/2010, 13:21

<--4Story Bot V1.01-->
DIESE VERSION WURDE ÜBERARBEITET; ES WAR FRÜHER 1.0; JETZT IST AUTOLOGIN WIEDER FUNKTIONSTÜCHTIG!!!

TUT MIR AUFRICHTIG LEID; DER BOT FUNKTIONIERT GRADE NICHT; WERDE DAS PROBLEM SCHNELLSTMÖGLICH FIXXEN!!!
<--Includes:-->

Auto Log-In;
Auto Leveling (Bot halt)

Video zum Design+Tutorial

<--Noch in Bearbeitung-->

Hilfe (Anleitung <--Im Bot)
About (Verschiedene Sachen)
Skills (Fertigkeiten)

<--Tutorial-->

Enthalten in der Datei, unter dem Ordnernamen "TuTorial Hack", !!!BITTE!!! Lest sie euch durch, !!!BITTE!!!, das vermeidet die meisten eurer Fragen!!!!

<--Thesen von wegen "KeyLogger"-->

Unten steht der Quellcode!

<--Wozu brauch man nen "Auto-Log-In"-->

Naja, es ist einfach lustig!!!
Ihr startet den Bot, klickt auf "Auto Log In" nachdem ihr einstellungen vorgenommen habt, und könnt kurz fuddern gehen, für 2 Mins, und seit schon online!!!

<--Hier meine Hater, der Quellcode von Meinem BOT:-->

Code:

#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\matthias\desktop\ordner\autoit-forms\formbotnewest.kxf $Bot = GUICreate("4Story Easy Bot V1.0", 817, 489, 205, 118) $Label1 = GUICtrlCreateLabel("Easy Bot made by EliteMattthias + AltaIchHacke", 44, 16, 733, 41) GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x800000) $About = GUICtrlCreateButton("About", 0, 464, 65, 25, $WS_GROUP) GUICtrlSetState(-1, $GUI_DISABLE) $Hilfe = GUICtrlCreateButton("Hilfe", 64, 464, 75, 25, $WS_GROUP) GUICtrlSetState(-1, $GUI_DISABLE) $Label4 = GUICtrlCreateLabel("Auto Log In", 96, 84, 135, 33) GUICtrlSetFont(-1, 18, 800, 4, "MS Sans Serif") $ID = GUICtrlCreateLabel(" ID :", 16, 144, 41, 28) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $IDInput = GUICtrlCreateInput("", 88, 140, 153, 32) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") GUICtrlSetState(-1, $GUI_DISABLE) $PW = GUICtrlCreateLabel("PW :", 16, 184, 48, 28) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $PWInput = GUICtrlCreateInput("", 88, 180, 153, 32) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") GUICtrlSetState(-1, $GUI_DISABLE) $Start = GUICtrlCreateButton("Starte 4Story", 104, 368, 125, 33, $WS_GROUP) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("4Story Bot", 324, 84, 124, 33) GUICtrlSetFont(-1, 18, 800, 4, "MS Sans Serif") $Label3 = GUICtrlCreateLabel("Normaler Angriff :", 324, 144, 168, 28) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $AngriffNormal = GUICtrlCreateInput("", 504, 140, 29, 32) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") GUICtrlSetState(-1, $GUI_DISABLE) $BotOnly = GUICtrlCreateCheckbox("Aus / An", 556, 148, 105, 17) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Label5 = GUICtrlCreateLabel("Skills:", 324, 180, 58, 28) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Skill1 = GUICtrlCreateInput("", 504, 180, 29, 32) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") GUICtrlSetState(-1, $GUI_DISABLE) $Skill1too = GUICtrlCreateCheckbox("Aus / An", 556, 188, 105, 21) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") GUICtrlSetState(-1, $GUI_DISABLE) $Label6 = GUICtrlCreateLabel("1 :", 464, 180, 27, 28) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $BotStart = GUICtrlCreateButton("Starte Bot", 464, 368, 121, 33, $WS_GROUP) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Zeit = GUICtrlCreateButton("Zeit-Einstellungen", 464, 252, 183, 33, $WS_GROUP) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Label7 = GUICtrlCreateLabel("Bitte erst die Hilfe lesen, dann benutzen!!!", 148, 420, 489, 33) GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif") $StartZeit = GUICtrlCreateButton("Zeit-Einstellungen", 80, 252, 177, 33, $WS_GROUP) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Kill = GUICtrlCreateButton("Zeit zum Killen", 464, 284, 185, 33, $WS_GROUP) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $SkillDown = GUICtrlCreateButton("Skill Cooldown", 464, 316, 185, 37, $WS_GROUP) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") GUICtrlSetState(-1, $GUI_DISABLE) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $NMSG=GUIGETMSG() Switch $NMSG Case $GUI_EVENT_CLOSE Exit Case $BotOnly If BitAND(GUICtrlRead($BotOnly),$GUI_CHECKED)Then GUICtrlSetState($AngriffNormal,$GUI_ENABLE) Else GUICtrlSetState($AngriffNormal,$GUI_DISABLE) EndIf Case $Skill1too If BitAND(GUICtrlRead($Skill1too),$GUI_CHECKED)Then GUICtrlSetState($Skill1,$GUI_ENABLE) Else GUICtrlSetState ($Skill1,$GUI_DISABLE) EndIf Case $Zeit $Zeit=InputBox("Zeit Angabe","Gebe hier ein, wieviel Zeit vergehen soll, bis der Bot das nächste Monster auswählt!"&@CRLF&"(Gib es in Sekunden ein!)") Case $StartZeit $StartZeit=InputBox("Log-In Screen","Gebe hier ein, wieviel Zeit vergeht, nachdem du 4Story gestartet hast, bis der Log-In Bildschirm erscheint"&@CRLF&"(Gib es in Sekunden ein!)") Case $Start $IDInput=GUICtrlRead($IDInput) $PWInput=GUICtrlRead($PWInput) $ID=IniRead("C:\Programme\GF4D\4Story\Log-In Daten.ini","Log-In ID","DeineID","") $PW=IniRead("C:\Programme\GF4D\4Story\Log-In Daten.ini","Log-In PW","DeinPW","") Run("C:\Programme\GF4D\4Story\4Story.exe") WinWaitActive("4story") Sleep("2000") Send("{ENTER}") WinWaitActive("4Story") WinWaitActive("4Story") Sleep($StartZeit*1000) Send($ID) Send("{TAB}") Send($PW) Send("{ENTER}") Sleep(5000) Send("{ENTER}") Sleep(5000) Send("{ENTER}") Case $Kill $Kill=InputBox("Zeit die Gebraucht wird um Monster zu töten.","Gebe hier ein, wieviel Zeit vergehen soll, bis du das Monster getötet hast."&@CRLF&"(Gib es in Sekunden ein!)") Case $BotStart $AngriffNormal=GUICtrlRead($AngriffNormal) WinActivate("4Story") While 1 Sleep($Zeit*1000) Send("{TAB}") Send($AngriffNormal) Sleep($Kill*1000) Send("{z}") WEnd Case $SkillDown $SkillDown=InputBox("Cooldown des Skills","Gebe hier ein, wieviel Zeit vergeht, bis dein Skill (Fähigkeit) wieder genutzt werden kann!"&@CRLF&"(Gib es in Sekunden ein!)") EndSwitch WEnd

<--Quellcode von INI Write:-->

Code:

#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form2 = GUICreate("Ini Input System", 785, 266, -1, -1) $Label1 = GUICtrlCreateLabel("Leichtes Input-Ini-Write System", 56, 20, 475, 41) GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif") $ID = GUICtrlCreateInput("Hier deine ID reinschreiben!", 264, 104, 473, 32) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Button1 = GUICtrlCreateButton("Ini-Schreiben", 16, 200, 745, 53, $WS_GROUP) GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("Schreibe ID hier rein :", 28, 108, 209, 28) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $Label3 = GUICtrlCreateLabel("Schreibe PW hier rein :", 28, 164, 222, 28) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") $PW = GUICtrlCreateInput("Hier dein PW reinschreiben!", 264, 160, 473, 32) GUICtrlSetFont(-1, 14, 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 $ID = GUICtrlRead ($ID) $PW = GUICtrlRead ($PW) IniWrite ("C:\Programme\GF4D\4Story\Log-In Daten.ini", "Log-In ID", "DeineID", $ID) IniWrite ("C:\Programme\GF4D\4Story\Log-In Daten.ini", "Log-In PW", "DeinPW", $PW) Exit EndSwitch WEnd

Viel Spaß mit dem Bot euer EliteMattthias

FÜR BANNS ODER DERARTIG ÄHNLICHEN ÜBERNEHME/N WIR/ICH KEINE HAFTUNG!!!

BadCyber · 02/23/2010, 13:38

ehm was ist das ??
auto ein log bot? bin doch net faul um zu tippen

zboy2 · 02/23/2010, 13:44

Ich teste ihn mal... sieht schonmal gur aus... Pics? xD

Edit : Funkt net...

~~Blut-Engel~~ · 02/23/2010, 14:05

Kann das bitte mal jemand auf Vieren testen?

xEncounter · 02/23/2010, 14:22

wow der bringer xD

ich probier es nicht aus....

könnte auchn keylogger sein

CometGFX · 02/23/2010, 14:46

Quote:

Nein, es ist KEIN Keylogger, falls ihr den Quellcode wollt, ich habe ihn versehentlich gelöscht!!!
Diesmal speziell an expo_botter:
Dekompiliere die Datei doch bitte, und schick mir den Quellcode, oder poste ihn!!!

das is ja wohl die billigste ausrede die man machen kann!
weißte was mattthias ich poste jetz einfach zitate aus dem "Imp Hack" thread von dir =)
bischen flamen und so weiter ;-)

expo_botter · 02/23/2010, 17:32

Wassup

Der Decompiler hat zugeschlagen

Das Script ist sauber aber der Bot ist nicht Backround.
Die Daten zum speichern der Accountdaten hättest du mit einer anderen Form via Button aufrufen können, würde schicker aussehen. Für den Anfang ist das OK. Zwar nix weltbewegendes, aber für Einsteiger habter das gut gemacht. Jetzt könnt ihr mal probieren ob ihr das hinbekommt mit den HP auslesen und nicht mit Timern. Einen CE Pointer to AutoIt habter ja

Tipp: der GUI kann wärend des Bottens nicht bedient werden. Nehmt entweder:
1. Timer
oder
2. Opt("GUISetOnEvent",1) <- hab es zwar noch nie getestet mit sleep aber sollte funtzen

sp4rt4cus · 02/23/2010, 20:16

Quote:

Originally Posted by Mattthias

Sag mal, wie machste dass, das der "EXTERN" auf die 4Story zugreifen kann?

probiers zb. mal damit:

ControlSend ("4Story", "", 0, "{1}")
ControlClick ("4Story", "", 0, "left", 1, 841, 573)

und bevor mir wieder was nachgesagt wird:

solltest du dir mal zu Herzen nehmen Matze

janvier123 · 02/26/2010, 01:42

+5-6 Reported At: Fri 26 Feb 2010 - 00:42:23 GMT +1 Cause: Double Post

~~Mattthias~~ · 02/27/2010, 22:13

So Leute, folgendes:

@All, ein Video Tutorial ist nun im Post! (Seit: 23. Februar 2010)
@All, der Quellcode ist nun im Post! (Seit: 27. Februar 2010)

Um Fragen zu vermeiden:

1. Macht den BOT in euer 4Story Verzeichnis, und startet ihn immer von da aus.
2. Der Quellcode steht oben, um zu vermeiden, das ihr glaubt, es is ein Keylogger.
3. Die Write für die Ini (!) MUSS NICHT (!) im 4Story verzeichnis sein!
4. (!!!) NUR 1 ACCOUNT MIT LOG-IN DATEN NEHMEN, NUR 1 MAL DIE INI BENUTZEN, FÜR NEUSCHREIBEN BITTE ERST DIE .ini LÖSCHEN (!!!)

MFG EliteMattthias

hawi · 02/28/2010, 10:28

echt suppa aber der lvlt nur normal und net bei den lvl 79ger oda?

~~Mattthias~~ · 02/28/2010, 14:53

Du kannst mit dem ÜBERALL leveln!
Das is nur ein Bot, kein Hack!
Level damit in Narwashi, hochland ode rsonst wo!

kevko1805 · 02/28/2010, 17:10

lol funz net

~~Mattthias~~ · 02/28/2010, 17:16

kevko1805, er funzt, aber wenn des net glaubst, ich stell ein Video rein, wie ich ihn bei mir starte usw

EDIT:
EDIT:

Muss erstmal Bugs fixxen, vorerst kein Video!

NEUESTER BOT HAT BUGS!!!