void NPC_DepotPet_Get( int meindex, int talker, int select, char *token)
{
int petindex;
int selectpet;
int emptyindex;
char szPet[128];
int workindex[CHAR_MAXPOOLPETHAVE];
int i;
int cnt;
selectpet = CHAR_getWorkInt( talker, CHAR_WORKSHOPRELEVANT) ;
petindex = CHAR_getDepotPetIndex( talker, selectpet);
if( !CHAR_CHECKINDEX( petindex) ) return;
emptyindex = CHAR_getCharPetElement( talker);
if( emptyindex == -1 ) {
fprint( "err\n");
return;
}
CHAR_setCharPet( talker, emptyindex, petindex);
CHAR_setChar( petindex, CHAR_OWNERCHARANAME, CHAR_getChar( talker, CHAR_NAME));
CHAR_setDepotPetIndex( talker, selectpet, -1);
NPC_MaxGoldOver( meindex, talker, NPC_PETSHOP_MSG_POOLTHANKS, token);
snprintf( szPet, sizeof( szPet ), "K%d", emptyindex);
CHAR_sendStatusString( talker, szPet );
snprintf( szPet, sizeof( szPet), "W%d",emptyindex);
CHAR_sendStatusString( talker, szPet );
for( i = 0; i < CHAR_MAXDEPOTPETHAVE; i ++ ) {
workindex[i] = -1;
}
cnt = 0;
for( i = 0; i < CHAR_MAXDEPOTPETHAVE; i ++ ) {
int petindex = CHAR_getDepotPetIndex( talker, i);
if( CHAR_CHECKINDEX( petindex) ) {
workindex[cnt++] = petindex;
}
}
for( i = 0; i < CHAR_MAXDEPOTPETHAVE; i ++ ) {
CHAR_setDepotPetIndex( talker, i, workindex[i]);
}
LogPet(
CHAR_getChar( talker, CHAR_NAME ),
CHAR_getChar( talker, CHAR_CDKEY ),
CHAR_getChar( petindex, CHAR_NAME),
CHAR_getInt( petindex, CHAR_LV),
"draw(ÁìÈ¡²Ö¿â³èÎï)",
CHAR_getInt( talker,CHAR_FLOOR),
CHAR_getInt( talker,CHAR_X ),
CHAR_getInt( talker,CHAR_Y ),
CHAR_getChar( petindex, CHAR_UNIQUECODE) // shan 2001/12/14
);
#ifdef _PET_EVOLUTION
if( CHAR_getInt( petindex, CHAR_FUSIONBEIT) == 1 &&
CHAR_getInt( petindex, CHAR_FUSIONRAISE) > 0 ){//¼ì²éÊÇ·ñΪÈںϳè
CHAR_setInt( petindex, CHAR_FUSIONTIMELIMIT, (int)time( NULL));
}
#endif
}
void NPC_reCheckMyPetUnusual( int meindex, int toindex)//¼ì²é³èÎïÒì³£
{
char *buf=NULL;
int petindex,i;
for( i=0; i<CHAR_MAXPETHAVE; i++) {
petindex = CHAR_getCharPet( toindex, i);
if( !CHAR_CHECKINDEX( petindex) )continue;
if( (buf=CHAR_getChar( petindex, CHAR_NAME)) == NULL ||
strlen( buf) <= 0 ){
char *PetNAME;
int array, parry, petID;
petID = CHAR_getInt( petindex, CHAR_PETID);
array = ENEMY_getEnemyArrayFromTempNo( petID);
if( !ENEMY_CHECKINDEX( array)){
print("ANDY Pet(ID:%d) err Array:%d (file:%s %d) !! \n",
petID, array, __FILE__, __LINE__ );
continue;
}
parry = ENEMYTEMP_getEnemyTempArray( array);
if( (PetNAME = ENEMYTEMP_getChar( parry, E_T_NAME)) == NULL ||
strlen( PetNAME) <= 0 ){
print("ANDY Pet(ID:%d) Array:%d err Name:%s (file:%s %d) !! \n",
petID, array, (PetNAME==NULL)?"NULL":PetNAME, __FILE__, __LINE__ );
continue;
}
char tempname[128];
if(strstr(CHAR_getChar(petindex,CHAR_NAME),"*")!=NULL)
sprintf(tempname,"*%s",ENEMYTEMP_getChar( parry, E_T_NAME));
else
sprintf(tempname,"%s",ENEMYTEMP_getChar( parry, E_T_NAME));
CHAR_setChar( petindex, CHAR_NAME, tempname);
CHAR_setChar( petindex, CHAR_USERPETNAME , "");
//andy_log
print("ANDY Pet(ID:%d) Name -> %s (%s:%s)(file:%s %d) !! \n",
petID, PetNAME, CHAR_getUseName( toindex),
CHAR_getChar( toindex, CHAR_CDKEY), __FILE__, __LINE__ );
}
}
for( i=0; i<CHAR_MAXPETHAVE; i++){
char szPet[256];
petindex = CHAR_getCharPet(toindex, i);
if( !CHAR_CHECKINDEX( petindex) )continue;
CHAR_complianceParameter( petindex );
snprintf( szPet, sizeof( szPet ), "K%d", i);
CHAR_sendStatusString( toindex, szPet );
snprintf( szPet, sizeof( szPet ), "W%d", i);
CHAR_sendStatusString( toindex, szPet );
}
}
BOOL CHECK_PETBBI( int toindex)
{
int i, petindex, PetID;
BOOL Finds = FALSE;
char token[256];
for( i=0; i < CHAR_MAXPETHAVE; i++) {
int parry, array, PetBBI;
petindex = CHAR_getCharPet( toindex, i);
if( !CHAR_CHECKINDEX( petindex) ) continue;
PetID = CHAR_getInt( petindex, CHAR_PETID);
array = ENEMY_getEnemyArrayFromTempNo( PetID);
if( !ENEMY_CHECKINDEX( array)) continue;
parry = ENEMYTEMP_getEnemyTempArray( array);
PetBBI = ENEMYTEMP_getInt( parry, E_T_IMGNUMBER);
if( CHAR_getInt( petindex, CHAR_BASEBASEIMAGENUMBER) != PetBBI ||
CHAR_getInt( petindex, CHAR_BASEIMAGENUMBER) != PetBBI ){
CHAR_setInt( petindex, CHAR_BASEBASEIMAGENUMBER, PetBBI);
CHAR_setInt( petindex, CHAR_BASEIMAGENUMBER, PetBBI);
sprintf( token, "ÐÞÕý%sͼºÅ", CHAR_getUseName( petindex));
CHAR_talkToCli( toindex, -1, token, CHAR_COLORYELLOW);
Finds = TRUE;
}
CHAR_setInt( petindex, CHAR_EARTHAT, ENEMYTEMP_getInt( parry, E_T_EARTHAT) );
CHAR_setInt( petindex, CHAR_WATERAT, ENEMYTEMP_getInt( parry, E_T_WATERAT) );
CHAR_setInt( petindex, CHAR_FIREAT, ENEMYTEMP_getInt( parry, E_T_FIREAT) );
CHAR_setInt( petindex, CHAR_WINDAT, ENEMYTEMP_getInt( parry, E_T_WINDAT) );
char tempname[128];
if(strstr(CHAR_getChar(petindex,CHAR_NAME),"*")!=NULL)
sprintf(tempname,"*%s",ENEMYTEMP_getChar( parry, E_T_NAME));
else
sprintf(tempname,"%s",ENEMYTEMP_getChar( parry, E_T_NAME));
CHAR_setChar( petindex, CHAR_NAME, tempname);
CHAR_setChar( petindex, CHAR_USERPETNAME , "");
}
for( i=0; i<CHAR_MAXPETHAVE; i++){
char szPet[128];
petindex = CHAR_getCharPet(toindex, i);
if( !CHAR_CHECKINDEX( petindex) )continue;
CHAR_complianceParameter( petindex );
snprintf( szPet, sizeof( szPet ), "K%d", i);
CHAR_sendStatusString( toindex, szPet );
snprintf( szPet, sizeof( szPet ), "W%d", i);
CHAR_sendStatusString( toindex, szPet );
}
if( Finds == FALSE ){
sprintf( token, "ûÓдíÎóͼºÅµÄ³èÎï");
CHAR_talkToCli( toindex, -1, token, CHAR_COLORYELLOW);
}
return Finds;
}
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
);
}
void CHAR_recoveryStatus( int charaindex )
{
int i;
int cure=FALSE;
if( !CHAR_CHECKINDEX(charaindex) )return;
for( i=0 ; i < arraysizeof(pShow) ; i ++ ) {
if( CHAR_getInt(charaindex,pShow[i].paramindex) > 0 ) {
int old;
old = CHAR_setInt(charaindex,pShow[i].paramindex,
CHAR_getInt(charaindex,
pShow[i].paramindex) - 1 );
if( old == 1 ) {
if( CHAR_getInt(charaindex,CHAR_WHICHTYPE) == CHAR_TYPEPLAYER) {
CHAR_talkToCli( charaindex,-1, pShow[i].offmessage,
CHAR_COLORWHITE );
}
cure = TRUE;
}
}
}
if( cure ) {
CHAR_sendStatusString( charaindex, "P" );
CHAR_sendCToArroundCharacter( CHAR_getWorkInt(
charaindex, CHAR_WORKOBJINDEX) );
}
}
/*
* キャラクターがもっているアイテムを1個抹消する。そのアイテムは
* アイテムIDで指定する。アイテム表を前から検索していって、
* 最初にヒットしたやつを削除する。
*
* int charindex : キャラクタのindex
* int itemid : アイテムのID . itemset.txt に記述されている。
* BOOL net: ネットワークをするかどうか。TRUEだとする。
*
* アイテムをもっていて削除できたら TRUE , 削除できなかったらFALSE
*/
BOOL NPC_Util_RemoveItemByID( int charindex, int itemid, BOOL net )
{
int i;
for(i=0;i<CHAR_MAXITEMHAVE;i++){
int ii = CHAR_getItemIndex( charindex , i);
if( ITEM_CHECKINDEX(ii)
&& ITEM_getInt( ii, ITEM_ID ) == itemid){
/* キャラクタがもっているアイテムを*/
CHAR_setItemIndex( charindex , i , -1 );
/*
* そのアイテムを世界から消去する。
* つまりアイテム表から抹消する
*/
ITEM_endExistItemsOne( ii );
/* 両手持ち武器 */
if( ii == CHAR_ARM1 && CHAR_getItemIndex(charindex,CHAR_ARM2)
== -2 )
CHAR_setItemIndex(charindex,CHAR_ARM2,-1);
if(net)CHAR_sendStatusString( charindex, "I");
return TRUE;
}
}
return FALSE;
}
/*------------------------------------------------------------
* Map 奶矛件玄及 pre post毛质 允月
* 娄醒
* index int 昙欠丹午仄化中月平乓仿及奶件犯永弁旦
* mode BOOL TRUE及凛反｝in FALSE及凛反 out 卞覆杀
* 忒曰袄卅仄
------------------------------------------------------------*/
static void MAP_dealprepostevent( int index, BOOL mode )
{
int map[2];
int i;
int damaged=FALSE;
if( CHAR_getFlg(index,CHAR_ISFLYING) )
/* 氏匹月支勾卞反窒手仄卅中 */
return;
if( !MAP_getMapDataFromCharIndex( index , map ) ) return;
for( i = 0 ; i < 2 ; i ++ ){
/* damage */
int damage;
damage = MAP_getImageInt(map[i],
mode ? MAP_INTODAMAGE : MAP_OUTOFDAMAGE);
if( damage != 0 ){
/* 母丢□斥汹毛恳匹 蜇允月及匹 寞 木赘尹 */
int opt[2]={SPR_kmydamY,-damage};
damaged=TRUE;
CHAR_setInt(index, CHAR_HP,
CHAR_getInt(index,CHAR_HP) + damage );
CHAR_complianceParameter(index);
/* 母丢□斥熬仃凶巨白尼弁玄请允 */
CHAR_sendWatchEvent(CHAR_getWorkInt(index,CHAR_WORKOBJINDEX),
CHAR_ACTDAMAGE,opt,2,TRUE);
}
}
if( damaged )
CHAR_sendStatusString(index,"M");
}
static BOOL NPC_SimpleShopProcessBuyMsg(char *msg, int shopindex,
int playerindex )
{
int shopwindowindex, itemtableindex,itemind;
int price, tmpgold;
char buf[64];
if(!CHAR_CHECKINDEX(shopindex)||!CHAR_CHECKINDEX(playerindex))
return -1;
if( !getStringFromIndexWithDelim( msg,"|",4,buf,sizeof(buf) )){
return -1;
}
shopwindowindex = atoi(buf);
itemtableindex=NPC_ShopWindowIndexToItemTableIndex( shopindex, shopwindowindex );
itemind = CHAR_getItemIndex(shopindex,itemtableindex );
if( ! ITEM_CHECKINDEX(itemind) ) return -1;
price = ITEM_getInt( itemind, ITEM_COST )
* NPC_Util_buyRate(playerindex);
tmpgold = CHAR_getInt(playerindex,CHAR_GOLD);
if( tmpgold < price ){
return -2;
}
if( ! NPC_Util_moveItemToChar(playerindex,itemind,TRUE ) ){
return -3;
}
CHAR_AddGold( playerindex, price );
CHAR_sendStatusString( playerindex , "P");
return 1;
}
BOOL CHAR_allprewalk( int index,int* dir,int* mode)
{
int poisonvalue;
poisonvalue = CHAR_getInt(index, CHAR_POISON );
if( poisonvalue >= 1 ) {
CHAR_setInt(index,CHAR_HP , CHAR_getInt(index,CHAR_HP)
- poisonvalue );
CHAR_setWorkInt(index,CHAR_WORKLASTATTACKCHARAINDEX,-2);
{
int opt[2] = { SPR_kmydam,poisonvalue};
CHAR_sendWatchEvent( CHAR_getWorkInt(index,CHAR_WORKOBJINDEX),
CHAR_ACTDAMAGE,opt,2,TRUE);
CHAR_sendStatusString( index,"M");
}
poisonvalue--;
if( poisonvalue <= 0)poisonvalue = 1;
CHAR_setInt(index,CHAR_POISON,poisonvalue);
}
if( CHAR_getInt(index,CHAR_CONFUSION) != 0 )
*dir = RAND(0,7);
if( CHAR_getInt(index,CHAR_STONE) != 0 )
return FALSE;
return TRUE;
}
int NPC_Util_GiveAllItemToChar( int give , int take )
{
int i ;
int count=0;
for(i=0;i<CHAR_MAXITEMHAVE;i++){
int itemindex = CHAR_getItemIndex( give , i );
BOOL aho = NPC_Util_moveItemToChar( take , itemindex,FALSE );
if( aho ){
count++;
}
}
if( count ){
CHAR_sendStatusString( give,"I");
CHAR_sendStatusString( take,"I");
}
return count;
}
static BOOL NPC_SimpleShopProcessSellMsg(char *msg, int shopindex,
int playerindex )
{
int sellwindowindex, itemtableindex,itemind, id;
int price, tmpgold;
char buf[64];
if(!CHAR_CHECKINDEX(shopindex)||!CHAR_CHECKINDEX(playerindex))
return -1;
if( !getStringFromIndexWithDelim( msg,"|",4,buf,sizeof(buf) )){
return -1;
}
sellwindowindex = atoi(buf);
itemtableindex = sellwindowindex + CHAR_STARTITEMARRAY;
itemind = CHAR_getItemIndex(playerindex,itemtableindex );
if( ! ITEM_CHECKINDEX(itemind) ) return -1;
price = ITEM_getInt( itemind, ITEM_COST );
if( price <= 0 || price > NPC_SIMPLESHOPMAXBUYPRICE ){
return -2;
}
price *= NPC_Util_sellRate(playerindex);
CHAR_AddGold( playerindex, price );
CHAR_sendStatusString( playerindex , "P");
id = ITEM_getInt(itemind,ITEM_ID);
{
LogItem(
CHAR_getChar( playerindex, CHAR_NAME ), /* ƽÅÒ·Â */
CHAR_getChar( playerindex, CHAR_CDKEY ),
#ifdef _add_item_log_name // WON ADD ÔÚitemµÄlogÖÐÔö¼ÓitemÃû³Æ
itemind,
#else
ITEM_getInt( itemind, ITEM_ID ), /* ʧÄÌ Ø© į */
#endif
"Sell",
CHAR_getInt( playerindex,CHAR_FLOOR),
CHAR_getInt( playerindex,CHAR_X ),
CHAR_getInt( playerindex,CHAR_Y ),
ITEM_getChar( itemind, ITEM_UNIQUECODE),
ITEM_getChar( itemind, ITEM_NAME),
ITEM_getInt( itemind, ITEM_ID)
);
}
if( ! NPC_Util_moveItemToChar( shopindex,itemind,TRUE ) ){
return -1;
}
NPC_Util_RemoveItemByID(shopindex,id,FALSE);
return 1;
}
/*------------------------------------------------------------
* Map 奶矛件玄及 pre post毛質 允月
* 婁醒
* index int 曇欠丹午仄化中月平乓仿及奶件犯永弁旦
* mode BOOL TRUE及凜反｝in FALSE及凜反 out 卞覆殺
* 忒曰襖卅仄
------------------------------------------------------------*/
static void MAP_dealprepostevent( int index, BOOL mode )
{
int map[2];
int i;
int damaged=FALSE,statuschange=FALSE;
if( CHAR_getFlg(index,CHAR_ISFLYING) )
/* 氏匹月支勾卞反窒手仄卅中 */
return;
if( !MAP_getMapDataFromCharIndex( index , map ) ) return;
/* damage */
int damage;
for( i = 0 ; i < 2 ; i ++ ){
damage = MAP_getImageInt(map[i],
mode ? MAP_INTODAMAGE : MAP_OUTOFDAMAGE);
if( damage != 0 ){
/* 母丟□斥洶毛懇匹 蜇允月及匹 寞 木贅尹 */
int opt[2]={SPR_kmydamY,-damage};
damaged=TRUE;
CHAR_setInt(index, CHAR_HP,
CHAR_getInt(index,CHAR_HP) + damage );
CHAR_complianceParameter(index);
/* 母丟□斥熬仃凶巨白尼弁玄請允 */
CHAR_sendWatchEvent(CHAR_getWorkInt(index,CHAR_WORKOBJINDEX),
CHAR_ACTDAMAGE,opt,2,TRUE);
}
if( MAP_changeCharStatusFromMapDataAndTime(
index,map[i], mode ? TRUE : FALSE ) )
statuschange=TRUE;
}
if( damaged ) CHAR_sendStatusString(index,"M");
if( statuschange ){
CHAR_sendCToArroundCharacter(index);
CHAR_sendStatusString(index,"P");
}
}
/*-- --*/
void NPC_CharmUp(int meindex,int talker)
{
int cost;
int i;
int petindex;
char petsend[64];
/*--云嗯毛蛹日仄引仄斤丹--*/
cost = NPC_CharmCost( meindex, talker);
CHAR_setInt( talker, CHAR_GOLD,
CHAR_getInt( talker, CHAR_GOLD) - cost);
CHAR_send_P_StatusString( talker, CHAR_P_STRING_GOLD);
/*-- 互ㄠㄟㄟ动晓卞卅月桦宁反雄娄卞ㄠㄟㄟ卞允月--*/
if(CHAR_getInt( talker, CHAR_CHARM) + CHARMHEAL >= 100) {
CHAR_setInt( talker, CHAR_CHARM, 100);
}else{
/*-- 毛本永玄--*/
CHAR_setInt(talker, CHAR_CHARM,
(CHAR_getInt( talker, CHAR_CHARM) + CHARMHEAL));
}
/*--旦 □正旦及凳蕙--*/
CHAR_complianceParameter( talker );
CHAR_send_P_StatusString( talker, CHAR_P_STRING_CHARM);
/*--矢永玄及由仿丢□正毛凳蕙--*/
for( i = 0 ; i < CHAR_MAXPETHAVE ; i++){
petindex = CHAR_getCharPet( talker, i);
if( petindex == -1 ) continue;
/* 平乓仿及 民尼永弁 */
if( !CHAR_CHECKINDEX( talker ) ) continue;
/*--由仿丢□正譬帮--*/
CHAR_complianceParameter( petindex );
sprintf( petsend, "K%d", i );
CHAR_sendStatusString( talker , petsend );
}
}
/*
* アイテムを生成してキャラに持たせる。
* もちものがいっぱいかどうか、スキルの判定、等は
* この関数の中でやる。
* int charindex:もたせるキャラのキャラindex
* int itemid:itemset.txtで設定されているアイテムid
* BOOL net ネットワークをするかどうか
*
* 返り値:無事持たせれたらTRUE,なんらかの原因で持たせれなかったらFALSE
*
* by nakamura
*/
BOOL NPC_Util_createItemToChar( int charindex, int itemid , BOOL net)
{
int emptyitemindexinchara, itemindex;
emptyitemindexinchara = CHAR_findEmptyItemBox( charindex );
if( emptyitemindexinchara < 0 )return FALSE;
itemindex = ITEM_makeItemAndRegist( itemid );
if( itemindex != -1 ){
CHAR_setItemIndex( charindex, emptyitemindexinchara, itemindex );
/* Workデータを設定 */
ITEM_setWorkInt(itemindex, ITEM_WORKOBJINDEX,-1);
ITEM_setWorkInt(itemindex, ITEM_WORKCHARAINDEX,charindex);
if(net)CHAR_sendStatusString(charindex,"I");
return TRUE;
}
return FALSE;
}
/*
* 地形におかれているもしくはキャラがもっているアイテム
* を強制的に地形のある地点に置く。
*
* int itemindex : アイテム表への index
* int fl,x,y : 位置。
* BOOL net: ネットワークの処理をするかどうか
* 返り値は FALSE : 失敗 TRUE : 成功
*/
BOOL NPC_Util_moveItemToMap( int itemindex , int fl , int x , int y,
BOOL net )
{
int oind,cind;
if( !ITEM_CHECKINDEX( itemindex ) ) return FALSE;
oind = ITEM_getWorkInt( itemindex , ITEM_WORKOBJINDEX );
cind = ITEM_getWorkInt( itemindex , ITEM_WORKCHARAINDEX );
if( oind >= 0 ){
/* 地形におかれている場合は単に位置を変更 */
return MAP_objmove( oind , OBJECT_getFloor(oind),
OBJECT_getX(oind),
OBJECT_getY(oind),
fl,x,y);
} else if( cind >= 0 ){
/* キャラがもっている */
int itemindexinchara = NPC_Util_SearchItemInChar(cind,itemindex);
if( itemindexinchara == -1 ) return FALSE;
/* キャラがもっていないようにする */
CHAR_setItemIndex( cind , itemindexinchara , -1 );
if( itemindexinchara == CHAR_ARM1
&& CHAR_getItemIndex( cind,CHAR_ARM2 )== -2){
CHAR_setItemIndex(cind,CHAR_ARM2,-1);
}
CHAR_complianceParameter(cind);
if( net ) CHAR_sendStatusString( cind,"I");
/* アイテムindexから直接起く */
if( CHAR_DropItemAbsolute( itemindex, fl,x,y,TRUE) < 0 ){
return FALSE;
} else {
return TRUE;
}
}
return FALSE;
}
/*-------------------------------------
端卞覲菁 午竣 毛莢汊今六月午仇欠
---------------------------------------*/
void NPC_WindowHealerAllHeal( int talker,int mode )
{
int i;
int petindex;
char petsend[64];
char msgbuf[64];
/*--覲菁 及心莢汊--*/
if(mode==1){
/*--HP互覲菁 卅及匹丐月--*/
CHAR_setInt( talker , CHAR_HP ,CHAR_getWorkInt( talker, CHAR_WORKMAXHP ) );
}else if(mode==2){
/*--竣 及心莢汊--*/
/*--MP互竣 卅及匹丐月--*/
CHAR_setInt( talker , CHAR_MP ,CHAR_getWorkInt( talker, CHAR_WORKMAXMP ) );
}else if(mode==3){
/*--蟈莢汊---*/
CHAR_setInt( talker , CHAR_HP ,CHAR_getWorkInt( talker, CHAR_WORKMAXHP ) );
CHAR_setInt( talker , CHAR_MP ,CHAR_getWorkInt( talker, CHAR_WORKMAXMP ) );
}
/*--矢永玄反雲引仃匹莢汊仄化丐僕月--*/
for(i=0;i<CHAR_MAXPETHAVE;i++){
petindex = CHAR_getCharPet(talker,i);
if( petindex == -1 ) continue;
/* 平乓仿及 民尼永弁 */
if( !CHAR_CHECKINDEX( talker ) ) continue;
/*--莢汊--*/
CHAR_setFlg( petindex,CHAR_ISDIE,0 );
CHAR_setInt( petindex , CHAR_HP ,CHAR_getWorkInt( petindex, CHAR_WORKMAXHP ) );
CHAR_setInt( petindex , CHAR_MP ,CHAR_getWorkInt( petindex, CHAR_WORKMAXMP ) );
/*--由仿丟□正譬幫--*/
CHAR_complianceParameter( petindex );
sprintf( petsend, "K%d", i );
CHAR_sendStatusString( talker , petsend );
}
/*--由仿丟□正霜曰--*/
CHAR_send_P_StatusString(talker,CHAR_P_STRING_HP);
CHAR_send_P_StatusString(talker,CHAR_P_STRING_MP);
/*---醮棉互中木壬醮棉卞手霜耨--*/
if(CHAR_getWorkInt( talker, CHAR_WORKPARTYMODE) != CHAR_PARTY_NONE )
{
int topartyarray = -1;
int oyaindex = CHAR_getWorkInt( talker , CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX( oyaindex )) {
int i;
/* 憤坌午慫仄凶支勾及醮棉及 及樺赭毛潸 */
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int workindex = CHAR_getWorkInt( oyaindex, CHAR_WORKPARTYINDEX1 +i);
if( CHAR_CHECKINDEX( workindex) ) {
if( workindex == talker ) {
topartyarray = i;
break;
}
}
}
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int otherindex = CHAR_getPartyIndex( talker, i);
/* 醮棉由仿丟□正毛霜月 */
if( CHAR_CHECKINDEX( otherindex) ) {
snprintf( msgbuf, sizeof( msgbuf), "N%d", topartyarray);
if( otherindex != talker) {
CHAR_sendStatusString( otherindex, msgbuf);
}
}
}
}
}
}
/*------------------------------------------------------------
* ºÝ¤Ë¥Ñ¡¼ ¥£¤Ë ¤ë½è
*
* charaindex int ¼«Ê¬
* targetindex int ¤ëÁê¼ê¤Î¿Í
------------------------------------------------------------*/
void CHAR_JoinParty_Main( int charaindex, int targetindex)
{
int firstflg = FALSE;
int i;
char c[3];
char buf[64];
int toindex;
int parray;
/* ¿Æ¤¬¤¤¤¿¤é°ú¤ÃÄ¥¤ê½Ð¤¹ */
if( CHAR_getWorkInt( targetindex, CHAR_WORKPARTYMODE) == CHAR_PARTY_NONE ) {
toindex = targetindex;
}
else {
toindex = CHAR_getPartyIndex( targetindex, 0);
if( !CHAR_CHECKINDEX( toindex) ) {
print( " %s:%d err\n", __FILE__, __LINE__);
return;
}
}
/* Áê¼ê¥Ñ¡¼ ¥£¤Î¿Í¿ô¤Ï ¤«¡ª */
parray = CHAR_getEmptyPartyArray( toindex) ;
if( parray == -1 ) {
print( "%s : %d err\n", __FILE__,__LINE__);
return;
}
/* ²¿¤â ¤· ¿Æ¤Î»þ¤Ï¿Æ¤Ë¤Ê¤Ã¤¿CA¤òÁ÷¿®¤¹¤ë */
if( CHAR_getWorkInt( toindex, CHAR_WORKPARTYMODE) == CHAR_PARTY_NONE ) {
CHAR_sendLeader( CHAR_getWorkInt( toindex, CHAR_WORKOBJINDEX), 1);
/* Áê¼ê¤Î¾õÂ֤νñ¤´¹¤¨ */
/* ¿Æ¤Ë¤Ê¤ë */
CHAR_setWorkInt( toindex, CHAR_WORKPARTYMODE, 1);
CHAR_setWorkInt( toindex, CHAR_WORKPARTYINDEX1, toindex);
firstflg = TRUE;
}
CHAR_setWorkInt( toindex, parray + CHAR_WORKPARTYINDEX1, charaindex);
CHAR_setWorkChar( charaindex, CHAR_WORKWALKARRAY, "");
CHAR_setWorkInt( charaindex, CHAR_WORKPARTYMODE, CHAR_PARTY_CLIENT);
CHAR_setWorkInt( charaindex, CHAR_WORKPARTYINDEX1, toindex);
if( firstflg ) {
CHAR_sendStatusString( toindex, "N0");
}
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int index = CHAR_getWorkInt( toindex, i + CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX(index)) {
snprintf( c, sizeof(c), "N%d", i);
CHAR_sendStatusString( charaindex, c);
}
}
snprintf( buf,sizeof( buf), "%s ¥[¤J¹Î¶¤¡I",
CHAR_getChar( charaindex, CHAR_NAME));
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int index = CHAR_getWorkInt( toindex, i + CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX(index)) {
if( index != charaindex ) {
snprintf( c, sizeof(c), "N%d", parray);
CHAR_sendStatusString( index, c);
CHAR_talkToCli( index, -1, buf, CHAR_COLORYELLOW);
}
else {
CHAR_talkToCli( index, -1, "¥[¤J¹Î¶¤¡I", CHAR_COLORYELLOW);
}
}
}
}
static BOOL CHAR_DischargePartySub( int charaindex, int msgflg)
{
char buf[64], c[3];
int toindex,flg,i;
#ifdef _ITEM_QUITPARTY
int j = 0,k;
#endif
if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE) == CHAR_PARTY_LEADER ) {
int pindex, airplaneflag=0;
// Arminius 7.10 Airplane
if( CHAR_getInt(charaindex, CHAR_WHICHTYPE) == CHAR_TYPEBUS ) {
if ((CHAR_getInt(charaindex, CHAR_BASEIMAGENUMBER) !=100355) &&
(CHAR_getInt(charaindex, CHAR_BASEIMAGENUMBER) !=100461)){
airplaneflag=1;
}
}
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
pindex = CHAR_getWorkInt( charaindex, i + CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX( pindex) ) {
int fd = getfdFromCharaIndex( pindex );
CHAR_setWorkInt( pindex, CHAR_WORKPARTYINDEX1, -1);
CHAR_setWorkInt( pindex, CHAR_WORKPARTYMODE, CHAR_PARTY_NONE);
if( msgflg ){
CHAR_talkToCli( pindex, -1, "¹Î¶¤¤w¸Ñ´²¡I", CHAR_COLORYELLOW);
#ifdef _ITEM_QUITPARTY
// won fix
for( j=0;j<CHAR_MAXITEMHAVE;j++ ){
int del_item_index = CHAR_getItemIndex( pindex , j );
if( ITEM_CHECKINDEX(del_item_index) ){ //®æ¤l¤º¦³¹D¨ã
for( k=0;k<itemquitparty_num;k++ ){
if( ITEM_getInt( del_item_index, ITEM_ID) == atoi(Disappear_Item[k].string) ){ //Yµ¥©ó©Ò³]©wªº¹D¨ãID
CHAR_setItemIndex( pindex, j, -1); //®æ¤l¤º¹D¨ã®ø¥¢
ITEM_endExistItemsOne( del_item_index );
CHAR_sendItemDataOne( pindex, j);
}
}
}
}
#endif
}
if( fd != -1 ) {
lssproto_PR_send( fd, 0, 1);
}
// Arminius 7.10 Airplane
if (airplaneflag && (CHAR_getInt(pindex,CHAR_WHICHTYPE)!=CHAR_TYPEBUS)) {
int bi,bbi,ii,category;
bbi=CHAR_getInt(pindex,CHAR_BASEBASEIMAGENUMBER);
ii=CHAR_getItemIndex(pindex,CHAR_ARM);
if (!ITEM_CHECKINDEX(ii))
category=ITEM_FIST;
else
category=ITEM_getInt(ii,ITEM_TYPE);
bi=CHAR_getNewImagenumberFromEquip(bbi,category);
if (bi==-1) bi=bbi;
CHAR_setInt(pindex,CHAR_BASEIMAGENUMBER,bi);
// Robin 0810 debug
CHAR_complianceParameter( pindex );
CHAR_sendCToArroundCharacter(CHAR_getWorkInt(pindex ,
CHAR_WORKOBJINDEX));
}
}
CHAR_setWorkInt( charaindex, i + CHAR_WORKPARTYINDEX1, -1);
}
CHAR_sendLeader( CHAR_getWorkInt( charaindex, CHAR_WORKOBJINDEX), 0);
}else if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE) == CHAR_PARTY_CLIENT ) {
int myarray = -1;
int fd = getfdFromCharaIndex( charaindex );
CHAR_setWorkInt( charaindex, CHAR_WORKPARTYMODE, CHAR_PARTY_NONE);
toindex = CHAR_getWorkInt( charaindex, CHAR_WORKPARTYINDEX1);
if( !CHAR_CHECKINDEX(toindex ) ) return FALSE;
if( CHAR_getInt( toindex, CHAR_WHICHTYPE) == CHAR_TYPEBUS ) {
NPC_BusCheckAllowItem( toindex, charaindex, TRUE);
// Arminius 7.9 Airplane
if ((CHAR_getInt( toindex, CHAR_BASEIMAGENUMBER) !=100355) &&
(CHAR_getInt( toindex, CHAR_BASEIMAGENUMBER) !=100461)){
int bi,bbi,ii,category;
bbi=CHAR_getInt(charaindex,CHAR_BASEBASEIMAGENUMBER);
ii=CHAR_getItemIndex(charaindex,CHAR_ARM);
if (!ITEM_CHECKINDEX(ii))
category=ITEM_FIST;
else
category=ITEM_getInt(ii,ITEM_TYPE);
bi=CHAR_getNewImagenumberFromEquip(bbi,category);
if (bi==-1) bi=bbi;
CHAR_setInt(charaindex,CHAR_BASEIMAGENUMBER,bi);
// Robin 0810 debug
CHAR_complianceParameter( charaindex );
CHAR_sendCToArroundCharacter( CHAR_getWorkInt( charaindex , CHAR_WORKOBJINDEX ));
if(CHAR_getWorkInt(toindex,CHAR_NPCWORKINT5)==1) {
if( CHAR_getInt( charaindex, CHAR_LASTTALKELDER)>=0){
int fl,x,y;
CHAR_getElderPosition( CHAR_getInt( charaindex, CHAR_LASTTALKELDER),
&fl, &x, &y );
CHAR_warpToSpecificPoint(charaindex, fl, x, y);
}
}
}
}
CHAR_setWorkInt( charaindex, CHAR_WORKPARTYINDEX1, -1);
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int index = CHAR_getWorkInt( toindex, i + CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX(index) ){
if( index == charaindex) {
myarray = i;
break;
}
}
}
if( myarray == CHAR_PARTYMAX) {
print( "DischargeParty(): ¯u©_©Ç¡I");
return FALSE;
}
CHAR_setWorkInt( toindex, CHAR_WORKPARTYINDEX1 + myarray, -1);
snprintf( buf,sizeof( buf), "%s ²æÂ÷¹Î¶¤¡I",
CHAR_getChar( charaindex, CHAR_NAME));
if( msgflg ){
CHAR_talkToCli( charaindex, -1, "²æÂ÷¹Î¶¤¡I", CHAR_COLORYELLOW);
#ifdef _ITEM_QUITPARTY
// won fix
for( i=0;i<CHAR_MAXITEMHAVE;i++ ){
int del_item_index = CHAR_getItemIndex( charaindex , j );
if( ITEM_CHECKINDEX(del_item_index) ){ //®æ¤l¤º¦³¹D¨ã
for( j=0;j<itemquitparty_num;j++ ){
if( ITEM_getInt( del_item_index, ITEM_ID) == atoi(Disappear_Item[j].string) ){ //Yµ¥©ó©Ò³]©wªº¹D¨ãID
CHAR_setItemIndex( charaindex, i, -1); //®æ¤l¤º¹D¨ã®ø¥¢
ITEM_endExistItemsOne( del_item_index );
CHAR_sendItemDataOne( charaindex, i);
}
}
}
}
#endif
}
snprintf( c, sizeof(c), "N%d", myarray);
if( fd != -1 ) {
lssproto_PR_send( fd, 0, 1);
}
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int index = CHAR_getWorkInt( toindex, i + CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX(index) ){
#ifdef _ITEM_QUITPARTY
// won fix
for( j=0;j<CHAR_MAXITEMHAVE;j++ ){
int del_item_index = CHAR_getItemIndex( index , j );
if( ITEM_CHECKINDEX(del_item_index) ){ //®æ¤l¤º¦³¹D¨ã
for( k=0;k<itemquitparty_num;k++ ){
if( ITEM_getInt( del_item_index, ITEM_ID) == atoi(Disappear_Item[k].string) ){ //Yµ¥©ó©Ò³]©wªº¹D¨ãID
CHAR_setItemIndex( index, j, -1); //®æ¤l¤º¹D¨ã®ø¥¢
ITEM_endExistItemsOne( del_item_index );
CHAR_sendItemDataOne( index, j);
}
}
}
}
#endif
if( msgflg ){
CHAR_talkToCli( index, -1, buf, CHAR_COLORYELLOW);
}
CHAR_sendStatusString( index, c);
}
}
flg = FALSE;
for( i = 1; i < CHAR_PARTYMAX; i ++ ) {
int index = CHAR_getWorkInt( toindex, i + CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX(index) ){
flg = TRUE;
break;
}
}
if( !flg) {
CHAR_setWorkInt( toindex, CHAR_WORKPARTYMODE, CHAR_PARTY_NONE);
CHAR_sendLeader( CHAR_getWorkInt( toindex, CHAR_WORKOBJINDEX), 0);
}else {
POINT start,end;
int previndex = toindex;
end.x = CHAR_getInt( charaindex, CHAR_X);
end.y = CHAR_getInt( charaindex, CHAR_Y);
for( i = 1; i < CHAR_PARTYMAX; i ++ ) {
int index = CHAR_getWorkInt( toindex, i + CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX( index) ) {
if( NPC_Util_CharDistance( index, previndex) > 1) {
int parent_dir;
start.x = CHAR_getInt( index, CHAR_X);
start.y = CHAR_getInt( index, CHAR_Y);
parent_dir = NPC_Util_getDirFromTwoPoint( &start,&end );
end = start;
if( parent_dir != -1 ) {
CHAR_walk( index, parent_dir, 0);
}
}
previndex = index;
}
}
}
}
return TRUE;
}
/*-------------------------------------
ºÝ¤ËÂÑµ× ¤Èµ¤ ¤ò²óÉü¤µ¤»¤ë¤È¤³¤í
---------------------------------------*/
void NPC_WindowHealerAllHeal( int talker,int mode )
{
int i;
int petindex;
char petsend[64];
char msgbuf[64];
/*--ÂÑµ× ¤Î¤ß²óÉü--*/
if(mode==1){
/*--HP¤¬ÂÑµ× ¤Ê¤Î¤Ç¤¢¤ë--*/
CHAR_setInt( talker , CHAR_HP ,CHAR_getWorkInt( talker, CHAR_WORKMAXHP ) );
}else if(mode==2){
/*--µ¤ ¤Î¤ß²óÉü--*/
/*--MP¤¬µ¤ ¤Ê¤Î¤Ç¤¢¤ë--*/
CHAR_setInt( talker , CHAR_MP ,CHAR_getWorkInt( talker, CHAR_WORKMAXMP ) );
}else if(mode==3){
/*--Á´²óÉü---*/
CHAR_setInt( talker , CHAR_HP ,CHAR_getWorkInt( talker, CHAR_WORKMAXHP ) );
CHAR_setInt( talker , CHAR_MP ,CHAR_getWorkInt( talker, CHAR_WORKMAXMP ) );
}
/*--¥Ú¥Ã¥È¤Ï¶³¤Þ¤±¤Ç²óÉü¤·¤Æ¤¢¹²¤ë--*/
for(i=0;i<CHAR_MAXPETHAVE;i++){
petindex = CHAR_getCharPet(talker,i);
if( petindex == -1 ) continue;
/* ¥¥ã¥é¤Î ¥Á¥§¥Ã¥¯ */
if( !CHAR_CHECKINDEX( talker ) ) continue;
/*--²óÉü--*/
CHAR_setFlg( petindex,CHAR_ISDIE,0 );
CHAR_setInt( petindex , CHAR_HP ,CHAR_getWorkInt( petindex, CHAR_WORKMAXHP ) );
CHAR_setInt( petindex , CHAR_MP ,CHAR_getWorkInt( petindex, CHAR_WORKMAXMP ) );
/*--¥Ñ¥é¥á¡¼¥¿Ä´À°--*/
CHAR_complianceParameter( petindex );
sprintf( petsend, "K%d", i );
CHAR_sendStatusString( talker , petsend );
}
/*--¥Ñ¥é¥á¡¼¥¿Á÷¤ê--*/
CHAR_send_P_StatusString(talker,CHAR_P_STRING_HP);
CHAR_send_P_StatusString(talker,CHAR_P_STRING_MP);
/*---Ãç´Ö¤¬¤¤¤ì¤ÐÃç´Ö¤Ë¤âÁ÷¿®--*/
if(CHAR_getWorkInt( talker, CHAR_WORKPARTYMODE) != CHAR_PARTY_NONE )
{
int topartyarray = -1;
int oyaindex = CHAR_getWorkInt( talker , CHAR_WORKPARTYINDEX1);
if( CHAR_CHECKINDEX( oyaindex )) {
int i;
/* ¼«Ê¬¤È¼£¤·¤¿¤ä¤Ä¤ÎÃç´Ö¤Î ¤Î¾ì½ê¤ò¼è */
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int workindex = CHAR_getWorkInt( oyaindex, CHAR_WORKPARTYINDEX1 +i);
if( CHAR_CHECKINDEX( workindex) ) {
if( workindex == talker ) {
topartyarray = i;
break;
}
}
}
for( i = 0; i < CHAR_PARTYMAX; i ++ ) {
int otherindex = CHAR_getPartyIndex( talker, i);
/* Ãç´Ö¥Ñ¥é¥á¡¼¥¿¤òÁ÷¤ë */
if( CHAR_CHECKINDEX( otherindex) ) {
snprintf( msgbuf, sizeof( msgbuf), "N%d", topartyarray);
if( otherindex != talker) {
CHAR_sendStatusString( otherindex, msgbuf);
}
}
}
}
}
}
void NPC_PetSkillShopWindowTalked( int meindex, int talkerindex,
int seqno, int select, char *data)
{
int skill;
int pet;
int slot;
int cost;
int skillID=0;
int petskillindex;
char buf[64];
char argstr[NPC_UTIL_GETARGSTR_BUFSIZE];
char msg[512];
int petindex;
char msgbuf[128];
int fd = getfdFromCharaIndex( talkerindex );
double rate= 1.0;
if( NPC_Util_CharDistance( talkerindex, meindex ) > 2) {
return;
}
if(NPC_Util_GetArgStr( meindex, argstr, sizeof(argstr))==NULL){
print("GetArgStrErr");
return;
}
makeStringFromEscaped( data);
getStringFromIndexWithDelim(data,"|",1,buf,sizeof(buf));
skill=atoi(buf);
getStringFromIndexWithDelim(data,"|",2,buf,sizeof(buf));
pet=atoi(buf);
getStringFromIndexWithDelim(data,"|",3,buf,sizeof(buf));
slot=atoi(buf);
getStringFromIndexWithDelim(data,"|",4,buf,sizeof(buf));
cost=atoi(buf);
if( NPC_Util_GetStrFromStrWithDelim( argstr, "pet_skill", msg, sizeof( msg)) != NULL){
getStringFromIndexWithDelim(msg,",",skill,buf,sizeof(buf));
skillID=atoi(buf);
}
slot--;
if( !CHAR_CHECKPETSKILLINDEX( slot)){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return ;
}
petindex = CHAR_getCharPet( talkerindex, pet-1);
if( !CHAR_CHECKINDEX(petindex) ){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return ;
}
if(skillID < 0) return ;
if(petindex == -1){
print("petskillshop.c:170 PetindexError");
return;
}
if( CHAR_getWorkInt( CONNECT_getCharaindex(fd),
CHAR_WORKBATTLEMODE) != BATTLE_CHARMODE_NONE) return ;
if( NPC_Util_GetStrFromStrWithDelim( argstr, "skill_rate", msg, sizeof( msg)) != NULL){
rate = atof( msg);
}
petskillindex = PETSKILL_getPetskillArray( skillID );
if(petskillindex == -1){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return ;
}
cost = PETSKILL_getInt( petskillindex, PETSKILL_COST );
cost = cost * rate;
if(CHAR_getInt(talkerindex,CHAR_GOLD) < cost){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return;
}
CHAR_setPetSkill( petindex, slot, skillID);
CHAR_DelGold( talkerindex, cost );
snprintf( msgbuf, sizeof( msgbuf ), "W%d",pet-1);
CHAR_sendStatusString( talkerindex, msgbuf );
CHAR_sendStatusString( talkerindex, "P");
NPC_PetSkillShop_selectWindow( meindex, talkerindex,0,-1);
}
static BOOL NPC_LimitBuyInShopProcessSellMsg(char *msg,
int shopindex, int playerindex )
{
int sellwindowindex, itemtableindex,itemind, id,i,buyokflag, setid;
int price, tmpgold;
char buf[BUFSIZ];
char npcarg[NPC_UTIL_GETARGSTR_BUFSIZE], token[NPC_UTIL_GETARGSTR_LINEMAX];
if(!CHAR_CHECKINDEX(shopindex)||!CHAR_CHECKINDEX(playerindex))
return -1;
if( !getStringFromIndexWithDelim( msg,"|",4,buf,sizeof(buf) )){
return -1;
}
sellwindowindex = atoi(buf);
itemtableindex = sellwindowindex + CHAR_STARTITEMARRAY;
itemind = CHAR_getItemIndex(playerindex,itemtableindex );
if( ! ITEM_CHECKINDEX(itemind) ) return -1;
id = ITEM_getInt(itemind,ITEM_ID);
NPC_Util_GetArgStr( shopindex, npcarg, sizeof(npcarg));
getStringFromIndexWithDelim( npcarg, "|", BUYINITEMLISTTOKEN, token, sizeof( token) );
buyokflag = FALSE;
for( i=1;getStringFromIndexWithDelim(token,",",i,buf,sizeof(buf)); i++){
char *tok1 = NULL;
char *tok2 = NULL;
int no1=0, no2=0;
tok1 = strtok( buf, "-" );
tok2 = strtok( NULL, "-" );
setid = atoi(buf);
if( tok1 == NULL || tok2 == NULL ){
if( setid == 0 ) return -2;
if( setid == id ) buyokflag = TRUE;
} else {
no1 = atoi( tok1 );
no2 = atoi( tok2 );
if( no1 <= id && id <= no2 ){
buyokflag = TRUE;
}
}
}
if( buyokflag == FALSE ) return -2;
price = ITEM_getInt( itemind, ITEM_COST );
price *= NPC_Util_sellRate(playerindex);
CHAR_AddGold( playerindex, price );
CHAR_sendStatusString( playerindex , "P");
if( ! NPC_Util_moveItemToChar( shopindex,itemind,TRUE ) ){
return -1;
}
{
LogItem(
CHAR_getChar( playerindex, CHAR_NAME ), /* ƽÅÒ·Â */
CHAR_getChar( playerindex, CHAR_CDKEY ),
#ifdef _add_item_log_name // WON ADD ÔÚitemµÄlogÖÐÔö¼ÓitemÃû³Æ
itemind,
#else
ITEM_getInt( itemind, ITEM_ID ), /* ʧÄÌ Ø© į */
#endif
"Sell",
CHAR_getInt( playerindex,CHAR_FLOOR),
CHAR_getInt( playerindex,CHAR_X ),
CHAR_getInt( playerindex,CHAR_Y ),
ITEM_getChar( itemind, ITEM_UNIQUECODE),
ITEM_getChar( itemind, ITEM_NAME),
ITEM_getInt( itemind, ITEM_ID)
);
}
NPC_Util_RemoveItemByID(shopindex,id,FALSE);
return 1;
}
void NPC_WelfareWindowTalked2( int meindex, int talkerindex,
int seqno, int select, char *data)
{
int skill, i, j;
int skillID = -1, skillid = -1;
int ENDEV = -1, NOWEV = -1;
char buf[64];
char argstr[NPC_UTIL_GETARGSTR_BUFSIZE];
char msg[512];
int fd = getfdFromCharaIndex( talkerindex );
double rate= 1.0;
int skillarray;
CHAR_HaveSkill* hskill;
char err_msg[128] = {0};
if( NPC_Util_CharDistance( talkerindex, meindex ) > 2) {
return;
}
if(NPC_Util_GetArgStr( meindex, argstr, sizeof(argstr))==NULL){
print("GetArgStrErr");
return;
}
if( NPC_Util_GetStrFromStrWithDelim( argstr, "ENDEV:", msg, sizeof( msg)) != NULL){
ENDEV=atof(msg);
}
if( NPC_Util_GetStrFromStrWithDelim( argstr, "NOWEV:", msg, sizeof( msg)) != NULL){
NOWEV=atof(msg);
}
if( NPC_Util_GetStrFromStrWithDelim( argstr, "err_msg:", err_msg, sizeof( msg)) == NULL){
print("GetArgStrErr");
return;
}
if( ENDEV > 0 ){
if( NPC_EventCheckFlg( talkerindex, ENDEV ) != TRUE ){
CHAR_talkToCli( talkerindex, -1, err_msg, CHAR_COLORYELLOW);
return;
}
}else if( NOWEV > 0 ){
if( NPC_EventCheckFlg( talkerindex, NOWEV ) != TRUE ){
CHAR_talkToCli( talkerindex, -1, err_msg, CHAR_COLORYELLOW);
return;
}
}
makeStringFromEscaped( data);
getStringFromIndexWithDelim(data,"|",1,buf,sizeof(buf));
skill=atoi(buf);
// 技能id
skillid = CHAR_getCharSkill( talkerindex, skill - 1 );
skillID = skillid;
if(skillID <= 0) return ;
if( CHAR_getWorkInt( CONNECT_getCharaindex(fd), CHAR_WORKBATTLEMODE) != BATTLE_CHARMODE_NONE) return ;
if( NPC_Util_GetStrFromStrWithDelim( argstr, "skill_rate", msg, sizeof( msg)) != NULL){
rate = atof( msg);
}
// 不扣钱
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
skillarray = PROFESSION_SKILL_getskillArray( skillID );
// 检查是否有不能删除的技能
for( i=0; i<CHAR_SKILLMAXHAVE; i++ ){
int limit = -1, skillid = -1, skillarray_temp = -1;
// 技能ID
skillid = CHAR_getCharSkill( talkerindex, i);
if( skillid <= 0 ) continue;
skillarray_temp = PROFESSION_SKILL_getskillArray( skillid );
for( j=0; j<4; j++){
limit = PROFESSION_SKILL_getInt( skillarray_temp, PROFESSION_SKILL_LIMIT1+j*2 );
if( limit > 0 && limit == skillID ){
char token[256] = {0};
sprintf( token, "需先遗忘%s，才可删除此技能", PROFESSION_SKILL_getChar( skillarray_temp, PROFESSION_SKILL_NAME ) );
CHAR_talkToCli( talkerindex, -1, token, CHAR_COLORYELLOW);
return;
}
}
}
// 遗忘技能
{
int skill_level = -1;
int count = 0;
int skill_id[CHAR_SKILLMAXHAVE] = {0};
int skill_temp[CHAR_SKILLMAXHAVE] = {0};
// 取熟练度
for( i=0; i<CHAR_SKILLMAXHAVE; i++ ){
int skillid = -1;
// 技能ID
skillid = CHAR_getCharSkill( talkerindex, i);
// 不储存需遗忘的技能
if( skillid <= 0 || skillid == skillID ) continue;
// 技能等级
hskill = CHAR_getCharHaveSkill( talkerindex, i );
skill_level = SKILL_getInt( &hskill->skill, SKILL_LEVEL);
skill_id[count] = skillid;
skill_temp[count] = skill_level;
count++;
}
// 删除所有技能
CHAR_CHAT_DEBUG_delsk( talkerindex, "all" );
// 还原技能
for( i=0; i<count; i++ ){
PROFESSION_SKILL_ADDSK( talkerindex, skill_id[i], skill_temp[i] );
}
CHAR_sendStatusString( talkerindex , "S");
NPC_Welfare_selectWindow2( meindex, talkerindex,0,-1);
}
// 传送讯息
{
char token[256];
int next_profession_skill_point = 0;
next_profession_skill_point = CHAR_getInt( talkerindex, PROFESSION_SKILL_POINT ) + 1;
CHAR_setInt( talkerindex, PROFESSION_SKILL_POINT, next_profession_skill_point );
memset(token, -1, sizeof(token) );
sprintf( token, "您遗忘了 %s，剩馀学习点数增加一点"
,PROFESSION_SKILL_getChar( skillarray, PROFESSION_SKILL_NAME ) );
CHAR_talkToCli( talkerindex, -1, token, CHAR_COLORYELLOW);
CHAR_sendCToArroundCharacter( CHAR_getWorkInt( talkerindex , CHAR_WORKOBJINDEX ));
}
}
void NPC_FreePetSkillShopWindowTalked( int meindex, int talkerindex, int seqno, int select, char *data)
{
int skill;
int pet;
int slot;
int cost;
int skillID=0;
int petskillindex;
char buf[64];
char argstr[NPC_UTIL_GETARGSTR_BUFSIZE];
char msg[512];
int petindex;
char msgbuf[128];
double rate= 1.0;
if(NPC_Util_GetArgStr( meindex, argstr, sizeof(argstr))==NULL){
print("GetArgStrErr");
return;
}
if( CHAR_getInt( talkerindex , CHAR_WHICHTYPE ) != CHAR_TYPEPLAYER ) {
return;
}
if(NPC_Util_isFaceToFace(talkerindex,meindex,2 )==FALSE){
if( NPC_Util_CharDistance( talkerindex, meindex ) > 1) return;
}
if( CHAR_getWorkInt( talkerindex, CHAR_WORKBATTLEMODE) != BATTLE_CHARMODE_NONE)
return ;
switch( seqno) {
case SELECTSKILL_START:
if( CHAR_getWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT) != 2 ) {
CHAR_setWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT, 0);
return;
}
NPC_FreePetSkillShop_selectWindow( meindex, talkerindex, SKILL_WINDOW, -1);
break;
case SELECTSKILL_TEACH:
if( CHAR_getWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT) != 3 ) {
CHAR_setWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT, 0);
return;
}
makeStringFromEscaped( data);
getStringFromIndexWithDelim(data,"|",1,buf,sizeof(buf));
skill=atoi(buf);
getStringFromIndexWithDelim(data,"|",2,buf,sizeof(buf));
pet=atoi(buf);
getStringFromIndexWithDelim(data,"|",3,buf,sizeof(buf));
slot=atoi(buf);
getStringFromIndexWithDelim(data,"|",4,buf,sizeof(buf));
cost=atoi(buf);
if( NPC_Util_GetStrFromStrWithDelim( argstr, "pet_skill", msg, sizeof( msg)) != NULL){
getStringFromIndexWithDelim(msg,",",skill,buf,sizeof(buf));
skillID=atoi(buf);
}
slot--;
if( slot < 0 ) return;
petindex = CHAR_getCharPet( talkerindex, pet-1);
if( !CHAR_CHECKINDEX(petindex) ){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return ;
}
if( NPC_Util_GetStrFromStrWithDelim( argstr, "skill_rate", msg, sizeof( msg)) != NULL){
rate = atof( msg);
}
petskillindex = PETSKILL_getPetskillArray( skillID );
if( !PETSKILL_CHECKINDEX( petskillindex)){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return ;
}
cost = PETSKILL_getInt( petskillindex, PETSKILL_COST );
cost = cost * rate;
//条件判断
if(CHAR_getInt(talkerindex,CHAR_GOLD) < cost){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return;
}
if( NPC_CHECKFREEPETSKILL( talkerindex, petindex, skillID ) == TRUE ){
if( Action_RunDoEventAction( meindex, talkerindex, argstr) == FALSE ){
CHAR_talkToCli( talkerindex, -1, "所需物品不足!!", CHAR_COLORYELLOW);
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
CHAR_setWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT, 0);
return;
}
CHAR_setPetSkill( petindex, slot, skillID);
CHAR_setInt( talkerindex, CHAR_GOLD, ( CHAR_getInt( talkerindex, CHAR_GOLD) - cost) );
snprintf( msgbuf, sizeof( msgbuf ), "W%d",pet-1);
CHAR_sendStatusString( talkerindex, msgbuf );
CHAR_sendStatusString( talkerindex, "P");
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
//WARP
if( NPC_SkillShopWarp( meindex, talkerindex) == TRUE )
return;
}else {
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
CHAR_talkToCli( talkerindex, -1, "条件不足!!", CHAR_COLORYELLOW);
}
//ADD
NPC_FreePetSkillShop_selectWindow( meindex, talkerindex, SKILL_WINDOW, -1);
break;
case SELECTSKILL_END:
break;
}
return;
}
BOOL NPC_DoPetFusion( int meindex, int toindex, char *data, int sizes)
{
char buf[256];
int i, flg, MainIndex=-1, Subindex1=-1, Subindex2=-1;
int work[4], skill1[7], skill2[7];
char npcarg1[NPC_UTIL_GETARGSTR_BUFSIZE];
char *npcarg;
memset( buf, 0, sizeof( buf));
sprintf( buf, "%s", data);
if( !CHAR_CHECKINDEX( meindex) ) return FALSE;
if((npcarg = NPC_Util_GetArgStr( meindex, npcarg1, sizeof(npcarg1)))==NULL){
print("err NPC_MakePairMan: GetArgStrErr!!");
return FALSE;
}
for( i=0; i<CHAR_MAXPETSKILLHAVE; i++) {
skill1[i] = -1;
skill2[i] = -1;
}
if( PETFUSION_getIndexForChar( toindex, &MainIndex, &Subindex1, &Subindex2, buf) == FALSE ){
CHAR_talkToCli( toindex, -1, "寵物融合失敗！", CHAR_COLORYELLOW);
return FALSE;
}
if( (flg=PETFUSION_FusionPetSub( toindex, Subindex1, Subindex2, work, skill2)) == 0 ){
CHAR_talkToCli( toindex, -1, "寵物融合失敗！", CHAR_COLORYELLOW);
return FALSE;
}
for( i=0; i<4; i++) {
work[i] = work[i]/flg;
work[i] = work[i] * 0.4;
}
if( PETFUSION_FusionPetMain( toindex, MainIndex, work, skill1) == FALSE ) {
CHAR_talkToCli( toindex, -1, "寵物融合失敗！", CHAR_COLORYELLOW);
return FALSE;
}else {
int Eggindex=-1, petNo=0, petID, newpetindex=-1;
char buf1[256];
int PetCode=-1;
flg++;
if( (PetCode = NPC_getFusionTableForBase( toindex, MainIndex, Subindex1 )) < 0 ){
CHAR_talkToCli( toindex, -1, "寵物融合失敗！", CHAR_COLORYELLOW);
return FALSE;
}
petNo = NPC_getPetArrayForNo( PetCode);
if( PETFUSION_DelPet( toindex, MainIndex, Subindex1, Subindex2, flg) == FALSE ){
return FALSE;
}
if( NPC_Util_GetStrFromStrWithDelim( npcarg, "ADDEGGID", buf1, sizeof( buf1) ) == NULL){
return FALSE;
}
petID = atoi( buf1);
if( (Eggindex = PETFUSION_AddEgg( toindex, petID, PetCode)) < 0 ){
return FALSE;
}
newpetindex = PETFUSION_SetNewEgg( toindex, Eggindex, petNo, work, skill1, skill2);
if( !CHAR_CHECKINDEX( newpetindex)){
print("ANDY err newpetindex=%d\n", newpetindex);
return FALSE;
}
snprintf( buf1, sizeof( buf1 ), "W%d",petNo);
CHAR_sendStatusString( toindex, buf1 );
CHAR_sendStatusString( toindex, "P");
}
return TRUE;
}
int CHAR_die( int charaindex )
{
CHAR_DischargeParty( charaindex, 0);
{
int bymonster = 0;
int attackindex = CHAR_getWorkInt(charaindex,
CHAR_WORKLASTATTACKCHARAINDEX);
if( attackindex == -2 )
bymonster = 0;
else if( CHAR_CHECKINDEX(attackindex) == TRUE ) {
if( CHAR_getInt(attackindex,CHAR_WHICHTYPE)
== CHAR_TYPEENEMY ) {
bymonster = 1;
} else {
bymonster = 2;
}
}
if( bymonster == 0 || bymonster == 1 ) {
int i;
for( i=0 ; i<CHAR_EQUIPPLACENUM ; i++ )
CHAR_DropItem(charaindex,i);
} else {
int eqindex[CHAR_EQUIPPLACENUM];
int itemhavenum=0;
int i;
for( i=0 ; i<CHAR_EQUIPPLACENUM ; i++ )
if( ITEM_CHECKINDEX(CHAR_getItemIndex(charaindex,i)) )
eqindex[itemhavenum++] = i;
if( itemhavenum >= 1 ) {
int randomindex = RAND(0,itemhavenum-1);
CHAR_DropItem(charaindex,eqindex[randomindex]);
}
}
CHAR_DropMoney(charaindex,
CHAR_getInt(charaindex,CHAR_GOLD)/2 );
CHAR_setInt(charaindex,CHAR_GOLD,0);
}
CHAR_complianceParameter(charaindex);
CHAR_sendCToArroundCharacter( CHAR_getWorkInt(charaindex, CHAR_WORKOBJINDEX) );
CHAR_setInt(charaindex,CHAR_DEADCOUNT,
CHAR_getInt(charaindex,CHAR_DEADCOUNT)+1);
{
int i;
BOOL old=FALSE;
for( i=0 ; i<arraysizeof(pShow); i++)
if( CHAR_setInt( charaindex, pShow[i].paramindex, 0 ) > 0 ) {
old = TRUE;
}
if( CHAR_setInt( charaindex, CHAR_POISON, 0 ) > 0 )old=TRUE;
if( old )
CHAR_sendCToArroundCharacter( CHAR_getInt(charaindex, CHAR_WORKOBJINDEX));
}
CHAR_sendStatusString( charaindex, "P");
CHAR_sendStatusString( charaindex, "I");
CHAR_setFlg(charaindex,CHAR_ISDIE,1);
CHAR_setFlg(charaindex,CHAR_ISATTACKED,0);
return 0;
}
/*
* 既存のアイテムをあるキャラに持たせる。
* もちものがいっぱいかどうか、スキルの判定、等は
* この関数の中でやる。
*
* int charindex:もたせるキャラのキャラindex
* int itemindex:もたせるアイテムのアイテムindex
* BOOL net: この関数にネットワークやらせる TRUEにする事。
* 返り値:無事持たせれたらTRUE,なんらかの原因で持たせれなかったらFALSE
*
* by nakamura
*
* この関数の中で、キャラが持っているものだったら持ちものから外す、
* 地面に置いてあるものだったら置いてなくする、という処理もしてしまう
* ようにした。
* by ringo
*
* some bug fix.( ITEM_setWorkInt etc.)
* by taka
*
* 現在の仕様。
* o itemindex のアイテムが自分の持っているアイテムであったら、
* return FALSE する
*/
BOOL NPC_Util_moveItemToChar( int charindex, int itemindex,BOOL net )
{
int emptyindex, oind ,cind;
emptyindex = CHAR_findEmptyItemBox( charindex );
if( emptyindex < 0 )
/* アイテム欄に空きがない */
return FALSE;
if( !ITEM_CHECKINDEX( itemindex ) )return FALSE;
/* 持たせる空きはある */
/*
* 次に地形に落ちているアイテムか、それとも、
* 誰かが持っているアイテムかを調べる
*/
oind = ITEM_getWorkInt( itemindex , ITEM_WORKOBJINDEX );
cind = ITEM_getWorkInt( itemindex , ITEM_WORKCHARAINDEX );
if( oind >= 0 ){
/* 地形に置かれているものだ。 */
/* 地形から抹消 */
CHAR_ObjectDelete( oind );
/* アイテムを移動 */
CHAR_setItemIndex( charindex, emptyindex, itemindex );
/* アイテムのWork領域を書きかえる */
ITEM_setWorkInt( itemindex, ITEM_WORKOBJINDEX, -1 );
ITEM_setWorkInt( itemindex, ITEM_WORKCHARAINDEX, charindex );
/* charindex がプレイヤーだったらアイテム変更ステータス送信 */
if( net ) CHAR_sendStatusString( charindex, "I");
return TRUE;
}else if( cind >= 0 ){
/* キャラクタが持っているものだ。 */
int itemindexinchara;
/* 自分が持っている場合には何もしない */
if( cind == charindex )return FALSE;
/* もってるものを消す */
itemindexinchara = NPC_Util_SearchItemInChar( cind , itemindex);
if( itemindexinchara == -1 )return FALSE;
CHAR_setItemIndex( cind , itemindexinchara , -1 );
if( itemindexinchara == CHAR_ARM1
&& CHAR_getItemIndex( cind,CHAR_ARM2 )== -2){
CHAR_setItemIndex(cind,CHAR_ARM2,-1);
}
CHAR_complianceParameter(cind);
if( net ) CHAR_sendStatusString( cind,"I");
/* アイテムを持たせる */
CHAR_setItemIndex( charindex , emptyindex , itemindex );
if( net ) CHAR_sendStatusString( charindex,"I");
/* アイテムのWork領域を書きかえる */
ITEM_setWorkInt( itemindex, ITEM_WORKOBJINDEX, -1 );
ITEM_setWorkInt( itemindex, ITEM_WORKCHARAINDEX, charindex );
return TRUE; /* fixed by nakamura(なんもreturnしてなかった) */
}
return FALSE;
}
void NPC_OldmanTalked( int meindex , int talkerindex , char *msg ,
int color )
{
char message[1024];
char *n = CHAR_getChar( talkerindex , CHAR_NAME );
int title_change = 0;
/* 反卅仄井仃凶蠱卞｝憤坌及ID毛筏盛今六月 */
CHAR_setInt( talkerindex, CHAR_LASTTALKELDER ,
CHAR_getWorkInt( meindex, CHAR_WORKOLDMANID ) );
/*
if( title_change == 0 && strcmp( n , "蘋果" ) == 0 ){
if( NPC_Util_HaveTitle( talkerindex , 3 ) == 0 ){
char *ts;
NPC_Util_AddOneTitle( talkerindex , 3 );
ts = TITLE_makeTitleStatusString( talkerindex , 3 );
snprintf( message , sizeof(message),
"那是個不錯的名字, 就叫%s吧！",
ts );
title_change = 1;
}
}
*/
{
int addcnt,delcnt;
title_change = TITLE_TitleCheck_Nomsg( talkerindex, 0, &addcnt, &delcnt);
if( !title_change){
snprintf( message, sizeof( message ) ,
"來的好%s在給你稱號時"
"不是還沒來嗎？" , n );
CHAR_talkToCli( talkerindex , meindex , message , CHAR_COLORWHITE );
}
else {
#define NPC_OLDMAN_TITLE_UNIT1 "TSU"
#define NPC_OLDMAN_TITLE_UNIT2 "KO"
snprintf( message, sizeof( message ) ,"來的好%s",n );
CHAR_talkToCli( talkerindex , meindex , message , CHAR_COLORWHITE );
if( delcnt > 0 && addcnt > 0 ) {
snprintf( message, sizeof( message ) ,
"你喪失了%d%s 稱號的資格。"
"不是得到了%d%s 的稱號資格嗎？"
, delcnt,
delcnt < 10 ? NPC_OLDMAN_TITLE_UNIT1:NPC_OLDMAN_TITLE_UNIT2,
addcnt,
addcnt < 10 ? NPC_OLDMAN_TITLE_UNIT1:NPC_OLDMAN_TITLE_UNIT2
);
CHAR_talkToCli( talkerindex , meindex , message , CHAR_COLORWHITE );
}
else if( delcnt > 0 ) {
snprintf( message, sizeof( message ) ,
"你已喪失得到%d%s稱號的資格。", delcnt,
delcnt < 10 ? NPC_OLDMAN_TITLE_UNIT1:NPC_OLDMAN_TITLE_UNIT2);
CHAR_talkToCli( talkerindex , meindex , message , CHAR_COLORWHITE );
}
else if( addcnt > 0 ) {
snprintf( message, sizeof( message ) ,
"給你%d%s的稱號吧！", addcnt, // CoolFish: d%s -> %d%s 2001/4/18
addcnt < 10 ? NPC_OLDMAN_TITLE_UNIT1:NPC_OLDMAN_TITLE_UNIT2);
CHAR_talkToCli( talkerindex , meindex , message , CHAR_COLORWHITE );
}
if( delcnt > 0 ) {
snprintf( message, sizeof( message),
"失去%d%s 稱號！", delcnt,
delcnt < 10 ? NPC_OLDMAN_TITLE_UNIT1:NPC_OLDMAN_TITLE_UNIT2);
CHAR_talkToCli( talkerindex, -1, message, CHAR_COLORYELLOW);
}
if( addcnt > 0 ) {
snprintf( message, sizeof( message),
"獲得%d%s 稱號！", addcnt,
addcnt < 10 ? NPC_OLDMAN_TITLE_UNIT1:NPC_OLDMAN_TITLE_UNIT2);
CHAR_talkToCli( talkerindex, -1, message, CHAR_COLORYELLOW);
}
}
}
if( title_change ) CHAR_sendStatusString( talkerindex , "T" );
}
static void NPC_NewNpcMan_selectWindow( int meindex, int toindex, int num, int flg)
{
char npcarg[NPC_UTIL_GETARGSTR_BUFSIZE];
char token[256];
int buttontype = 0, windowtype = 0, windowno = 0;
int fd = getfdFromCharaIndex( toindex);
windowtype = WINDOW_MESSAGETYPE_MESSAGE;
if(NPC_Util_isFaceToFace( meindex ,toindex , 2) == FALSE) {
if(NPC_Util_isFaceToChara( toindex, meindex, 1) == FALSE)
return;
}
memset( npcarg, 0, sizeof( npcarg));
if(NPC_Util_GetArgStr( meindex, npcarg, sizeof(npcarg))==NULL){
return;
}
memset( token, 0, sizeof( token));
switch( num) {
case WINDOW_START:
if( NPC_Util_GetStrFromStrWithDelim( npcarg, "START_MSG", token, sizeof( token) ) == NULL) {
return;
}
buttontype = WINDOW_BUTTONTYPE_YESNO;
windowno = NPC_PROGRAMEGINEER_DEFIND;
break;
case WINDOW_SELECT1:
sprintf(token," ÇëÑ¡Ôñ"
"\n ¡¶ÐÞÕý³èÎïÒì³£¡·"
"\n ¡¶ÐÞÕý³èÎïͼºÅ¡·"
"\n ¡¶¸ü»»ÁéÁ¦îø¡·"
#ifdef _PET_LOSTPET
"\n ¡¶Áì»ØÒÅʧ³èÎï¡·"
#endif
// "\n ¡¶»¹ÔÌúǹÈþ¶Ñµþ¡·"
);
windowtype = WINDOW_MESSAGETYPE_SELECT;
buttontype = WINDOW_BUTTONTYPE_CANCEL;
windowno = NPC_PROGRAMEGINEER_SELECT2;
break;
case WINDOW_SELECT2:
switch( flg){
case 1://ÐÞÕý³èÎïÒì³£
NPC_reCheckMyPetUnusual( meindex, toindex);
CHAR_talkToCli( toindex, -1, "ÉíÉϳèÎï¼ì²éÍê±Ï!", CHAR_COLORYELLOW);
return;
break;
case 2://ÐÞÕý³èÎïͼºÅ
CHECK_PETBBI( toindex);
return;
break;
case 3://¸ü»»ÁéÁ¦îø
if( CHECK_ITEMEQUIT( toindex) == TRUE ){
CHAR_talkToCli( toindex, -1, "¼ì²éÍê±Ï!", CHAR_COLORYELLOW);
}
return;
break;
case 4:
#ifdef _PET_LOSTPET
if( NPC_reFindMyLostPet( meindex, toindex, token) == FALSE ){
CHAR_talkToCli( toindex, -1, "²éÎÞ×ÊÁÏ£¡", CHAR_COLORYELLOW);
return;
}
windowtype = WINDOW_MESSAGETYPE_SELECT;
buttontype = WINDOW_BUTTONTYPE_CANCEL;
windowno = NPC_PROGRAMEGINEER_SELECTLOSTPET;
#endif
break;
case 5: //»¹ÔÌúǹÈþ¶Ñµþ
// NPC_reCheckItemPilenum( meindex, toindex);
return;
break;
}
break;
/*
case WINDOW_SELECT3:
{
int petnum, petindex;
petnum = atoi( data)-1;
if( petnum >= CHAR_MAXPETHAVE || petnum < 0 ) return;
petindex = CHAR_getCharPet( talker, petsel);
if( !CHAR_CHECKINDEX(petindex) ) return;
break;
}
*/
case WINDOW_SELECTLOSTPET:
#ifdef _PET_LOSTPET
{
int ret, i, ti, ltime, cost;
Char ch;
char msgbuf[256];
char petstring1[2048];
int havepetelement = CHAR_getCharPetElement( toindex);
ti = flg;
if( havepetelement < 0 ){
CHAR_talkToCli( toindex, -1, "³èÎïÀ¸Î»ÒÑÂú£¡", CHAR_COLORYELLOW);
return;
}
if( NPC_getLostPetString( meindex, toindex) == FALSE ) {
CHAR_talkToCli( toindex, -1, "ÁìÈ¡³èÎïʧ°Ü£¡", CHAR_COLORYELLOW);
return;
}
if( getStringFromIndexWithDelim( petstring[ti-1], "#", 2, petstring1, sizeof( petstring1)) == FALSE ){
CHAR_talkToCli( toindex, -1, "ÁìÈ¡³èÎïʧ°Ü£¡", CHAR_COLORYELLOW);
return;
}else{
char buf1[256];
if( getStringFromIndexWithDelim( petstring[ti-1], "|", 6, buf1, sizeof( buf1)) == FALSE ) return;
ltime = atoi(buf1);
ltime = time( NULL) - ltime;
ltime = ltime/(60*60*24);
if( getStringFromIndexWithDelim( petstring[ti-1], "|", 4, buf1, sizeof( buf1)) == FALSE ) return;
cost = atoi( buf1);
#if 0 // ÐÞÕý±£Êͽð
cost = cost + (ltime*100);
cost = (cost>10000)?10000:cost;
#else
cost = cost + (ltime*10000);
#endif
if( CHAR_getInt( toindex, CHAR_GOLD) < cost ) {
sprintf( buf1, "³èÎïÒѼķÅ%dÌ죬¹²Ðè%dʯ±Ò²Å¿ÉÁì»Ø¡£", ltime, cost);
CHAR_talkToCli( toindex, meindex, buf1, CHAR_COLORYELLOW);
return;
}
}
ret = CHAR_makePetFromStringToArg( petstring1, &ch, -2);
strcpy( petstring[ti-1], "");
if( ret ) {
char buf1[256];
int petindex = PET_initCharOneArray( &ch );
if( !CHAR_CHECKINDEX( petindex) ){
CHAR_talkToCli( toindex, -1, "ÁìÈ¡³èÎïʧ°Ü£¡", CHAR_COLORYELLOW);
return;
}
print("ANDY petindex:%d[%s]\n", petindex, CHAR_getChar( petindex, CHAR_NAME) );
CHAR_complianceParameter( petindex );
CHAR_setInt( petindex, CHAR_HP, CHAR_getWorkInt( petindex, CHAR_WORKMAXHP));
CHAR_setWorkInt( petindex, CHAR_WORKPLAYERINDEX, toindex);
CHAR_setCharPet( toindex, havepetelement, petindex);
CHAR_setChar( petindex, CHAR_OWNERCDKEY,
CHAR_getChar( toindex, CHAR_CDKEY));
CHAR_setChar( petindex, CHAR_OWNERCHARANAME,
CHAR_getChar( toindex, CHAR_NAME));
if( NPC_backupLostPetString( toindex) == FALSE ){
print("ANDY err backup petstring !!\n");
return;
}
sprintf( buf1, "LostPGet:%d", cost);
LogPet(
CHAR_getChar( toindex, CHAR_NAME ),
CHAR_getChar( toindex, CHAR_CDKEY ),
CHAR_getChar( petindex, CHAR_NAME),
CHAR_getInt( petindex, CHAR_LV),
buf1,
CHAR_getInt( toindex,CHAR_FLOOR),
CHAR_getInt( toindex,CHAR_X ),
CHAR_getInt( toindex,CHAR_Y ),
CHAR_getChar( petindex, CHAR_UNIQUECODE) // shan 2001/12/14
);
sprintf( buf1, "ÁìÈ¡³èÎï%s¡£", CHAR_getUseName( petindex));
CHAR_talkToCli( toindex, meindex, buf1, CHAR_COLORYELLOW);
for( i = 0; i < CHAR_MAXPETHAVE; i++){
int petindex = CHAR_getCharPet( toindex, i);
if( !CHAR_CHECKINDEX( petindex) )
continue;
CHAR_complianceParameter( petindex );
snprintf( msgbuf, sizeof( msgbuf ), "K%d", i );
CHAR_sendStatusString( toindex, msgbuf );
snprintf( msgbuf, sizeof( msgbuf ), "W%d", i );
CHAR_sendStatusString( toindex, msgbuf );
}
CHAR_DelGold( toindex, cost);
}else{
CHAR_talkToCli( toindex, -1, "ÁìÈ¡³èÎïʧ°Ü£¡", CHAR_COLORYELLOW);
return;
}
return;
}
#endif
return;
break;
case WINDOW_DEFIND:
{
int i;
int face = CHAR_getInt( toindex, CHAR_FACEIMAGENUMBER);
if( NPC_Util_GetStrFromStrWithDelim( npcarg, "CHECK_MSG", token, sizeof( token) ) == NULL) {
return;
}
for( i=0; i<48; i++){
if( face >= checkPc[i][0] && face < checkPc[i][1] )
break;
}
if( i >= 48 )return;
CHAR_setWorkInt( toindex, CHAR_WORKNPCMETAMO, meindex);
CHAR_setInt( toindex, CHAR_BASEIMAGENUMBER, checkPc[i][2]);
CHAR_complianceParameter( toindex );
CHAR_sendCToArroundCharacter( CHAR_getWorkInt( toindex , CHAR_WORKOBJINDEX ));
CHAR_send_P_StatusString( toindex , CHAR_P_STRING_BASEBASEIMAGENUMBER);
buttontype = WINDOW_BUTTONTYPE_YESNO;
windowno = NPC_PROGRAMEGINEER_END;
}
break;
case WINDOW_END:
{
CHAR_setWorkInt( toindex, CHAR_WORKNPCMETAMO, -1);
CHAR_setInt( toindex, CHAR_BASEBASEIMAGENUMBER,
CHAR_getInt( toindex, CHAR_BASEIMAGENUMBER) );
CHAR_complianceParameter( toindex );
CHAR_sendCToArroundCharacter( CHAR_getWorkInt( toindex , CHAR_WORKOBJINDEX ));
CHAR_send_P_StatusString( toindex , CHAR_P_STRING_BASEBASEIMAGENUMBER);
return;
}
break;
}
lssproto_WN_send( fd, windowtype, buttontype, windowno,
CHAR_getWorkInt( meindex, CHAR_WORKOBJINDEX), token);
}
//¸ü»»³èÎï
BOOL CHECK_ReplacePET( int toindex)
{
int i, petindex;
BOOL Finds = FALSE;
char szPet[256];
if( CHAR_getWorkInt( toindex, CHAR_WORKBATTLEMODE) != BATTLE_CHARMODE_NONE ) return FALSE;
for( i=0; i<CHAR_MAXPETHAVE; i++) {
int array, ret;
petindex = CHAR_getCharPet( toindex, i);
if( !CHAR_CHECKINDEX( petindex) )continue;
if( CHAR_getInt( petindex, CHAR_PETID) != 1133 ) continue;
if( CHAR_getInt( petindex, CHAR_SLOT) != 7 ) continue;
if( CHAR_getInt( petindex, CHAR_TRANSMIGRATION ) > 0 )continue;
if( i == CHAR_getInt( toindex, CHAR_DEFAULTPET) ) {
int fd = getfdFromCharaIndex( toindex);
CHAR_setInt( toindex, CHAR_DEFAULTPET, -1);
lssproto_KS_send( fd, -1, TRUE);
}
snprintf( szPet,sizeof( szPet), "½»³ö%s¡£", CHAR_getUseName( petindex) );
CHAR_talkToCli( toindex, -1, szPet, CHAR_COLORYELLOW);
LogPet(
CHAR_getChar( toindex, CHAR_NAME ),
CHAR_getChar( toindex, CHAR_CDKEY ),
CHAR_getChar( petindex, CHAR_NAME),
CHAR_getInt( petindex, CHAR_LV),
"TenseiDel",
CHAR_getInt( toindex,CHAR_FLOOR),
CHAR_getInt( toindex,CHAR_X ),
CHAR_getInt( toindex,CHAR_Y ),
CHAR_getChar( petindex, CHAR_UNIQUECODE)
);
Finds = TRUE;
CHAR_setCharPet( toindex, i, -1);
CHAR_endCharOneArray( petindex );
array = ENEMY_getEnemyArrayFromTempNo( 1133);
if( !ENEMY_CHECKINDEX( array)) continue;
ret = ENEMY_createPetFromEnemyIndex( toindex, array);
if( !CHAR_CHECKINDEX( ret ) ) continue;
snprintf( szPet, sizeof( szPet), "Äõ½%s¡£", CHAR_getUseName( ret) );
CHAR_talkToCli( toindex, -1, szPet, CHAR_COLORWHITE);
LogPet(
CHAR_getChar( toindex, CHAR_NAME ),
CHAR_getChar( toindex, CHAR_CDKEY ),
CHAR_getChar( ret, CHAR_NAME),
CHAR_getInt( ret, CHAR_LV),
"TenseiGet",
CHAR_getInt( toindex,CHAR_FLOOR),
CHAR_getInt( toindex,CHAR_X ),
CHAR_getInt( toindex,CHAR_Y ),
CHAR_getChar( ret, CHAR_UNIQUECODE)
);
}
for( i=0; i<CHAR_MAXPETHAVE; i++){
petindex = CHAR_getCharPet(toindex, i);
if( !CHAR_CHECKINDEX( petindex) )continue;
CHAR_complianceParameter( petindex );
snprintf( szPet, sizeof( szPet ), "K%d", i);
CHAR_sendStatusString( toindex, szPet );
snprintf( szPet, sizeof( szPet ), "W%d", i);
CHAR_sendStatusString( toindex, szPet );
}
return Finds;
}
void NPC_FreePetSkillShopWindowTalked( int meindex, int talkerindex, int seqno, int select, char *data)
{
int skill;
int pet;
int slot;
int cost;
int skillID=0;
int petskillindex;
int fd = getfdFromCharaIndex( talkerindex);
char buf[64];
char argstr1[NPC_UTIL_GETARGSTR_BUFSIZE];
char *argstr;
char msg[512];
int petindex;
char msgbuf[128];
double rate= 1.0;
#ifdef _STONEAGEA8XXX_S
int petskCostFametemp=-1;
#endif
if((argstr = NPC_Util_GetArgStr( meindex, argstr1, sizeof(argstr1)))==NULL){
print("GetArgStrErr");
return;
}
if( CHAR_getInt( talkerindex , CHAR_WHICHTYPE ) != CHAR_TYPEPLAYER ) {
return;
}
if(NPC_Util_isFaceToFace(talkerindex,meindex,2 )==FALSE){
if( NPC_Util_CharDistance( talkerindex, meindex ) > 1) return;
}
if( CHAR_getWorkInt( talkerindex, CHAR_WORKBATTLEMODE) != BATTLE_CHARMODE_NONE)
return ;
switch( seqno) {
case SELECTSKILL_START:
if( CHAR_getWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT) != 2 ) {
CHAR_setWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT, 0);
return;
}
NPC_FreePetSkillShop_selectWindow( meindex, talkerindex, SKILL_WINDOW, -1);
break;
case SELECTSKILL_TEACH:
if( CHAR_getWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT) != 3 ) {
CHAR_setWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT, 0);
return;
}
makeStringFromEscaped( data);
getStringFromIndexWithDelim(data,"|",1,buf,sizeof(buf));
skill=atoi(buf);
getStringFromIndexWithDelim(data,"|",2,buf,sizeof(buf));
pet=atoi(buf);
getStringFromIndexWithDelim(data,"|",3,buf,sizeof(buf));
slot=atoi(buf);
getStringFromIndexWithDelim(data,"|",4,buf,sizeof(buf));
cost=atoi(buf);
if( NPC_Util_GetStrFromStrWithDelim( argstr, "pet_skill", msg, sizeof( msg)) != NULL){
getStringFromIndexWithDelim(msg,",",skill,buf,sizeof(buf));
skillID=atoi(buf);
}
slot--;
if( slot < 0 ) return;
petindex = CHAR_getCharPet( talkerindex, pet-1);
if( !CHAR_CHECKINDEX(petindex) ){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return ;
}
if( NPC_Util_GetStrFromStrWithDelim( argstr, "skill_rate", msg, sizeof( msg)) != NULL){
rate = atof( msg);
}
#ifdef _STONEAGEA8XXX_S
if( NPC_Util_GetStrFromStrWithDelim( argstr, "petskCostFame", msg, sizeof( msg)) != NULL){
getStringFromIndexWithDelim(msg,",",skill,buf,sizeof(buf));
petskCostFametemp = atoi(buf);
}
#endif
petskillindex = PETSKILL_getPetskillArray( skillID );
if( !PETSKILL_CHECKINDEX( petskillindex)){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return ;
}
cost = PETSKILL_getInt( petskillindex, PETSKILL_COST );
cost = cost * rate;
//條件判斷
if(CHAR_getInt(talkerindex,CHAR_GOLD) < cost && CHAR_getInt(talkerindex,CHAR_FAME)< petskCostFametemp){
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
return;
}
if( NPC_CHECKFREEPETSKILL( talkerindex, petindex, skillID ) == TRUE ){
if( Action_RunDoEventAction( meindex, talkerindex, argstr) == FALSE ){
CHAR_talkToCli( talkerindex, -1, "所需物品不足!!", CHAR_COLORYELLOW);
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
CHAR_setWorkInt( talkerindex, CHAR_WORKSHOPRELEVANT, 0);
return;
}
CHAR_setPetSkill( petindex, slot, skillID);
CHAR_setInt( talkerindex, CHAR_GOLD, ( CHAR_getInt( talkerindex, CHAR_GOLD) - cost) );
#ifdef _STONEAGEA8XXX_S
if (petskCostFametemp!=-1 && petskCostFametemp!=0){
float FlpetCFameTemp;
CHAR_setInt( talkerindex, CHAR_FAME, ( CHAR_getInt( talkerindex, CHAR_FAME) - petskCostFametemp) );
FlpetCFameTemp = petskCostFametemp/100;
#ifdef _ADD_STATUS_2
sprintf(msgbuf,"FAME|%d",CHAR_getInt(talkerindex,CHAR_FAME)/100);
lssproto_S2_send(fd,msgbuf);
#endif
snprintf( msgbuf, sizeof( msgbuf ), "扣除聲望點數:%4.2f",FlpetCFameTemp);
}
#endif
CHAR_talkToCli( talkerindex, -1, msgbuf, CHAR_COLORYELLOW);
snprintf( msgbuf, sizeof( msgbuf ), "W%d",pet-1);
CHAR_sendStatusString( talkerindex, msgbuf );
CHAR_sendStatusString( talkerindex, "P");
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
//WARP
if( NPC_SkillShopWarp( meindex, talkerindex) == TRUE )
return;
}else {
CHAR_send_P_StatusString( talkerindex, CHAR_P_STRING_GOLD);
CHAR_talkToCli( talkerindex, -1, "條件不足!!", CHAR_COLORYELLOW);
}
//ADD
NPC_FreePetSkillShop_selectWindow( meindex, talkerindex, SKILL_WINDOW, -1);
break;
case SELECTSKILL_END:
break;
}
return;
}
