Показать сообщение отдельно
Старый 29.07.2008, 22:08   #8
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Можно взять в пакете
delphi Код:
s0E=StatusUpdate:h(psize)c(ID)d(ObjectID)d(AttribCount:For.0002)d(AttrID:Get.FSup)d(AttrValue)

Расшифровка AttrValue
delphi Код:
function GetFSup(ar1 : integer) : string; // внешняя ф-ция, вызывается не из скрипта, а по аргументу // :Get.FSup - Status Update ID begin   case ar1 of     01: result := 'Level';      02: result := 'EXP';         03: result := 'STR';     04: result := 'DEX';        05: result := 'CON';         06: result := 'INT';     07: result := 'WIT';        08: result := 'MEN';         09: result := 'cur_HP';     $0A: result := 'max_HP';   $0B: result := 'cur_MP';     $0C: result := 'max_MP';     $0D: result := 'SP';       $0E: result := 'cur_Load';   $0F: result := 'max_Load';     $11: result := 'P_ATK';    $12: result := 'ATK_SPD';    $13: result := 'P_DEF';     $14: result := 'Evasion';  $15: result := 'Accuracy';   $16: result := 'Critical'     $17: result := 'M_ATK';    $18: result := 'CAST_SPD';   $19: result := 'M_DEF';     $1A: result := 'PVP_FLAG'; $1B: result := 'KARMA';      $21: result := 'cur_CP';     $22: result := 'max_CP';     else result := '?'   end;   result := #2+result+#15; end;;

ps: взято из wpp Sauron'а
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился 2 спасибками от: