VB - LOL Zoom hack

Code:

---

Public Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Integer, ByVal lpBaseAddress As Integer, ByRef lpBuffer As Long, ByVal nSize As Integer, ByRef lpNumberOfBytesWritten As Integer) As Integer
    Public Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Integer, ByVal bInheritHandle As Integer, ByVal dwProcessId As Integer) As IntPtr
    Public Declare Function CloseHandle Lib "kernel32" (ByVal hObject As IntPtr) As Integer
    Public Const PROCESS_VM_ALL As Integer = &H1F0FFF
    Public Sub write_memory(ByVal adress As Integer, ByVal value As Long, ByVal bytes As Integer)
  Dim pHandle As IntPtr
  Dim proc As Process() = Process.GetProcessesByName("League of Legends")
  If Not (proc.Length = 0) Then
    pHandle = OpenProcess(PROCESS_VM_ALL, 0, proc(0).Id)
    If Not (pHandle = 0) Then
    WriteProcessMemory(pHandle, adress, value, bytes, 0)
    End If
    CloseHandle(pHandle)
  End If
    End Sub

---

I wish VB made sense to me. ~~ didn't code this, it's copy-pasta

Oh, there's also a .exe -> League of Legends Zoom hack

Too lazy to write more atm.

Interesting info yo.
I could be wrong, since I don't know VB either lmao, but the code seems incomplete.

Looks like it's meant to write memory to League. Modifies some address associated with zoom I'm assuming.

What does the zoom hack actually do?

Quote:

---

Originally Posted by Isonyx

Interesting info yo.
I could be wrong, since I don't know VB either lmao, but the code seems incomplete.

Looks like it's meant to write memory to League. Modifies some address associated with zoom I'm assuming.

What does the zoom hack actually do?

---

Zoom hack just allows you to either zoom in closer or farther out then permitted. Good for video making and such :)

Noo :c