[Delphi][Poszukiwany/Poszukiwana] C++ -> Delphi , struktura containerów w tibii
Dzień dobry, cześć i czołem, pytacie skąd się wziąłem...
Jestem weso...
ops nie to.
Do rzeczy, potrzebuję kogoś, kto byłby tak miły i przepisał/napisał/whatever dla mnie strukturę backpacków tibiałkowych.
Posiadam kod w c++ (od @szulak ;, na dole tematu)
Z c++ mam tyle wspólnego, co politycy z mówieniem prawdy, tak więc liczę na was torgowi programerzy
czy ktoś byłby skłonny mi pomóc ?
Jak potrzeba to postawię jakiegoś browara czy dwa.
Aktualna funkcja jaką posiadam działa - owszem - ale mogę odczytywać tylko pierwsze trzy otwarte containery, każdy kolejny otwarty "staje się" trzecim, a "poprzedni trzeci" przestaje być widoczny.
Kod:
backpack_ptr=$9f7498;
bp_offset1=$8 ;
bp_offset2=$0 ;
bp_offset3=$10 ;
bp_offset4=$28 ;
Kod:
function TMemory.getbpa(id:integer):integer;
var x:integer;
begin
x:=memory.memreadinteger(backpack_ptr);
x:=memory.memreadinteger(x+bp_offset1);
x:=memory.memreadinteger(x+bp_offset2+(id*4)+mem.baza);
x:=memory.memreadinteger(x+bp_offset3+mem.baza);
Result:=x+bp_offset4+mem.baza;
end;
Kod:
function tmemory.getbpindex(name:string):integer;
var id,x:integer;
begin
for id:=0 to 3 do begin
x:=memory.memreadinteger(backpack_ptr);
x:=memory.memreadinteger(x+bp_offset1+mem.baza);
x:=memory.memreadinteger(x+bp_offset2+(id*4)+mem.baza);
x:=memory.memreadinteger(x+bp_offset3+mem.baza);
if name= memory.memreadstring(x+bp_offset4+mem.baza) then begin result:=id; break end;
end;
end;
Głównie zależy mi na TMemory.getbpa()
@arkes ;
@szulak ;
@CoreBot ;
@Ktokolwiek
Rodacy... Pomożecie ?
http://pastebin.com/2eRQhY8U
http://pastebin.com/2qRRVNZf
http://pastebin.com/KZDwUgsA