Помогите переделать скрипт под себя...

[TwistedEvil]

Имееться вот такой простенький скрипт для заточки

const
Name='NIK'; //сюда свой ник
var
timer:TTimer;
x:byte;

procedure Init;
begin
timer:=TTimer.Create(nil);
timer.interval:=180; //скорость точки
timer.OnTimer:=@fireTimer;
timer.enabled:=true;
x:=1;
end;

procedure Free;
begin
timer.Free;
end;

procedure fireTimer(Sender: TObject);
begin
case x of
1:begin
buf:=hstr('19 12 40 12 10 00 00 00 00'); //пакет активации точки(UseItem)
SendToServerEx(Name);
inc(x);
end;
2:begin
buf:=hstr('5F 0C F1 00 10 00 00 00 00'); //пакет заточки вещи(RequestEnchantItem)
SendToServerEx(Name);
x:=1;
end;
end;{case}
end;

begin
if FromServer then
begin
case pck[1] of
#$21: begin //InventoryUpdate
if (ReadD(12)=10440)// ID вещи(с пакета InventoryUpdate)
and (ReadD(34)=11)// предел заточки
then timer.enabled:=false;;
end;
end;
end;
end.

Проблема возникает в условии окончания заточки. Его и надо как-то переписать. Не могу разобраться с этими смещениями... :o

Вот пакет InventoryUpdate

Tèï: 0x21 (InventoryUpdate)
Pàçìåð: 73+2
Âðåìÿ ïðèõîäà: 01:13:43:597
0002 h count: 1 (0x0001)
[Íà÷àëî ïîâòîðÿþùåãîñÿ áëîêà 1/1]
0004 h 1add 2mod 3remove: 2 (0x0002)
0006 d ObjectID: 269232562 (0x100C29B2)
000A d ItemID: Áëàãîñëîâåííûé Ñâèòîê: Ìîäèôèöèðîâàòü Äîñïåõ (D) ID:6576 (0x19B0)
000E d Slot: 27 (0x0000001B)
0012 q Count: 24644
001A h ItemType2: 5 (0x0005)
001C h CustomType1: 0 (0x0000)
001E h isEquipped: 0 (0x0000)
0020 d BodyPart: 0 (0x00000000)
0024 h EnchantLevel: 0 (0x0000)
0026 h CustType2: 0 (0x0000)
0028 d AugmID: 0
002C d Mana: -1 (0xFFFFFFFF)
0030 d remainTime: 0 (0x00000000)
0034 h AttackElem: 65534 (0xFFFE)
0036 h AttackElemVal: 0 (0x0000)
0038 h DefAttrFire: 0 (0x0000)
003A h DefAttrWater: 0 (0x0000)
003C h DefAttrWind: 0 (0x0000)
003E h DefAttrEarth: 0 (0x0000)
0040 h DefAttrHoly: 0 (0x0000)
0042 h DefAttrUnholy: 0 (0x0000)
0044 h EnchEff1: 0 (0x0000)
0046 h enchEff2: 0 (0x0000)
0048 h enchEff3: 0 (0x0000)
[Êîíåö ïîâòîðÿþùåãîñÿ áëîêà 1/1]

з.ы. если еще какая-то информация нужна, пишите, выложу...

з.з.ы. заранее спасибо.

[dyh9l]

хз как это можно назвать скриптом, но
0024 h EnchantLevel: 0 (0x0000) это 36 байт

[Nickers]

У меня сейчас голова взорвется... Как этот скрипт может точить? Почему бы не взять тамбика или еще кого?

[dyh9l]

Nickers, походу стопковые блески ))))))))

[Nickers]

а пакеты Ctr+C, Ctr+V??? Омг) Мой лучше. Ток мой под С6))