Обновления Диалога Статуса Персонажа Для Клиентов 5.х.х, Не зрал куда кинуть, т.к. это не скрипт Опции

[Breaker]

Для клиентов 5.x.x - 6.x.x

Код

ON=@UserStats
IF (<ARGO>!=<UID>)
   // If this creature another npc/player...
ELIF StrMatch("5.0.*","<CLIENTVERSION>") || StrMatch("6.0.*","<CLIENTVERSION>")
   // Status Bar Info >----------------------------------------------------------------->
   LOCAL.PACKET  ="011"                                              // CMD
   LOCAL.PACKET .=" W0058"                                           // Length 
   LOCAL.PACKET .=" D<UID>"                                          // UID
   LOCAL.PACKET .=" <NameToASC <NAME>,30>"                           // Name
   LOCAL.PACKET .=" W<HVAL <HITS>>"                                  // Hitpoints
   LOCAL.PACKET .=" W<HVAL <MaxHITS>>"                               // Max Hitpoints 
   LOCAL.PACKET .=" 00"                                              // Name Change Flag (0x0=not allowed, 0x1=allowed)
   LOCAL.PACKET .=" 05"                                              // 0x00: end of packet, 0x01: following flag, 0x03: Extended info, 0x04: Client 4.x, 0x05: Client 5.x
   LOCAL.PACKET .=" B<HVAL <SEX>>"                                   // Sex (0=Male, 1=Female) 
   LOCAL.PACKET .=" W<HVAL <STR>>"                                   // STR
   LOCAL.PACKET .=" W<HVAL <DEX>>"                                   // DEX
   LOCAL.PACKET .=" W<HVAL <INT>>"                                   // INT
   LOCAL.PACKET .=" W<HVAL <STAM>>"                                  // Stamina
   LOCAL.PACKET .=" W<HVAL <MaxSTAM>>"                               // Max Stamina
   LOCAL.PACKET .=" W<HVAL <MANA>>"                                  // Mana
   LOCAL.PACKET .=" W<HVAL <MaxMANA>>"                               // Max Mana
   LOCAL.PACKET .=" D<HVAL <GOLD>>"                                  // Gold
   LOCAL.PACKET .=" W<HVAL <AC>>"                                    // Armor Class
   LOCAL.PACKET .=" W<HVAL <WEIGHT>/10>"                             // Weight
   LOCAL.PACKET .=" W<HVAL (<MAXWEIGHT>/10)+<MODMAXWEIGHT>>"         // Max Weight
   LOCAL.PACKET .=" 01"
   LOCAL.PACKET .=" W<HVAL <SERV.SKILLCLASS.<SKILLCLASS>.STATSUM>>"  // StatCAP
   LOCAL.PACKET .=" B<HVAL <CURFOLLOWER>>"                           // Pets Current
   LOCAL.PACKET .=" B<HVAL <MAXFOLLOWER>>"                           // Pets Maximum
   LOCAL.PACKET .=" W<HVAL <RESFIRE>>"                               // Fire Resisting
   LOCAL.PACKET .=" W<HVAL <RESCOLD>>"                               // Cold Resisting
   LOCAL.PACKET .=" W<HVAL <RESPOISON>>"                             // Poison Resisting
   LOCAL.PACKET .=" W<HVAL <RESENERGY>>"                             // Enegry Resisting
   LOCAL.PACKET .=" W<HVAL <LUCK>>"                                  // Luck
   LOCAL.PACKET .=" W<HVAL <GetDamageLo>>"                           // Character Damage(Lo)
   LOCAL.PACKET .=" W<HVAL <GetDamageHi>>"                           // Character Damage(Hi)
   LOCAL.PACKET .=" 00"                                              // Titching points
   SENDPACKET <LOCAL.PACKET>
   // General Information Packet: Extended Stats >-------------------------------------->
   LOCAL.STATS = <STATLOCK[INT]><QVAL (<STATLOCK[DEX]>)?|<QVAL (<STATLOCK[DEX]>==1)?04:08>:>
   LOCAL.STATS = (<STATLOCK[STR]>*010)+<LOCAL.STATS>
   LOCAL.PACKET  ="0BF"                                              // CMD
   LOCAL.PACKET .=" W0011"                                           // Length
   LOCAL.PACKET .=" W0019"                                           // Sub.Command (Extended stats)
   LOCAL.PACKET .=" 02"                                              // 0x2=2D client, 0x5=KR
   LOCAL.PACKET .=" D<UID>"                                          // UID
   LOCAL.PACKET .=" 00"                                              // Unknown (always 0) 
   LOCAL.PACKET .=" B<HVAL <LOCAL.STATS>>"                           // (0=up, 1=down, 2=locked)
   LOCAL.PACKET .=" 00"                                              // unknown (0x00) 
   LOCAL.PACKET .=" 00 00 00 00"                                     // unknown (0x00000000)
   SENDPACKET <LOCAL.PACKET>
   RETURN 1
ENDIF

GetDamageLo, GetDamageHi есть возратные ункции которые расчитываю урон, т.е.. заменить на вашу функцию получения урона.

PS Кто не понял, реч идёт о:

Сообщение отредактировал Breaker - 26.12.2008, 10:27

[Wap]

NameToASC тоже твоя самодельная функция?

[Breaker]

Код

//<------------------------------------------------------------------------------------->
//< ARGS=Name >------------------------------------------------------------------------->
//<------------------------------------------------------------------------------------->
[FUNCTION NameToASC]
IF (<ARGV>==2)
   LOCAL.RESULT=<ASC <ARGV[0]>>
   FOR 1 <EVAL 30-StrLEN(<ARGV[0]>)> 
    LOCAL.RESULT=<LOCAL.RESULT> 00
   ENDFOR 
   RETURN <LOCAL.RESULT>
ENDIF
RETURN 0

[Wap]

Ясно, спс. А то я вначале почему-то подумал, что это строенная функция, и не мог понять, почему же она не работает. При любом возможном синтаксисе. (IMG:style_emoticons/default/smile.gif)