[VIP] баг на заточку (скрипт)

[J-Fobos]

const
name='Never'; ///Ник
level=65000; /// Уровень заточки
var
x,ID:integer;

begin
if (FromClient) and (ConnectName=name) and (pck[1]=#$b0) then /// Ловим покупку
begin
id:=readd(2); /// Считываем ID
x:=readd(6); /// Считываем смещение, положение, хз=)
pck:=''; /// Шмотку на 0 не покупаем, нах она нужна?
buf:=#$b0; /// Составляем пакет
writed(id);
writed(x+level);
WriteD(1);
SendToServer; ///Отсылаем
end;
end.

сервер l2fl.ru
Для тех кто не понял о чём идёт речь вот темка http://zhyk.ru/forum/showthread.php?p=35499#post35499