Bei mir geht alles mit ControlSend, also wird das auch geblockt.
[ANKÜNDIGUNG] BOT
05/15/2010 08:17
*Dr.Bob*#121
05/15/2010 09:21
Mattthias#122
So, tut mir Leid das ich ""ewig" nichts mehr geschrieben habe, ich hatte vergessen mich "abzumelden"
Aus Gründen des Programmierens bin ich hier raus, ich leite ein Game-Projekt an dem ich grade mit Blut + Schweiß arbeite !
Ihr werdet mich sicher wieder sehen, aber vorerst noch nicht !
Wer meinen bot fertig stellen will hier ein script (mit alten pointern):
Es gibt unter anderem noch kleinere Bugs, aber das Grobe ist getan, nehmt einfach neue Pointer, ich habe keine Zeit welche zu finden !
Aus Gründen des Programmierens bin ich hier raus, ich leite ein Game-Projekt an dem ich grade mit Blut + Schweiß arbeite !
Ihr werdet mich sicher wieder sehen, aber vorerst noch nicht !
Wer meinen bot fertig stellen will hier ein script (mit alten pointern):
PHP Code:
If NOT ProcessExists("TClient.exe") Then
MsgBox(0, "Error", "4Story ist nicht geöffnet !")
Exit
Else
EndIf
#include <Pointer.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include <GuiListView.au3>
#Region ### START Koda GUI section ### Form=
Global $Gesamt
Global $XAchse="", $YAchse="", $ZAchse="", $MonsterZahlWrite
Global $Open = _MemoryOpen(ProcessExists("TClient.exe"))
Global $BotStart = 0
Global $AktuellesMob = 0
$ECBot = GUICreate("4Story Bot by [EC]Mattthias", 409, 288, 192, 124)
$Bot = GUICtrlCreateListView("X-Achse|Y-Achse|Z-Achse|Monster Anzahl", 2, 46, 404, 190)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 100)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 100)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 100)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 3, 100)
$Label1 = GUICtrlCreateLabel("4Story Bot by [EC]Mattthias", 58, 2, 253, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Levelspot = GUICtrlCreateButton("Levelspot Hinzufügen", 2, 238, 111, 25, $WS_GROUP)
$Starten = GUICtrlCreateButton("Starten", 144, 238, 75, 25, $WS_GROUP)
$Stoppen = GUICtrlCreateButton("Stoppen", 144, 262, 75, 25, $WS_GROUP)
$Speichern = GUICtrlCreateButton("Speichern", 306, 238, 75, 25, $WS_GROUP)
$Laden = GUICtrlCreateButton("Laden", 306, 262, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
FileDelete(@ScriptDir&".[EC]")
Exit
Case $Starten
Local $ItemMob = _GUICtrlListView_GetItemTextArray($Bot,0)
_MemoryWrite (_XKoord(), $Open, $ItemMob[1], 'float')
_MemoryWrite (_YKoord(), $Open, $ItemMob[2], 'float')
_MemoryWrite (_ZKoord(), $Open, $ItemMob[3], 'float')
While 1
If $Gesamt <> $BotStart Then
If $AktuellesMob = 0 Then
Local $ItemMob = _GUICtrlListView_GetItemTextArray($Bot,$BotStart)
_MemoryWrite (_XKoord(), $Open, $ItemMob[1], 'float')
_MemoryWrite (_YKoord(), $Open, $ItemMob[2], 'float')
_MemoryWrite (_ZKoord(), $Open, $ItemMob[3], 'float')
$AktuellesMob = $ItemMob[4]
$BotStart += 1
Sleep (500)
ElseIf $AktuellesMob <> 0 Then
If _MemoryRead(_MobPointer(), $Open) = 0 Then
ControlSend ("4Story", "", 0, "{z}")
ControlSend ("4Story", "", 0, "{TAB}")
$AktuellesMob -= 1
Sleep (500)
ElseIf _MemoryRead(_MobPointer(), $Open) <> 0 Then
ControlSend ("4Story", "", 0, "{1}")
EndIf
EndIf
ElseIf $Gesamt = $BotStart Then
$BotStart = 0
EndIf
WEnd
Case $Levelspot
$MonsterZahl = InputBox("Monster", "Wie viele Monster sind hier zu töten ?")
$XAchse = Round(_MemoryRead(_XKoord(), $Open, 'float'))
$YAchse = Round(_MemoryRead(_YKoord(), $Open, 'float'))
$ZAchse = Round(_MemoryRead(_ZKoord(), $Open, 'float'))
GUICtrlCreateListViewItem($XAchse&'|'&$YAchse&'|'&$ZAchse&'|'&$MonsterZahl, $Bot)
$Gesamt += 1
Case $Speichern
$Save = FileSaveDialog ("Speichere Koordinaten", @ScriptDir, "[EC] (*.[EC])")
If @Error Then
Else
For $Aktuell = 0 to $Gesamt-1
$Item = _GUICtrlListView_GetItemTextArray($Bot, $Aktuell)
IniWrite ($Save&".[EC]", "Bot", "XAchse"&$Aktuell, $Item[1])
IniWrite ($Save&".[EC]", "Bot", "YAchse"&$Aktuell, $Item[2])
IniWrite ($Save&".[EC]", "Bot", "ZAchse"&$Aktuell, $Item[3])
IniWrite ($Save&".[EC]", "Bot", "Monster"&$Aktuell, $Item[4])
Next
IniWrite ($Save&".[EC]", "Gesamt", "GesamtWert", $Gesamt)
EndIf
Case $Laden
$Load = FileOpenDialog ("Öffne Koordinaten", @ScriptDir, "[EC] (*.[EC])")
If @Error Then
Else
$GesamtAktuell = IniRead($Load, "Gesamt", "GesamtWert", "")
For $Aktuell = 0 to IniRead($Load, "Gesamt", "GesamtWert", "")
$ReadX = IniRead ($Load, "Bot", "XAchse"&$Aktuell, "")
$ReadY = IniRead ($Load, "Bot", "YAchse"&$Aktuell, "")
$ReadZ = IniRead ($Load, "Bot", "ZAchse"&$Aktuell, "")
$ReadMonster = IniRead ($Load, "Bot", "Monster"&$Aktuell, "")
GUICtrlCreateListViewItem($ReadX&'|'&$ReadY&'|'&$ReadZ&'|'&$ReadMonster, $Bot)
Next
$Gesamt = $GesamtAktuell
EndIf
EndSwitch
WEnd
Func _XKoord()
Local $M_R_,$Open_Process_ = _MemoryOpen(ProcessExists("TClient.exe"))
$M_R_ = _MemoryModuleGetBaseAddress(ProcessExists("TClient.exe"),"TClient.exe")
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("29D8F0"),$Open_Process_),8)
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("0A20"),$Open_Process_),8)
Return "0x" & Hex($M_R_ + Dec("0084"),8)
EndFunc
Func _YKoord()
Local $M_R_,$Open_Process_ = _MemoryOpen(ProcessExists("TClient.exe"))
$M_R_ = _MemoryModuleGetBaseAddress(ProcessExists("TClient.exe"),"TClient.exe")
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("29D8F0"),$Open_Process_),8)
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("0A20"),$Open_Process_),8)
Return "0x" & Hex($M_R_ + Dec("008C"),8)
EndFunc
Func _ZKoord()
Local $M_R_,$Open_Process_ = _MemoryOpen(ProcessExists("TClient.exe"))
$M_R_ = _MemoryModuleGetBaseAddress(ProcessExists("TClient.exe"),"TClient.exe")
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("29D8F0"),$Open_Process_),8)
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("0A20"),$Open_Process_),8)
Return "0x" & Hex($M_R_ + Dec("0088"),8)
EndFunc
Func _MobPointer()
Local $M_R_,$Open_Process_ = _MemoryOpen(ProcessExists("TClient.exe"))
$M_R_ = _MemoryModuleGetBaseAddress(ProcessExists("TClient.exe"),"TClient.exe")
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("29D8F0"),$Open_Process_),8)
$M_R_ = "0x" & Hex(_MemoryRead($M_R_ + Dec("06CC"),$Open_Process_),8)
Return "0x" & Hex($M_R_ + Dec("0408"),8)
EndFunc
Func Bot()
If $Gesamt <> $BotStart Then
If $AktuellesMob = 0 Then
Local $ItemMob = _GUICtrlListView_GetItemTextArray($Bot,$BotStart)
_MemoryWrite (_XKoord(), $Open, $ItemMob[1], 'float')
_MemoryWrite (_YKoord(), $Open, $ItemMob[2], 'float')
_MemoryWrite (_ZKoord(), $Open, $ItemMob[3], 'float')
$AktuellesMob = $ItemMob[4]
$BotStart += 1
ElseIf $AktuellesMob <> 0 Then
If _MemoryRead(_MobPointer(), $Open) = 0 Then
ControlSend ("4Story", "", 0, "{z}")
ControlSend ("4Story", "", 0, "{TAB}")
$AktuellesMob -= 1
ElseIf _MemoryRead(_MobPointer(), $Open) <> 0 Then
ControlSend ("4Story", "", 0, "{1}")
EndIf
EndIf
ElseIf $Gesamt = $BotStart Then
$BotStart = 0
EndIf
EndFunc
Es gibt unter anderem noch kleinere Bugs, aber das Grobe ist getan, nehmt einfach neue Pointer, ich habe keine Zeit welche zu finden !
05/15/2010 09:42
~Lee~#123
Mattthias an welchen GameProjeckt biste den dran? :awesome: *neugierig sei *
05/15/2010 11:22
*Dr.Bob*#124
Hab jetzt das Problem gefunden, es ist nicht send oder controlsend...
es ist PixelSearch was gefunden wird, kann man das anders lösen ?
es ist PixelSearch was gefunden wird, kann man das anders lösen ?
05/15/2010 12:58
wobb#125
matthias fuhhhhhhhh
05/15/2010 13:01
~Lee~#126
Kein wunder das der bot nicht fertig wird :facepalm: ...
Mattthias fängt fast jeden tag neues spiel an ... :awesome:
Gestern worms heute Zelda was kommt noch pokemon Ô_Ô
Mattthias fängt fast jeden tag neues spiel an ... :awesome:
Gestern worms heute Zelda was kommt noch pokemon Ô_Ô
05/15/2010 13:15
Krakatoas#127
Matthias, Links zu anderen Foren zu posten ist gegen die Forumregeln. ([Only registered and activated users can see links. Click Here To Register...])Quote:
*entfernt*
Aber das weißt du sicherlich. :-Þ
05/16/2010 16:08
-EricCartman-#128
Kommt jetzt ein Bot raus oder nicht???
05/16/2010 21:18
Superx321#129
Was so schön still... xDQuote:
Stadt-Land-Fluss? xDDDDDQuote:
Will niemand xDQuote:
lol xxD das haste in den 20 tagen geschafft? wtf...Quote:
Es gibt unter anderem noch kleinere Bugs, aber das Grobe ist getan, nehmt einfach neue Pointer, ich habe keine Zeit welche zu finden !
05/16/2010 21:45
expo_botter#130
komm er hat sein bestes gegeben auch wenn das ziemlich low ist :D ^^
05/17/2010 03:23
sippi10#131
ich will ja keinen nerven aber ab der 4. bzw. 5. seite ist die diskussion völlig am thema vorbeigegangen und ich finde es allgemein ulow, dass hier jeder jeden fertig machen will.
wer glaubt er habe etwas besser drauf soll doch einfach sein bot / hack / code machen und posten. wer es dann besser drauf hat (männersprache: wer den größeren hat ^^) wird sich dann zeigen. die community lebt von der konkurenz zwischen den codern aber bitte nicht auf die art.
andererseits ist es keine schande wenn man einen code nicht fertig bekommt aber man sollte dafür gerade stehen. danke für deine mühe matthias und echt schade, dass am ende nichts daraus geworden ist.
ich für meinen teil würde mich freuen, wenn sich jmnd daran macht einen bot inkl. onehit und unverwundb. zu machen, sowie bei darks multihack aber inkl. lvl bot, da ich dons bot nach vielen misslungenen versuchen nicht zum laufen bekommen habe :( leider.
und keiner soll sich angegriffen fühlen, ich wollte es einfach mal loswerden <3
mfg
wer glaubt er habe etwas besser drauf soll doch einfach sein bot / hack / code machen und posten. wer es dann besser drauf hat (männersprache: wer den größeren hat ^^) wird sich dann zeigen. die community lebt von der konkurenz zwischen den codern aber bitte nicht auf die art.
andererseits ist es keine schande wenn man einen code nicht fertig bekommt aber man sollte dafür gerade stehen. danke für deine mühe matthias und echt schade, dass am ende nichts daraus geworden ist.
ich für meinen teil würde mich freuen, wenn sich jmnd daran macht einen bot inkl. onehit und unverwundb. zu machen, sowie bei darks multihack aber inkl. lvl bot, da ich dons bot nach vielen misslungenen versuchen nicht zum laufen bekommen habe :( leider.
und keiner soll sich angegriffen fühlen, ich wollte es einfach mal loswerden <3
mfg
05/17/2010 06:06
expo_botter#132
Dark-Paradise, Superx321 und ich haben uns unseren Platz schon lange erarbeitet und ohne uns wäre hier überhaupt kein Hack entstanden. ICH war der allererste der einen Hack in 4Story public gemacht hat und mein Levelbot vor dem HS hat jeden begeistert, aber ich will nichtmehr pub machen, genauso wie die Superx321. Also die Arbeit von Mattthias ist echt schwach, das kann jeder, der n bissl Ahnung hat, in 1-2h selber coden. Wer unbedingt hacken und botten will soll sich mich Programmieren beschäftigen. Ihr könnt froh sein das wir einen schwachen Shield bekommen haben der sogut wie nix drauf hat.
Ich werde versuchen mich mit dem Programmieren vom ring0-MemoryEditing zu beschäftigen, damit jeder, der ein 32 bit System hat, auch hacken kann. Wenn es Ahnlab auch entlich mal geschaft hat ControlSend zu blocken werde ich eine DLL machen, die in user32.dll die PostMessage detoured. Also kannst du nicht sagen das es hier einen Konkurenzkampf gibt. Jeder hat seine Stärken. Dark-Paradise ist der Public-Coder, Superx321 kann exellent Pointer suchen und ich mache (versuche) alles was man mit AutoIt nicht machen kann (siehe Text oben).
Axo, falls du es nicht weist, die Pointer-Funcs von Mattthias stammen aus meinen Programm :D
Ich werde versuchen mich mit dem Programmieren vom ring0-MemoryEditing zu beschäftigen, damit jeder, der ein 32 bit System hat, auch hacken kann. Wenn es Ahnlab auch entlich mal geschaft hat ControlSend zu blocken werde ich eine DLL machen, die in user32.dll die PostMessage detoured. Also kannst du nicht sagen das es hier einen Konkurenzkampf gibt. Jeder hat seine Stärken. Dark-Paradise ist der Public-Coder, Superx321 kann exellent Pointer suchen und ich mache (versuche) alles was man mit AutoIt nicht machen kann (siehe Text oben).
Axo, falls du es nicht weist, die Pointer-Funcs von Mattthias stammen aus meinen Programm :D
05/17/2010 06:38
Superx321#133
Kann ich expo nur zustimmen...
@sippi - hier lebt garnix gross vom konkurennzkampf, wie du es nennst. Würden hier Dark, Expo und ich gegeneinander arbeiten (jede idee geheimhalten, keine pointer rausrücken ect.), würd hier ned viel laufen. Jeden Pointer den ich gefunden hab, habn dark und expo. Ich hab dafür dankbarkeit^^ Und halt alle neuen Ideen^^
Genauso hoff ich, dass expo es schafft es so zu machen, dass auch 32bit user wieder fröhlich hacken können. Wenn ers rausgefunden hat, kannste dir schon fast sicher sein wird in nem Hack von Dark released (thx-suchti... xD), da expo und ich nix public stellen.
Und zu Matt... den kannste einfach ned als Konkurrenz ansehen xD
Zu expos letzen satz... xDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
Ich glaub ich mach demnächst n Vid von meinem Hack..dann fallen euch die Augen aus, vorallem beim Bot :P xDD
Achja, mir fällt immer wieder was neues ein xD Matt ist spätestens 2 wochen mit nem neuen acc da, welcher "elite" enthält zurück :P Damit er in nem Monat dann wieder n Thread aufmachen kann, wo ers zugibt XDDD
@sippi - hier lebt garnix gross vom konkurennzkampf, wie du es nennst. Würden hier Dark, Expo und ich gegeneinander arbeiten (jede idee geheimhalten, keine pointer rausrücken ect.), würd hier ned viel laufen. Jeden Pointer den ich gefunden hab, habn dark und expo. Ich hab dafür dankbarkeit^^ Und halt alle neuen Ideen^^
Genauso hoff ich, dass expo es schafft es so zu machen, dass auch 32bit user wieder fröhlich hacken können. Wenn ers rausgefunden hat, kannste dir schon fast sicher sein wird in nem Hack von Dark released (thx-suchti... xD), da expo und ich nix public stellen.
Und zu Matt... den kannste einfach ned als Konkurrenz ansehen xD
Zu expos letzen satz... xDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
Ich glaub ich mach demnächst n Vid von meinem Hack..dann fallen euch die Augen aus, vorallem beim Bot :P xDD
Achja, mir fällt immer wieder was neues ein xD Matt ist spätestens 2 wochen mit nem neuen acc da, welcher "elite" enthält zurück :P Damit er in nem Monat dann wieder n Thread aufmachen kann, wo ers zugibt XDDD
05/17/2010 06:45
expo_botter#134
Denke auch das bald n neuer Acc von Mattthias kommt xD
@Super = Du kleiner Mobrumteleportierer :D
@Super = Du kleiner Mobrumteleportierer :D
05/17/2010 13:15
Mattthias#135
Ach expo hdf, ich kann sehr wohl coden !
Und nur weil ich mein Script nicht schütze ?
Komm expo, nur weil du jetzt "C++" lernst musste nicht einen auf fette eier machen !!!
Und nur weil ich mein Script nicht schütze ?
Komm expo, nur weil du jetzt "C++" lernst musste nicht einen auf fette eier machen !!!