Кружок нубов(Вопрос-Ответ)

[-=Ma}{imuS=-]

это снова я)
наткнулся на простенький скрипт на авто подачу НР-бутылок:

//by 6yDDucT
//автоматическое использование НР пробирок
var MyID:Word;
    OID:String;

begin
 if FromServer and (pck[1]=#$27) and (ReadD(12)=1060) then
   OID:=pck[8]+pck[9]+pck[10]+pck[11]; //1060 - idItem'a который мы хотим юзать, в данном случае Lesser Healing Potion

 if FromServer and (pck[1]=#$04) then  MyID:=ReadD(18);
 if FromServer and (pck[1]=#$0e) and (ReadD(2)=MyID) then
  if ReadD(6)=4 then
   if (ReadD(14)<=400) then //400 - кол-во ХП при котором начнется пьянка.
    begin
     buf:=#$14+OID+#$00#$00#$00#$00;
     SendToServer;
    end;
end.

чето не вдупляю как заставить его пить МР бутылки вместо НР ?? (играю на эбисе) если я не ошибаюсь юзается пакет charinfo, как его расшифровать? обьясните плиз русским языком чтоб я понял...