Андрес функции для починки (005F73C0)

[krysun]

Старый адрес "005F73C0".
Какой новый?

[krukovis]

Цитата: Сообщение от krysun Старый адрес "005F73C0". Какой новый?

Может лучше пакетами?

//Чинить все
public byte[] RepairAll()
{
byte[] packet = { 0x25, 0x0, 0x3, 0x0, 0x0, 0x0, 0x6, 0x0, 0x0, 0x0, 0xff, 0xff, 0xff, 0xff, 0x0, 0x0 };
return packet;
}
//Чинить конкретный предмет
public byte[] RepairSingleItem(int itemID, int isEquipped, int locationIndex)
{
byte[] packet = { 0x25, 0x0, 0x3, 0x0, 0x0, 0x0, 0x6, 0x0, 0x0, 0x0, 0xff, 0xff, 0xff, 0xff, 0x0, 0x0 };
byte[] item_ID = BitConverter.GetBytes(itemID);
byte[] is_Equipped = BitConverter.GetBytes(isEquipped);
byte[] location_Index = BitConverter.GetBytes(locationIndex);
Array.Copy(item_ID, 0, packet, 10, 4);
Array.Copy(is_Equipped, 0, packet, 14, 1);
Array.Copy(location_Index, 0, packet, 15, 1);
return packet;
}

[krysun]

Спасибки. Но С не силен.
А можно строку пакета вида
xxx{YYYY}zzzz{QQQQ}
YYYY - предмет
QQQQ - ячейка.
Дальше разберусь. Спасибо.

PacketListener - ловится?
------
Проверил. Ловится

[xx xx xx xx] - id шмотки
{xx} - # ячейки на кукле
25 00 03 00 00 00 06 00 00 00 [59 01 00 00] 01 {00} -чинить пуху
25 00 03 00 00 00 06 00 00 00 E3 30 00 00 01 01 -шляпу
25 00 03 00 00 00 06 00 00 00 E5 30 00 00 01 04 -доспех
25 00 03 00 00 00 06 00 00 00 E8 30 00 00 01 06 -поножи
25 00 03 00 00 00 06 00 00 00 EB 30 00 00 01 07 -сапоги
25 00 03 00 00 00 06 00 00 00 05 01 00 00 01 02 -ожерелье
25 00 03 00 00 00 06 00 00 00 9C 01 00 00 01 05 -украшение
25 00 03 00 00 00 06 00 00 00 73 01 00 00 01 03 -накидка
25 00 03 00 00 00 06 00 00 00 F0 30 00 00 01 08 -наручи
25 00 03 00 00 00 06 00 00 00 33 01 00 00 01 09 -колцо 1
25 00 03 00 00 00 06 00 00 00 33 01 00 00 01 0A -кольцо2
25 00 03 00 00 00 06 00 00 00 FF FF FF FF 00 00 -ЧИНИТЬ ВСЁ

Еще:
25 00 02 00 00 00 10 00 00 00 01 00 00 00 [XX XX] 00 00 [YY YY] 00 00 [ZZ ZZ] 00 00 
XX XX - ид предмета
YY YY - № ячейки в сумке
ZZ ZZ - Количество продаваемых предметов

Единственное, длины переменных не знаю. Может мало, или много выделил. Кто знает, поправте, плиз.
А так пока что работает.

Еще, как правильно (или проще) перевернуть в Delphi байты?
А то я вот таким вот способом делаю:

function Rev (data: dword):string;
var
  s:string;
begin
  s:= inttohex(data,8);
  Result:=s[7]+s[8]+s[5]+s[6]+s[3]+s[4]+s[1]+s[2];
end;

[VeTaL_UA]

Цитата: Сообщение от krysun Еще, как правильно (или проще) перевернуть в Delphi байты?

Я так перевертаю:

function Rev(data:string):string;
var
s:string;
begin
result:='';
s:=data;
 repeat
 result:=result+Copy(s,length(s)-1,2);
 Delete(s,length(s)-1,2);
 until
 (length(s)=0);
end;