void pet_make( int charaindex, char* message )
{
int ret;
char msgbuf[64];
int enemynum;
int enemyid;
int i;
enemyid = atoi(message);
enemynum = ENEMY_getEnemyNum();
for( i=0; i<enemynum; i++ ){
if( ENEMY_getInt( i, ENEMY_ID) == enemyid){
break;
}
}
if(i==enemynum) return;
ret = ENEMY_createPetFromEnemyIndex( charaindex, i);
snprintf( msgbuf, sizeof( msgbuf), "哦～以你的能力足以配得上一只传说宠物，好吧！就是你了。");
CHAR_talkToCli( charaindex, -1, msgbuf, CHAR_COLORYELLOW);
for( i=0; i<CHAR_MAXPETHAVE; i++ ){
if( CHAR_getCharPet( charaindex, i) == ret )break;
}
if( i==CHAR_MAXPETHAVE) i = 0;
if( CHAR_CHECKINDEX( ret ) == TRUE ){
CHAR_setMaxExpFromLevel( ret, CHAR_getInt( ret, CHAR_LV ));
}
snprintf( msgbuf, sizeof( msgbuf ), "K%d", i );
CHAR_sendStatusString( charaindex, msgbuf );
snprintf( msgbuf, sizeof( msgbuf ), "W%d", i );
CHAR_sendStatusString( charaindex, msgbuf );
for( i=0; i<CHAR_MAXPETHAVE; i++ )
if( CHAR_getCharPet(charaindex, i) == ret )
CHAR_send_K_StatusString(charaindex, i, CHAR_K_STRING_HP|CHAR_K_STRING_AI);
LogPet(
CHAR_getChar( charaindex, CHAR_NAME ), /* 平乓仿 */
CHAR_getChar( charaindex, CHAR_CDKEY ),
"凯恩",1,"PetMaker",
CHAR_getInt( charaindex,CHAR_FLOOR),
CHAR_getInt( charaindex,CHAR_X ),
CHAR_getInt( charaindex,CHAR_Y ),
CHAR_getChar( ret, CHAR_UNIQUECODE) // shan 2001/12/14
);
}
/*----------------------------------------------------------------------
* ¾¿Í¤ò²óÉü
* °ú¿ô
* charaindex int ¼«Ê¬¤Îindex
* toindex int ²óÉü¤¹¤ë¿Í¤Îindex
* magicindex int ËâË¡¤Îindex
*---------------------------------------------------------------------*/
int MAGIC_OtherRecovery_Field( int charaindex, int toindex, int magicindex)
{
char *magicarg;
float power;
int workhp;
int prevhp;
char msgbuf[64];
#ifdef _TYPE_TOXICATION
if( CHAR_CanCureFlg( charaindex, "HP") == FALSE )return FALSE;
#endif
magicarg = MAGIC_getChar( magicindex, MAGIC_OPTION );
power = atoi( magicarg );
power = RAND( (power*0.9), (power*1.1) );
#ifndef _MAGIC_REHPAI
power *= GetRecoveryRate( toindex );
#endif
prevhp = CHAR_getInt( toindex, CHAR_HP );
workhp = prevhp + (int)power;
CHAR_setInt( toindex, CHAR_HP,
min( workhp, CHAR_getWorkInt( toindex, CHAR_WORKMAXHP ) ) );
if( CHAR_getInt( toindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER) {
if( charaindex != toindex ) {
CHAR_send_P_StatusString( toindex, CHAR_P_STRING_HP);
}
}
CHAR_send_P_StatusString( charaindex, CHAR_P_STRING_HP|CHAR_P_STRING_MP);
if( charaindex != toindex) {
CHAR_PartyUpdate( charaindex, CHAR_N_STRING_MP);
CHAR_PartyUpdate( toindex, CHAR_N_STRING_HP);
}
else {
CHAR_PartyUpdate( charaindex, CHAR_N_STRING_MP|CHAR_N_STRING_HP);
}
if( CHAR_getInt( toindex, CHAR_WHICHTYPE) == CHAR_TYPEPET ){
int i;
for( i = 0; i < CHAR_MAXPETHAVE; i ++ ) {
int workindex = CHAR_getCharPet( charaindex, i );
if( workindex == toindex ){
CHAR_send_K_StatusString( charaindex, i, CHAR_K_STRING_HP);
}
}
}
if( charaindex != toindex) {
snprintf( msgbuf, sizeof( msgbuf), "%sªº@¤[¤O¦^´_%d",
CHAR_getUseName( toindex ),
min( workhp, CHAR_getWorkInt( toindex, CHAR_WORKMAXHP)) - prevhp);
CHAR_talkToCli( charaindex, -1, msgbuf, CHAR_COLORWHITE);
if( CHAR_getInt( toindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER) {
snprintf( msgbuf, sizeof( msgbuf), "ÂÇ¥Ñ%s@¤[¤O¦^´_%d",
CHAR_getUseName( charaindex ),
min( workhp,CHAR_getWorkInt( toindex, CHAR_WORKMAXHP)) - prevhp);
CHAR_talkToCli( toindex, -1, msgbuf, CHAR_COLORWHITE);
}
}
else {
snprintf( msgbuf, sizeof( msgbuf), "@¤[¤O¦^´_%d",
min( workhp,CHAR_getWorkInt( charaindex, CHAR_WORKMAXHP)) - prevhp);
CHAR_talkToCli( charaindex, -1, msgbuf, CHAR_COLORWHITE);
}
return TRUE;
}
int NPC_Lua_NLG_UpChar(lua_State *_NLL)
{
CheckEx(_NLL, 1);
CheckIndexNull(_NLL, 1);
int TM_Index = (int)lua_tointeger(_NLL, 1);
if(!CHAR_CHECKINDEX(TM_Index))
{
LRetErrInt(_NLL, -1, "传入的索引是无效的。");
}
CHAR_complianceParameter( TM_Index );
if(CHAR_getInt(TM_Index,CHAR_WHICHTYPE)==CHAR_TYPEPET){
int playindex = CHAR_getWorkInt(TM_Index,CHAR_WORKPLAYERINDEX);
if(!CHAR_CHECKINDEX(playindex)){
LRetErrInt(_NLL, -1, "传入的索引是无效的。");
}else{
int i;
for( i = 0; i < CHAR_MAXPETHAVE; i ++ ) {
int workindex = CHAR_getCharPet( playindex, i );
if( workindex == TM_Index ){
CHAR_send_K_StatusString( playindex, i, CHAR_K_STRING_BASEIMAGENUMBER|
CHAR_K_STRING_HP|
CHAR_K_STRING_MAXHP|
CHAR_K_STRING_MP|
CHAR_K_STRING_MAXMP|
CHAR_K_STRING_EXP|
CHAR_K_STRING_NEXTEXP|
CHAR_K_STRING_LV|
CHAR_K_STRING_ATK|
CHAR_K_STRING_DEF|
CHAR_K_STRING_QUICK|
CHAR_K_STRING_AI|
CHAR_K_STRING_EARTH|
CHAR_K_STRING_WATER|
CHAR_K_STRING_FIRE|
CHAR_K_STRING_WIND|
CHAR_K_STRING_SLOT|
CHAR_K_STRING_CHANGENAMEFLG|
CHAR_K_STRING_NAME|
CHAR_K_STRING_USERPETNAME);
char msgbuf[128];
snprintf( msgbuf, sizeof( msgbuf ), "W%d",i);
CHAR_sendStatusString( playindex, msgbuf );
CHAR_sendStatusString( playindex, "P");
break;
}
}
}
}else if(CHAR_getInt(TM_Index,CHAR_WHICHTYPE)==CHAR_TYPEPLAYER){
CHAR_send_P_StatusString( TM_Index, CHAR_P_STRING_GOLD );
}
if(CHAR_getFlg(TM_Index, CHAR_ISVISIBLE) == FALSE)
{
int TM_objindex = CHAR_getWorkInt(TM_Index,CHAR_WORKOBJINDEX);
CHAR_sendCDArroundChar
(
OBJECT_getFloor(TM_objindex),
OBJECT_getX(TM_objindex),
OBJECT_getY(TM_objindex),
TM_objindex
);
}else
{
CHAR_sendCToArroundCharacter( CHAR_getWorkInt( TM_Index , CHAR_WORKOBJINDEX ));
}
LRetNull(_NLL);
}
