冰楓論壇»論壇 › 程式設計/技術交流 › VisualBasic › vb6怪物當前數量自動補血魔

查看: 2707|回覆: 5

[求助] vb6怪物當前數量自動補血魔

[複製鏈接]

love19930518

32 主題	0 好友	45 積分

新手上路

Rank: 1

UID: 10299
帖子: 207
主題: 32
精華: 0
積分: 45
楓幣: 12
威望: 37
存款: 0
贊助金額: 0
推廣: 10
ＧＰ: 22
閱讀權限: 10
性別: 保密
在線時間: 157 小時
註冊時間: 2012-7-15
最後登入: 2024-2-9

發消息

電梯直達

1樓

發表於 2012-8-11 20:40:22 |只看該作者 |倒序瀏覽

我想請問怎麼偵測怪物當前數量然後用<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

紅色的尚未定義

已有 1 人評分	楓幣	威望	收起理由
冰楓	-20	-1	分類錯誤

總評分: 楓幣 -20 威望 -1 查看全部評分

收藏0 推0 噓0

把本文推薦給朋友或其他網站上,每次被點擊增加您在本站積分: 1彩票

回覆

使用道具舉報

複製連結並發給好友，以賺取推廣點數

簡單兩步驟，註冊、分享網址，即可獲得獎勵！一起推廣文章換商品、賺$$

冰楓

2520 主題	1 好友	1萬積分

管理員

Rank: 15

UID: 41
帖子: 12012
主題: 2520
精華: 80
積分: 12587
楓幣: 28257
威望: 7710
存款: 1000000
贊助金額: 0
推廣: 1
ＧＰ: 5095
閱讀權限: 255
在線時間: 65535 小時
註冊時間: 2011-3-31
最後登入: 2024-6-27

發消息

2樓

發表於 2012-8-11 21:11:48 |只看該作者

Public Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long ) As Long

Public Declare Function ReadProcessMemory Lib "kernel32" (ByVal hProcess As Long, lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long , lpNumberOfBytesWritten As Long ) As Long

已有 1 人評分	彩票	收起理由
小幫手	+ 1	冰楓你被盜了嗎 :))

總評分: 彩票 + 1 查看全部評分

站內諮詢：https://bingfong.com/messages/41
ＦＢ專頁：https://www.facebook.com/BingFengBF/
Instagram：https://instagram.com/bing.feng/
客服信箱：services@bingfong.com
合作洽談：contact@bingfong.com
※所有信件／訊息皆會於２４小時內回覆。
※若超過２４小時未收到回覆可能是您的訊息被系統過濾，請改用其它方式聯繫我們，謝謝

點評回覆

使用道具舉報