黃易群俠傳M脫機外掛應用程式黃易神行
2628
2

[發問] 請問我改的 Delphi 讀取玩家/怪物資訊 哪裡錯了??(求大大解決)

whip0001 發表於 2009-5-23 22:14:51 | 只看該作者 回帖獎勵 |倒序瀏覽 |
begin         

//********************讀取怪物資訊****************
  ReadProcessMemory(ProcessID, Pointer(W2i_Base), @ftt, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ftt+$08), @ftt, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ftt+$24), @ta, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ta+$24), @tmp1, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ta+$18), @tmp2, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(W2i_Base), @MID, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(MID+$20), @MID, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(MID+$A2c), @MID, 4, tt);
  eax := tmp2 + ((MID Mod tmp1)) * 4 ;
  ReadProcessMemory(ProcessID, Pointer(eax), @ftt, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ftt+$4), @eax, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(eax+$134), @MONHP, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(eax+$14c), @MONMHP, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(eax+$124), @MONLV, 4, tt);
  if MONMHP=0 then
  begin
      //********************讀取人物資訊****************
  ReadProcessMemory(ProcessID, Pointer(W2i_Base), @ftt, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ftt+$08), @ftt, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ftt+$20), @ta, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ta+$24), @tmp1, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ta+$18), @tmp2, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(W2i_Base), @MID, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(MID+$20), @MID, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(MID+$A2c), @MID, 4, tt);
  eax := tmp2 + ((MID Mod tmp1)) * 4 ;
  ReadProcessMemory(ProcessID, Pointer(eax), @ftt, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(ftt+$20), @eax, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(eax+$464), @MONHP, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(eax+$494), @MONMHP, 4, tt);
  ReadProcessMemory(ProcessID, Pointer(eax+$45c), @MONLV, 4, tt);
  end;
  if MONMHP<>0 then
  label19.Caption := inttostr(MONLV) ;
  label20.Caption := inttostr(MONHP)+'/'+inttostr(MONMHP);
end;
收藏收藏 分享分享 讚 幹 分享分享 FB分享
回覆

使用道具 舉報


lemonkid2006 當前離線
UID
608784
熱心
64 值
嘉獎
0 次
違規
0 次
在線時間
138 小時
經驗
62 點
積分
8488
精華
0
最後登錄
2018-8-5
閱讀權限
60
註冊時間
2007-10-23
論壇幣
8218 幣
聯合幣
6 枚
幸運鑽
0 顆
招待卷
24500 點
查看詳細資料
Rank: 7Rank: 7Rank: 7
lemonkid2006 2009-5-24 05:57:28
當前ID偏移a2c是舊版本的....怪物血跟最大血值...錯了

基址資料可以參考這篇廣海的 http://www.ghoffice.com/bbs/read-htm-tid-66086.html

我不是懂很多 ... 我也在學習 可以幫到就幫吧 :X

[ 本帖最後由 lemonkid2006 於 2009-5-24 06:16 編輯 ]
回覆

使用道具 舉報

whip0001 當前離線
UID
6454
熱心
106 值
嘉獎
0 次
違規
0 次
在線時間
179 小時
經驗
86 點
積分
3243
精華
0
最後登錄
2018-8-2
閱讀權限
40
註冊時間
2006-7-15
論壇幣
2860 幣
聯合幣
6 枚
幸運鑽
0 顆
招待卷
301 點
查看詳細資料
Rank: 5Rank: 5Rank: 5
whip0001 2009-5-25 17:38:52
謝謝大大的提醒YCT65B


更改好就可以了YCT47B

[ 本帖最後由 whip0001 於 2009-5-25 23:04 編輯 ]
回覆

使用道具 舉報

您需要登錄後才可以回帖 登錄 | 註冊


手機版 | Archiver | 外掛聯合國

GMT+8, 2024-11-25 09:55 , Processed in 0.053856 second(s), 18 queries , Memcache On.

版權說明:
  本站不會製作、經銷、代理外掛程式。僅免費提供外掛程式下載前之掃毒及掃木馬等安全檢測驗證,協助會員遠離盜號危險程式。本站所有資料均來自網際網路收集整理,說明文字暨下載連結轉載自原程 式開發站。站上出現之公司名稱、遊戲名稱、程式等,商標及著作權,均歸各公司及程式原創所有,本站程式所有權歸外掛聯合國所有。本程式所有權歸外掛聯合國所有.......

回頂部
第二步?
第三步?