DIR Return Create A Forum - Home
---------------------------------------------------------
Hack Community
HTML https://roshacks.createaforum.com
---------------------------------------------------------
*****************************************************
DIR Return to: Codes
*****************************************************
#Post#: 62--------------------------------------------------
[VB.NET] GetEntityList
DIR By: pipo1337
Date: April 1, 2018, 7:55 am
---------------------------------------------------------
--- Code ---
Public Shared Function GetEntityList() As List(Of Integer)
Dim list As List(Of Integer) = New List(Of Integer)
Dim newcObj = Mem.ReadMemory(Of
Integer)((Mem.ReadMemory(Of Integer)((Mem.m_BaseAddress +
Offsets.Client)) + Offsets.m_ppObjects))
newcObj = Mem.ReadMemory(Of Integer)(newcObj)
Dim num As Integer = Mem.ReadMemory(Of
Integer)(Mem.ReadMemory(Of Integer)(newcObj))
Dim num2 As Integer = Mem.ReadMemory(Of
Integer)((newcObj + 4))
Do Until (num <> num2)
Dim num3 As Integer = Mem.ReadMemory(Of
Integer)((num + 12))
Dim num4 As Integer = Mem.ReadMemory(Of
Integer)(Mem.ReadMemory(Of Integer)((num + 16)))
Dim item As Integer = (num3 Or num4)
'The operator should be an XOR ^ instead of an OR,
but not available in CodeDOM
list.Add(item)
num = Mem.ReadMemory(Of Integer)(num)
Loop
Return list
End Function
--- End Code ---
*****************************************************
Page 1 of 1