Показать сообщение отдельно
Старый 28.07.2008, 23:11   #176
Новичок
 
Регистрация: 12.06.2008
Сообщений: 24
Сказал Спасибо: 7
Имеет 1 спасибку в 1 сообщении
-=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, как его расшифровать? обьясните плиз русским языком чтоб я понял...

Последний раз редактировалось -=Ma}{imuS=-, 28.07.2008 в 23:11. Причина: ошибка в коде
-=Ma}{imuS=- вне форума   Ответить с цитированием