[分享] 丁丁愛別墅(原碼)

11層

syproall 2010-4-25 13:35:29

大家一期討論偏移碼是否對我改好再寫回就主程式跳掉要盡力保持原有程式也感覺不行
沒有多的資料偏移碼

W2i_Base_ADDR=$9C14F8; //986c00;  一級基址    沒有加$1c
  W2I_BASE_Call=$9C0E6C;    // 98657C;       ////call基址
  W2I_SEND_PACK_CALL=$5D7C30;  //發包基址
  W2I_Walk_Call1=$468070;
  W2I_Walk_Call2=$46BCB0;
  W2I_Walk_Call3=$468470;

dword ptr [esi+$fe0]  //Bcc+8=BD4 // dd4 用跑路偏移 call偏移

W2I_ROLE_X := read_addrf(W2I_ROLE_BASE_ADDR + $3c);
  W2I_ROLE_Y := read_addrf(W2I_ROLE_BASE_ADDR + $44);
  W2I_ROLE_Z := read_addrf(W2I_ROLE_BASE_ADDR + $40);

  ReadProcessMemory(hCurrentHandle,pointer(W2I_ROLE_BASE_ADDR+$668),@(W2I_ROLE_STATUS),1,iRead);;  //角色當前狀態（0＝正常 16＝飛行）
  W2I_ROLE_POSITION := read_addr(W2I_ROLE_BASE_ADDR + $61c); //當前位置狀態（0＝地面 2＝空中）

  W2I_ROLE_NAME_ADDR := read_addr(W2I_ROLE_BASE_ADDR + $608);             //人物名稱
  W2I_ROLE_SELECT_OBJSN := read_addr(W2I_ROLE_BASE_ADDR + $Af8+$60+$C);       //角色選中的事物SN ?????
  W2I_ROLE_LEVEL:=read_addr(W2I_ROLE_BASE_ADDR+$464);          //等級

W2I_DYNAMIC_BASE_ADDR := read_addr(W2I_BASE_ADDR+$1C);
W2I_ROLE_BASE_ADDR := read_addr(W2I_DYNAMIC_BASE_ADDR+$20);
//W2I_ENVIRON_BASE_ADDR := read_addr(W2I_DYNAMIC_BASE_ADDR+$8);
//W2I_MPACKAGE_ADDR := read_addr(W2I_ROLE_BASE_ADDR + $c44+$60+$18);    ////背包資料
   W2I_MPACKAGE_ADDR := read_addr(W2I_ROLE_BASE_ADDR + $c44);  //  ////背包資料  //￤包裹基座

  W2I_ROLE_ACTIONBASE:=read_addr(W2I_ROLE_BASE_ADDR+$fe0);       //dd4  ?????
  W2I_ROLE_ACTIONBASE:=read_addr(W2I_ROLE_ACTIONBASE+$14);
  W2I_ROLE_ACTION:=read_addr(W2I_ROLE_ACTIONBASE+$04); //0:靜止 1：跑向座標 2：跑向目標 3：普攻 4：技能 6：死亡 7：跟隨 8：飛行 9：取消飛行 10：打坐 11：挖礦撿物 12：收放寵

   ////////////////////讀取飛行器///////////////////////

   ReadProcessMemory(hCurrentHandle, Pointer(W2I_ROLE_BASE_ADDR+$c40), @EQUIPMENT_ADDR, 4, iRead);//裝備偏移：3136 “C40”
// ReadProcessMemory(hCurrentHandle, Pointer(W2I_ROLE_BASE_ADDR+$c40+$60+$18), @EQUIPMENT_ADDR, 4, iRead); //裝備偏移：3136 “C40”          //?? ??????
  ReadProcessMemory(hCurrentHandle, Pointer(EQUIPMENT_ADDR+$0c), @EQUIPMENT_ITEM_ADDR, 4, iRead);
