Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > General Coding
You last visited: Today at 18:39

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

Advertisement



[Metin2] Pointer

Discussion on [Metin2] Pointer within the General Coding forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 1
Join Date: Jun 2009
Posts: 235
Received Thanks: 31
Question [Metin2] Pointer

Hallo ich habe denn von TrickGamer gedownloadet also das man damit ein eigenden bot schreiben kann

Jetzt habe ich ein problem ich habe Pointer adressen gefunden wenn das welche sind: und sind das überhaupt pointer adressen und wie bearbeitet man diese ? also das man diese z.b. bei movespeed schneller ist
huhu80 is offline  
Old 01/04/2011, 17:34   #2
 
.BritainAndy's Avatar
 
elite*gold: 0
Join Date: Jan 2010
Posts: 1,385
Received Thanks: 1,006
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


€dit:

Ein wenig umständlich der code, habs mir damals ziemlich umständlich gemacht.
Aber hat funktioniert:

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"602346192124)
$Button9 GUICtrlCreateButton("On"3041844425$WS_GROUP)
$Button10 GUICtrlCreateButton("Info"392808073$WS_GROUP)
$Button55 GUICtrlCreateButton("Source"480808073$WS_GROUP)
$Button22 GUICtrlCreateButton("Off"3042164425$WS_GROUP)
$Button64 GUICtrlCreateButton("On"3042724425$WS_GROUP)
$Button48 GUICtrlCreateButton("Off"3043044425$WS_GROUP)
$Immortal25 GUICtrlCreateInput("Immortal2"1609712121)
GUICtrlCreateInput("noch nicht verfügbar"16020012121)
GUICtrlCreateInput("noch nicht verfügbar"15229612121)
$pic GUICtrlCreatePic("hack_bg.jpg",11600,400)
$picd2 GUICtrlCreatePic("awesome.png",50,72,165,73)
$Label1 GUICtrlCreateLabel("M2 Schlag- und Speedhack © Yannik"321655736, -1)
GUICtrlSetFont(-1208002"Verdana")
GUICtrlSetBkColor(13$GUI_BKCOLOR_TRANSPARENT)
$Label2 GUICtrlCreateLabel("Prozess"409611219)
GUICtrlSetFont(-1104000"Fixedsys")
GUICtrlSetBkColor(14$GUI_BKCOLOR_TRANSPARENT)
$Group1 GUICtrlCreateGroup("Prozess"327226573)
GUICtrlSetFont(-184000"Fixedsys")
GUICtrlCreateGroup("", -99, -9911)
$Label3 GUICtrlCreateLabel("Speedhack"402007619)
GUICtrlSetFont(-1104000"Fixedsys")
GUICtrlSetBkColor(17$GUI_BKCOLOR_TRANSPARENT)
$Group2 GUICtrlCreateGroup("Speed"3217626565)
GUICtrlSetFont(-184000"Fixedsys")
GUICtrlCreateGroup("2", -99, -9911)
$Label4 GUICtrlCreateLabel("Schlagen"402966819)
GUICtrlSetFont(-1104000"Fixedsys")
GUICtrlSetBkColor(20$GUI_BKCOLOR_TRANSPARENT)

$Group3 GUICtrlCreateGroup("Schlagen"3226426565)
GUICtrlSetFont(-184000"Fixedsys")
GUICtrlCreateGroup("", -99, -9911)

$Button1 GUICtrlCreateButton("On"3041844425$WS_GROUP)
$Button2 GUICtrlCreateButton("Info"392808073$WS_GROUP)
$Button3 GUICtrlCreateButton("Source"4808080,73$WS_GROUP)
$Button4 GUICtrlCreateButton("Off"3042164425$WS_GROUP)
$Button5 GUICtrlCreateButton("On"3042724425$WS_GROUP)
$Button6 GUICtrlCreateButton("Off"3043044425$WS_GROUP)
$Immortal2 GUICtrlCreateInput("Immortal2"1609712121)

GUICtrlCreateInput("noch nicht verfügbar"16020012121)
GUICtrlCreateInput("noch nicht verfügbar"15229612121)
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###



Dim $AOffset[3] = [00x1280x5B6]
Dim $BOffset[3] = [00x4E00x5BA]
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 
.BritainAndy is offline  
Old 01/04/2011, 17:39   #3
 
elite*gold: 1
Join Date: Jun 2009
Posts: 235
Received Thanks: 31


das hier meinte ich
huhu80 is offline  
Old 01/04/2011, 19:12   #4
 
elite*gold: 1
Join Date: Jun 2009
Posts: 235
Received Thanks: 31
#push
huhu80 is offline  
Old 01/04/2011, 22:59   #5
 
elite*gold: 42
Join Date: Jun 2008
Posts: 5,425
Received Thanks: 1,888
Du hast keine ahnung, also lass es.
MoepMeep is offline  
Reply


Similar Threads Similar Threads
Frage: Wie findet man zB UG Pointer?Speed pointer?
03/30/2010 - Kal Online - 2 Replies
kann mir einer sagen wie man UG/Speed pointer finden kann usw^^´ß#



All times are GMT +2. The time now is 18:39.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.