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

[NLObP]

Сообщение от metalFan

надо всего лишь поменять 1060 на айди мана драга ивсе, а чар инфо тебе не нужен

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

Используется пакет

0E=StatusUpdate:h(ObjectID)d(AttribCount)d(AttrID)d(AttrValue)

ЗЫЖ если поюзать поиск, то можно найти и другие реализации

procedure StatusUpdate;       //обновление данных о себе
var
  i: integer;
begin
  for i:=0 to ReadD(6)-1 do
    case pck[i*8+10] of
      #$09: MyHP:=ReadD(i*8+14);
      #$0A: MyMaxHP:=ReadD(i*8+14);
      #$0B: MyMP:=ReadD(i*8+14);
      #$0C: MyMaxMP:=ReadD(i*8+14);
    end;
  if (MyMP<'значение') then
  begin
  .... //юзать бутылку
  end;
end;