for j := 0 to 23 do
   begin
      ReadProcessMemory(hCurrentHandle, Pointer(EQUIPMENT_ITEM_ADDR+j*4), @EQUIP_ITEM_ADDR, 4, iRead);
      ReadProcessMemory(hCurrentHandle, Pointer(EQUIP_ITEM_ADDR+$04), @EQUIP_ITEM_TYPE, 4, iRead);
      if (EQUIP_ITEM_TYPE=7) or (EQUIP_ITEM_TYPE=18) then
      ReadProcessMemory(hCurrentHandle, Pointer(EQUIP_ITEM_ADDR+$08), @EQUIP_ITEM_ID, 4, iRead);

////////////////////找npc //////////////////找怪樣找
  W2I_ENVIRON_BASE_ADDR:= read_addr(W2I_DYNAMIC_BASE_ADDR+$08);    // [[[9B0CA4]+1C]+20]
  W2I_MONSTER_BASE_ADDR:= read_addr(W2I_ENVIRON_BASE_ADDR+$24);
  W2I_MONSTER_ADDR := read_addr(W2I_MONSTER_BASE_ADDR+$18);
  for I := 0 to 768 do
begin
   W2I_ENV_MONSTER_ADDR := read_addr(W2I_MONSTER_ADDR+ DWORD(i*4));
   W2I_ENV_MONSTER_OBJ := read_addr(W2I_ENV_MONSTER_ADDR+$04);
   W2I_ENV_MONSTER_TYPE := read_addr(W2I_ENV_MONSTER_OBJ+$B4);       //怪物?型 6 怪  7NPC  9?物
   W2I_ENV_MONSTER_DIST:= read_addrf(W2I_ENV_MONSTER_OBJ+$270);       //人怪距離  $260
   if (W2I_ENV_MONSTER_TYPE=7) and (W2I_ENV_MONSTER_DIST<=4) then
   begin
      W2I_ENV_MONSTER_SN2 := read_addr(W2I_ENV_MONSTER_OBJ+$11C);       //怪ID ????

//////////找npc 鎖定版 ////////不知
  W2I_ENVIRON_BASE_ADDR:= read_addr(W2I_DYNAMIC_BASE_ADDR+$08);
  W2I_MONSTER_BASE_ADDR:= read_addr(W2I_ENVIRON_BASE_ADDR+$24);
  W2I_MONSTER_ADDR := read_addr(W2I_MONSTER_BASE_ADDR+$18);
  for I := 0 to 768 do
begin
   W2I_ENV_MONSTER_ADDR := read_addr(W2I_MONSTER_ADDR+ DWORD(i*4));
   W2I_ENV_MONSTER_OBJ := read_addr(W2I_ENV_MONSTER_ADDR+$04);
   W2I_ENV_MONSTER_TYPE := read_addr(W2I_ENV_MONSTER_OBJ+$B4);
   W2I_ENV_MONSTER_NAME_ADDR1 := read_addr(W2I_ENV_MONSTER_OBJ+$23c);    //怪名首位址
   ReadProcessMemory(hCurrentHandle,pointer(W2I_ENV_MONSTER_NAME_ADDR1 ),@(W2I_ENV_MONSTER_NAME),SizeOf(W2I_ENV_MONSTER_NAME),iRead);
   W2I_ENV_MONSTER_DIST:= read_addrf(W2I_ENV_MONSTER_OBJ+$270);          //人怪距離 $260
   if (W2I_ENV_MONSTER_TYPE=7) and (W2I_ENV_MONSTER_DIST<=3) then
   begin
      W2I_ENV_MONSTER_SN2 := read_addr(W2I_ENV_MONSTER_OBJ+$11C);       //怪ID
procedure TForm1.GetMap;
begin
  W2I_ENVIRON_BASE_ADDR:= read_addr(W2I_DYNAMIC_BASE_ADDR+$08);
  W2I_ENVIRON_MAP_ADDR:= read_addr(W2I_ENVIRON_BASE_ADDR+$60);
  W2I_ENVIRON_MAP_NAME_BASE := read_addr(W2I_ENVIRON_MAP_ADDR+$4);
  ReadProcessMemory(hCurrentHandle,pointer(W2I_ENVIRON_MAP_NAME_BASE ),@(W2I_ENVIRON_MAP_NAME),SizeOf(W2I_ENVIRON_MAP_NAME),iRead);
end;

請大家都多多指教忙碌衝突改沒有一一效驗無法完全使用寫到記憶體會(內)就跳掉