Показать сообщение отдельно
Старый 19.04.2008, 22:07   #3
Новичок
 
Аватар для Alan
 
Регистрация: 11.10.2007
Адрес: Питер
Сообщений: 13
Сказал Спасибо: 261
Имеет 0 спасибок в 0 сообщенях
Alan
По умолчанию

ту Voron.
вопросец по твоему куску скрипта:
delphi Код:
//YES-  РУТ ПО АССИСТУ (4-я кнопка) либо переделать в какойто дебаф от каждого бафера он свой.. по ассисту все баферы какуюто куйню кинут на цель по ассисту..   if FromClient then   if ConnectName=NameKom then   if pck[1]+pck[2]=hstr('1B 06') then     begin      pck:='';       buf:= hstr('14') + OidgcpPotion0 + hstr('00 00 00 00'); // обычную хилку       if (OidgcpPotion0 <> '') then SendToServerEX(NameKom); {      buf:=hstr('04') + IDAssistTarget + Bot1X + Bot1Y + Bot1Z + hstr('00');       if NameBot1<>'' then SendToServerEX(NameBot1);       buf:=hstr('04') + IDAssistTarget + Bot2X + Bot2Y + Bot2Z + hstr('00');       if NameBot2<>'' then SendToServerEX(NameBot2);       buf:=hstr('04') + IDAssistTarget + Bot3X + Bot3Y + Bot3Z + hstr('00');       if NameBot3<>'' then SendToServerEX(NameBot3);       buf:=hstr('2F B1 04 00 00 00 00 00 00 00');       if NameBot1<>'' then SendToServerEX(NameBot1);       buf:=hstr('2F B1 04 00 00 00 00 00 00 00');       if NameBot2<>'' then SendToServerEX(NameBot2);       buf:=hstr('2F B1 04 00 00 00 00 00 00 00');       if NameBot3<>'' then SendToServerEX(NameBot3);}      exit;     end;

что не так? баферы не кидают рут

Последний раз редактировалось NLObP, 07.05.2008 в 01:13. Причина: вставил тэги [HIGHLIGHT="delphi"]...[/HIGHLIGHT]
Alan вне форума   Ответить с цитированием