Need a program to find data from WoW.

[Cypher]

If google brings no luck try look through the forums here. There are all the intel and sample codes you need to get a good app going for what you are aiming for.



With his limited needs i guess any average programming language could do the job very well.

*below average programming language

[Functions]

Well first of all try to do some DLL injection if you can Check out the WoWapi, you are able to send /script /run commands to Console, then have your data set as a pointer/float.

Soo here..

<Your Program>----->Phealth(int health)->World Of Warcraft(Attached Through DLL Injection or other Purposes) then use some LUA, Like heres the command in /script UnitHealth("unit") in unit put like target, now the thing is I dont get how you would send that command back ahh think I got a solution

Phealth(int health)=UnitHealth("name");
There you go bro, anyone wanna make apprends to that PM me please, So I can see what you said thanks!

[suicidity]

I doubt he's going to be doing that.

Easier to do the old simple, Y-Coord / Y-Coord memory scan and Get the player, then go from there.

Really though. I almost always try to do things in Visual Basic; Because If I can do it in Visual Basic, I must be doing something right or wrong. Plus it's easier to spoon-feed noobs source-codes later on.

What? I'm a nice guy.. I share VB Source-Code.

[Cypher]

I doubt he's going to be doing that.

Easier to do the old simple, Y-Coord / Y-Coord memory scan and Get the player, then go from there.

Really though. I almost always try to do things in Visual Basic; Because If I can do it in Visual Basic, I must be doing something right or wrong. Plus it's easier to spoon-feed noobs source-codes later on.

What? I'm a nice guy.. I share VB Source-Code.

Eeeew. Noone should EVER be doing the coord scanning to get the address of an object.

[apollo0510]

Ok. About my Visual Basic comments: For some VERY basic things, it may be satisfactory to use VB. For me it's not.

- I am proxying WoW over a local loopback (simulating the login server).
- I am offering a hooked DirectX COM-Object to WoW.
- I am directly communicating with the LUA parts of my programs.

Can you do that with VB ?

( my WoW Clients have a built in telnet connection for debugging. Cool, ey ? )

C++ does the job well.

Greetings

Apollo

[Functions]

Umm sorry buddy Telnet bud but in order to Access The telnet on a WoW server you need prolly a good 45 character long password. Have fun! Nice lies, and DirectX Has nothing to do with memory editing (try me again?)

[Shynd]

Functions, the fail in your posts is only surpassed by the fail in your signature.

[Cypher]

Umm sorry buddy Telnet bud but in order to Access The telnet on a WoW server you need prolly a good 45 character long password. Have fun! Nice lies, and DirectX Has nothing to do with memory editing (try me again?)

Dude, you really need to just stop posting. You're a ****ing idiot.

Functions, the fail in your posts is only surpassed by the fail in your signature.

QFT

[kynox]

Umm sorry buddy Telnet bud but in order to Access The telnet on a WoW server you need prolly a good 45 character long password. Have fun! Nice lies, and DirectX Has nothing to do with memory editing (try me again?)

What the hell. Please, for the sanity of everyone on this forum, STOP posting.

You don't know what you're talking about, it's almost as though you're trying to troll people with your stupidity.

Leave it to the grownups, mm'kay?

[Cypher]

What the hell. Please, for the sanity of everyone on this forum, STOP posting.

You don't know what you're talking about, it's almost as though you're trying to troll people with your stupidity.

Leave it to the grownups, mm'kay?

If he's a troll he's the best I've ever seen. I've never experience such a huge amount of genuine cluelessness and stupidity from a single person.

[suicidity]

Eeeew. Noone should EVER be doing the coord scanning to get the address of an object.

Very true. But give the poor man a break, I doubt he'd understand or comprehend anything further past that.

I'll edit my post with some code if I get around to it..


EDIT:

