一天一天学外挂详细教程(VB) - 图文

s Long, Str As String

GetWindowThreadProcessId hwnd, hpID

ProcID = OpenProcess(PROCESS_ALL_ACCESS Or PROCESS_VM_OPERATION Or PROCESS_VM_READ Or PROCESS_VM_WRITE, False, hpID)

ReadProcessMemory ProcID, ByVal &H8C9E54, ECXI, 4, 0 '这个是存放基址的地址

ReadProcessMemory ProcID, ByVal ECXI + &H24, eax, 4, 0 ReadProcessMemory ProcID, ByVal eax + &H390, ECXI, 4, 0 ReadProcessMemory ProcID, ByVal ECXI, BuffEnum(0), 36, 0 Str = Left$(BuffEnum, 36)

Form1.List1.AddItem hpID & \\& Str ?这里我耍了一个小聪明，可以省好多事。 End If

5.3.选择目标窗口连接游戏。

当然要在List1_Click中插入代码了。我使用两个Form，先显示Form1选择游戏窗口，传递游戏窗口的PID给Form2，然后再Form2里OpenProcess即可。所以我的List1_Click代码： Form2.Show Me.Hide

6.写到这里，后面的大家就应该知道怎么吧。这次就不公布源码了，因为特征码的关系遭封

杀的几率太大，另外这样也好给大家留出一些设计的空间。 注意：

如果你在原有程序的基础上，添加新的Form2用于选择游戏窗口，请设置从Form2启动。 程序关闭时别忘卸载隐藏的Form。

第九天-我是医生我加血

学习目的： 1.获得队员信息 2.获得选定人物信息 3.选择指定队员 内容： 1.组队的地址：

队员信息 =[[[[[[&H8C9E54]+&H24]+&H430]+&H14]+位置]+偏移] 位置：队友排位*4（0至4） 偏移：

当前血 +&h18 最大血 +&h20 当前蓝 +&h1C