Advertisement
Guest User

Untitled

a guest
Jun 22nd, 2017
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 2.04 KB | None | 0 0
  1. Public Class Player
  2.     Inherits Character
  3.  
  4.     Public Sub New()
  5.         MyBase.New(MemoryManager.ReadInt(Pointers.CharactersList, &H0)) 'qua non so quale offset sia necessario per ottenere la struct del player
  6.     End Sub
  7.  
  8.     Public Property AttackMode As Integer
  9.         Get
  10.             Return MemoryManager.ReadInt(Me._firstAddress + Offsets.AttackMode)
  11.         End Get
  12.         Set(ByVal value As Integer)
  13.             MemoryManager.WriteInt(value, Me._firstAddress + Offsets.AttackMode)
  14.         End Set
  15.     End Property
  16.  
  17.     Public Property AttackRange As Single
  18.         Get
  19.             Return MemoryManager.ReadSingle(Me._firstAddress + Offsets.AttackRange)
  20.         End Get
  21.         Set(ByVal value As Single)
  22.             MemoryManager.WriteSingle(value, Me._firstAddress + Offsets.AttackRange)
  23.         End Set
  24.     End Property
  25.  
  26.     Public Property MoveSpeed As Single
  27.         Get
  28.             Return MemoryManager.ReadSingle(Me._firstAddress + Offsets.MoveSpeed)
  29.         End Get
  30.         Set(ByVal value As Single)
  31.             MemoryManager.WriteSingle(value, Me._firstAddress + Offsets.MoveSpeed)
  32.         End Set
  33.     End Property
  34.  
  35.     Public Property AttackSpeed As Single
  36.         Get
  37.             Return MemoryManager.ReadSingle(Me._firstAddress + Offsets.AttackSpeed)
  38.         End Get
  39.         Set(ByVal value As Single)
  40.             MemoryManager.WriteSingle(value, Me._firstAddress + Offsets.AttackSpeed)
  41.         End Set
  42.     End Property
  43.  
  44.     Public Property OneHit As Integer
  45.         Get
  46.             Return MemoryManager.ReadInt(Me._firstAddress + Offsets.OneHit)
  47.         End Get
  48.         Set(ByVal value As Integer)
  49.             MemoryManager.WriteInt(value, Me._firstAddress + Offsets.OneHit)
  50.         End Set
  51.     End Property
  52.  
  53.     Public Property Combo As Integer
  54.         Get
  55.             Return MemoryManager.ReadInt(Me._firstAddress + Offsets.Combo)
  56.         End Get
  57.         Set(ByVal value As Integer)
  58.             MemoryManager.WriteInt(value, Me._firstAddress + Offsets.Combo)
  59.         End Set
  60.     End Property
  61.  
  62. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement