向各delphi 大大請教, 是我指針錯了嗎?

各位大大., 我都是初學而已 看過了很多文章 而且都跟足偏移值,還是解不出想要的值, 是我有跟錯偏移值嗎?

W2I_BASE_ADDR:=$A5BFB0;              //全局基址
    W2I_DYNAMIC_BASE_ADDR:=read_addr(W2I_BASE_ADDR+$1c);                      //動態基址
    W2I_ENVIRON_BASE_ADDR:=read_addr(W2I_DYNAMIC_BASE_ADDR+$08);              //周圍環境基址
    W2I_PLAYER_BASE_ADDR := read_addr(W2I_ENVIRON_BASE_ADDR+$20);   //周圍玩家基址
    jnnum := read_addr(W2I_PLAYER_BASE_ADDR + $14);   //24=周圍玩家總數量 14=現數量
    jnfirst := read_addr(W2I_PLAYER_BASE_ADDR + $18);   //周圍玩家列表基址
       label8.caption := IntToStr(jnnum);  //這個我用作測試上面的偏移值沒有錯
       If jnnum > 0 Then
       For i:= 0 to jnnum - 1 do
      begin
       ReadProcessMemory(hCurrentHandle, Pointer(jnfirst + I * 4), @jnbase , 4, ByteRead);//相應周圍玩家地址
       ReadProcessMemory(hCurrentHandle, Pointer(jnbase+$04), @ujnname1, 4, tt);   //相應位置玩家指針
       //ReadProcessMemory(hCurrentHandle, Pointer(ujnname1+$448), @jnID, 4, tt);  //玩家SN
       ReadProcessMemory(hCurrentHandle, Pointer(ujnname1+$450), @jnLV, 4, tt);  //玩家等級
       //ReadProcessMemory(hCurrentHandle, Pointer(ujnname1+$5D8),@AjnnameII,36,tt); //'玩家名稱
       combobox3.Items.Add(IntToStr(jnLV));


不管怎樣, 我還是列不出 jnLV,jnID 之類的
是我ujnname1 那邊指針有錯了嗎?
還是jnbase 那邊程序有錯?
列出來的, 不是0就是一部份相同的數值
如果列得出來,, 應該是每個都不同的說

請各位大大指點一下啊.. 謝謝
感恩萬分,我邊找資料 邊試差不多2天都沒結果



PS.因為源碼我都靠改某同志的技能列表, 所以比那些代號較亂 但功能是一樣吧

jnID 現在版本是 460
jnLV 是 46c 這2個偏移改一下

2# RAINTCK

但經過修改之後, 數值都依然是不正確的
現在的是

1. 
   
2. procedure TForm1.Button3Click(Sender: TObject);
   
3. VAR
   
4.        I:integer;
   
5.      W2I_ROLE_SELECT_ADDR,W2I_ROLE_BASE_ADDR,W2I_PLAYER_BASE_ADDR,W2I_ENVIRON_BASE_ADDR,W2I_DYNAMIC_BASE_ADDR,W2I_BASE_ADDR,ByteRead,tt,ft,jnfirst,jnnum,jnbase,jnid,jnLV,ujnname1,ujnname2,ujnname3,jnsj,jnjg,jnzt:DWORD;
   
6.   AjnnameII: array [0..35] of WideChar;
   
7. begin
   
8.   combobox3.clear;
   
9.     W2I_BASE_ADDR:=$A5BFB0;              //全局基址
   
10.     W2I_DYNAMIC_BASE_ADDR:=read_addr(W2I_BASE_ADDR+$1c);                      //動態基址
    
11.     W2I_ENVIRON_BASE_ADDR:=read_addr(W2I_DYNAMIC_BASE_ADDR+$08);              //周圍環境基址
    
12.     W2I_PLAYER_BASE_ADDR := read_addr(W2I_ENVIRON_BASE_ADDR+$20);   //周圍玩家基址
    
13.     jnnum := read_addr(W2I_PLAYER_BASE_ADDR + $14);   //24=周圍玩家總數量 14=現數量
    
14.     jnfirst := read_addr(W2I_PLAYER_BASE_ADDR + $18);   //周圍玩家列表基址
    
15.        label8.caption := IntToStr(jnnum);
    
16.        If jnnum > 0 Then
    
17.        For i:= 0 to jnnum - 1 do
    
18.       begin
    
19.        ReadProcessMemory(hCurrentHandle, Pointer(jnfirst + I * 4), @jnbase , 4, ByteRead);//相應周圍玩家地址
    
20.        ReadProcessMemory(hCurrentHandle, Pointer(jnbase+$04), @ujnname1, 4, tt);   //相應位置玩家指針
    
21.        ReadProcessMemory(hCurrentHandle, Pointer(ujnname1+$460), @jnID, 4, tt);  //玩家SN
    
22.        ReadProcessMemory(hCurrentHandle, Pointer(ujnname1+$46C), @jnLV, 4, tt);  //玩家等級
    
23.        ReadProcessMemory(hCurrentHandle, Pointer(ujnname1+$618),@AjnnameII,36,tt); //'玩家名稱
    
24.        combobox3.Items.Add(WideCharToString(AjnnameII)+'='+IntToStr(jnID));
    
25.      end;
    
26. 
    
27. end;
    
28. 
    

複製代碼

源碼都覆出來.. 希望大大可以幫忙試一下><
感恩!! (努力學習中)

你JNBASE定義DWORD讀取BYTE
其它...........看起來都正常

唉 真的不懂錯在哪裡YCT66B
有其他的大大能指點一下嗎 ?

ReadProcessMemory(GAME,Pointer(DYNAMIC_BASE_ADDR+$08),@ENVIRON_BASE_ADDR,4,iread); //取得環境基址
  ReadProcessMemory(GAME,Pointer(ENVIRON_BASE_ADDR+$20),@PLAYER_BASE_ADDR,4,iread); //取得週圍玩家基址
  ReadProcessMemory(GAME,Pointer(PLAYER_BASE_ADDR+$18),@PLAYER_LIST_ADDR,4,iread); //取得週圍玩家列表基址
  ReadProcessMemory(GAME,Pointer(ROLE_BASE_ADDR+$b0c),@ROLE_SN,4,iread); //人物選中sn
  ReadProcessMemory(GAME,Pointer(PLAYER_LIST_ADDR+((ROLE_SN Mod 769))*4),@PLAYER_ADDR,4,iread );//相應位置玩家基址
  ReadProcessMemory(GAME,Pointer(PLAYER_ADDR+$4),@PLAYER_OBJ,4,iread); //相應位置玩家指針
  ReadProcessMemory(GAME,Pointer(PLAYER_OBJ+$3C),@PLAYER_X,4,iread); //相應位置玩家X座標
  ReadProcessMemory(GAME,Pointer(PLAYER_OBJ+$44),@PLAYER_Y,4,iread); //相應位置玩家y座標
  ReadProcessMemory(GAME,Pointer(PLAYER_OBJ+$40),@PLAYER_Z,4,iread); //相應位置玩家Z座標
  ReadProcessMemory(GAME,Pointer(PLAYER_OBJ+$4B4),@PLAYER_MAXHP,4,iread); //相應位置玩家最大血量
  ReadProcessMemory(GAME,Pointer(PLAYER_OBJ+$474),@PLAYER_CURHP,4,iread); //相應位置玩家當前血量
  ReadProcessMemory(GAME,Pointer(PLAYER_OBJ+$618),@PLAYER_NAME_ADDR,4,iread); //相應位置玩家名稱基址
  ReadProcessMemory(GAME,pointer(PLAYER_NAME_ADDR),@PLAYER_NAME,SizeOf(PLAYER_NAME), iread);//讀取人物名稱
  Label15.Caption := '玩家名稱：' + string(PLAYER_NAME);
  Label16.Caption := '座標：'+Formatfloat('0',(PLAYER_X/10+400))+', '+Formatfloat('0',(PLAYER_Y/10+550))+
                     '#' + Formatfloat('0',(PLAYER_Z/10));
  Label17.Caption := '玩家血量：'+IntToStr(PLAYER_CURHP)+' / '+IntToStr(PLAYER_MAXHP);

這是我在用的可以正確顯示出點選玩的血量及名子座標,可供補機補血及跟隨之用.

看起來好像是沒選中目標的問題
遍歷了週圍玩家確沒選目標所以沒資料好讀取

噢,先感謝大大之前的指點,我終於解得到需要的資料了
雖然不知錯在哪裡.. 但重新編譯過,現在就有

下刪 xd

6# jinnrose

感謝大大的資訊提供, 現在我重新編譯後已經解決了(用GOD4神人編移大全重新編- -)
真的非常感謝, 而且你提供的源碼我會好好學習啊

選怪問題已經解決了, 感恩><
謝謝各大大的幫忙.. 我又進步了一段嚕 xd