love19930518 發表於 2012-8-11 20:40:22

vb6怪物當前數量 自動補血魔

我想請問  怎麼偵測怪物當前數量 然後用<Text1.Text來停止
還有Dim Hp As Long, Mp As Long, Add As Long '存放HP,MP,Add

    ReadProcessMemory Phandle, ByVal &H123456, Add, 4, ByVal 0& '讀取Add
    WriteProcessMemory hProcess, ByVal &H123456, 19, 1, ByVal 0& '寫入HP警告值19
    WriteProcessMemory hProcess, ByVal &H123456, 19, 1, ByVal 0& '寫入MP警告值19
    ReadProcessMemory Phandle, ByVal Add + &H123, Hp, 4, ByVal 0& '讀取Add+HP偏移值
    ReadProcessMemory Phandle, ByVal Add + &H456, Mp, 4, ByVal 0& '讀取Add+MP偏移值

lblHP = Hp
lblMP = Mp


紅色的尚未定義

冰楓 發表於 2012-8-11 21:11:48

<div><div><div><div><div><div><div><div><font color="#000080">Public Declare Function</font> WriteProcessMemory <font color="#000080">Lib</font> "kernel32" (<font color="#000080">ByVal</font> hProcess <font color="#000080">As Long</font>, lpBaseAddress <font color="#000080">As Any</font>, lpBuffer <font color="#000080">As Any</font>, <font color="#000080">ByVal</font> nSize <font color="#000080">As Long</font>, lpNumberOfBytesWritten&nbsp;
<span style="color: rgb(0, 0, 128); ">As Long</span>&nbsp;)&nbsp;<span style="color: rgb(0, 0, 128); ">As Long</span></div><div><font color="#000080">Public Declare Function</font> ReadProcessMemory <font color="#000080">Lib</font> "kernel32" (<font color="#000080">ByVal</font> hProcess <font color="#000080">As Long</font>, lpBaseAddress <font color="#000080">As Any</font>, lpBuffer <font color="#000080">As Any</font>, <font color="#000080">ByVal</font> nSize&nbsp;
<span style="color: rgb(0, 0, 128); ">As Long</span>&nbsp;, lpNumberOfBytesWritten&nbsp;
<span style="color: rgb(0, 0, 128); ">As Long</span>&nbsp;)&nbsp;<span style="color: rgb(0, 0, 128); ">As Long</span></div><div><br></div></div></div></div></div></div></div></div>

love19930518 發表於 2012-8-11 21:16:55

謝謝冰大的教學

zxc19930518 發表於 2012-8-12 12:15:03

回覆 1# love19930518

Phandle 為何為不正常的外部程序

冰楓 發表於 2012-8-12 16:05:42

回覆 4# zxc19930518

要取得遊戲進程

smallgcok 發表於 2012-9-23 12:04:59

冰大小弟我有個問題想請教一下

如果我想把記憶體地址變成textbox裡面的值

(新楓之谷改版，不需要重新製作程式，而是直接改ini檔裡面的地址)

小弟我應該如何下去寫

再此先謝過冰大了
頁: [1]
查看完整版本: vb6怪物當前數量 自動補血魔