Sancaros/stoneage8.5
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
a5b185b7ef
stoneage8.5/石器时代服务器端最新完整源代码/Serv/gmsv/mylua/charbase.c

2438 lines
62 KiB
C
Raw Normal View History

Revert "re upload" This reverts commit 274b7d169c113a668047ffd2a7826bdff4d9b391.
2020-06-23 15:23:51 +08:00
#include <string.h>
#include "char.h"
#include "battle.h"
#include "object.h"
#include "char_base.h"
#include "enemy.h"
#include "mylua/base.h"
#include "npcutil.h"
#include "readmap.h"
#include "log.h"
#include "pet.h"
#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"
#include "longzoro/version.h"
#include "handletime.h"
#include "item_event.h"
#include "lssproto_serv.h"
#include "shop.h"
#ifdef _ALLBLUES_LUA
#include "mylua/mylua.h"
extern MY_Lua MYLua;
static CharBase CharBaseWorkInt[] = {
{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKOBJINDEX}
#ifdef _FONT_SIZE
,{{"<EFBFBD>ֺ<EFBFBD>"}, CHAR_WORKFONTSIZE}
#endif
,{{"ս<EFBFBD><EFBFBD>"}, CHAR_WORKBATTLEMODE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKPARTYMODE}
,{{"ս<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKBATTLEINDEX}
,{{"ս<EFBFBD><EFBFBD><EFBFBD>ӿ<EFBFBD>1"}, CHAR_WORKBATTLECOM1}
,{{"ս<EFBFBD><EFBFBD><EFBFBD>ӿ<EFBFBD>2"}, CHAR_WORKBATTLECOM2}
,{{"NPC<EFBFBD><EFBFBD>ʱ1"}, CHAR_NPCWORKINT1}
,{{"NPC<EFBFBD><EFBFBD>ʱ2"}, CHAR_NPCWORKINT2}
,{{"NPC<EFBFBD><EFBFBD>ʱ3"}, CHAR_NPCWORKINT3}
,{{"NPC<EFBFBD><EFBFBD>ʱ4"}, CHAR_NPCWORKINT4}
,{{"NPC<EFBFBD><EFBFBD>ʱ5"}, CHAR_NPCWORKINT5}
,{{"NPC<EFBFBD><EFBFBD>ʱ6"}, CHAR_NPCWORKINT6}
,{{"NPC<EFBFBD><EFBFBD>ʱ7"}, CHAR_NPCWORKINT7}
,{{"NPC<EFBFBD><EFBFBD>ʱ8"}, CHAR_NPCWORKINT8}
,{{"NPC<EFBFBD><EFBFBD>ʱ9"}, CHAR_NPCWORKINT9}
,{{"NPC<EFBFBD><EFBFBD>ʱ10"}, CHAR_NPCWORKINT10}
,{{"NPC<EFBFBD><EFBFBD>ʱ11"}, CHAR_NPCWORKINT11}
,{{"NPC<EFBFBD><EFBFBD>ʱ12"}, CHAR_NPCWORKINT12}
,{{"NPC<EFBFBD><EFBFBD>ʱ13"}, CHAR_NPCWORKINT13}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ģʽ"}, CHAR_WORKPETFOLLOWMODE}
,{{"<EFBFBD><EFBFBD>Ա1"}, CHAR_WORKPARTYINDEX1}
,{{"<EFBFBD><EFBFBD>Ա2"}, CHAR_WORKPARTYINDEX2}
,{{"<EFBFBD><EFBFBD>Ա3"}, CHAR_WORKPARTYINDEX3}
,{{"<EFBFBD><EFBFBD>Ա4"}, CHAR_WORKPARTYINDEX4}
,{{"<EFBFBD><EFBFBD>Ա5"}, CHAR_WORKPARTYINDEX5}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>HP"}, CHAR_WORKMAXHP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>MP"}, CHAR_WORKMAXMP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKATTACKPOWER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKDEFENCEPOWER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKQUICK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKFIXVITAL}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKFIXSTR}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKFIXTOUGH}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ٶ<EFBFBD>"}, CHAR_WORKFIXDEX}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͼ"}, CHAR_WORKFMFLOOR}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKATTACKPOWER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKDEFENCEPOWER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKQUICK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKDBATTLEESCAPE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_WORKITEM_ADDEXPTIME}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ӳ<EFBFBD>"}, CHAR_WORKITEM_ADDEXP}
#ifdef _OFFLINE_SYSTEM
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_OFFLINE}
#endif
,{{"<EFBFBD><EFBFBD><EFBFBD>þ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKGETEXP}
#ifdef _AUTO_PK
,{{"<EFBFBD>Զ<EFBFBD>PK<EFBFBD><EFBFBD>"}, CHAR_WORK_AUTOPK}
,{{"<EFBFBD>Զ<EFBFBD>PK<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_AUTOPK_DEAD}
#endif
#ifdef _SPECIAL_COUNTER
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_COUNTER}
#endif
#ifdef _SPECIAL_TIMER
,{{"<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_WORK_TIMER}
#endif
#ifdef _STREET_VENDOR
,{{"<EFBFBD><EFBFBD>̯"}, CHAR_WORKSTREETVENDOR}
#endif
#ifdef _RECORD_IP
,{{"IP"}, CHAR_WORK_RECORD_IP}
#endif
#ifdef _ONLINE_TIME
,{{"<EFBFBD><EFBFBD>½ʱ<EFBFBD><EFBFBD>"}, CHAR_WORK_LOGIN_TIME}
#endif
#ifdef _NEWCLISETSERVID
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID"}, CHAR_WORK_SERVID}
#endif
//,{{"PKʱ<4B><CAB1>"}, CHAR_WORKDBATTLETIME}
#ifdef _MIND_ICON
,{{"<EFBFBD><EFBFBD>˼"}, CHAR_MIND_NUM}
#endif
#ifdef _PLAYER_EFFECT
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч<EFBFBD><EFBFBD>"}, CHAR_PLAYER_EFFECT}
#endif
#ifdef _MO_PLAYER_EFFECT
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч<EFBFBD><EFBFBD>"}, CHAR_PLAYER_EFFECT_PRIORITY}
,{{"ս<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч"}, CHAR_PLAYER_EFFECT_PET}
,{{"װ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч"}, CHAR_PLAYER_EFFECT_ITEM}
#endif
#ifdef FAMILY_MANOR_
,{{"ׯ԰<EFBFBD><EFBFBD>Ч"}, CHAR_PLAYER_EFFECT_MANOR}
#endif
#ifdef _SINGLE_ONLINE
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_SINGLE_ONLINE}
#endif
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKPLAYERINDEX}
#ifdef _NPC_EVENT_NOTICE
,{{"NOTICE"}, CHAR_WORK_NOTICE}
#endif
#ifdef _MO_LUA_RESIST
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKMODPOISON}
,{{"<EFBFBD>鿹<EFBFBD><EFBFBD>"}, CHAR_WORKMODPARALYSIS}
,{{"˯<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKMODSLEEP}
,{{"ʯ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKMODSTONE}
,{{"<EFBFBD>ƿ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKMODDRUNK}
,{{"<EFBFBD>쿹<EFBFBD><EFBFBD>"}, CHAR_WORKMODCONFUSION}
,{{"<EFBFBD>鿹<EFBFBD><EFBFBD>"}, CHAR_WORKMODWEAKEN}
,{{"<EFBFBD>翹<EFBFBD><EFBFBD>"}, CHAR_WORKMODDEEPPOISON}
,{{"<EFBFBD>Ͽ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKMODBARRIER}
,{{"Ĭ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORKMODNOCAST}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_POISON}
,{{"<EFBFBD>鿹<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_PARALYSIS}
,{{"˯<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_SLEEP}
,{{"ʯ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_STONE}
,{{"<EFBFBD>ƿ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_DRUNK}
,{{"<EFBFBD>쿹<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_CONFUSION}
,{{"<EFBFBD>鿹<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_WEAKEN}
,{{"<EFBFBD>翹<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_DEEPPOISON}
,{{"<EFBFBD>Ͽ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_BARRIER}
,{{"Ĭ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WORK_RESIST_NOCAST}
#endif
};
static CharBase CharBaseWorkChar[] = {
{{"NPC<EFBFBD><EFBFBD>ʱ1"}, CHAR_NPCWORKCHAR1}
,{{"NPC<EFBFBD><EFBFBD>ʱ2"}, CHAR_NPCWORKCHAR2}
,{{"NPC<EFBFBD><EFBFBD>ʱ3"}, CHAR_NPCWORKCHAR3}
,{{"NPC<EFBFBD><EFBFBD>ʱ4"}, CHAR_NPCWORKCHAR4}
,{{"NPC<EFBFBD><EFBFBD>ʱ5"}, CHAR_NPCWORKCHAR5}
,{{"NPC<EFBFBD><EFBFBD>ʱ6"}, CHAR_NPCWORKCHAR6}
#ifdef _STREET_VENDOR
,{{"<EFBFBD><EFBFBD>̯"}, CHAR_STREETVENDOR_NAME}
#endif
#ifdef _NEWCLISETMAC
,{{"MAC"}, CHAR_WORK_MAC}
#endif
};
static CharBase CharBaseValue[] = {
{{"<EFBFBD><EFBFBD>"}, 0}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, 1}
,{{"<EFBFBD><EFBFBD>"}, 2}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, 3}
,{{"<EFBFBD><EFBFBD>"}, 4}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, 5}
,{{"<EFBFBD><EFBFBD>"}, 6}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, 7}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TYPENONE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TYPEPLAYER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TYPEENEMY}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TYPEPET}
#ifdef _ALLBLUES_LUA
,{{"LUA"}, CHAR_TYPELUANPC}
#endif
#ifdef _PLAYER_NPC
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TYPEPLAYERNPC}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TYPEPLAYERPETNPC}
#endif
};
static CharBase CharBaseWorkValue[] = {
{{"<EFBFBD><EFBFBD>"}, CHAR_PARTY_NONE}
,{{"<EFBFBD>ӳ<EFBFBD>"}, CHAR_PARTY_LEADER}
,{{"<EFBFBD><EFBFBD>Ա"}, CHAR_PARTY_CLIENT}
,{{"<EFBFBD><EFBFBD>ս<EFBFBD><EFBFBD>"}, BATTLE_CHARMODE_NONE}
,{{"ս<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʼ<EFBFBD><EFBFBD>"}, BATTLE_CHARMODE_INIT}
,{{"<EFBFBD>ȴ<EFBFBD>ս<EFBFBD><EFBFBD>"}, BATTLE_CHARMODE_C_WAIT}
,{{"ȷ<EFBFBD><EFBFBD>ս<EFBFBD><EFBFBD>"}, BATTLE_CHARMODE_C_OK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ս<EFBFBD><EFBFBD>"}, BATTLE_CHARMODE_RESCUE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ս<EFBFBD><EFBFBD>"}, BATTLE_CHARMODE_FINAL}
,{{"<EFBFBD><EFBFBD>ս<EFBFBD><EFBFBD>ʼ<EFBFBD><EFBFBD>"}, BATTLE_CHARMODE_WATCHINIT}
,{{"û<EFBFBD>м<EFBFBD><EFBFBD><EFBFBD>"}, FMMEMBER_NONE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, FMMEMBER_APPLY}
,{{"<EFBFBD>峤"}, FMMEMBER_LEADER}
,{{"<EFBFBD><EFBFBD>Ա"}, FMMEMBER_MEMBER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, FMMEMBER_ELDER}
};
static CharBase CharBaseInt[] = {
{{"ͼ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_BASEIMAGENUMBER}
,{{"ԭͼ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_BASEBASEIMAGENUMBER}
,{{"ͷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FACEIMAGENUMBER}
,{{"<EFBFBD>浵"}, CHAR_SAVEINDEXNUMBER}
,{{"<EFBFBD><EFBFBD>ͼ<EFBFBD><EFBFBD>"}, CHAR_FLOOR}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>X"}, CHAR_X}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Y"}, CHAR_Y}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_DIR}
,{{"<EFBFBD>ȼ<EFBFBD>"}, CHAR_LV}
,{{"ʯ<EFBFBD><EFBFBD>"}, CHAR_GOLD}
,{{"HP"}, CHAR_HP}
,{{"MP"}, CHAR_MP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>MP"}, CHAR_MAXMP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_VITAL}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_STR}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TOUGH}
,{{"<EFBFBD>ٶ<EFBFBD>"}, CHAR_DEX}
,{{"<EFBFBD><EFBFBD>"}, CHAR_EARTHAT}
,{{"ˮ"}, CHAR_WATERAT}
,{{"<EFBFBD><EFBFBD>"}, CHAR_FIREAT}
,{{"<EFBFBD><EFBFBD>"}, CHAR_WINDAT}
,{{"ս<EFBFBD><EFBFBD>"}, CHAR_DEFAULTPET}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_CHARM}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_LUCK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_DEADCOUNT}
,{{"<EFBFBD><EFBFBD>·<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WALKCOUNT}
,{{"˵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TALKCOUNT}
,{{"<EFBFBD>𻵴<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_DAMAGECOUNT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_GETPETCOUNT}
,{{"ɱ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_KILLPETCOUNT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_DEADPETCOUNT}
,{{"<EFBFBD><EFBFBD><EFBFBD>ʼ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_SENDMAILCOUNT}
,{{"<EFBFBD>ϳɴ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_MERGEITEMCOUNT}
,{{"PK<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_DUELBATTLECOUNT}
,{{"PKӮ<EFBFBD><EFBFBD>"}, CHAR_DUELWINCOUNT}
,{{"PK<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_DUELLOSECOUNT}
,{{"PK<EFBFBD><EFBFBD>ʤ"}, CHAR_DUELSTWINCOUNT}
,{{"PK<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_DUELSTLOSECOUNT}
,{{"PK<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʤ"}, CHAR_DUELMAXSTWINCOUNT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WHICHTYPE}
,{{"ѭ<EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_LOOPINTERVALAB}
#ifdef _NEWOPEN_MAXEXP
,{{"<EFBFBD>ܾ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_OLDEXP}
#endif
,{{"<EFBFBD><EFBFBD>ǰ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_EXP}
,{{"<EFBFBD><EFBFBD><EFBFBD>ܵ<EFBFBD>"}, CHAR_SKILLUPPOINT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_LEVELUPPOINT}
,{{"DP"}, CHAR_DUELPOINT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_EXP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_LASTTALKELDER}
,{{"ת<EFBFBD><EFBFBD>"}, CHAR_TRANSMIGRATION}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_SILENT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FMINDEX}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ"}, CHAR_FMLEADERFLAG}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FMSPRITE}
#ifdef _NEW_RIDEPETS
,{{"֤<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_LOWRIDEPETS}
#endif
#ifdef _RIDE_CF
,{{"֤<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>1"}, CHAR_LOWRIDEPETS1}
#ifdef _ADD_RIDE_CF
,{{"֤<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>2"}, CHAR_LOWRIDEPETS2}
#endif
#endif
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_BANKGOLD}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_RIDEPET}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_CRITIAL}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_COUNTER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_LASTLEAVETIME}
#ifdef _GAMBLE_BANK
// ,{{"<22>ij<EFBFBD><C4B3><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_RIDEPET}
#endif
#ifdef _DROPSTAKENEW
,{{"<EFBFBD>ij<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_GAMBLENUM}
#endif
#ifdef _TRUMP_EQUIPMENT
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч"}, CHAR_TRUMP_EFFECT}
#endif
#ifdef _PERSONAL_FAME // Arminius 8.30: <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FAME}
#endif
#ifdef _ATTACK_EFFECT
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч"}, CHAR_ATTACK_EFFECT}
#endif
#ifdef _ATTACK_MAGIC
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_EARTH_EXP}
,{{"ˮħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WATER_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FIRE_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WIND_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_EARTH_RESIST}
,{{"ˮħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WATER_RESIST}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FIRE_RESIST}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WIND_RESIST}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ⱦ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_EARTH_ATTMAGIC_EXP}
,{{"ˮħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ⱦ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WATER_ATTMAGIC_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ⱦ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FIRE_ATTMAGIC_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ⱦ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_WIND_ATTMAGIC_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ծ<EFBFBD><EFBFBD><EFBFBD>ֵ"}, CHAR_EARTH_DEFMAGIC_EXP}
,{{"ˮħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ծ<EFBFBD><EFBFBD><EFBFBD>ֵ"}, CHAR_WATER_DEFMAGIC_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ծ<EFBFBD><EFBFBD><EFBFBD>ֵ"}, CHAR_FIRE_DEFMAGIC_EXP}
,{{"<EFBFBD><EFBFBD>ħ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ծ<EFBFBD><EFBFBD><EFBFBD>ֵ"}, CHAR_WIND_DEFMAGIC_EXP}
#endif
#ifdef _CHAR_PROFESSION // WON ADD <20><><EFBFBD><EFBFBD>ְҵ
,{{"ְҵ<EFBFBD><EFBFBD>"}, PROFESSION_CLASS}
,{{"ְҵ<EFBFBD>ȼ<EFBFBD>"}, PROFESSION_LEVEL}
,{{"<EFBFBD><EFBFBD><EFBFBD>ܵ<EFBFBD><EFBFBD><EFBFBD>"}, PROFESSION_SKILL_POINT}
,{{"<EFBFBD><EFBFBD><EFBFBD>Ӷѵ<EFBFBD>"}, ATTACHPILE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, PROFESSION_FIRE_P}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, PROFESSION_ICE_P}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, PROFESSION_THUNDER_P}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, PROFESSION_FIRE_R}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, PROFESSION_ICE_R}
,{{"<EFBFBD>׿<EFBFBD><EFBFBD><EFBFBD>"}, PROFESSION_THUNDER_R}
#endif
#ifdef _NEW_MANOR_LAW
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_MOMENTUM}
#endif
#ifdef _VIP_SERVER
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_AMPOINT}
#endif
#ifdef _VIP_RIDE
,{{"<EFBFBD><EFBFBD>Ա"}, CHAR_VIPRIDE}
,{{"<EFBFBD><EFBFBD>Ա<EFBFBD><EFBFBD>Ч<EFBFBD><EFBFBD>"}, CHAR_VIPTIME}
#endif
#ifdef _ITEM_PET_LOCKED
,{{"<EFBFBD><EFBFBD>ȫ<EFBFBD><EFBFBD>"}, CHAR_LOCKED}
#endif
#ifdef _ONLINE_SHOP
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_BJ}
#endif
,{{"ģʽAI"}, CHAR_MODAI}
,{{"<EFBFBD>ɱ<EFBFBD>AI"}, CHAR_VARIABLEAI}
,{{"<EFBFBD>輼λ"}, CHAR_SLOT}
,{{"<EFBFBD><EFBFBD>ID"}, CHAR_PETID}
,{{"<EFBFBD><EFBFBD>ID"}, CHAR_PETENEMYID}
,{{"<EFBFBD>ػ<EFBFBD><EFBFBD><EFBFBD>"}, CHAR_PETFAMILY}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֵ"}, CHAR_ALLOCPOINT}
,{{"<EFBFBD>ɳ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_PETRANK}
,{{"<EFBFBD><EFBFBD><EFBFBD>Ƶȼ<EFBFBD>"}, CHAR_LIMITLEVEL}
#ifdef _PET_BEATITUDE
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֵ"}, CHAR_BEATITUDE}
#endif
#ifdef _CAMEO_MONEY
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_CAMEO}
#endif
#ifdef _MISSION_TRAIN
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_MISSIONTRAIN_NUM}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_MISSIONTRAIN_TIME}
#endif
#ifdef _PET_EVOLVE
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_EVOLVE}
#endif
#ifdef _ONLINE_TIME
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_ONLINE_TIME}
#endif
#ifdef _FLOOR_DIFI_FIELD
,{{"¥<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_FLOORDIFI_TIME}
#endif
#ifdef _ACTIVE_GAME
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTIVE}
#endif
#ifdef _SUPER
,{{"<EFBFBD><EFBFBD>Ʒ"}, CHAR_SUPER}
#endif
#ifdef _ALLDOMAN
,{{"Ӣ<EFBFBD>۳ƺ<EFBFBD>"}, CHAR_HEROFLOOR}
#endif
#ifdef _PLAYER_TITLE
,{{"<EFBFBD>ƺŵȼ<EFBFBD>"}, CHAR_TITLE_LV}
,{{"<EFBFBD>ƺ<EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_TITLE_TIME}
#endif
#ifdef _MISSION_TIME
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ"}, CHAR_MISSION_TIME}
#endif
#ifdef _PETCOM_
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_YHP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_YATK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_YDEF}
,{{"<EFBFBD><EFBFBD><EFBFBD>ٶ<EFBFBD>"}, CHAR_YQUICK}
,{{"<EFBFBD><EFBFBD><EFBFBD>ȼ<EFBFBD>"}, CHAR_YLV}
#endif
#ifdef _PET_FUSION
,{{"<EFBFBD>ںϳ<EFBFBD>"}, CHAR_FUSIONBEIT}
,{{"<EFBFBD>ںϵ<EFBFBD>"}, CHAR_FUSIONRAISE}
#endif
#ifdef _REGISTRATION_TIME
,{{"ǩ<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_REGISTRATION_TIME}
,{{"ǩ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_REGISTRATION_COUNT}
,{{"ǩ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_REGISTRATION_ONLINE_TIME}
#endif
#ifdef _SPECIAL_COUNTER
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_SPCOUNTER}
#endif
#ifdef _SPECIAL_TIMER
,{{"<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_SPTIMER}
#endif
#ifdef _OFFLINE_TIME
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_OFFLINE_TIME}
#endif
#ifdef _FAME_REG_TIME
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǩ<EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_FAME_REG_TIME}
#endif
#ifdef _PET_VALIDITY
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч<EFBFBD><EFBFBD>"}, CHAR_PETVALIDITY}
#endif
#ifdef _TENSE_FIELD
,{{"<EFBFBD><EFBFBD>ʱ<EFBFBD>ֶ<EFBFBD>"}, CHAR_TENSE_FIELD}
#endif
#ifdef _FM_JOINLIMIT
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>"}, CHAR_FMTIMELIMIT}
#endif
#ifdef _NEW_ITEM_
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>״̬"}, CHAR_NEWITEMFLG}
#endif
#ifdef _MO_PLAYER_EFFECT
,{{"Ĭ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч"}, CHAR_PLAYER_EFFECT_DEFAULT}
#endif
#ifdef _PETCOM_
,{{"Ԥ<EFBFBD><EFBFBD>Ѫ<EFBFBD><EFBFBD>"}, CHAR_YHP}
,{{"Ԥ<EFBFBD>⹥<EFBFBD><EFBFBD>"}, CHAR_YATK}
,{{"Ԥ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_YDEF}
,{{"Ԥ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_YQUICK}
,{{"Ԥ<EFBFBD><EFBFBD><EFBFBD>ȼ<EFBFBD>"}, CHAR_YLV}
#endif
#ifdef _MO_NO_WALK
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_NO_WALK}
#endif
#ifdef _NEW_TITLE
,{{"Ĭ<EFBFBD>ϳƺ<EFBFBD>"}, CHAR_TITLE_DEFAULT}
,{{"<EFBFBD>ƺ<EFBFBD>״̬1"}, CHAR_TITLE1}
,{{"<EFBFBD>ƺ<EFBFBD>״̬2"}, CHAR_TITLE2}
,{{"<EFBFBD>ƺ<EFBFBD>״̬3"}, CHAR_TITLE3}
#endif
#ifdef _TRUMP_EQUIPMENT
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>״̬"}, CHAR_TRUMPFLG}
#endif
#ifdef _CHAR_TITLE_STR_
,{{"<EFBFBD><EFBFBD><EFBFBD>ֳƺ<EFBFBD>"}, CHAR_TITLE_}
#endif
};
static CharBase CharBaseChar[] = {
{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_NAME}
,{{"<EFBFBD>dz<EFBFBD>"}, CHAR_OWNTITLE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_USERPETNAME}
,{{"<EFBFBD>˺<EFBFBD>"}, CHAR_CDKEY}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_FMNAME}
#ifdef _TEACHER_SYSTEM
,{{"<EFBFBD><EFBFBD>ʦ<EFBFBD>ʺ<EFBFBD>"}, CHAR_TEACHER_ID}
,{{"<EFBFBD><EFBFBD>ʦ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_TEACHER_NAME}
#endif
#ifdef _ITEM_SETLOVER
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˺<EFBFBD>"}, CHAR_LOVERID}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_LOVERNAME}
#endif
#ifdef _NEW_NAME
,{{"<EFBFBD>ƺ<EFBFBD>"}, CHAR_NEWNAME}
#endif
#ifdef _LOTTERY_SYSTEM
,{{"<EFBFBD><EFBFBD>Ʊ"}, CHAR_LOTTERY_VALUE}
#endif
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˺<EFBFBD>"}, CHAR_OWNERCDKEY}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_OWNERCHARANAME}
#ifdef _POWER_UP
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_POWER_UP}
#endif
#ifdef _VISUAL_BEATITUDE
,{{"ף<EFBFBD><EFBFBD>״̬"}, CHAR_VB}
#endif
,{{"Unicode"}, CHAR_UNIQUECODE}
};
static CharBase CharBaseEvent[] = {
{{"<EFBFBD><EFBFBD>ʼ<EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_INITFUNC}
//,{{"<22><><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_WALKPREFUNC}
//,{{"<22><><EFBFBD>ߺ<EFBFBD><DFBA>¼<EFBFBD>"}, CHAR_WALKPOSTFUNC}
//,{{"δ֪<CEB4>¼<EFBFBD>"}, CHAR_PREOVERFUNC}
//,{{"δ֪<CEB4>¼<EFBFBD>"}, CHAR_POSTOVERFUNC}
//,{{"<22>ۿ<EFBFBD><DBBF>¼<EFBFBD>"}, CHAR_WATCHFUNC}
,{{"ѭ<EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_LOOPFUNC}
//,{{"<22><><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_DYINGFUNC}
,{{"<EFBFBD>Ի<EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_TALKEDFUNC}
//,{{"<22><><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_PREATTACKEDFUNC}
//,{{"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_POSTATTACKEDFUNC}
//,{{"<22>뿪<EFBFBD>¼<EFBFBD>"}, CHAR_OFFFUNC}
//,{{"<22><><EFBFBD>¼<EFBFBD>"}, CHAR_LOOKEDFUNC}
//,{{"<22><><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_ITEMPUTFUNC}
//,{{"<22><><EFBFBD><EFBFBD><EFBFBD>Ի<EFBFBD><D4BB>¼<EFBFBD>"}, CHAR_SPECIALTALKEDFUNC}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_WINDOWTALKEDFUNC}
#ifdef _USER_CHARLOOPS
//,{{"ѭ<><D1AD><EFBFBD>¼<EFBFBD>1"}, CHAR_LOOPFUNCTEMP1}
//,{{"ѭ<><D1AD><EFBFBD>¼<EFBFBD>2"}, CHAR_LOOPFUNCTEMP2}
//,{{"δ֪<CEB4>¼<EFBFBD>"}, CHAR_BATTLEPROPERTY}
#endif
,{{"<EFBFBD>ص<EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_OVERLAPEDFUNC}
,{{"ս<EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_BATTLEOVERDFUNC}
#ifdef _ALLBLUES_LUA_1_4
,{{"<EFBFBD>dz<EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_LOGINOUTFUNC}
#endif
#ifdef _ALLBLUES_LUA_1_9
,{{"ս<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD>"}, CHAR_BATTLESETFUNC}
#endif
};
static CharBase CharBaseColor[] = {
{{"<EFBFBD><EFBFBD>ɫ"}, CHAR_COLORWHITE}
,{{"<EFBFBD><EFBFBD>ɫ"}, CHAR_COLORCYAN}
,{{"<EFBFBD><EFBFBD>ɫ"}, CHAR_COLORPURPLE}
,{{"<EFBFBD><EFBFBD>ɫ"}, CHAR_COLORBLUE}
,{{"<EFBFBD><EFBFBD>ɫ"}, CHAR_COLORYELLOW}
,{{"<EFBFBD><EFBFBD>ɫ"}, CHAR_COLORGREEN}
,{{"<EFBFBD><EFBFBD>ɫ"}, CHAR_COLORRED}
,{{"<EFBFBD>Ұ<EFBFBD>ɫ"}, CHAR_COLORGRAY}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɫ"}, CHAR_COLORBLUE2}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɫ"}, CHAR_COLORGREEN2}
};
static CharBase CharBaseUpdata[] = {
{{"HP"}, CHAR_P_STRING_HP}
,{{"MAXHP"}, CHAR_P_STRING_MAXHP}
,{{"MP"}, CHAR_P_STRING_MP}
,{{"MAXMP"}, CHAR_P_STRING_MAXMP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_VITAL}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_STR}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_TOUGH}
,{{"<EFBFBD>ٶ<EFBFBD>"}, CHAR_P_STRING_DEX}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_EXP}
,{{"<EFBFBD><EFBFBD>һ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_NEXTEXP}
,{{"<EFBFBD>ȼ<EFBFBD>"}, CHAR_P_STRING_LV}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_ATK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_DEF}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_QUICK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_CHARM}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_LUCK}
,{{"<EFBFBD><EFBFBD>"}, CHAR_P_STRING_EARTH}
,{{"ˮ"}, CHAR_P_STRING_WATER}
,{{"<EFBFBD><EFBFBD>"}, CHAR_P_STRING_FIRE}
,{{"<EFBFBD><EFBFBD>"}, CHAR_P_STRING_WIND}
,{{"ʯ<EFBFBD><EFBFBD>"}, CHAR_P_STRING_GOLD}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_TITLE}
,{{"DP"}, CHAR_P_STRING_DUELPOINT}
,{{"ת<EFBFBD><EFBFBD>"}, CHAR_P_STRING_TRANSMIGRATION}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_NAME}
,{{"<EFBFBD>dz<EFBFBD>"}, CHAR_P_STRING_OWNTITLE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_RIDEPET}
,{{"ѧ<EFBFBD><EFBFBD>"}, CHAR_P_STRING_LEARNRIDE}
,{{"ͼ<EFBFBD><EFBFBD>"}, CHAR_P_STRING_BASEBASEIMAGENUMBER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_P_STRING_SKYWALKER}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ģʽ"}, CHAR_P_STRING_DEBUGMODE}
};
static CharBase CharBaseFlg[] = {
{{"<EFBFBD>ɼ<EFBFBD>"}, CHAR_ISVISIBLE}
,{{"͸<EFBFBD><EFBFBD>"}, CHAR_ISTRANSPARENT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ISFLYING}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ISDIE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ISPARTY}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ISDUEL}
,{{"<EFBFBD><EFBFBD>Ƭ"}, CHAR_ISTRADECARD}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ISTRADE}
#ifdef _CHANNEL_MODIFY
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƶ<EFBFBD><EFBFBD>"}, CHAR_ISTELL}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƶ<EFBFBD><EFBFBD>"}, CHAR_ISFM}
,{{"ְҵƵ<EFBFBD><EFBFBD>"}, CHAR_ISOCC}
,{{"<EFBFBD>Ի<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ISSAVE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ISCHAT}
#ifdef _CHATROOMPROTOCOL
#ifdef _THE_WORLD_SEND
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƶ<EFBFBD><EFBFBD>"}, CHAR_ISWORLD}
#endif
#ifdef _ONLINE_TALK_IP
,{{"<EFBFBD>ٱ<EFBFBD>Ƶ<EFBFBD><EFBFBD>"}, CHAR_ISTALKIP}
#endif
#endif
#endif
,{{"AIģʽ"}, CHAR_AI_MOD}
};
static CharBase CharBaseAction[] = {
{{"վ<EFBFBD><EFBFBD>"}, CHAR_ACTSTAND}
,{{"<EFBFBD>߶<EFBFBD>"}, CHAR_ACTWALK}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTATTACK}
,{{"Ͷ<EFBFBD><EFBFBD>"}, CHAR_ACTTHROW}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTDAMAGE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTDEAD}
,{{"ħ<EFBFBD><EFBFBD>"}, CHAR_ACTMAGIC}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTITEM}
,{{"Ч<EFBFBD><EFBFBD>"}, CHAR_ACTEFFECT}
,{{"<EFBFBD><EFBFBD>"}, CHAR_ACTDOWN}
,{{"<EFBFBD><EFBFBD>"}, CHAR_ACTSIT}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTHAND}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTPLEASURE}
,{{"<EFBFBD><EFBFBD>ŭ"}, CHAR_ACTANGRY}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTSAD}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTGUARD}
,{{"<EFBFBD><EFBFBD>·"}, CHAR_ACTACTIONWALK}
,{{"<EFBFBD><EFBFBD>ͷ"}, CHAR_ACTNOD}
,{{"վ<EFBFBD><EFBFBD>"}, CHAR_ACTACTIONSTAND}
,{{"ս<EFBFBD><EFBFBD>"}, CHAR_ACTBATTLE}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTLEADER}
,{{"<EFBFBD><EFBFBD>ս"}, CHAR_ACTBATTLEWATCH}
,{{"δ֪"}, CHAR_ACTPOPUPNAME}
,{{"<EFBFBD><EFBFBD>ת"}, CHAR_ACTTURN}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTWARP}
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"}, CHAR_ACTTRADE}
#ifdef _ANGEL_SUMMON
,{{"<EFBFBD><EFBFBD>ʹ"}, CHAR_ACTANGEL}
#endif
#ifdef _MIND_ICON
,{{"<EFBFBD><EFBFBD>˼"}, CHAR_MIND}
#endif
#ifdef _STREET_VENDOR
,{{"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>̯̲"}, CHAR_STREETVENDOR_OPEN}
,{{"<EFBFBD>ر<EFBFBD>̯̲"}, CHAR_STREETVENDOR_CLOSE}
#endif
};
static int getCharNum (lua_State *L)
{
lua_pushinteger(L, CHAR_getCharNum());
return 1;
}
static int getPlayerMaxNum (lua_State *L)
{
lua_pushinteger(L, CHAR_getPlayerMaxNum());
return 1;
}
static int getPetMaxNum (lua_State *L)
{
lua_pushinteger(L, CHAR_getPetMaxNum());
return 1;
}
static int getOthersMaxNum (lua_State *L)
{
lua_pushinteger(L, CHAR_getOthersMaxNum());
return 1;
}
static int check (lua_State *L)
{
const int index = luaL_checkint(L, 1);
lua_pushinteger(L, CHAR_CHECKINDEX(index));
return 1;
}
static int setFlg (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseFlg, arraysizeof(CharBaseFlg));
const int data = luaL_checkint(L, 3);
if(CHAR_setFlg(index, element, data) == -1){
return 0;
}else{
return 1;
}
}
static int getFlg (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseFlg, arraysizeof(CharBaseFlg));
lua_pushinteger(L, CHAR_getFlg(index, element));
return 1;
}
static int setWorkChar (lua_State *L)
{
size_t l;
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseWorkChar, arraysizeof(CharBaseWorkChar));
char *data = luaL_checklstring(L, 3, &l);
if(CHAR_setWorkChar(index, element, data) == -1){
return 0;
}else{
return 1;
}
}
static int getWorkChar (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseWorkChar, arraysizeof(CharBaseWorkChar));
lua_pushstring(L, CHAR_getWorkChar(index, element));
return 1;
}
static int setWorkInt (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseWorkInt, arraysizeof(CharBaseWorkInt));
const int data = getCharBaseValue(L, 3, CharBaseWorkValue, arraysizeof(CharBaseWorkValue));
if(CHAR_setWorkInt(index, element, data) == -1){
return 0;
}else{
return 1;
}
}
static int getWorkInt (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseWorkInt, arraysizeof(CharBaseWorkInt));
lua_pushinteger(L, CHAR_getWorkInt(index, element));
return 1;
}
static int setChar (lua_State *L)
{
size_t l;
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseChar, arraysizeof(CharBaseChar));
char *data = luaL_checklstring(L, 3, &l);
if(CHAR_setChar(index, element, data) == -1){
return 0;
}else{
return 1;
}
}
static int getChar (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseChar, arraysizeof(CharBaseChar));
lua_pushstring(L, CHAR_getChar(index, element));
return 1;
}
static int setInt (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseInt, arraysizeof(CharBaseInt));
const int data = getCharBaseValue(L, 3, CharBaseValue, arraysizeof(CharBaseValue));
if(CHAR_setInt(index, element, data) == -1){
return 0;
}else{
return 1;
}
}
static int getInt (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int element = getCharBaseValue(L, 2, CharBaseInt, arraysizeof(CharBaseInt));
lua_pushinteger(L, CHAR_getInt(index, element));
return 1;
}
static int setFunctionPointer(lua_State *L)
{
size_t l;
const int index = luaL_checkint(L, 1);
const int functype = getCharBaseValue(L, 2, CharBaseEvent, arraysizeof(CharBaseEvent));
char *luafunctable=luaL_checklstring(L, 3, &l);
char *luafunctablepath=luaL_checklstring(L, 4, &l);
if(strlen(luafunctablepath) > 0){
MY_Lua *mylua = &MYLua;
while(mylua->next != NULL){
if(strcmp(mylua->luapath, luafunctablepath) == 0){
return CHAR_setLUAFunction( index, functype, mylua->lua, luafunctable );
}
mylua = mylua->next;
}
}else{
return CHAR_setLUAFunction( index, functype, L, luafunctable );
}
return 1;
}
static int delFunctionPointer(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int functype = getCharBaseValue(L, 2, CharBaseEvent, arraysizeof(CharBaseEvent));
return CHAR_delLUAFunction( index, functype );
}
static int TalkToCli(lua_State *L)
{
size_t l;
const int talkedcharaindex = luaL_checkint(L, 1);
const int talkcharaindex = luaL_checkint(L, 2);
char *message=luaL_checklstring(L, 3, &l);
const int color = getCharBaseValue(L, 4, CharBaseColor, arraysizeof(CharBaseColor));
CHAR_talkToCli(talkedcharaindex, talkcharaindex, message, color);
return 1;
}
static int TalkToRound(lua_State *L)
{
size_t l;
const int talkedcharaindex = luaL_checkint(L, 1);
char *message=luaL_checklstring(L, 2, &l);
const int color = getCharBaseValue(L, 3, CharBaseColor, arraysizeof(CharBaseColor));
int fl = CHAR_getInt( talkedcharaindex, CHAR_FLOOR) ;
int x = CHAR_getInt( talkedcharaindex, CHAR_X) ;
int y = CHAR_getInt( talkedcharaindex, CHAR_Y) ;
int i,j;
int range = 8;
for( i=x-range ; i<=x+range ; i++ ){
for( j=y-range ; j<=y+range ; j++ ){
OBJECT object;
for( object = MAP_getTopObj( fl,i,j ) ; object ; object = NEXT_OBJECT(object) ){
int objindex = GET_OBJINDEX(object);
int toindex = OBJECT_getIndex( objindex);
if( OBJECT_getType(objindex) == OBJTYPE_CHARA && toindex != talkedcharaindex ){
if( CHAR_getInt(toindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER){
typedef void (*TALKF)(int,int,char*,int,int);
TALKF talkedfunc=NULL;
talkedfunc = (TALKF)CHAR_getFunctionPointer( toindex, CHAR_TALKEDFUNC);
if( talkedfunc ) {
talkedfunc(toindex, talkedcharaindex, message, color, -1);
}
}
}
}
}
}
return 1;
}
static int WalkPoint(lua_State *L)
{
const int index = luaL_checkint(L, 1);
if( CHAR_getWorkInt( index, CHAR_WORKBATTLEMODE ) != BATTLE_CHARMODE_NONE ) return 0;
const int x = luaL_checkint(L, 2);
const int y = luaL_checkint(L, 3);
POINT start, end;
start.x = CHAR_getInt( index, CHAR_X);
start.y = CHAR_getInt( index, CHAR_Y);
end.x = x;
end.y = y;
int pos = NPC_Util_getDirFromTwoPoint( &start, &end);
if( pos != - 1 ) {
CHAR_walk( index, pos, 0);
}
return 1;
}
static int Walk(lua_State *L)
{
const int index = luaL_checkint(L, 1);
if( CHAR_getWorkInt( index, CHAR_WORKBATTLEMODE ) != BATTLE_CHARMODE_NONE ) return 0;
const int dir = luaL_checkint(L, 2);
const int step = luaL_checkint(L, 3);
POINT start, end;
start.x = CHAR_getInt( index, CHAR_X);
start.y = CHAR_getInt( index, CHAR_Y);
end.x = start.x;
end.y = start.y;
switch(dir){
case 0:
{
end.x = start.x - step;
break;
}
case 1:
{
end.x = start.x + step;
end.y = start.y - step;
break;
}
case 2:
{
end.x = start.x + step;
break;
}
case 3:
{
end.x = start.x + step;
end.y = start.y + step;
break;
}
case 4:
{
end.y = start.y + step;
break;
}
case 5:
{
end.x = start.x - step;
end.y = start.y + step;
break;
}
case 6:
{
end.y = start.y - step;
break;
}
case 7:
{
end.x = start.x - step;
end.y = start.y - step;
break;
}
}
int pos = NPC_Util_getDirFromTwoPoint( &start, &end);
if( dir != - 1 ) {
CHAR_walk( index, pos, 0);
}
return 1;
}
static int BoundRandWalk(lua_State *L)
{
const int index = luaL_checkint(L, 1);
if( CHAR_getWorkInt( index, CHAR_WORKBATTLEMODE ) != BATTLE_CHARMODE_NONE ) return 0;
const int minX = min(luaL_checkint(L, 2), luaL_checkint(L, 4));
const int minY = min(luaL_checkint(L, 3), luaL_checkint(L, 5));
const int maxX = max(luaL_checkint(L, 2), luaL_checkint(L, 4));
const int maxY = max(luaL_checkint(L, 3), luaL_checkint(L, 5));
POINT start, end;
int stepX = (rand() % 10) - 5;
int stepY = (rand() % 10) - 5;
start.x = CHAR_getInt( index, CHAR_X);
start.y = CHAR_getInt( index, CHAR_Y);
end.x = start.x + stepX;
if(end.x>maxX)end.x=maxX;
else if(end.x<minX)end.x=minX;
end.y = start.y + stepY;
if(end.y>maxY)end.y=maxY;
else if(end.y<minY)end.y=minY;
int dir = NPC_Util_getDirFromTwoPoint( &start, &end);
if( dir != - 1 ) {
CHAR_walk( index, dir, 0);
}
return 1;
}
int RandRandWalk(lua_State *L)
{
const int index = luaL_checkint(L, 1);
if( CHAR_getWorkInt( index, CHAR_WORKBATTLEMODE ) != BATTLE_CHARMODE_NONE ) return 0;
POINT start, end;
int stepX = (rand() % 8) - 4;
int stepY = (rand() % 8) - 4;
start.x = CHAR_getInt( index, CHAR_X);
start.y = CHAR_getInt( index, CHAR_Y);
end.x = start.x + stepX;
end.y = start.y + stepY;
int dir = NPC_Util_getDirFromTwoPoint( &start, &end);
if( dir != - 1 ) {
CHAR_walk( index, dir, 0);
}
return 1;
}
int ToAroundChar(lua_State *L)
{
const int index = luaL_checkint(L, 1);
int objindex = CHAR_getWorkInt( index,CHAR_WORKOBJINDEX );
CHAR_sendCToArroundCharacter( objindex);
return 1;
}
static int talkToFloor(lua_State *L)
{
size_t l;
const int floor = luaL_checkint(L, 1);
const int talkindex = luaL_checkint(L, 2);
char *message=luaL_checklstring(L, 3, &l);
const int color = getCharBaseValue(L, 4, CharBaseColor, arraysizeof(CharBaseColor));
CHAR_talkToFloor(floor, talkindex, message, color);
return 1;
}
static int talkToParty(lua_State *L)
{
size_t l;
const int talkedcharaindex = luaL_checkint(L, 1);
const int talkcharaindex = luaL_checkint(L, 2);
char *message=luaL_checklstring(L, 3, &l);
const int color = getCharBaseValue(L, 4, CharBaseColor, arraysizeof(CharBaseColor));
CHAR_talkToCliAndParty(talkedcharaindex, talkcharaindex, message, color);
return 1;
}
static int talkToServer(lua_State *L)
{
size_t l;
const int talkcharaindex = luaL_checkint(L, 1);
char *message=luaL_checklstring(L, 2, &l);
const int color = getCharBaseValue(L, 3, CharBaseColor, arraysizeof(CharBaseColor));
CHAR_talkToAll( talkcharaindex, message, color);
return 1;
}
#ifdef _MO_LUA_TALK_EX
static int talkToServerEx(lua_State *L)
{
size_t l;
const int talkcharaindex = luaL_checkint(L, 1);
char *message=luaL_checklstring(L, 2, &l);
const int color = getCharBaseValue(L, 3, CharBaseColor, arraysizeof(CharBaseColor));
const int fontsize = luaL_checkint(L, 4);
int i = 0;
int playernum = CHAR_getPlayerMaxNum();
for (i = 0; i < playernum; i++){
if (CHAR_getCharUse(i) == FALSE) continue;
if ( !CHAR_CHECKINDEX( i ) )
continue;
CHAR_talkToCliExt(i, talkcharaindex, message, color, fontsize);
}
return 1;
}
#endif
#ifdef _ALLBLUES_LUA_1_1
static int WarpToSpecificPoint(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int floor = luaL_checkint(L, 2);
const int x = luaL_checkint(L, 3);
const int y = luaL_checkint(L, 4);
CHAR_warpToSpecificPoint( charaindex, floor, x, y );
return 1;
}
static int MapAllWarp(lua_State *L)
{
const int oldfloor = luaL_checkint(L, 1);
const int newfloor = luaL_checkint(L, 2);
const int x = luaL_checkint(L, 3);
const int y = luaL_checkint(L, 4);
int i;
int playernum = CHAR_getPlayerMaxNum();
for( i = 0 ; i < playernum ; i++) {
if( CHAR_getCharUse(i) == FALSE )continue;
if( CHAR_getInt(i, CHAR_FLOOR) != oldfloor )continue;
CHAR_warpToSpecificPoint( i, newfloor, x, y );
}
return 1;
}
#endif
#ifdef _ALLBLUES_LUA_1_3
int createPet(lua_State *L)
{
const int enemyid = luaL_checkint(L, 1);
const int UpLevel = luaL_checkint(L, 2);
int i;
for( i = 0; i < ENEMY_getEnemyNum(); i ++ ) {
if( ENEMY_getInt( i, ENEMY_ID) == enemyid) {
break;
}
}
if( i == ENEMY_getEnemyNum() ){
lua_pushinteger(L, -1);
return 1;
}
int petindex = ENEMY_createPet( i, -1, -1, -1, -1 );
for( i = 0; i < UpLevel; i ++ ){
CHAR_PetLevelUp( petindex );
CHAR_PetAddVariableAi( petindex, AI_FIX_PETLEVELUP );
}
CHAR_setInt( petindex, CHAR_LV, CHAR_getInt( petindex, CHAR_LV) + UpLevel );
CHAR_complianceParameter( petindex );
CHAR_setInt( petindex, CHAR_HP, CHAR_getWorkInt( petindex, CHAR_WORKMAXHP ));
CHAR_LoginBesideSetWorkInt( petindex, -1 );
lua_pushinteger(L, petindex);
return 1;
}
int setCharPet(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int petindex = luaL_checkint(L, 2);
int havepetelement = CHAR_getCharPetElement( index);
if( havepetelement > -1 ){
CHAR_setCharPet( index, havepetelement, petindex);
CHAR_setWorkInt( petindex, CHAR_WORKPLAYERINDEX, index);
}
lua_pushinteger(L, havepetelement);
return 1;
}
int getCharPet(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int havepetid = luaL_checkint(L, 2);
lua_pushinteger(L, CHAR_getCharPet( index, havepetid));
return 1;
}
static int setCharPoolPet(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int petindex = luaL_checkint(L, 2);
int havepetelement = CHAR_getCharPoolPetElement( index);
if( havepetelement > -1 ){
CHAR_setCharPoolPet( index, havepetelement, petindex);
CHAR_setWorkInt( petindex, CHAR_WORKPLAYERINDEX, index);
}
lua_pushinteger(L, havepetelement);
return 1;
}
static int getCharPoolPet(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int havepetid = luaL_checkint(L, 2);
lua_pushinteger(L, CHAR_getCharPoolPet( index, havepetid));
return 1;
}
static int AB_WriteShopData(lua_State *L)
{
const int index = luaL_checkint(L, 1);
size_t l;
const char *data = luaL_checklstring(L, 2, &l);
WriteShopData(data,index);
return 1;
}
static int setDepotPetIndex(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int petindex = luaL_checkint(L, 2);
int havepetelement = CHAR_getCharPoolPetElement( index);
if( havepetelement > -1 ){
CHAR_setDepotPetIndex( index, havepetelement, petindex);
CHAR_setWorkInt( petindex, CHAR_WORKPLAYERINDEX, index);
}
lua_pushinteger(L, havepetelement);
return 1;
}
static int getDepotPetIndex(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int havepetid = luaL_checkint(L, 2);
lua_pushinteger(L, CHAR_getDepotPetIndex( index, havepetid));
return 1;
}
static int DelItem(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int itemindex = luaL_checkint(L, 2);
CHAR_DelItem( charaindex, itemindex);
return 1;
}
static int getFd(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
lua_pushinteger(L, getfdFromCharaIndex(charaindex));
return 1;
}
static int Updata(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int indextable = getCharBaseValue(L, 2, CharBaseUpdata, arraysizeof(CharBaseUpdata));
CHAR_send_P_StatusString( charaindex , indextable);
return 1;
}
static int Additem(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int itemid = luaL_checkint(L, 2);
int itemindex = -1;
int emptyitemindexinchara = CHAR_findEmptyItemBox( charaindex );
if( emptyitemindexinchara >= 0 ){
itemindex = ITEM_makeItemAndRegist( itemid );
if( itemindex > -1 ){
CHAR_setItemIndex( charaindex, emptyitemindexinchara, itemindex );
ITEM_setWorkInt(itemindex, ITEM_WORKOBJINDEX, -1);
ITEM_setWorkInt(itemindex, ITEM_WORKCHARAINDEX, charaindex);
CHAR_sendItemDataOne( charaindex, emptyitemindexinchara);
LogItem(
CHAR_getChar( charaindex, CHAR_NAME ),
CHAR_getChar( charaindex, CHAR_CDKEY ),
#ifdef _add_item_log_name // WON ADD <20><>item<65><6D>log<6F><67><EFBFBD><EFBFBD><EFBFBD><EFBFBD>item<65><6D><EFBFBD><EFBFBD>
itemindex,
#else
atoi( message),
#endif
"AddItem(<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>LUA)",
CHAR_getInt( charaindex,CHAR_FLOOR),
CHAR_getInt( charaindex,CHAR_X ),
CHAR_getInt( charaindex,CHAR_Y ),
ITEM_getChar( itemindex, ITEM_UNIQUECODE),
ITEM_getChar( itemindex, ITEM_NAME),
ITEM_getInt( itemindex, ITEM_ID)
);
}
}
lua_pushinteger(L, itemindex);
return 1;
}
#ifdef _NEW_ITEM_
extern int CheckCharMaxItem(int charindex);
#endif
static int Finditem(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int itemid = luaL_checkint(L, 2);
int i;
int itemindex=-1;
int id;
for( i=CHAR_STARTITEMARRAY;i<CheckCharMaxItem(charaindex);i++ ){
itemindex = CHAR_getItemIndex( charaindex , i );
if( ITEM_CHECKINDEX( itemindex) ) {
id=ITEM_getInt(itemindex ,ITEM_ID );
if(id == itemid){
lua_pushinteger(L, itemindex);
return 1;
}
}
}
lua_pushinteger(L, -1);
return 1;
}
static int AddPet(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int enemyid = luaL_checkint(L, 2);
const int UpLevel = luaL_checkint(L, 3);
int i, havepetelement;
for( i = 0; i < ENEMY_getEnemyNum(); i ++ ) {
if( ENEMY_getInt( i, ENEMY_ID) == enemyid) {
break;
}
}
if( i == ENEMY_getEnemyNum() ){
lua_pushinteger(L, -1);
return 1;
}
for( havepetelement = 0; havepetelement < CHAR_MAXPETHAVE; havepetelement ++ ){
int petindex = CHAR_getCharPet(index, havepetelement);
if( !CHAR_CHECKINDEX(petindex))break;
}
if( havepetelement == CHAR_MAXPETHAVE ){
lua_pushinteger(L, -1);
return 1;
}
int petindex = ENEMY_createPet( i, -1, -1, -1, -1 );
if( !CHAR_CHECKINDEX(petindex)){
lua_pushinteger(L, -1);
return 1;
}
for( i = CHAR_getInt( petindex, CHAR_LV ); i < UpLevel; i ++ ){
CHAR_PetLevelUp( petindex );
CHAR_PetAddVariableAi( petindex, AI_FIX_PETLEVELUP );
CHAR_setInt( petindex, CHAR_LV, CHAR_getInt( petindex, CHAR_LV) + 1 );
}
CHAR_setCharPet( index, havepetelement, petindex);
CHAR_setWorkInt( petindex, CHAR_WORKPLAYERINDEX, index);
char token[64];
CHAR_setInt(petindex,CHAR_VARIABLEAI,10000);
CHAR_complianceParameter( petindex );
CHAR_setInt( petindex, CHAR_HP, CHAR_getWorkInt( petindex, CHAR_WORKMAXHP ));
snprintf( token, sizeof( token ), "K%d", havepetelement );
CHAR_sendStatusString( index, token );
snprintf( token, sizeof( token ), "W%d", havepetelement );
CHAR_sendStatusString( index, token );
LogPet(
CHAR_getChar( index, CHAR_NAME ),
CHAR_getChar( index, CHAR_CDKEY ),
CHAR_getChar( petindex, CHAR_NAME),
CHAR_getInt( petindex, CHAR_LV),
"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>LUA<EFBFBD><EFBFBD>char.AddPet",
CHAR_getInt( index,CHAR_FLOOR),
CHAR_getInt( index,CHAR_X ),
CHAR_getInt( index,CHAR_Y ),
CHAR_getChar( petindex, CHAR_UNIQUECODE) // shan 2001/12/14
);
lua_pushinteger(L, petindex);
return 1;
}
static int AddPetCf(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int enemyid = luaL_checkint(L, 2);
const int UpLevel = luaL_checkint(L, 3);
const int trn = luaL_checkint(L, 4);
const int vital = luaL_checkint(L, 5);
const int str = luaL_checkint(L, 6);
const int tgh = luaL_checkint(L, 7);
const int dex = luaL_checkint(L, 8);
int i, havepetelement;
for( i = 0; i < ENEMY_getEnemyNum(); i ++ ) {
if( ENEMY_getInt( i, ENEMY_ID) == enemyid) {
break;
}
}
if( i == ENEMY_getEnemyNum() ){
lua_pushinteger(L, -1);
return 1;
}
for( havepetelement = 0; havepetelement < CHAR_MAXPETHAVE; havepetelement ++ ){
int petindex = CHAR_getCharPet(index, havepetelement);
if( !CHAR_CHECKINDEX(petindex))break;
}
if( havepetelement == CHAR_MAXPETHAVE ){
lua_pushinteger(L, -1);
return 1;
}
int petindex = ENEMY_createPet( i, vital, str, tgh, dex );
if( !CHAR_CHECKINDEX(petindex)){
lua_pushinteger(L, -1);
return 1;
}
for( i = CHAR_getInt( petindex, CHAR_LV ); i < UpLevel; i ++ ){
CHAR_PetLevelUp( petindex );
CHAR_PetAddVariableAi( petindex, AI_FIX_PETLEVELUP );
CHAR_setInt( petindex, CHAR_LV, CHAR_getInt( petindex, CHAR_LV) + 1 );
}
CHAR_setInt( petindex, CHAR_TRANSMIGRATION, trn );
CHAR_setCharPet( index, havepetelement, petindex);
// CHAR_setChar( petindex, CHAR_OWNERCDKEY, CHAR_getChar( index, CHAR_CDKEY));
// CHAR_setChar( petindex, CHAR_OWNERCHARANAME, CHAR_getChar( index, CHAR_NAME));
CHAR_setWorkInt( petindex, CHAR_WORKPLAYERINDEX, index);
char token[64];
CHAR_setInt(petindex,CHAR_VARIABLEAI,10000);
CHAR_complianceParameter( petindex );
CHAR_setInt( petindex, CHAR_HP, CHAR_getWorkInt( petindex, CHAR_WORKMAXHP ));
snprintf( token, sizeof( token ), "K%d", havepetelement );
CHAR_sendStatusString( index, token );
snprintf( token, sizeof( token ), "W%d", havepetelement );
CHAR_sendStatusString( index, token );
LogPet(
CHAR_getChar( index, CHAR_NAME ),
CHAR_getChar( index, CHAR_CDKEY ),
CHAR_getChar( petindex, CHAR_NAME),
CHAR_getInt( petindex, CHAR_LV),
"<EFBFBD><EFBFBD><EFBFBD><EFBFBD>LUA<EFBFBD><EFBFBD>char.AddPetCf",
CHAR_getInt( index,CHAR_FLOOR),
CHAR_getInt( index,CHAR_X ),
CHAR_getInt( index,CHAR_Y ),
CHAR_getChar( petindex, CHAR_UNIQUECODE) // shan 2001/12/14
);
lua_pushinteger(L, petindex);
return 1;
}
#ifdef _PLAYER_NPC
static int setPlayerNpc(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int petindex = luaL_checkint(L, 2);
int i;
for( i = 1; i < getPartyNum(charaindex); i ++ ) {
if( CHAR_getWorkInt( charaindex, i + CHAR_WORKPARTYINDEX1) == -1 ) {
break;
}
}
if(i == getPartyNum(charaindex)){
CHAR_endCharOneArray( petindex );
}else{
if(CHAR_CHECKINDEX(petindex) == TRUE){
Object object;
int objindex;
CHAR_setInt(petindex, CHAR_FLOOR, CHAR_getInt(charaindex, CHAR_FLOOR));
CHAR_setInt(petindex, CHAR_X, CHAR_getInt(charaindex, CHAR_X));
CHAR_setInt(petindex, CHAR_Y, CHAR_getInt(charaindex, CHAR_Y));
object.type = OBJTYPE_CHARA;
object.index = petindex;
object.x =CHAR_getInt(petindex, CHAR_X);
object.y = CHAR_getInt(petindex, CHAR_Y);
object.floor = CHAR_getInt(petindex, CHAR_FLOOR);
objindex = initObjectOne( &object );
if( objindex == -1 ) {
CHAR_endCharOneArray( petindex );
} else {
CHAR_setWorkInt( petindex,CHAR_WORKOBJINDEX, objindex );
if(CHAR_JoinParty_Main(petindex, charaindex) == FALSE){
CHAR_CharaDelete( petindex );
return 1;
}
CHAR_sendCToArroundCharacter( objindex);
}
}
}
return 1;
}
#endif
#endif
#ifdef _PETSKILL_SHOP_LUA
static int FreePetSkill(lua_State *L)
{
const int petindex = luaL_checkint(L, 1);
const int petskill = luaL_checkint(L, 2);
int i;
for( i=0; i < CHAR_MAXPETSKILLHAVE; i++) {
if( petskill == CHAR_getPetSkill( petindex, i) ) {
lua_pushinteger(L, 1);
return 1;
}
}
lua_pushinteger(L, 0);
return 1;
}
#endif
static int Coordinate(lua_State *L)
{
const int index = luaL_checkint(L, 1);
if( CHAR_getWorkInt( index, CHAR_WORKBATTLEMODE ) != BATTLE_CHARMODE_NONE ) return 0;
const int X = luaL_checkint(L, 2);
const int Y = luaL_checkint(L, 3);
POINT start, end;
start.x = CHAR_getInt( index, CHAR_X);
start.y = CHAR_getInt( index, CHAR_Y);
end.x = X;
end.y = Y;
int dir = NPC_Util_getDirFromTwoPoint( &start, &end);
if( dir != - 1 ) {
CHAR_walk( index, dir, 0);
}
return 1;
}
static int setPetSkill(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int havepetskillindex = luaL_checkint(L, 2);
const int skillID = luaL_checkint(L, 3);
CHAR_setPetSkill( index, havepetskillindex, skillID);
return 1;
}
static int getPetSkill(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int havepetskillindex = luaL_checkint(L, 2);
lua_pushinteger(L, CHAR_getPetSkill( index, havepetskillindex));
return 1;
}
static int PetLevelUp(lua_State *L)
{
const int index = luaL_checkint(L, 1);
CHAR_PetLevelUp( index );
return 1;
}
static int JoinParty(lua_State *L)
{
const int index1 = luaL_checkint(L, 1);
const int index2 = luaL_checkint(L, 2);
int TM_Top = lua_gettop(L);
if(TM_Top==2) CHAR_JoinParty_Main(index2, index1);
else{
const int flg = luaL_checkint(L, 3);
CHAR_JoinParty_Main_New(index2, index1,flg);
}
return 1;
}
#ifdef _ALLBLUES_LUA_1_4
static int getRightTo8(lua_State *L)
{
const int value = luaL_checkint(L, 1);
const int flg = luaL_checkint(L, 2);
lua_pushinteger(L, (value >> (4 - flg) * 8) & 0xFF);
return 1;
}
static int getLiftTo8(lua_State *L)
{
const int value = luaL_checkint(L, 1);
const int flg = luaL_checkint(L, 2);
lua_pushinteger(L, (value << (4 - flg) * 8));
return 1;
}
static int complianceParameter(lua_State *L)
{
const int index = luaL_checkint(L, 1);
CHAR_complianceParameter(index);
return 1;
}
static int sendStatusString(lua_State *L)
{
size_t l;
const int index = luaL_checkint(L, 1);
char *data=luaL_checklstring(L, 2, &l);
CHAR_sendStatusString( index, data );
return 1;
}
static int sendBattleEffect(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int val = luaL_checkint(L, 2);
CHAR_sendBattleEffect( index, val );
return 1;
}
static int sendWatchEvent(lua_State *L)
{
const int objindex = luaL_checkint(L, 1);
const int action = getCharBaseValue(L, 2, CharBaseAction, arraysizeof(CharBaseAction));
const int flg = luaL_checkint(L, 3);
luaL_checktype(L, 4, LUA_TTABLE);
int n = luaL_getn(L, 4);
int *opt = (int *) malloc(n * sizeof(int));
int i;
for(i = 0; i < n; i++){
opt[i] = getArrayInt(L, i);
}
CHAR_sendWatchEvent( objindex, action, opt, n, flg);
return 1;
}
static int dropPetAbsolute(lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int fl = luaL_checkint(L, 2);
const int fx = luaL_checkint(L, 3);
const int fy = luaL_checkint(L, 4);
const int dir = luaL_checkint(L, 5);
const int val = luaL_checkint(L, 6);
int dirx[9],diry[9];
int floor, x, y, i;
for( i = 0 ; i < 7 ; i ++ ){
dirx[i+2] = CHAR_getDX(dir + i+1);
diry[i+2] = CHAR_getDY(dir + i+1);
}
dirx[0] = CHAR_getDX(dir);
diry[0] = CHAR_getDY(dir);
dirx[1] = 0;
diry[1] = 0;
floor = fl;
for( i = 0 ; i < 9 ; i ++ ){
int x=fx+dirx[i];
int y=fy+diry[i];
if( PET_isPutPoint( floor, x, y ) == TRUE ) {
break;
}
}
if( i == 9 ) i = 1;
x = fx+dirx[i];
y = fy+diry[i];
int objindex = PET_dropPetAbsolute( index, floor, x, y, val );
if( objindex == -1 ){
return 1;
}
CHAR_setWorkInt( index, CHAR_WORKOBJINDEX, objindex );
CHAR_setInt( index, CHAR_FLOOR, floor);
CHAR_setInt( index, CHAR_X, x);
CHAR_setInt( index, CHAR_Y, y);
CHAR_setInt( index, CHAR_PUTPETTIME, NowTime.tv_sec);
CHAR_sendCToArroundCharacter( objindex);
return 1;
}
static int AllWarpToSpecificPoint(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int floor = luaL_checkint(L, 2);
const int x = luaL_checkint(L, 3);
const int y = luaL_checkint(L, 4);
if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE ) == CHAR_PARTY_LEADER ){
int i;
for( i = 0; i < getPartyNum(charaindex); i ++ ){
int subindex = CHAR_getWorkInt( charaindex, CHAR_WORKPARTYINDEX1+i );
if( CHAR_CHECKINDEX( subindex ) == FALSE ) continue;
CHAR_warpToSpecificPoint( subindex, floor, x, y );
ITEM_WarpDelErrorItem( subindex );
}
}else if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE ) == CHAR_PARTY_CLIENT ){
CHAR_talkToCli(charaindex, -1, "<EFBFBD><EFBFBD>Ա<EFBFBD>޷<EFBFBD>ʹ<EFBFBD>á<EFBFBD>", CHAR_COLORYELLOW);
return FALSE;
}else if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE ) == CHAR_PARTY_NONE ){
ITEM_WarpDelErrorItem( charaindex );
CHAR_warpToSpecificPoint( charaindex, floor, x, y );
}
return 1;
}
static int Findpet(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int petid = luaL_checkint(L, 2);
const int lv = luaL_checkint(L, 3);
int i;
for( i = 0; i < CHAR_MAXPETHAVE; i ++ ){
int petindex = CHAR_getCharPet( charaindex, i );
if(!CHAR_CHECKINDEX( petindex))continue;
if( CHAR_getInt(petindex, CHAR_PETID) == petid ){
if(lv > 0){
if( CHAR_getInt(petindex, CHAR_LV) != lv){
continue;
}
}
lua_pushinteger(L, petindex);
return 1;
}
}
lua_pushinteger(L, -1);
return 1;
}
static int FindPetFormMatemo(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int metamo = luaL_checkint(L, 2);
const int lv = luaL_checkint(L, 3);
int i;
for( i = 0; i < CHAR_MAXPETHAVE; i ++ ){
int petindex = CHAR_getCharPet( charaindex, i );
if(!CHAR_CHECKINDEX( petindex))continue;
if( CHAR_getInt(petindex, CHAR_BASEBASEIMAGENUMBER) == metamo ){
if(lv > 0){
if( CHAR_getInt(petindex, CHAR_LV) != lv){
continue;
}
}
lua_pushinteger(L, petindex);
return 1;
}
}
lua_pushinteger(L, -1);
return 1;
}
static int FindPetFormEnemyTempID(lua_State *L)
{
size_t l;
const int charaindex = luaL_checkint(L, 1);
char *data=luaL_checklstring(L, 2, &l);
char token[64];
int enemytempid = -1, lv = 0;
int i;
if(getStringFromIndexWithDelim(data, "-", 1, token, sizeof(token)) == TRUE){
lv = atoi(token);
}else{
lua_pushinteger(L, -1);
}
if(getStringFromIndexWithDelim(data, "-", 2, token, sizeof(token)) == TRUE){
enemytempid = atoi(token);
}else{
lua_pushinteger(L, -1);
}
for( i = 0; i < CHAR_MAXPETHAVE; i ++ ){
int petindex = CHAR_getCharPet( charaindex, i );
if(!CHAR_CHECKINDEX( petindex))continue;
if( CHAR_getInt( petindex, CHAR_PETID) == enemytempid ){
if(lv > 0){
if( CHAR_getInt(petindex, CHAR_LV) != lv){
continue;
}
}
lua_pushinteger(L, petindex);
return 1;
}
}
lua_pushinteger(L, -1);
return 1;
}
static int CharaDeleteHavePet(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
CHAR_CharaDeleteHavePet( charaindex);
return 1;
}
static int DelPet(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int petindex = luaL_checkint(L, 2);
int i;
char category[12];
for( i = 0; i < CHAR_MAXPETHAVE; i ++ ){
if( petindex == CHAR_getCharPet( charaindex, i ) ){
if( CHAR_getInt( charaindex, CHAR_RIDEPET) == i ) {
CHAR_setInt( charaindex, CHAR_RIDEPET, -1);
CHAR_send_P_StatusString( charaindex, CHAR_P_STRING_RIDEPET );
CHAR_complianceParameter( charaindex );
CHAR_sendCToArroundCharacter( CHAR_getWorkInt( charaindex , CHAR_WORKOBJINDEX ));
}
LogPet( CHAR_getChar( charaindex, CHAR_NAME ), // ƽ<>ҷ<EFBFBD>
CHAR_getChar( charaindex, CHAR_CDKEY ),
CHAR_getChar( petindex, CHAR_NAME),
CHAR_getInt( petindex, CHAR_LV),
"EvnetDell(LUA<55><41><EFBFBD><EFBFBD>ɾ<EFBFBD><C9BE>)",
CHAR_getInt( charaindex,CHAR_FLOOR),
CHAR_getInt( charaindex,CHAR_X ),
CHAR_getInt( charaindex,CHAR_Y ),
CHAR_getChar( petindex, CHAR_UNIQUECODE) // shan 2001/12/14
);
CHAR_endCharOneArray( petindex );
CHAR_setCharPet( charaindex, i, -1);
snprintf( category, sizeof( category), "K%d",i);
CHAR_sendStatusString( charaindex, category );
break;
}
}
return 1;
}
#endif
#ifdef _ALLBLUES_LUA_1_7
static int findEmptyItemBox(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
lua_pushinteger(L, CHAR_findEmptyItemBox(charaindex));
return 1;
}
static int findEmptyPetBox(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
int num = 0;
int i;
for( i = 0; i < CHAR_MAXPETHAVE; i ++ ){
int petindex = CHAR_getCharPet( charaindex, i );
if(!CHAR_CHECKINDEX(petindex)){
num ++ ;
}
}
lua_pushinteger(L, num);
return 1;
}
static int dropPetFollow(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int havepetindex = luaL_checkint(L, 2);
char szPet[128];
int dirx[9],diry[9];
int i;
int objindex=-1;
int floor,x,y;
int petindex;
if( CHAR_getWorkInt( charaindex, CHAR_WORKBATTLEMODE)
!= BATTLE_CHARMODE_NONE) return FALSE;
petindex = CHAR_getCharPet(charaindex,havepetindex);
if( petindex == -1 ) return FALSE;
if( !CHAR_CHECKINDEX( charaindex ) )return FALSE;
if( CHAR_CHECKINDEX( petindex) == FALSE ) return FALSE;
if (CHAR_getInt(petindex, CHAR_PETFAMILY) == 1){
CHAR_talkToCli(charaindex, -1, "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ػ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>޷<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", CHAR_COLORYELLOW);
return FALSE;
}
if (CHAR_getInt(charaindex, CHAR_RIDEPET) == havepetindex){
CHAR_talkToCli(charaindex, -1, "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>еij<EFBFBD><EFBFBD><EFBFBD><EFBFBD>޷<EFBFBD><EFBFBD><EFBFBD><EFBFBD>棡", CHAR_COLORYELLOW);
return FALSE;
}
for( i = 0 ; i < 7 ; i ++ ){
dirx[i+2] = CHAR_getDX(CHAR_getInt(charaindex,CHAR_DIR) + i+1);
diry[i+2] = CHAR_getDY(CHAR_getInt(charaindex,CHAR_DIR) + i+1);
}
dirx[0] = CHAR_getDX(CHAR_getInt(charaindex,CHAR_DIR));
diry[0] = CHAR_getDY(CHAR_getInt(charaindex,CHAR_DIR));
dirx[1] = 0;
diry[1] = 0;
floor = CHAR_getInt( charaindex,CHAR_FLOOR );
for( i = 0 ; i < 9 ; i ++ ){
int x=CHAR_getInt(charaindex,CHAR_X)+dirx[i];
int y=CHAR_getInt(charaindex,CHAR_Y)+diry[i];
if( PET_isPutPoint( floor, x, y ) == TRUE ) {
break;
}
}
if( i == 9 ) i = 1;
x=CHAR_getInt(charaindex,CHAR_X)+dirx[i];
y=CHAR_getInt(charaindex,CHAR_Y)+diry[i];
objindex = PET_dropPetAbsolute( petindex,floor,x,y, FALSE );
if( objindex == -1 ) return FALSE;
CHAR_setWorkInt( petindex,CHAR_WORKOBJINDEX,objindex );
CHAR_setCharPet( charaindex, havepetindex, -1);
CHAR_setInt( petindex, CHAR_FLOOR, floor);
CHAR_setInt( petindex, CHAR_X, x);
CHAR_setInt( petindex, CHAR_Y, y);
CHAR_setInt( petindex, CHAR_PUTPETTIME, NowTime.tv_sec);
if( havepetindex == CHAR_getInt( charaindex, CHAR_DEFAULTPET)) {
int fd;
CHAR_setInt( charaindex, CHAR_DEFAULTPET, -1);
fd = getfdFromCharaIndex( charaindex);
lssproto_KS_send( fd, havepetindex, 0);
}
CHAR_sendCToArroundCharacter( objindex);
if( CHAR_getInt( charaindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER){
#ifdef _PET_ITEM
CHAR_sendPetItemData( charaindex, havepetindex);
#endif
snprintf( szPet, sizeof( szPet ), "K%d", havepetindex );
CHAR_sendStatusString( charaindex, szPet );
}
CHAR_setWorkInt( charaindex, CHAR_WORKPETFOLLOW, petindex);
CHAR_setWorkInt( petindex, CHAR_WORKPETFOLLOWMODE, CHAR_PETFOLLOW_NOW);
CHAR_setWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT, 0);
CHAR_setInt( petindex, CHAR_PUTPETTIME, (int)(NowTime.tv_sec));
CHAR_setInt( petindex, CHAR_WORKPLAYERINDEX, charaindex);
LogPet(
CHAR_getChar( charaindex, CHAR_NAME ),
CHAR_getChar( charaindex, CHAR_CDKEY ),
CHAR_getChar( petindex, CHAR_NAME),
CHAR_getInt( petindex, CHAR_LV),
"Follow(lua<75><61><EFBFBD><EFBFBD>)",
CHAR_getInt( charaindex,CHAR_FLOOR),
CHAR_getInt( charaindex,CHAR_X ),
CHAR_getInt( charaindex,CHAR_Y ),
CHAR_getChar( petindex, CHAR_UNIQUECODE)
);
return 1;
}
static int getItemIndex(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int haveitemindex = luaL_checkint(L, 2);
lua_pushinteger(L, CHAR_getItemIndex( charaindex, haveitemindex ));
return 1;
}
static int charSaveFromConnect(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
if( CHAR_getCharUse(charaindex) != FALSE ){
CHAR_charSaveFromConnect( charaindex, FALSE );
}
return 1;
}
#ifdef _RECORD_IP
static int userip(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
unsigned long ip;
int a,b,c,d;
char strIP[32];
ip = CHAR_getWorkInt(charaindex, CHAR_WORK_RECORD_IP);
a=(ip % 0x100); ip=ip / 0x100;
b=(ip % 0x100); ip=ip / 0x100;
c=(ip % 0x100); ip=ip / 0x100;
d=(ip % 0x100);
sprintf(strIP, "%d.%d.%d.%d", a, b, c, d);
lua_pushstring(L, strIP);
return 1;
}
#endif
static int DischargeParty(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int flg = luaL_checkint(L, 2);
CHAR_DischargeParty_New(charaindex, flg);
return 1;
}
static int Skillupsend(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
CHAR_Skillupsend(charaindex);
return 1;
}
#endif
#ifdef _ALLBLUES_LUA_1_9
static int logou(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
CHAR_logout(charaindex, TRUE);
return 1;
}
int copyChar(lua_State *L)
{
const int fromindex = luaL_checkint(L, 1);
const int toindex = luaL_checkint(L, 2);
if( !CHAR_CHECKINDEX( fromindex) )return 1;
if( !CHAR_CHECKINDEX( toindex) )return 1;
CHAR_setInt(toindex, CHAR_BASEIMAGENUMBER, CHAR_getInt(fromindex, CHAR_BASEIMAGENUMBER));
CHAR_setInt(toindex, CHAR_BASEBASEIMAGENUMBER, CHAR_getInt(fromindex, CHAR_BASEBASEIMAGENUMBER));
CHAR_setInt(toindex, CHAR_TRANSMIGRATION, CHAR_getInt(fromindex, CHAR_TRANSMIGRATION));
CHAR_setInt(toindex, CHAR_LV, CHAR_getInt(fromindex, CHAR_LV));
CHAR_setInt(toindex, CHAR_HP, CHAR_getInt(fromindex, CHAR_HP));
CHAR_setInt(toindex, CHAR_MP, CHAR_getInt(fromindex, CHAR_MP));
CHAR_setInt(toindex, CHAR_MAXMP, CHAR_getInt(fromindex, CHAR_MAXMP));
CHAR_setInt(toindex, CHAR_VITAL, CHAR_getInt(fromindex, CHAR_VITAL));
CHAR_setInt(toindex, CHAR_STR, CHAR_getInt(fromindex, CHAR_STR));
CHAR_setInt(toindex, CHAR_TOUGH, CHAR_getInt(fromindex, CHAR_TOUGH));
CHAR_setInt(toindex, CHAR_DEX, CHAR_getInt(fromindex, CHAR_DEX));
CHAR_setInt(toindex, CHAR_ALLOCPOINT, CHAR_getInt(fromindex, CHAR_ALLOCPOINT));
CHAR_setInt(toindex, CHAR_PETRANK, CHAR_getInt(fromindex, CHAR_PETRANK));
CHAR_setInt(toindex, CHAR_LIMITLEVEL, CHAR_getInt(fromindex, CHAR_LIMITLEVEL));
CHAR_setChar(toindex, CHAR_NAME, CHAR_getChar(fromindex, CHAR_NAME));
CHAR_setChar(toindex, CHAR_OWNTITLE, CHAR_getChar(fromindex, CHAR_OWNTITLE));
CHAR_complianceParameter(toindex);
return 1;
}
int talkToAllServer(lua_State *L)
{
size_t l;
char *message=luaL_checklstring(L, 1, &l);
saacproto_AllServSend_send(message);
return 1;
}
#endif
static int earnFame(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int num = luaL_checkint(L, 2);
CHAR_earnFame(charaindex, num);
return 1;
}
static int Encounter(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
if(CHAR_CHECKINDEX(charaindex) == FALSE) return 0;
int fd=CHAR_getWorkInt( charaindex, CHAR_WORKFD);
setStayEncount(fd);
#ifdef _USER_CHARLOOPS
{
Char *ch;
ch = CHAR_getCharPointer( charaindex);
if( ch == NULL ) return 0;
strcpysafe( ch->charfunctable[CHAR_LOOPFUNCTEMP1].string,
sizeof( ch->charfunctable[CHAR_LOOPFUNCTEMP1]), "CHAR_BattleStayLoop");//ս<><D5BD>
CHAR_setInt( charaindex, CHAR_LOOPINTERVAL, 2500);
CHAR_constructFunctable( charaindex);
}
#endif
}
static int ClearEncounter(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
if(CHAR_CHECKINDEX(charaindex) == FALSE) return 0;
int fd=CHAR_getWorkInt( charaindex, CHAR_WORKFD);
clearStayEncount(fd);
return 1;
}
static int getDX(lua_State *L)
{
size_t l;
char *diy=luaL_checklstring(L, 1, &l);
lua_pushinteger(L, CHAR_getDX(diy));
return 1;
}
static int getDY(lua_State *L)
{
size_t l;
char *dir=luaL_checklstring(L, 1, &l);
lua_pushinteger(L, CHAR_getDY(dir));
return 1;
}
static int sendAction(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
const int actionno = luaL_checkint(L, 2);
const int flg = luaL_checkint(L, 3);
CHAR_sendAction( charaindex, actionno, flg);
return 1;
}
#ifdef _NEW_ITEM_
extern int CheckCharMaxItem(int charindex);
#endif
static int GetEmptyItemBoxNum(lua_State *_NLL)
{
const int TM_CharIndex = luaL_checkint(_NLL, 1);
if(!CHAR_CHECKINDEX(TM_CharIndex))
{
lua_pushinteger(_NLL, -1);
return 0;
}
int i = CHAR_EQUIPPLACENUM ;
int EmptyNum = 0;
#ifdef _NEW_ITEM_
int itemMax = CheckCharMaxItem(TM_CharIndex);
for( ; i <itemMax; i++){
#else
for( ; i <CHAR_MAXITEMHAVE; i++){
#endif
if( CHAR_getItemIndex( TM_CharIndex,i) == -1 ) EmptyNum++;
}
lua_pushinteger(_NLL, EmptyNum);
}
static int GetOldLevelExp(lua_State *L)
{
const int level = luaL_checkint(L, 1);
lua_pushinteger(L, CHAR_GetOldLevelExp( level ));
return 1;
}
#ifdef _PROFESSION_SKILL // WON ADD <20><><EFBFBD><EFBFBD>ְҵ<D6B0><D2B5><EFBFBD><EFBFBD>
static int getCharSkill (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int sindex = luaL_checkint(L, 2);
lua_pushinteger(L, CHAR_getCharSkill(index, sindex));
return 1;
}
static int setCharSkill (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int sindex = luaL_checkint(L, 2);
const int data = luaL_checkint(L, 3);
if(CHAR_setCharSkill(index, sindex, data) == -1){
return 0;
}else{
return 1;
}
}
static int DelSProfeesionSkill (lua_State *L)
{
const int index = luaL_checkint(L, 1);
const int sindex = luaL_checkint(L, 2);
CHAR_HaveSkill *pSkil;
pSkil = CHAR_getCharHaveSkill( index, sindex );
SKILL_makeSkillData( &pSkil->skill, 0, 0 );
pSkil->use = 0;
}
#endif
static int UpCahrData(lua_State *L)
{
const int charaindex = luaL_checkint(L, 1);
size_t l;
const char *data = luaL_checklstring(L, 2, &l);
CHAR_sendStatusString(charaindex,data);
return 1;
}
#ifdef _NEW_TITLE
static int getCharNewTitleMode(lua_State *L){
const int charaindex = luaL_checkint(L, 1);
const int id = luaL_checkint(L, 2);
if (id < 32){
if (CHAR_getInt(charaindex,CHAR_TITLE1)&(1<<id)) {
lua_pushinteger(L, 1);
return 1;
}
}
else if (id >=32 && id < 64) {
if (CHAR_getInt(charaindex,CHAR_TITLE2)&(1<<(id-32))) {
lua_pushinteger(L, 1);
return 1;
}
}
else if (id >=64 && id < 96){
if (CHAR_getInt(charaindex,CHAR_TITLE3)&(1<<(id-64))) {
lua_pushinteger(L, 1);
return 1;
}
}
lua_pushinteger(L, -1);
return 1;
}
static int setCharNewTitleMode(lua_State *L){
const int charaindex = luaL_checkint(L, 1);
const int id = luaL_checkint(L, 2);
if (id < 32){
CHAR_setInt(charaindex,CHAR_TITLE1,CHAR_getInt(charaindex,CHAR_TITLE1)|(1<<id));
}
else if (id >=32 && id < 64) {
CHAR_setInt(charaindex,CHAR_TITLE2,CHAR_getInt(charaindex,CHAR_TITLE2)|(1<<(id-32)));
}
else if (id >=64 && id < 96){
CHAR_setInt(charaindex,CHAR_TITLE3,CHAR_getInt(charaindex,CHAR_TITLE3)|(1<<(id-64)));
}
return 1;
}
static int clrCharNewTitleMode(lua_State *L){
const int charaindex = luaL_checkint(L, 1);
const int id = luaL_checkint(L, 2);
if (id < 32){
CHAR_setInt(charaindex,CHAR_TITLE1,CHAR_getInt(charaindex,CHAR_TITLE1)& ~(1<<id));
}
else if (id >=32 && id < 64) {
CHAR_setInt(charaindex,CHAR_TITLE2,CHAR_getInt(charaindex,CHAR_TITLE2)& ~(1<<(id-32)));
}
else if (id >=64 && id < 96){
CHAR_setInt(charaindex,CHAR_TITLE3,CHAR_getInt(charaindex,CHAR_TITLE3)& ~(1<<(id-64)));
}
return 1;
}
#endif
static int lua_getMyMaxPilenum(lua_State *L)
{
int charaindex=luaL_checkint(L, 1);
lua_pushinteger(L, CHAR_getMyMaxPilenum(charaindex));
return 1;
}
static int PileItemFromItemBoxToItemBox(lua_State *L)
{
int charaindex=luaL_checkint(L, 1);
int from=luaL_checkint(L, 2);
int to=luaL_checkint(L, 3);
lua_pushinteger(L, CHAR_PileItemFromItemBoxToItemBox(charaindex,from,to));
return 1;
}
static int CheckUserItem(lua_State *L)
{
int charaindex=luaL_checkint(L, 1);
CHAR_CheckUserItem(charaindex);
return 1;
}
extern int NPC_Lua_NLG_UpChar(lua_State *_NLL);
static const luaL_Reg charlib[] = {
{"PileItemFromItemBoxToItemBox", PileItemFromItemBoxToItemBox},
{"getMyMaxPilenum", lua_getMyMaxPilenum},
{"upchar", NPC_Lua_NLG_UpChar},
{"getCharNum", getCharNum},
{"UpCahrData", UpCahrData},
{"getPlayerMaxNum", getPlayerMaxNum},
{"getPetMaxNum", getPetMaxNum},
{"getOthersMaxNum", getOthersMaxNum},
{"check", check},
{"setWorkChar", setWorkChar},
{"getWorkChar", getWorkChar},
{"setWorkInt", setWorkInt},
{"getWorkInt", getWorkInt},
{"setChar", setChar},
{"getChar", getChar},
{"setInt", setInt},
{"getInt", getInt},
{"setFlg", setFlg},
{"getFlg", getFlg},
{"setFunctionPointer", setFunctionPointer},
{"delFunctionPointer", delFunctionPointer},
{"TalkToCli", TalkToCli},
{"TalkToRound", TalkToRound},
{"talkToFloor", talkToFloor},
{"talkToParty", talkToParty},
{"talkToServer", talkToServer},
#ifdef _MO_LUA_TALK_EX
{"talkToServerEx", talkToServerEx},
#endif
{"BoundRandWalk", BoundRandWalk},
{"ToAroundChar", ToAroundChar},
#ifdef _ALLBLUES_LUA_1_1
{"Walk", Walk},
{"WalkPoint", WalkPoint},
{"WarpToSpecificPoint", WarpToSpecificPoint},
{"MapAllWarp", MapAllWarp},
{"RandRandWalk", RandRandWalk},
#endif
#ifdef _ALLBLUES_LUA_1_3
{"createPet", createPet},
{"setCharPet", setCharPet},
{"getCharPet", getCharPet},
{"setCharPoolPet", setCharPoolPet},
{"getCharPoolPet", getCharPoolPet},
{"setDepotPetIndex", setDepotPetIndex},
{"getDepotPetIndex", getDepotPetIndex},
{"DelItem", DelItem},
{"getFd", getFd},
{"Updata", Updata},
{"Additem", Additem},
{"AddPet", AddPet},
{"Finditem", Finditem},
#ifdef _PLAYER_NPC
{"setPlayerNpc", setPlayerNpc},
#endif
{"Coordinate", Coordinate},
{"setPetSkill", setPetSkill},
{"getPetSkill", getPetSkill},
{"PetLevelUp", PetLevelUp},
{"JoinParty", JoinParty},
#endif
#ifdef _ALLBLUES_LUA_1_4
{"getLiftTo8", getLiftTo8},
{"getRightTo8", getRightTo8},
{"complianceParameter", complianceParameter},
{"sendStatusString", sendStatusString},
{"sendBattleEffect", sendBattleEffect},
{"dropPetAbsolute", dropPetAbsolute},
{"AddPetCf", AddPetCf},
{"sendWatchEvent", sendWatchEvent},
{"AllWarpToSpecificPoint",AllWarpToSpecificPoint},
{"Findpet", Findpet},
{"DelPet", DelPet},
{"CharaDeleteHavePet", CharaDeleteHavePet},
{"FindPetFormEnemyTempID",FindPetFormEnemyTempID},
{"FindPetFormMatemo", FindPetFormMatemo},
#endif
#ifdef _PETSKILL_SHOP_LUA
{"FreePetSkill", FreePetSkill},
#endif
#ifdef _ALLBLUES_LUA_1_7
{"findEmptyPetBox", findEmptyPetBox},
{"findEmptyItemBox", findEmptyItemBox},
{"dropPetFollow", dropPetFollow},
{"getItemIndex", getItemIndex},
{"charSaveFromConnect", charSaveFromConnect},
{"DischargeParty", DischargeParty},
{"Skillupsend", Skillupsend},
#ifdef _RECORD_IP
{"userip", userip},
#endif
#endif
#ifdef _ALLBLUES_LUA_1_9
{"logou", logou},
{"copyChar", copyChar},
{"talkToAllServer", talkToAllServer},
#endif
{"earnFame", earnFame},
{"Encounter", Encounter},
{"getDX", getDX},
{"getDY", getDY},
{"sendAction", sendAction},
{"GetOldLevelExp", GetOldLevelExp},
#ifdef _PROFESSION_SKILL // WON ADD <20><><EFBFBD><EFBFBD>ְҵ<D6B0><D2B5><EFBFBD><EFBFBD>
{"getCharSkill", getCharSkill},
{"setCharSkill", setCharSkill},
{"DelSProfeesionSkill", DelSProfeesionSkill},
#endif
{"WriteShopData", AB_WriteShopData},
{"GetEmptyItemBoxNum", GetEmptyItemBoxNum},
{"ClearEncounter", ClearEncounter},
#ifdef _NEW_TITLE
{"getCharNewTitleMode", getCharNewTitleMode},
{"setCharNewTitleMode", setCharNewTitleMode},
{"clrCharNewTitleMode", clrCharNewTitleMode},
#endif
#ifdef _ITEM_USE_TIME
{"CheckUserItem", CheckUserItem},
#endif
{NULL, NULL}
};
LUALIB_API int luaopen_Char (lua_State *L) {
luaL_register(L, "char", charlib);
return 1;
}
#endif
Reference in New Issue Copy Permalink