Oh, the horrid coordinate scan function. But here it is..

    Public Sub FindEntity()

        If (processes.Length > 0) Then

            ' Lookup StaticX
            MemAPI.Peek(gproc, Player.locBase, ByteA)

            '   Convert to 8byte to scan faster
            Dim compare As Int64 = System.BitConverter.ToInt64(ByteA, 0) ' Int64, it's purpose was to be used for faster scans
            Dim levelCompare As Integer

            '   Where to start looking
            Dim i As Integer = &H10000BF8

            '   Declare compare and finished variables
            Dim current As Single
            Dim done As Integer = 0

            While i < &H20000BF8 And done < 1
                MemAPI.Peek(gproc, i, ByteA)
                current = System.BitConverter.ToInt64(ByteA, 0)
                If current = compare Then

                    ' Recheck by comparing a static level and a level offset located in the Player entity
                    MemAPI.Peek(gproc, i - &HBF8 + Player.levelNonStatic, ByteA) ' LevelNonStatic would be to another static address storing the Level, just for comparison reasons
                    levelCompare = ByteA(0)
                    MemAPI.Peek(gproc, Player.level, ByteA)

                    If ByteA(0) = levelCompare Then
                        ' The check has passed, the entity was found
                        done = 1
                    End If
                Else
                    If i = &H1FFFFBF8 Then
                        done = 2
                    End If
                    i += &H1000
                    ' The if statement once had meaning, but I coded this like 2 years ago
                End If
            End While

            If done = 1 Then
                ' This is thrown when the scan has successfully identified the Player entity
                Player.entity = i - &HBF8 ' Player object is the Scan - the scan offset, in this case the X coord(?)
                Player.entityFound = True ' This is in place for a scrub Found boolean
                ' Player was found, rejoice and call functions to read offsets from your new Player object.
            ElseIf done = 2 Then
                ' This error is thrown when the scan has reached the end of the memory and has failed to find the player.
               Exit Sub
            Else
                Exit Sub ' Throw an error - Player not found
            End If
        Else
            Exit Sub ' Throw an error - Fail
        End If

    End Sub

Really, I browsed over the code and it looks okay. Just one of the scrub subs I coded up when I was fiddling. Use it as an example and plug-in current offsets.

Also the code for "MemAPI.vb"

Imports System
Imports System.Diagnostics
Imports System.Runtime.InteropServices
Public Class MemAPI
    'The only things you should have to change in here would be if you want to add more
    'standard functions for reading and writing.
    'So enough comments in here :P
    <DllImport("kernel32.dll")> _
    Private Shared Function ReadProcessMemory(ByVal hProcess As IntPtr, ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As Byte(), ByVal nSize As Integer, ByVal lpNumberOfBytesRead As Byte) As Boolean
    End Function

    <DllImport("kernel32.dll")> _
    Public Shared Function WriteProcessMemory(ByVal hProcess As IntPtr, ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As Byte(), ByVal nSize As Integer, ByVal lpNumberOfBytesWritten As Byte) As Boolean
    End Function

    Public Shared Function Peek(ByVal proc As Process, ByVal address As Integer, ByVal data As Byte()) As Boolean
        Return ReadProcessMemory(proc.Handle, address, data, data.Length, 0)
    End Function

    Public Shared Function Poke(ByVal proc As Process, ByVal address As Integer, ByVal data As Byte()) As Boolean
        Return WriteProcessMemory(proc.Handle, address, data, data.Length, 0)
    End Function
End Class

Gah, ugly mess of ugly.

[Cypher]

Very true. But give the poor man a break, I doubt he'd understand or comprehend anything further past that.

I'll edit my post with some code if I get around to it..


EDIT:

Oh, the horrid coordinate scan function. But here it is..

    Public Sub FindEntity()

        If (processes.Length > 0) Then

            ' Lookup StaticX
            MemAPI.Peek(gproc, Player.locBase, ByteA)

            '   Convert to 8byte to scan faster
            Dim compare As Int64 = System.BitConverter.ToInt64(ByteA, 0) ' Int64, it's purpose was to be used for faster scans
            Dim levelCompare As Integer

            '   Where to start looking
            Dim i As Integer = &H10000BF8

            '   Declare compare and finished variables
            Dim current As Single
            Dim done As Integer = 0

            While i < &H20000BF8 And done < 1
                MemAPI.Peek(gproc, i, ByteA)
                current = System.BitConverter.ToInt64(ByteA, 0)
                If current = compare Then

                    ' Recheck by comparing a static level and a level offset located in the Player entity
                    MemAPI.Peek(gproc, i - &HBF8 + Player.levelNonStatic, ByteA) ' LevelNonStatic would be to another static address storing the Level, just for comparison reasons
                    levelCompare = ByteA(0)
                    MemAPI.Peek(gproc, Player.level, ByteA)

                    If ByteA(0) = levelCompare Then
                        ' The check has passed, the entity was found
                        done = 1
                    End If
                Else
                    If i = &H1FFFFBF8 Then
                        done = 2
                    End If
                    i += &H1000
                    ' The if statement once had meaning, but I coded this like 2 years ago
                End If
            End While

            If done = 1 Then
                ' This is thrown when the scan has successfully identified the Player entity
                Player.entity = i - &HBF8 ' Player object is the Scan - the scan offset, in this case the X coord(?)
                Player.entityFound = True ' This is in place for a scrub Found boolean
                ' Player was found, rejoice and call functions to read offsets from your new Player object.
            ElseIf done = 2 Then
                ' This error is thrown when the scan has reached the end of the memory and has failed to find the player.
               Exit Sub
            Else
                Exit Sub ' Throw an error - Player not found
            End If
        Else
            Exit Sub ' Throw an error - Fail
        End If

    End Sub

Really, I browsed over the code and it looks okay. Just one of the scrub subs I coded up when I was fiddling. Use it as an example and plug-in current offsets.

Also the code for "MemAPI.vb"

Imports System
Imports System.Diagnostics
Imports System.Runtime.InteropServices
Public Class MemAPI
    'The only things you should have to change in here would be if you want to add more
    'standard functions for reading and writing.
    'So enough comments in here :P
    <DllImport("kernel32.dll")> _
    Private Shared Function ReadProcessMemory(ByVal hProcess As IntPtr, ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As Byte(), ByVal nSize As Integer, ByVal lpNumberOfBytesRead As Byte) As Boolean
    End Function

    <DllImport("kernel32.dll")> _
    Public Shared Function WriteProcessMemory(ByVal hProcess As IntPtr, ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As Byte(), ByVal nSize As Integer, ByVal lpNumberOfBytesWritten As Byte) As Boolean
    End Function

    Public Shared Function Peek(ByVal proc As Process, ByVal address As Integer, ByVal data As Byte()) As Boolean
        Return ReadProcessMemory(proc.Handle, address, data, data.Length, 0)
    End Function

    Public Shared Function Poke(ByVal proc As Process, ByVal address As Integer, ByVal data As Byte()) As Boolean
        Return WriteProcessMemory(proc.Handle, address, data, data.Length, 0)
    End Function
End Class

Gah, ugly mess of ugly.

AAAAAAAHHH!

AVERT YOUR EYES! It may take on another form!

[apollo0510]

What shall I say. Humm. Functions thinks I am telling crap. Well. If he is talking about DLL injection himself and cant tell what it means to offer a hooked COM object .. not my problem.

What I wanted to say is, "Cypher, where the hell do you have all the information from ?". I do my research just for fun and only for myself (usually I do not go public), but it looks like you are working fulltime on this. Respect.

So I can not offer you information about Object structures. You know them all.
But maybee you might be interested, in how to crack the stupid encryption layer in the client-server communication ?

Anybody interested ?

Greetings

Apollo

[kynox]

But maybee you might be interested, in how to crack the stupid encryption layer in the client-server communication ?

Anybody interested ?

It's been done for years, look at any private server source.

[hypnodok]

Obviously it has been done before, I wouldnt mind if he posted about his findings tho.