[Помогите!] Не как не получаться разобраться с инжектором подбора лута

[des99]

При написание простого бота возникла проблема, все инжекторы работают кроме одного, подбора лута/копания шахт, не мог бы кто-нибудь скинуть рабочий инжектор, для того что бы понять где у меня ошибка.

PWI клиент 1.4.5 версии, сборка 2305, версия обновления 657-659
RUOFF Гнев Империи, клиент 1.4.5 версии, сборка 2305, версия обновления 237

BaseAdress=00B4EF34
GameAdress=00B4F5FC

пишу на с++, но неплохо читаю код и на других языках.

Заранее спасибо!

[=[Rush]=]

Пример на Delphi:

type
  PParams = ^TParams;
  TParams = packed record
    Type_, WID: DWORD;
  end;

procedure PickWalkCall(aPParams: PParams); Stdcall;
const
  GameAdress = $00B4F5FC;
  PickWalkAdress = $00471860;
  HostPlayerStruct34Adress = $34;
var
  Type_, WID, CallAddress: DWORD;
begin
  Type_:=aPParams^.Type_;
  WID:=aPParams^.WID;
  CallAddress:=PickWalkAdress;
  asm
    pushad
      mov ecx, dword ptr[GameAdress]
      mov ecx, dword ptr[ecx+HostPlayerStruct34Adress]
      push Type_
      push WID
      call CallAddress
    popad
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  aParams: TParams;
  ProcessID, hProcess: DWORD;
begin
  ProcessID:=0;
  GetWindowThreadProcessID(FindWindow(nil,PChar('Perfect World')),@ProcessID);
  if ProcessID<>0 then
    hProcess:=OpenProcess(PROCESS_ALL_ACCESS,False,ProcessID);
  aParams.Type_:=0;            //0-лут / 1-шахта
  aParams.WID:=3222366926;     //WID Лута/Шахты
  InjectFunc(hProcess,@PickWalkCall,@aParams,SizeOf(aParams));
end;

[des99]

Спасибо большое, нашел ошибку, оказалось все банально заместо GA подставил BA

с меня спасибо, когда смогу поставить