VB - LOL Zoom hack

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?

Isonyx wrote:

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