hey, ich hab mal meinen Source von meinem speedhakc released, ich such ma eben auf meiner fp.Ich weiß nicht welche Sprache du meinst, ich habs damals in autoit gemacht
Ein wenig umständlich der code, habs mir damals ziemlich umständlich gemacht.
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Pointer.au3>
#include<File.au3>
#RequireAdmin
If ProcessExists("immortal2.bin") = False then
MsgBox(0,"Nicht gefunden","Du musst Immortal2 schon starten und eingeloggt sein!Sosnt funktioniert der Hack nicht -.- ... diese Meldung wird nur ausgegeben wenn Immortal2 nicht gestartet ist, also starte es :D")
EndIf
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Metin2 Speed und Schlaghack by Yannik © 2010 :D", 602, 346, 192, 124)
$Button9 = GUICtrlCreateButton("On", 304, 184, 44, 25, $WS_GROUP)
$Button10 = GUICtrlCreateButton("Info", 392, 80, 80, 73, $WS_GROUP)
$Button55 = GUICtrlCreateButton("Source", 480, 80, 80, 73, $WS_GROUP)
$Button22 = GUICtrlCreateButton("Off", 304, 216, 44, 25, $WS_GROUP)
$Button64 = GUICtrlCreateButton("On", 304, 272, 44, 25, $WS_GROUP)
$Button48 = GUICtrlCreateButton("Off", 304, 304, 44, 25, $WS_GROUP)
$Immortal25 = GUICtrlCreateInput("Immortal2", 160, 97, 121, 21)
GUICtrlCreateInput("noch nicht verfügbar", 160, 200, 121, 21)
GUICtrlCreateInput("noch nicht verfügbar", 152, 296, 121, 21)
$pic = GUICtrlCreatePic("hack_bg.jpg",1, 1, 600,400)
$picd2 = GUICtrlCreatePic("awesome.png",50,72,165,73)
$Label1 = GUICtrlCreateLabel("M2 Schlag- und Speedhack © Yannik", 32, 16, 557, 36, -1)
GUICtrlSetFont(-1, 20, 800, 2, "Verdana")
GUICtrlSetBkColor(13, $GUI_BKCOLOR_TRANSPARENT)
$Label2 = GUICtrlCreateLabel("Prozess", 40, 96, 112, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Fixedsys")
GUICtrlSetBkColor(14, $GUI_BKCOLOR_TRANSPARENT)
$Group1 = GUICtrlCreateGroup("Prozess", 32, 72, 265, 73)
GUICtrlSetFont(-1, 8, 400, 0, "Fixedsys")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label3 = GUICtrlCreateLabel("Speedhack", 40, 200, 76, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Fixedsys")
GUICtrlSetBkColor(17, $GUI_BKCOLOR_TRANSPARENT)
$Group2 = GUICtrlCreateGroup("Speed", 32, 176, 265, 65)
GUICtrlSetFont(-1, 8, 400, 0, "Fixedsys")
GUICtrlCreateGroup("2", -99, -99, 1, 1)
$Label4 = GUICtrlCreateLabel("Schlagen", 40, 296, 68, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Fixedsys")
GUICtrlSetBkColor(20, $GUI_BKCOLOR_TRANSPARENT)
$Group3 = GUICtrlCreateGroup("Schlagen", 32, 264, 265, 65)
GUICtrlSetFont(-1, 8, 400, 0, "Fixedsys")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("On", 304, 184, 44, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Info", 392, 80, 80, 73, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Source", 480, 80, 80,73, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Off", 304, 216, 44, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("On", 304, 272, 44, 25, $WS_GROUP)
$Button6 = GUICtrlCreateButton("Off", 304, 304, 44, 25, $WS_GROUP)
$Immortal2 = GUICtrlCreateInput("Immortal2", 160, 97, 121, 21)
GUICtrlCreateInput("noch nicht verfügbar", 160, 200, 121, 21)
GUICtrlCreateInput("noch nicht verfügbar", 152, 296, 121, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Dim $AOffset[3] = [0, 0x128, 0x5B6]
Dim $BOffset[3] = [0, 0x4E0, 0x5BA]
SetPrivilege("SeDebugPrivilege", 1)
$openmem = _MemoryOpen(WinGetProcess("METIN2"))
$baseadress = _MemoryModuleGetBaseAddress(WinGetProcess("METIN2"), "immortal2.bin")
$source = FileRead("source.txt")
Dim $zustand
Dim $schlagen
while 1=1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button9
$zustand = True
Case $Button22
$zustand = False
Case $Button3
MsgBox(0,"SourceCode","folgt")
Case $Button64
$schlagen = True
Case $Button48
$schlagen = False
Case $Button10
Msgbox(0,"Info","Jo, da ist der Hack wohl fertig ;D... Version 1.0 :) ... es sind leider nur so wenige funktionen, da ich für Moblock noch den richtigen Pointer + Offset finden muss.. und ich im moment keine ahnung habe wie ich nach der memoryadresse für moblock suchen soll.Naja wie auch immer , also da ist version 1.0! Die Inputboxen, also diese Eingabefelder wo steht 'noch nicht verfügbar' werden in Version 2.0 schon noch eine Funktion bekommen. Schlaghack ist nicht so schnell, da es sonst zu Kicks seitens des Clients kommt. Das liegt ganz einfach daran dass man für jeden Schlag sogenannte Packete vom CLient (Ordner) an den Server schickt. Wenn ich jetzt zuschnell schlage, und somit auch sehr viele packete versende, schafft es der client einfahc nicht mehr und sagt 'Byebye'. Und joa... das sollte es eigtl gewesen sein. Danke an Max für das hintergrund Bild, ich konnte leider nicht alle Design vorstellung realisieren, da meine nerven schon blank liegen. Bei der nächsten version werden auch grafische Neuheiten dazukommen.. lasst euch überraschen. Ich werde den hack auch noch für mehrere Server erweitern, bei Version 2.0 werdet ihr dann bei Prozess eine liste von Servern sehen, wo ich euch dann einen aussuchen könnt. Also viel spaß , euer Yannik ;D;D;D;D")
Case $Button55
MsgBox(0,"Source","Guck dir die Source.txt an")
EndSwitch
If $zustand Then
$Awert =_MemoryPointerRead($baseadress+0x21C4A4, $openmem, $AOffset, "short")
_MemoryPointerWrite($baseadress + 0x21C4A4, $openmem, $AOffset, "16656", "dword")
Else
$Awert =_MemoryPointerRead($baseadress+0x21C4A4, $openmem, $AOffset, "short")
_MemoryPointerWrite($baseadress + 0x21C4A4, $openmem, $AOffset, "16256", "dword")
EndIf
If $schlagen Then
$Bwert =_MemoryPointerRead($baseadress+0x021E9B8, $openmem, $BOffset, "short")
_MemoryPointerWrite($baseadress + 0x021E9B8, $openmem, $BOffset, "16390", "dword")
Else
$Bwert =_MemoryPointerRead($baseadress+0x021E9B8, $openmem, $BOffset, "short")
_MemoryPointerWrite($baseadress + 0x021E9B8, $openmem, $BOffset, "16256", "dword")
EndIf
Wend