Показать сообщение отдельно
Старый 22.11.2010, 13:46   #19
Новичок
 
Регистрация: 08.07.2010
Сообщений: 29
Сказал Спасибо: 15
Имеет 2 спасибок в 2 сообщенях
afonbka пока неопределено
По умолчанию

или хотябы подскажите как сделать, чтобы в этом скрипте хп проверялось только у заданного конекта, а не у всех окон. Вот скрипт.

Код:
//автоматическое использование НР пробирок
const
    Name = 'UberWark';

var MyID:Word;
    OID:String;

begin
 if FromServer and (pck[1]=#$32) then  MyID:=ReadD(18);
 if FromServer and (pck[1]=#$18) and (ReadD(2)=MyID) then
  if ReadD(6)=4 then
   if (ReadD(14)<=ReadD(11)) then
    begin
     buf:=HStr('19 D9 03 21 10 00 00 00 00');    
     SendToServerEx(Name);
    end;
end.
Определяет хп у всех окон, например у бд неполное хп, варк жрет банки, у свс не полное хп, варк жрет банки, в общем определяет хп у всех окон, но пакет на питье отправляет все правильно. Прошу помоч реализовать

В общем надо, чтоыб вот эту процедуру

Код:
begin
 if FromServer and (pck[1]=#$32) then  MyID:=ReadD(18);
 if FromServer and (pck[1]=#$18) and (ReadD(2)=MyID) then
  if ReadD(6)=4 then
   if (ReadD(14)<=ReadD(11)) then
скрипт выполнял толькона конекте (Name) То есть UberWark

Добавлено через 22 минуты
Думаю что вот так ето делается?

Код:
if FromServer and (ConnectName=Name)
Добавлено через 4 минуты
Но теперь он их пьет непереставая, несмотря неначье хп. Прошу помоч разобратся...

Добавлено через 9 минут
Вот так вот помоему получилось:

Код:
 if FromServer and (ConnectName=(Name))
Добавлено через 1 минуту

Хотя нет, все также пьет по старому не перестовая и не смотря неначье хп. Помогите решить проблему.

Последний раз редактировалось afonbka, 22.11.2010 в 13:48. Причина: Добавлено сообщение
afonbka вне форума   Ответить с цитированием