#include "version.h" #include #include #include //??? #include "common.h" #include "handletime.h" #include "object.h" #include "char_base.h" #include "char.h" #include "char_event.h" #include "lssproto_serv.h" #include "readmap.h" #include "map_deal.h" #include "npccreate.h" #include "encount.h" #include "npcutil.h" #include "battle.h" #include "net.h" #include "configfile.h" #include "npc_npcenemy.h" #ifdef _ALLBLUES_LUA #include "mylua/function.h" #endif static void CHAR_sendCharaAtWalk( int charaindex, int of, int ox, int oy, int xflg, int yflg ); static void CHAR_sendCDCharaAtWalk( int charaindex, int of, int ox, int oy, int xflg, int yflg ); static CHAR_WALKRET CHAR_walk_turn( int index, int dir ) { int fx,fy,ff; OBJECT object; if(!CHAR_CHECKINDEX( index ))return CHAR_WALKSYSTEMERROR; CHAR_setInt(index,CHAR_DIR,dir); fx = CHAR_getInt(index,CHAR_X); fy = CHAR_getInt(index,CHAR_Y); ff = CHAR_getInt(index,CHAR_FLOOR); CHAR_sendWatchEvent( CHAR_getWorkInt(index, CHAR_WORKOBJINDEX), CHAR_ACTTURN,NULL,0,FALSE); CHAR_setWorkInt( index, CHAR_WORKACTION, CHAR_ACTTURN); for( object = MAP_getTopObj(ff,fx,fy) ; object ; object = NEXT_OBJECT(object ) ){ typedef void (*POSTOFUNC)(int,int); POSTOFUNC pfunc=NULL; int objindex = GET_OBJINDEX(object); switch( OBJECT_getType(objindex) ){ case OBJTYPE_CHARA: pfunc = (POSTOFUNC)CHAR_getFunctionPointer( OBJECT_getIndex(objindex), CHAR_POSTOVERFUNC); break; case OBJTYPE_ITEM: pfunc = (POSTOFUNC)ITEM_getFunctionPointer( OBJECT_getIndex(objindex), ITEM_POSTOVERFUNC); #ifdef _ALLBLUES_LUA_1_2 if( !pfunc ){ RunItemPostOverEvent(OBJECT_getIndex(objindex), index ); } #endif break; case OBJTYPE_GOLD: break; default: break; } if( pfunc )pfunc( OBJECT_getIndex(objindex),index ); } return CHAR_WALKSUCCESSED; } /*------------------------------------------------------------ * n 汹 汹中凶map毛霜月 * 娄醒 * index int 平乓仿及奶件犯永弁旦 * fl int 白夫失ID * ox int 蟆及橇谪及x * oy int 蟆及橇谪及y * fx int 汹中凶 及x * fy int 汹中凶 及y * 忒曰袄 * 卅仄 ------------------------------------------------------------*/ static void CHAR_sendMapAtWalk( int index, int fl ,int ox ,int oy, int fx, int fy ) { /* * 蜇箕及袄午｝蟆引匹及袄及犒毛苇月 * 仇丹允月午｝伐□皿NPC手棵签分［ */ int vx,vy; const int seesiz = MAP_CHAR_DEFAULTSEESIZ; if( !CHAR_CHECKINDEX( index ) )return; vx = fx - ox; vy = fy - oy; if( ABS(vx) >= seesiz/2 || /* 犒互 五中 */ ABS(vy) >= seesiz/2 ){ /* 犒互 五中 */ return; }else{ RECT send,get; char* mapdata; int oldlux = ox - (int)(seesiz/2); int oldluy = oy - (int)(seesiz/2); int absx = ABS(vx); int absy = ABS(vy); /* * 夫午勾聂户卞旦正□玄毛潸月及午｝vx , vy 井日1夫仁及互禾奶件玄 * 蟆午井今卅日卅中方丹卞｝ * clipRect 反 w,h 0 毛心午户化中月 */ /* == 0 及凛反霜日卅仁化方中 */ if( vx != 0 ){ if( vx > 0 ){ send.x = oldlux + seesiz; send.width = absx; }else if( vx < 0 ){ send.x = oldlux - absx; send.width = absx; } if( vy >= 0 ){ send.y = oldluy; send.height = seesiz + absy; }else{ send.y = oldluy - absy; send.height = seesiz + absy; } { int tilesum, objsum,eventsum; mapdata = MAP_getChecksumFromRECT(fl,&send,&get,&tilesum, &objsum,&eventsum ); if( mapdata != NULL && !( get.width == 0 && get.height == 0 ) ){ int fd = getfdFromCharaIndex( index ); if( fd != -1 ) lssproto_MC_send( fd,fl,get.x,get.y, get.x+get.width, get.y+get.height, tilesum, objsum, eventsum, mapdata ); } } } /* == 0 及凛反霜日卅仁化方中 */ if( vy != 0 ){ if( vy > 0 ){ send.y = oldluy + seesiz; send.height = absy; }else{ send.y = oldluy - absy; send.height = absy; } if( vx >= 0 ){ send.x = oldlux; send.width = seesiz + absx; }else if( vx < 0 ){ send.x = oldlux - absx; send.width = seesiz + absx; } { int tilesum, objsum,eventsum; mapdata = MAP_getChecksumFromRECT(fl,&send,&get, &tilesum, &objsum,&eventsum); if( mapdata != NULL && !( get.width == 0 && get.height == 0 ) ){ int fd = getfdFromCharaIndex( index ); if( fd != -1 ) lssproto_MC_send( fd,fl,get.x,get.y, get.x+get.width, get.y+get.height, tilesum, objsum, eventsum, mapdata ); } } } } } static CHAR_WALKRET CHAR_walk_move( int charaindex, int dir ); /*------------------------------------------------------------ * 啖 允月［ * 娄醒 * index int 平乓仿及奶件犯永弁旦 * dir int 轾 * 忒曰袄 * CHAR_WALKRET ------------------------------------------------------------*/ static CHAR_WALKRET CHAR_walk_move( int charaindex, int dir ) { int i; int fx,fy,ff; int ox,oy,of; int objbuf[128]; int objbufindex=0; int notover=FALSE; int retvalue=CHAR_WALKSUCCESSED; if( !CHAR_CHECKINDEX( charaindex )) return CHAR_WALKSYSTEMERROR; ox = CHAR_getInt(charaindex,CHAR_X); oy = CHAR_getInt(charaindex,CHAR_Y); of = CHAR_getInt(charaindex,CHAR_FLOOR); CHAR_getCoordinationDir( dir,ox,oy,1,&fx,&fy); ff = of; if( CHAR_getInt( charaindex,CHAR_WHICHTYPE ) == CHAR_TYPEENEMY ){ RECT walkr; POINT nextp; int npccreateindex; npccreateindex = CHAR_getInt( charaindex,CHAR_NPCCREATEINDEX ); if( CHAR_isInvincibleArea( ff,fx,fy)) { CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALKEXTEND; goto CHAR_AFTERWALK; } if( NPC_isBoundarySet( npccreateindex ) && NPC_createGetRECT( npccreateindex,&walkr ) == TRUE ) { nextp.x = fx; nextp.y = fy; if( PointInRect( &walkr,&nextp ) == FALSE ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALKEXTEND; goto CHAR_AFTERWALK; } }else{ ; } } if( CHAR_getFlg( charaindex, CHAR_ISBIG ) == 1 ){ static POINT offset[5]={ { 0,-1}, {-1, 0}, { 0, 0}, { 1, 0}, { 0, 1}, }; int k; for( k=0 ; k<5; k++ ){ if( !MAP_walkAble( charaindex, ff, fx+offset[k].x, fy+offset[k].y )){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; goto CHAR_AFTERWALK; } } }else{ if( CHAR_getDX(dir)*CHAR_getDY(dir) == 0 ){ if( !MAP_walkAble( charaindex,ff, fx, fy ) ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; goto CHAR_AFTERWALK; } }else{ int xflg,yflg; if( !MAP_walkAble( charaindex,ff, fx, fy ) ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; goto CHAR_AFTERWALK; } xflg = MAP_walkAble( charaindex,of, ox+CHAR_getDX(dir), oy ); yflg = MAP_walkAble( charaindex,of, ox, oy+CHAR_getDY(dir) ); if( !xflg || !yflg ) { CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; goto CHAR_AFTERWALK; } } } objbufindex = CHAR_getSameCoordinateObjects( objbuf, arraysizeof( objbuf ), ff,fx,fy ); for( i = 0 ; i < objbufindex ; i ++ ){ int objindex= objbuf[i]; switch( OBJECT_getType(objindex) ){ case OBJTYPE_CHARA: if(CHAR_CHECKINDEX(OBJECT_getIndex(objindex))==TRUE){ #ifdef _ALLBLUES_LUA int meindex=-1, toindex=-1; if(CHAR_getInt(charaindex, CHAR_WHICHTYPE)==CHAR_TYPEPLAYER){ if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE )!= CHAR_PARTY_CLIENT ){ if(CHAR_getInt(OBJECT_getIndex(objindex), CHAR_WHICHTYPE)==CHAR_TYPELUANPC){ meindex = OBJECT_getIndex(objindex); toindex = charaindex; } } }else if(CHAR_getInt(charaindex, CHAR_WHICHTYPE)==CHAR_TYPELUANPC){ if(CHAR_getInt(OBJECT_getIndex(objindex), CHAR_WHICHTYPE)==CHAR_TYPEPLAYER){ if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE )!= CHAR_PARTY_CLIENT ){ meindex = charaindex; toindex = OBJECT_getIndex(objindex); } } } if(CHAR_CHECKINDEX(meindex) == TRUE || CHAR_CHECKINDEX(toindex) == TRUE){ if( CHAR_getWorkInt( meindex, CHAR_WORKBATTLEMODE ) == BATTLE_CHARMODE_NONE && CHAR_getWorkInt( toindex, CHAR_WORKBATTLEMODE ) == BATTLE_CHARMODE_NONE ){ if(CHAR_getFlg(meindex, CHAR_ISVISIBLE)==TRUE && CHAR_getFlg(meindex, CHAR_ISDIE) == FALSE){ RunCharOverlapEvent(meindex, toindex); } } } } #endif if( !CHAR_getFlg( OBJECT_getIndex(objindex),CHAR_ISOVERED) ){ if(!CHAR_CHECKINDEX(OBJECT_getIndex(objindex))){ printf("自动删除一个问题对象！"); endObjectOne(objindex); break; } notover= TRUE; } break; case OBJTYPE_ITEM: if( !ITEM_getInt( OBJECT_getIndex(objindex), ITEM_ISOVERED ) ) notover= TRUE; break; case OBJTYPE_GOLD: break; default: break; } } if( notover == TRUE ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALKHITOBJECT; }else{ for( i = 0 ; i < objbufindex ; i ++ ){ typedef void (*PREOFUNC)(int,int); PREOFUNC pfunc=NULL; int objindex=objbuf[i]; switch( OBJECT_getType(objindex) ){ case OBJTYPE_CHARA: pfunc = (PREOFUNC)CHAR_getFunctionPointer( OBJECT_getIndex(objindex), CHAR_PREOVERFUNC); break; case OBJTYPE_ITEM: pfunc = (PREOFUNC)ITEM_getFunctionPointer( OBJECT_getIndex(objindex), ITEM_PREOVERFUNC); #ifdef _ALLBLUES_LUA_1_2 if( !pfunc ){ RunItemPreOverEvent(OBJECT_getIndex(objindex), charaindex ); } #endif break; case OBJTYPE_GOLD: break; default: break; } if( pfunc )pfunc( OBJECT_getIndex(objindex),charaindex ); } CHAR_setInt(charaindex,CHAR_X,fx); CHAR_setInt(charaindex,CHAR_Y,fy); CHAR_setInt(charaindex,CHAR_FLOOR,ff); CHAR_setInt(charaindex,CHAR_DIR,dir); { int objindex; int ox,oy,of; objindex = CHAR_getWorkInt( charaindex,CHAR_WORKOBJINDEX ); of = OBJECT_setFloor(objindex, CHAR_getInt(charaindex,CHAR_FLOOR)); ox = OBJECT_setX(objindex,CHAR_getInt(charaindex,CHAR_X)); oy = OBJECT_setY(objindex,CHAR_getInt(charaindex,CHAR_Y)); if( !MAP_objmove( objindex, of,ox,oy,ff,fx,fy ) ){ /* 仇氏卅氏升丹仄方丹手卅中 */ fprint( "ERROR MAP_OBJMOVE objindex=%d(%s)\n",objindex, CHAR_getUseName( charaindex ) ); } } CHAR_setInt(charaindex,CHAR_WALKCOUNT, CHAR_getInt(charaindex,CHAR_WALKCOUNT) + 1 ); for( i = 0 ; i < objbufindex ; i ++ ){ typedef void (*POSTOFUNC)(int,int); POSTOFUNC pfunc=NULL; int objindex=objbuf[i]; switch( OBJECT_getType(objindex) ){ case OBJTYPE_CHARA: pfunc = (POSTOFUNC)CHAR_getFunctionPointer( OBJECT_getIndex(objindex), CHAR_POSTOVERFUNC); break; case OBJTYPE_ITEM: pfunc = (POSTOFUNC)ITEM_getFunctionPointer( OBJECT_getIndex(objindex), ITEM_POSTOVERFUNC); #ifdef _ALLBLUES_LUA_1_2 if( !pfunc ){ RunItemPostOverEvent(OBJECT_getIndex(objindex), charaindex ); } #endif break; case OBJTYPE_GOLD: break; default: break; } if( pfunc )pfunc( OBJECT_getIndex(objindex),charaindex ); } objbufindex = CHAR_getSameCoordinateObjects(objbuf, arraysizeof(objbuf), of, ox, oy ); for( i=0 ;i 0 ) { CHAR_setWorkInt( charaindex, CHAR_WORK_TOHELOS_COUNT, count -1); if( count -1 == 0 ) { CHAR_talkToCli( charaindex, -1, "道具的效力已到。", CHAR_COLORWHITE); } } par = ENCOUNT_getEncountPercentMin( charaindex, of,ox,oy); if( par != -1 ) { if( CHAR_getWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MIN) != par ){ flg = TRUE; CHAR_setWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MIN, par); } } par = ENCOUNT_getEncountPercentMax( charaindex, of,ox,oy); if( par != -1 ) { if( CHAR_getWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MAX) != par ){ flg = TRUE; CHAR_setWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MAX, par); } } // Arminius 7.12 login announce /* { int enfd = getfdFromCharaIndex( charaindex ); if (CONNECT_get_announced(enfd)==0) { // Robin 0720 //AnnounceToPlayer(charaindex); AnnounceToPlayerWN( enfd ); CONNECT_set_announced(enfd,1); } } */ // Arminius 6.22 check Encounter // Nuke 0622: Provide No Enemy function { int enfd = getfdFromCharaIndex( charaindex ); int eqen = getEqNoenemy( enfd ); // Arminius 7.2: Ra's amulet int noen = getNoenemy(enfd); // Arminius 7.31 cursed stone if (getStayEncount(enfd)>0) { clearStayEncount(enfd); } //print("\n enfd=%d,eqen=%d,noen=%d", enfd, eqen, noen); // Arminius 7.2 Ra's amulet if (eqen>=200) { noen=1; } else if (eqen>=120) { if ((ff==100)||(ff==200)||(ff==300)||(ff==400)||(ff==500)) noen=1; } else if (eqen>=80) { if ((ff==100)||(ff==200)||(ff==300)||(ff==400)) noen=1; } else if (eqen>=40) { if ((ff==100)||(ff==200)) noen=1; } //print("\n noen=%d", noen); if (noen==0) { int maxep = CHAR_getWorkInt(charaindex, CHAR_WORKENCOUNTPROBABILITY_MAX); int minep = CHAR_getWorkInt(charaindex, CHAR_WORKENCOUNTPROBABILITY_MIN); int cep = CONNECT_get_CEP(enfd); #ifdef _PROFESSION_SKILL // WON ADD 人物职业技能 int temp=0; int p_cep = CHAR_getWorkInt(charaindex, CHAR_ENCOUNT_FIX); if( p_cep != 0 ){ if( CHAR_getWorkInt( charaindex, CHAR_ENCOUNT_NUM) < (int)time(NULL) ){ CHAR_talkToCli( charaindex, -1, "技能效用结束。", CHAR_COLORYELLOW); CHAR_setWorkInt( charaindex, CHAR_ENCOUNT_FIX, 0); CHAR_setWorkInt( charaindex, CHAR_ENCOUNT_NUM, 0); } temp = cep * (100 + p_cep ) / 100; }else{ temp = cep; } #endif if (cepmaxep) cep=maxep; if (CHAR_getWorkInt(charaindex,CHAR_WORKBATTLEMODE)==BATTLE_CHARMODE_NONE) { int entflag=1; { int objindex,index; OBJECT obj; for ( obj = MAP_getTopObj( ff, fx, fy); obj; obj = NEXT_OBJECT( obj)) { objindex = GET_OBJINDEX( obj); if (OBJECT_getType( objindex) == OBJTYPE_CHARA) { int etype; index = OBJECT_getIndex( objindex); if (!CHAR_CHECKINDEX( index)) continue; if( CHAR_getInt( index, CHAR_WHICHTYPE) == CHAR_TYPENPCENEMY && CHAR_getWorkInt( index, CHAR_WORKEVENTTYPE) == CHAR_EVENT_ENEMY ) { CHAR_setInt( charaindex, CHAR_X, ox); CHAR_setInt( charaindex, CHAR_Y, oy); lssproto_XYD_send( getfdFromCharaIndex(charaindex), CHAR_getInt( charaindex, CHAR_X ), CHAR_getInt( charaindex, CHAR_Y ), CHAR_getInt( charaindex, CHAR_DIR ) ); break; } etype = CHAR_getWorkInt( index, CHAR_WORKEVENTTYPE); if (etype!=CHAR_EVENT_NONE) { if (etype==CHAR_EVENT_WARP) entflag=0; } } } } #ifdef _PROFESSION_SKILL // WON ADD 人物职业技能 #ifdef _ENEMY_ACTION if( rand()%(120*getEnemyAction()) < temp ){ #else if( rand()%120 < temp ){ #endif #else #ifdef _ENEMY_ACTION if( rand()%(120*getEnemyAction()) < cep ){ #else if (rand()%120 0 ) { int Rnum=0; int RandEnemy = getEqRandenemy( enfd); Rnum = RAND(0,100); if( Rnum > RandEnemy ) { #endif //encounter!! cep = minep; lssproto_EN_recv(enfd, CHAR_getInt(charaindex,CHAR_X), CHAR_getInt(charaindex,CHAR_Y)); #ifdef _Item_MoonAct } }else{ cep = minep; lssproto_EN_recv(enfd, CHAR_getInt(charaindex,CHAR_X), CHAR_getInt(charaindex,CHAR_Y)); } #endif } } else { if (cep= CHAR_TYPELUANPC #endif ) { CHAR_setWorkInt( charaindex, CHAR_WORKACTION, -1 ); if( CHAR_getWorkInt( charaindex, CHAR_WORKBATTLEMODE ) == BATTLE_CHARMODE_NONE ){ CHAR_sendCharaAtWalk( charaindex, of,ox,oy,CHAR_getDX(dir), CHAR_getDY(dir)); } { int opt[2] = { ox, oy}; CHAR_sendWatchEvent( CHAR_getWorkInt(charaindex, CHAR_WORKOBJINDEX), CHAR_ACTWALK,opt,2,TRUE ); } } if( retvalue == CHAR_WALKSUCCESSED ) { if( CHAR_getWorkInt( charaindex, CHAR_WORKBATTLEMODE ) == BATTLE_CHARMODE_NONE ){ CHAR_sendCDCharaAtWalk( charaindex, of,ox,oy, CHAR_getDX(dir), CHAR_getDY(dir)); } } return retvalue; } /*------------------------------------------------------------ * 平乓仿互汹仁［ * 娄醒 * index int Char匹及index * dir int 轾 * mode int 0卅日汹仁［1卅日 轾鳖晶［ * 忒曰袄 * CHAR_WALKRET ------------------------------------------------------------*/ CHAR_WALKRET CHAR_walk( int index, int dir, int mode) { CHAR_WALKRET ret; BOOL (*prewalk)(int , int* , int* ); void (*postwalk)(int); if( !CHAR_CHECKINDEX( index ) )return CHAR_WALKSYSTEMERROR; if( CHAR_getFlg(index,CHAR_ISDIE) ) return CHAR_WALKDIE; VALIDATEDIR(dir); prewalk = (BOOL(*)(int,int*,int*)) CHAR_getFunctionPointer(index, CHAR_WALKPREFUNC); if( prewalk != NULL ) if( prewalk(index,&dir,&mode) == FALSE ) { return CHAR_WALKPREWALK; } if( mode == 0 ) ret = CHAR_walk_move( index, dir ); else ret = CHAR_walk_turn( index, dir ); postwalk = (void(*)(int)) CHAR_getFunctionPointer(index,CHAR_WALKPOSTFUNC); if( postwalk != NULL ) postwalk(index); return ret; } #ifdef _CAX_LNS_NLGSUOXU CHAR_WALKRET CHAR_walk_jjc( int index, int floor, int ox, int oy, int dir) { CHAR_WALKRET ret; int mode; BOOL (*prewalk)(int , int* , int* ); void (*postwalk)(int); if( !CHAR_CHECKINDEX( index ) )return CHAR_WALKSYSTEMERROR; if( CHAR_getFlg(index,CHAR_ISDIE) ) return CHAR_WALKDIE; VALIDATEDIR(dir); prewalk = (BOOL(*)(int,int*,int*)) CHAR_getFunctionPointer(index, CHAR_WALKPREFUNC); if( prewalk != NULL ) if( prewalk(index,&dir,&mode) == FALSE ) { return CHAR_WALKPREWALK; } ret = CHAR_walk_jc( index, floor, ox, oy, dir ); postwalk = (void(*)(int)) CHAR_getFunctionPointer(index,CHAR_WALKPOSTFUNC); if( postwalk != NULL ) postwalk(index); return ret; } #endif /*------------------------------------------------------------ * 汹井六月蟆赏 ［ * 娄醒 * index int 平乓仿奶件犯永弁旦 * 忒曰袄 * 卅仄 ------------------------------------------------------------*/ void CHAR_walkcall( int index ) { char tmp[128]; int dir,mode; int ret; POINT start,end; if( !CHAR_CHECKINDEX( index ) ) return; strcpysafe( tmp ,sizeof(tmp), CHAR_getWorkChar(index,CHAR_WORKWALKARRAY)); CHAR_ctodirmode( tmp[0], &dir ,&mode ); /* 褪卅日仪蟆卞桦赭毛筏盛仄化云仁 * 褪及 仁蟆及桦赭毛 卞阂互啖 允月啃 */ if( CHAR_getInt( index, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER ) { if( CHAR_getWorkInt( index, CHAR_WORKPARTYMODE ) == CHAR_PARTY_LEADER ) { end.x = CHAR_getInt( index, CHAR_X); end.y = CHAR_getInt( index, CHAR_Y); } } /* 汹仁 */ ret = CHAR_walk( index , dir ,mode ); if( mode == 0 && ret == CHAR_WALKSUCCESSED ) { /* 愤坌互褪卅日醮棉毛汹井六月 */ if( CHAR_getInt( index, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER ) { if( CHAR_getWorkInt( index, CHAR_WORKPARTYMODE) == CHAR_PARTY_LEADER ) { int i; for( i = 1; i < CHAR_PARTYMAX; i ++ ) { int toindex = CHAR_getWorkInt( index, i + CHAR_WORKPARTYINDEX1); if( CHAR_CHECKINDEX(toindex) ) { int parent_dir; /* 阂及匏 午］褪及汹五蟆及匏 井日 轾毛菲户月 */ /* 汹仁 */ start.x = CHAR_getInt( toindex, CHAR_X); start.y = CHAR_getInt( toindex, CHAR_Y); parent_dir = NPC_Util_getDirFromTwoPoint( &start,&end ); /* 弘仿犯奴它旦左皿扑亦件汹五毛 蜇允月啃卞］ * 戚及阂反蟆及阂及 毛馨丹方丹卞允月 */ end = start; if( parent_dir != -1 ) { CHAR_walk( toindex, parent_dir, 0); #if 1 // Robin 0702 petFollow if( CHAR_getWorkInt( toindex, CHAR_WORKPETFOLLOW) != -1 ) { int petindex = CHAR_getWorkInt( toindex, CHAR_WORKPETFOLLOW); if( CHAR_CHECKINDEX(petindex) ) { int parent_dir; /* 阂及匏 午］褪及汹五蟆及匏 井日 轾毛菲户月 */ /* 汹仁 */ end.x = CHAR_getInt( toindex, CHAR_X); end.y = CHAR_getInt( toindex, CHAR_Y); start.x = CHAR_getInt( petindex, CHAR_X); start.y = CHAR_getInt( petindex, CHAR_Y); if( end.x > start.x ) end.x --; else if( end.x < start.x ) end.x ++; if( end.y > start.y ) end.y --; else if( end.y < start.y ) end.y ++; parent_dir = NPC_Util_getDirFromTwoPoint( &start,&end ); if( parent_dir != -1 ) { if( CHAR_walk( petindex, parent_dir, 0) == CHAR_WALKSUCCESSED ) { CHAR_setWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT, 1 + CHAR_getWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT) ); if( CHAR_getWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT) > 1000 ){ CHAR_setWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT, 0); CHAR_pickupFollowPet( toindex, petindex ); } } } }else { CHAR_setWorkInt( toindex, CHAR_WORKPETFOLLOW, -1); } } #endif } } else { /* 赓渝祭仄卅云允 */ CHAR_setWorkInt( index, i+CHAR_WORKPARTYINDEX1, -1); } } } #if 1 // Robin 0702 petFollow if( CHAR_getWorkInt( index, CHAR_WORKPETFOLLOW) != -1 ) { int petindex = CHAR_getWorkInt( index, CHAR_WORKPETFOLLOW); if( CHAR_CHECKINDEX(petindex) ) { int parent_dir; /* 阂及匏 午］褪及汹五蟆及匏 井日 轾毛菲户月 */ /* 汹仁 */ end.x = CHAR_getInt( index, CHAR_X); end.y = CHAR_getInt( index, CHAR_Y); start.x = CHAR_getInt( petindex, CHAR_X); start.y = CHAR_getInt( petindex, CHAR_Y); if( end.x > start.x ) end.x --; else if( end.x < start.x ) end.x ++; if( end.y > start.y ) end.y --; else if( end.y < start.y ) end.y ++; parent_dir = NPC_Util_getDirFromTwoPoint( &start,&end ); //if( (end.x == start.x) && (end.x == start.y) ) // parent_dir = -1; /* 弘仿犯奴它旦左皿扑亦件汹五毛 蜇允月啃卞］ * 戚及阂反蟆及阂及 毛馨丹方丹卞允月 */ //print(" pdir:%d sx:%d sy:%d ex:%d ey:%d ", // parent_dir, start.x, start.y, end.x, end.y ); //end = start; if( parent_dir != -1 ) { if( CHAR_walk( petindex, parent_dir, 0) == CHAR_WALKSUCCESSED ) { CHAR_setWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT, 1 + CHAR_getWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT) ); if( CHAR_getWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT) > 1000 ) { /* CHAR_setInt( petindex, CHAR_VARIABLEAI, 200 + CHAR_getInt( petindex, CHAR_VARIABLEAI) ); */ CHAR_setWorkInt( petindex, CHAR_WORKPETFOLLOWCOUNT, 0); CHAR_pickupFollowPet( index, petindex ); } } } } else { /* 赓渝祭仄卅云允 */ CHAR_setWorkInt( index, CHAR_WORKPETFOLLOW, -1); } } #endif } } /* 99/03/09 By Kawata */ /* walk及瑛绊｝WALKARRAY互弁伉失今木化中月桦宁互丐月及匹 * 潸曰 仄化戊疋月 */ strcpysafe( tmp ,sizeof(tmp), CHAR_getWorkChar(index,CHAR_WORKWALKARRAY)); if( strlen( tmp) > 0 ) { CHAR_setWorkChar(index,CHAR_WORKWALKARRAY,&tmp[1]); } /* 凛棉毛褡户月 */ CHAR_setWorkInt( index, CHAR_WORKWALKSTARTSEC , NowTime.tv_sec ); CHAR_setWorkInt( index, CHAR_WORKWALKSTARTMSEC , NowTime.tv_usec ); } /*------------------------------------------------------------ * 汹五铵户毛瓒 允月［ * 娄醒 * index int 平乓仿 匹及奶件犯永弁旦 * dir char* 轾 侬 * id int ID * 忒曰袄 * 卅仄 ------------------------------------------------------------*/ void CHAR_walk_start(int index, int x, int y, char* dir, BOOL mapsendmode ) { if( !CHAR_CHECKINDEX( index ) )return; // Nuke 08/27: Stop wap /* { int ox, oy; const int seesiz = MAP_CHAR_DEFAULTSEESIZ; ox = CHAR_getInt(index,CHAR_X); oy = CHAR_getInt(index,CHAR_Y); if ( ABS(x - ox) > seesiz || ABS(y - oy) > seesiz ) { CHAR_talkToCli(index, -1, "因座标错误而断线。", CHAR_COLORYELLOW); CONNECT_setCloseRequest_debug(getfdFromCharaIndex(index) , 1); return; } } */ if( CHAR_getFlg( index,CHAR_ISDIE ) )return; CHAR_setWorkChar( index,CHAR_WORKWALKARRAY, dir ); CHAR_setWorkInt( index, CHAR_WORKWALKSTARTSEC , NowTime.tv_sec ); CHAR_setWorkInt( index, CHAR_WORKWALKSTARTMSEC , NowTime.tv_usec ); CHAR_setMyPosition( index, x, y, FALSE); if( mapsendmode ) { int ox,oy; char buf[64]; int len; int i; strcpysafe( buf, sizeof(buf), CHAR_getWorkChar( index, CHAR_WORKWALKARRAY)); len = strlen( buf ); ox = CHAR_getInt(index,CHAR_X); oy = CHAR_getInt(index,CHAR_Y); for( i = 0; i < len; i ++ ) { int dir,mode; int fx,fy; CHAR_ctodirmode( buf[i], &dir ,&mode ); if( mode == 0 ) { CHAR_getCoordinationDir( dir,ox,oy,1,&fx,&fy); ox = fx; oy = fy; } } CHAR_sendMapAtWalk(index, CHAR_getInt( index, CHAR_FLOOR), CHAR_getInt( index, CHAR_X), CHAR_getInt( index, CHAR_Y), ox,oy); } if( strlen( dir ) >= 1 ) CHAR_walkcall( index ); } /*------------------------------------------------------------ * 汹五及 赓 * 娄醒 * index int 平乓仿 匹及奶件犯永弁旦 * dir char* 轾 侬 * id int ID * 忒曰袄 * 卅仄 ------------------------------------------------------------*/ void CHAR_walk_init( int fd, int x, int y, char *direction, BOOL mapsendmode) { if( strlen( direction) > 32) { print( "walkarray length over\n"); return; } // Nuke +1 : For acceleration avoidance if (checkWalkTime(fd) < 0) { CONNECT_setCloseRequest(fd,1); print("Walk drop "); return; } if( CHAR_getWorkInt( CONNECT_getCharaindex(fd), CHAR_WORKBATTLEMODE) != BATTLE_CHARMODE_NONE){ return ; } if( CHAR_getWorkInt( CONNECT_getCharaindex(fd), CHAR_WORKPARTYMODE ) != CHAR_PARTY_CLIENT ){ CHAR_walk_start( CONNECT_getCharaindex(fd), x, y, direction, mapsendmode ); }else { int dir, mode; CHAR_ctodirmode( direction[0], &dir ,&mode ); if( mode == 0 ) { //print( "玩家并非领队也非单人玩家。\n"); }else { CHAR_walk_start( CONNECT_getCharaindex(fd), x,y,direction, FALSE ); } } } void CHAR_sendCharaAtWalk( int charaindex, int of,int ox,int oy,int xflg, int yflg ) { int fd = -1; int i,j,fl, x, y; char introduction[512]; //char c_msg[1024*96]; char c_msg[5][1024*6]; int strpos[5] = {0,0,0,0,0}; int seesiz = CHAR_DEFAULTSEESIZ/2; char cabuf[128]; char myintroduction[512]; int whichtype; whichtype = CHAR_getInt( charaindex, CHAR_WHICHTYPE); if( whichtype == CHAR_TYPEPLAYER) { fd = getfdFromCharaIndex( charaindex ); if( fd == -1 )return; } if( xflg > 1 || xflg < -1 ) { print( "%s:%d: arg err[xflg]\n",__FILE__, __LINE__); return; } if( yflg > 1 || yflg < -1 ) { print( "%s:%d: arg err[yflg]\n",__FILE__, __LINE__); return; } fl = CHAR_getInt( charaindex, CHAR_FLOOR); x = CHAR_getInt( charaindex, CHAR_X); y = CHAR_getInt( charaindex, CHAR_Y); if( of != fl || ABS(x - ox) > seesiz/2 || ABS(y - oy) > seesiz/2 ) return; memset(c_msg[0], 0, sizeof(c_msg[0])); memset(c_msg[1], 0, sizeof(c_msg[1])); memset(c_msg[2], 0, sizeof(c_msg[2])); memset(c_msg[3], 0, sizeof(c_msg[3])); memset(c_msg[4], 0, sizeof(c_msg[4])); c_msg[0][0] = '\0'; c_msg[1][0] = '\0'; c_msg[2][0] = '\0'; c_msg[3][0] = '\0'; c_msg[4][0] = '\0'; if( !CHAR_makeObjectCString( CHAR_getWorkInt( charaindex, CHAR_WORKOBJINDEX), myintroduction, sizeof( myintroduction))){ myintroduction[0] = '\0'; } if( xflg != 0) { i = x + seesiz * xflg; for( j = y-seesiz ; j <= y+seesiz ;j ++ ) { OBJECT object; for( object = MAP_getTopObj(fl,i,j) ; object ; object = NEXT_OBJECT(object ) ){ int introlen; int objindex = GET_OBJINDEX(object); int c_index = OBJECT_getIndex( objindex); if( OBJECT_getType(objindex) == OBJTYPE_NOUSE ) continue; if( OBJECT_getType(objindex) == OBJTYPE_CHARA && !CHAR_getFlg(OBJECT_getIndex(objindex), CHAR_ISVISIBLE) ){ continue; } if( strlen( myintroduction) != 0 ) { if( OBJECT_getType( objindex) == OBJTYPE_CHARA ) { if( CHAR_getInt( c_index, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER ) { int tofd = getfdFromCharaIndex( c_index ); CDsend( tofd); lssproto_C_send( tofd, myintroduction); } } } if( whichtype == CHAR_TYPEPLAYER) { /* Make C*/ if( CHAR_makeObjectCString( objindex, introduction, sizeof( introduction))){ introlen = strlen( introduction); introduction[introlen] = ','; introduction[introlen+1] = '\0'; //strcpysafe( &c_msg[strpos], sizeof( c_msg) - strpos, introduction); //strpos += strlen( introduction); if(strpos[0]+strlen( introduction)<=5120){ strcpysafe( &c_msg[0][strpos[0]], sizeof( c_msg[0]) - strpos[0], introduction); strpos[0] += strlen( introduction); }else if(strpos[1]+strlen( introduction)<=5120){ strcpysafe( &c_msg[1][strpos[1]], sizeof( c_msg[0]) - strpos[1], introduction); strpos[1] += strlen( introduction); }else if(strpos[2]+strlen( introduction)<=5120){ strcpysafe( &c_msg[2][strpos[2]], sizeof( c_msg[2]) - strpos[2], introduction); strpos[2] += strlen( introduction); }else if(strpos[3]+strlen( introduction)<=5120){ strcpysafe( &c_msg[3][strpos[3]], sizeof( c_msg[3]) - strpos[3], introduction); strpos[3] += strlen( introduction); }else if(strpos[4]+strlen( introduction)<=5120){ strcpysafe( &c_msg[4][strpos[4]], sizeof( c_msg[4]) - strpos[4], introduction); strpos[4] += strlen( introduction); } } if( OBJECT_getType(objindex) == OBJTYPE_CHARA ) { if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( c_index, CHAR_WORKPARTYMODE ) == CHAR_PARTY_LEADER ){ if( CHAR_makeCAOPT1String( objindex, cabuf, sizeof( cabuf), CHAR_ACTLEADER,1 )){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE ) == CHAR_PARTY_LEADER && CHAR_getWorkInt( c_index, CHAR_WORKBATTLEMODE) == BATTLE_CHARMODE_NONE){ int tofd = getfdFromCharaIndex( c_index ); if( tofd != -1 ) { if( CHAR_makeCAOPT1String( CHAR_getWorkInt( charaindex, CHAR_WORKOBJINDEX), cabuf, sizeof( cabuf), CHAR_ACTLEADER,1 )){ CONNECT_appendCAbuf( tofd,cabuf,strlen(cabuf)); } } } if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( c_index, CHAR_WORKBATTLEMODE ) != BATTLE_CHARMODE_NONE ){ if( CHAR_getWorkInt( c_index, CHAR_WORKBATTLEWATCH) == TRUE ) { if( CHAR_makeCAOPT1String( objindex, cabuf, sizeof( cabuf), CHAR_ACTBATTLEWATCH, 1)){ CONNECT_appendCAbuf( fd, cabuf, strlen( cabuf)); } }else { int battleno = CHAR_getWorkInt( c_index, CHAR_WORKBATTLEINDEX); int sideno = CHAR_getWorkInt( c_index,CHAR_WORKBATTLESIDE); int helpno; if( !BATTLE_CHECKINDEX( battleno) ) { //print(" %s[%d]: BATTLE_CHECKINDEX( %d) err!!\n", __FILE__, __LINE__, battleno); }else { helpno = (BattleArray[ battleno].Side[ sideno].flg & BSIDE_FLG_HELP_OK) ? TRUE:FALSE; /* HelpNo = 1 反移 */ if( CHAR_makeCAOPT3String( objindex, cabuf, sizeof( cabuf), CHAR_ACTBATTLE, battleno,sideno,helpno )){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } } } if( ( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER || CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPET ) && CHAR_getWorkInt( c_index, CHAR_WORKACTION ) != -1 ) { if( CHAR_makeCADefaultString( objindex, cabuf, sizeof( cabuf), CHAR_getWorkInt( c_index, CHAR_WORKACTION))){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } #ifdef _ADD_ACTION else if( CHAR_getWorkInt( c_index, CHAR_WORKACTION ) > 0 ) { if( CHAR_makeCADefaultString( objindex, cabuf, sizeof( cabuf), CHAR_getWorkInt( c_index, CHAR_WORKACTION))){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } #endif #ifdef _STREET_VENDOR if(CHAR_getInt(c_index,CHAR_WHICHTYPE) == CHAR_TYPEPLAYER && CHAR_getWorkInt(c_index,CHAR_WORKSTREETVENDOR) == 1 && CHAR_getWorkInt(c_index,CHAR_WORKBATTLEMODE) == BATTLE_CHARMODE_NONE){ if(CHAR_makeCAOPTString(objindex,cabuf,sizeof(cabuf), CHAR_STREETVENDOR_OPEN,CHAR_getWorkChar(c_index,CHAR_STREETVENDOR_NAME))){ CONNECT_appendCAbuf(fd,cabuf,strlen(cabuf)); } } #endif #ifdef _ANGEL_SUMMON if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( c_index, CHAR_WORKANGELMODE ) == TRUE ){ if( CHAR_makeCAOPT1String( objindex, cabuf, sizeof( cabuf), CHAR_ACTANGEL,1 )){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } #endif } } } } } if( yflg != 0) { j = y + seesiz * yflg; for( i = x-seesiz ; i <= x+seesiz ;i ++ ) { OBJECT object; for( object = MAP_getTopObj(fl,i,j) ; object ; object = NEXT_OBJECT(object ) ){ int introlen; int objindex = GET_OBJINDEX(object); int c_index = OBJECT_getIndex( objindex); if( OBJECT_getType(objindex) == OBJTYPE_NOUSE ) continue; if( OBJECT_getType(objindex) == OBJTYPE_CHARA && !CHAR_getFlg(OBJECT_getIndex(objindex), CHAR_ISVISIBLE) ){ if(!CHAR_CHECKINDEX(OBJECT_getIndex(objindex))){ printf("自动删除一个问题对象！"); endObjectOne(objindex); } continue; } if( strlen( myintroduction) != 0 ) { if( OBJECT_getType( objindex) == OBJTYPE_CHARA ) { if( CHAR_getInt( c_index, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER ) { int tofd = getfdFromCharaIndex( c_index ); CDsend( tofd); lssproto_C_send( tofd, myintroduction); } } } if( whichtype == CHAR_TYPEPLAYER ) { /* Make C*/ if( CHAR_makeObjectCString( objindex, introduction, sizeof( introduction))){ introlen = strlen( introduction); introduction[introlen] = ','; introduction[introlen+1] = '\0'; //strcpysafe( &c_msg[strpos], sizeof( c_msg) - strpos, introduction); //strpos += strlen( introduction); if(strpos[0]+strlen( introduction)<=5120){ strcpysafe( &c_msg[0][strpos[0]], sizeof( c_msg[0]) - strpos[0], introduction); strpos[0] += strlen( introduction); }else if(strpos[1]+strlen( introduction)<=5120){ strcpysafe( &c_msg[1][strpos[1]], sizeof( c_msg[0]) - strpos[1], introduction); strpos[1] += strlen( introduction); }else if(strpos[2]+strlen( introduction)<=5120){ strcpysafe( &c_msg[2][strpos[2]], sizeof( c_msg[2]) - strpos[2], introduction); strpos[2] += strlen( introduction); }else if(strpos[3]+strlen( introduction)<=5120){ strcpysafe( &c_msg[3][strpos[3]], sizeof( c_msg[3]) - strpos[3], introduction); strpos[3] += strlen( introduction); }else if(strpos[4]+strlen( introduction)<=5120){ strcpysafe( &c_msg[4][strpos[4]], sizeof( c_msg[4]) - strpos[4], introduction); strpos[4] += strlen( introduction); } } if( OBJECT_getType(objindex) == OBJTYPE_CHARA ) { if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( c_index, CHAR_WORKPARTYMODE ) == CHAR_PARTY_LEADER ){ if( CHAR_makeCAOPT1String( objindex, cabuf, sizeof( cabuf), CHAR_ACTLEADER,1 )){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE ) == CHAR_PARTY_LEADER && CHAR_getWorkInt( c_index, CHAR_WORKBATTLEMODE)== BATTLE_CHARMODE_NONE){ int tofd = getfdFromCharaIndex( c_index ); if( tofd != -1 ) { if( CHAR_makeCAOPT1String( CHAR_getWorkInt( charaindex, CHAR_WORKOBJINDEX), cabuf, sizeof( cabuf), CHAR_ACTLEADER,1 )){ CONNECT_appendCAbuf( tofd,cabuf,strlen(cabuf)); } } } if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( c_index, CHAR_WORKBATTLEMODE ) != BATTLE_CHARMODE_NONE ){ if( CHAR_getWorkInt( c_index, CHAR_WORKBATTLEWATCH) == TRUE ) { if( CHAR_makeCAOPT1String( objindex, cabuf, sizeof( cabuf), CHAR_ACTBATTLEWATCH,1)){ CONNECT_appendCAbuf( fd, cabuf, strlen( cabuf)); } }else { int battleno = CHAR_getWorkInt( c_index, CHAR_WORKBATTLEINDEX); int sideno = CHAR_getWorkInt( c_index, CHAR_WORKBATTLESIDE); int helpno = (BattleArray[CHAR_getWorkInt( c_index, CHAR_WORKBATTLEINDEX)].Side[ CHAR_getWorkInt( c_index, CHAR_WORKBATTLESIDE)].flg & BSIDE_FLG_HELP_OK) ? TRUE:FALSE; if( CHAR_makeCAOPT3String( objindex, cabuf, sizeof( cabuf), CHAR_ACTBATTLE, battleno,sideno,helpno )){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } } if( ( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER || CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPET ) && CHAR_getWorkInt( c_index, CHAR_WORKACTION ) != -1 ) { if( CHAR_makeCADefaultString( objindex, cabuf, sizeof( cabuf), CHAR_getWorkInt( c_index, CHAR_WORKACTION))){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } #ifdef _ADD_ACTION else if( CHAR_getWorkInt( c_index, CHAR_WORKACTION ) > 0 ) { if( CHAR_makeCADefaultString( objindex, cabuf, sizeof( cabuf), CHAR_getWorkInt( c_index, CHAR_WORKACTION))){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } #endif #ifdef _STREET_VENDOR if(CHAR_getInt(c_index,CHAR_WHICHTYPE) == CHAR_TYPEPLAYER && CHAR_getWorkInt(c_index,CHAR_WORKSTREETVENDOR) == 1 && CHAR_getWorkInt(c_index,CHAR_WORKBATTLEMODE) == BATTLE_CHARMODE_NONE){ if(CHAR_makeCAOPTString(objindex,cabuf,sizeof(cabuf), CHAR_STREETVENDOR_OPEN,CHAR_getWorkChar(c_index,CHAR_STREETVENDOR_NAME))){ CONNECT_appendCAbuf(fd,cabuf,strlen(cabuf)); } } #endif #ifdef _ANGEL_SUMMON if( CHAR_getInt( c_index, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER && CHAR_getWorkInt( c_index, CHAR_WORKANGELMODE ) == TRUE ){ if( CHAR_makeCAOPT1String( objindex, cabuf, sizeof( cabuf), CHAR_ACTANGEL,1 )){ CONNECT_appendCAbuf( fd,cabuf,strlen(cabuf)); } } #endif } } } } } dchop( c_msg[0], "," ); dchop( c_msg[1], "," ); dchop( c_msg[2], "," ); dchop( c_msg[3], "," ); dchop( c_msg[4], "," ); if( strlen( c_msg[0]) == 0 ) return; //print("\nc_msg[0]=%s,strpos[0]=%d\n",c_msg[0],strpos[0]); lssproto_C_send( fd, c_msg[0]); if(strlen( c_msg[1]) > 0){ //print("\nc_msg[1]=%s,strpos[1]=%d\n",c_msg[1],strpos[1]); lssproto_C_send( fd, c_msg[1]); } if(strlen( c_msg[2]) > 0){ //print("\nc_msg[2]=%s,strpos[2]=%d\n",c_msg[2],strpos[2]); lssproto_C_send( fd, c_msg[2]); } if(strlen( c_msg[3]) > 0){ //print("\nc_msg[3]=%s,strpos[3]=%d\n",c_msg[3],strpos[3]); lssproto_C_send( fd, c_msg[3]); } if(strlen( c_msg[4]) > 0){ //print("\nc_msg[4]=%s,strpos[4]=%d\n",c_msg[4],strpos[4]); lssproto_C_send( fd, c_msg[4]); }//修复人多关闭外挂 } static void CHAR_sendCDCharaAtWalk( int charaindex, int of, int ox, int oy, int xflg, int yflg ){ int i,j,fl, x, y; int seesiz = CHAR_DEFAULTSEESIZ/2; int fd, tofd; if( xflg > 1 || xflg < -1 ) { print( "%s:%d: arg err[xflg]\n",__FILE__, __LINE__); return; } if( yflg > 1 || yflg < -1 ) { print( "%s:%d: arg err[yflg]\n",__FILE__, __LINE__); return; } fl = CHAR_getInt( charaindex, CHAR_FLOOR); x = CHAR_getInt( charaindex, CHAR_X); y = CHAR_getInt( charaindex, CHAR_Y); if( of != fl || /* 白夫失互啜丹 */ ABS(x - ox) > seesiz/2 || /* 犒互 五中 */ ABS(y - oy) > seesiz/2 ) /* 犒互 五中 */ return; fd = getfdFromCharaIndex( charaindex ); if( xflg != 0) { i = x + (seesiz * xflg + xflg)*-1; for( j = y-seesiz +(yflg*-1) ; j <= y+seesiz +(yflg*-1) ;j ++ ) { OBJECT object; for( object = MAP_getTopObj(fl,i,j) ; object ; object = NEXT_OBJECT(object ) ) { int objindex = GET_OBJINDEX(object); char buf[64]; if( OBJECT_getType(objindex) == OBJTYPE_NOUSE ) continue; if( OBJECT_getType(objindex) == OBJTYPE_CHARA && !CHAR_getFlg(OBJECT_getIndex(objindex), CHAR_ISVISIBLE) ){ if(!CHAR_CHECKINDEX(OBJECT_getIndex(objindex))){ printf("自动删除一个问题对象！"); endObjectOne(objindex); } continue; } if( fd != -1) { cnv10to62( objindex, buf, sizeof( buf)); CONNECT_appendCDbuf( fd, buf, strlen( buf)); } if( OBJECT_getType( objindex) == OBJTYPE_CHARA) { int tocharaindex = OBJECT_getIndex( objindex); if( CHAR_getInt( tocharaindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER ) { if( CHAR_getWorkInt( tocharaindex, CHAR_WORKBATTLEMODE) == BATTLE_CHARMODE_NONE ) { tofd = getfdFromCharaIndex( tocharaindex ); if( tofd != -1 ) { cnv10to62( CHAR_getWorkInt( charaindex, CHAR_WORKOBJINDEX), buf, sizeof( buf)); CONNECT_appendCDbuf( tofd, buf, strlen( buf)); CAsend( tofd); CDsend( tofd); } } } } } } } if( yflg != 0) { j = y + (seesiz * yflg + yflg)*-1; for( i = x-seesiz + (xflg*-1) ; i <= x+seesiz + (xflg*-1) ;i ++ ) { OBJECT object; for( object = MAP_getTopObj(fl,i,j) ; object ; object = NEXT_OBJECT(object ) ){ int objindex = GET_OBJINDEX(object); char buf[64]; if( OBJECT_getType(objindex) == OBJTYPE_NOUSE ) continue; if( OBJECT_getType(objindex) == OBJTYPE_CHARA && !CHAR_getFlg(OBJECT_getIndex(objindex), CHAR_ISVISIBLE) ){ continue; } if( fd != -1 ) { cnv10to62( objindex, buf, sizeof( buf)); CONNECT_appendCDbuf( fd, buf, strlen( buf)); } if( OBJECT_getType( objindex) == OBJTYPE_CHARA) { int tocharaindex = OBJECT_getIndex( objindex); if( CHAR_getInt( tocharaindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER ){ if( CHAR_getWorkInt( tocharaindex, CHAR_WORKBATTLEMODE) == BATTLE_CHARMODE_NONE ){ tofd = getfdFromCharaIndex( tocharaindex ); if( tofd != -1 ) { cnv10to62( CHAR_getWorkInt( charaindex, CHAR_WORKOBJINDEX), buf, sizeof( buf)); CONNECT_appendCDbuf( tofd, buf, strlen( buf)); CAsend( tofd); CDsend( tofd); } } } } } } } CDsend( fd); } void CHAR_ctodirmode(char moji , int* dir , int* mode) { *mode = 1; if( 'a' <= moji && moji <= 'h' )*mode = 0; *dir = tolower(moji) - 'a'; } #ifdef _CAX_LNS_NLGSUOXU CHAR_WALKRET CHAR_walk_jc( int charaindex, int of, int ox, int oy, int dir ) { int i; int fx,fy,ff; int objbuf[128]; int objbufindex=0; int notover=FALSE; int retvalue=CHAR_WALKSUCCESSED; if( !CHAR_CHECKINDEX( charaindex )) return CHAR_WALKSYSTEMERROR; CHAR_getCoordinationDir( dir,ox,oy,1,&fx,&fy); ff = of; if( CHAR_getInt( charaindex,CHAR_WHICHTYPE ) == CHAR_TYPEENEMY ){ RECT walkr; POINT nextp; int npccreateindex; npccreateindex = CHAR_getInt( charaindex,CHAR_NPCCREATEINDEX ); if( CHAR_isInvincibleArea( ff,fx,fy)) { CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALKEXTEND; return retvalue; } if( NPC_isBoundarySet( npccreateindex ) && NPC_createGetRECT( npccreateindex,&walkr ) == TRUE ) { nextp.x = fx; nextp.y = fy; if( PointInRect( &walkr,&nextp ) == FALSE ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALKEXTEND; return retvalue; } }else{ ; } } if( CHAR_getFlg( charaindex, CHAR_ISBIG ) == 1 ){ static POINT offset[5]={ { 0,-1}, {-1, 0}, { 0, 0}, { 1, 0}, { 0, 1}, }; int k; for( k=0 ; k<5; k++ ){ if( !MAP_walkAble( charaindex, ff, fx+offset[k].x, fy+offset[k].y )){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; return retvalue; } } }else{ if( CHAR_getDX(dir)*CHAR_getDY(dir) == 0 ){ if( !MAP_walkAble( charaindex,ff, fx, fy ) ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; return retvalue; } }else{ int xflg,yflg; if( !MAP_walkAble( charaindex,ff, fx, fy ) ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; return retvalue; } xflg = MAP_walkAble( charaindex,of, ox+CHAR_getDX(dir), oy ); yflg = MAP_walkAble( charaindex,of, ox, oy+CHAR_getDY(dir) ); if( !xflg || !yflg ) { CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALK1357; return retvalue; } } } objbufindex = CHAR_getSameCoordinateObjects( objbuf, arraysizeof( objbuf ), ff,fx,fy ); for( i = 0 ; i < objbufindex ; i ++ ){ int objindex= objbuf[i]; switch( OBJECT_getType(objindex) ){ case OBJTYPE_CHARA: if( !CHAR_getFlg( OBJECT_getIndex(objindex),CHAR_ISOVERED) ){ if(!CHAR_CHECKINDEX(OBJECT_getIndex(objindex))){ printf("自动删除一个问题对象！"); endObjectOne(objindex); break; } notover= TRUE; } break; case OBJTYPE_ITEM: if( !ITEM_getInt( OBJECT_getIndex(objindex), ITEM_ISOVERED ) ) notover= TRUE; break; case OBJTYPE_GOLD: break; default: break; } } if( notover == TRUE ){ CHAR_setInt(charaindex,CHAR_DIR,dir); retvalue = CHAR_WALKHITOBJECT; return retvalue; }else{ for( i = 0 ; i < objbufindex ; i ++ ){ typedef void (*PREOFUNC)(int,int); PREOFUNC pfunc=NULL; int objindex=objbuf[i]; switch( OBJECT_getType(objindex) ){ case OBJTYPE_CHARA: pfunc = (PREOFUNC)CHAR_getFunctionPointer( OBJECT_getIndex(objindex), CHAR_PREOVERFUNC); break; case OBJTYPE_ITEM: pfunc = (PREOFUNC)ITEM_getFunctionPointer( OBJECT_getIndex(objindex), ITEM_PREOVERFUNC); break; case OBJTYPE_GOLD: break; default: break; } if( pfunc )pfunc( OBJECT_getIndex(objindex),charaindex ); } CHAR_setInt(charaindex,CHAR_X,fx); CHAR_setInt(charaindex,CHAR_Y,fy); CHAR_setInt(charaindex,CHAR_FLOOR,ff); CHAR_setInt(charaindex,CHAR_DIR,dir); { int objindex; int ox,oy,of; objindex = CHAR_getWorkInt( charaindex,CHAR_WORKOBJINDEX ); of = OBJECT_setFloor(objindex, CHAR_getInt(charaindex,CHAR_FLOOR)); ox = OBJECT_setX(objindex,CHAR_getInt(charaindex,CHAR_X)); oy = OBJECT_setY(objindex,CHAR_getInt(charaindex,CHAR_Y)); if( !MAP_objmove( objindex, of,ox,oy,ff,fx,fy ) ){ /* 仇氏卅氏升丹仄方丹手卅中 */ fprint( "ERROR MAP_OBJMOVE objindex=%d(%s)\n",objindex, CHAR_getUseName( charaindex ) ); } } CHAR_setInt(charaindex,CHAR_WALKCOUNT, CHAR_getInt(charaindex,CHAR_WALKCOUNT) + 1 ); for( i = 0 ; i < objbufindex ; i ++ ){ typedef void (*POSTOFUNC)(int,int); POSTOFUNC pfunc=NULL; int objindex=objbuf[i]; switch( OBJECT_getType(objindex) ){ case OBJTYPE_CHARA: pfunc = (POSTOFUNC)CHAR_getFunctionPointer( OBJECT_getIndex(objindex), CHAR_POSTOVERFUNC); break; case OBJTYPE_ITEM: pfunc = (POSTOFUNC)ITEM_getFunctionPointer( OBJECT_getIndex(objindex), ITEM_POSTOVERFUNC); break; case OBJTYPE_GOLD: break; default: break; } if( pfunc )pfunc( OBJECT_getIndex(objindex),charaindex ); } objbufindex = CHAR_getSameCoordinateObjects(objbuf, arraysizeof(objbuf), of, ox, oy ); for( i=0 ;i 0 ) { CHAR_setWorkInt( charaindex, CHAR_WORK_TOHELOS_COUNT, count -1); if( count -1 == 0 ) { //CHAR_talkToCli( charaindex, -1, "道具的效力已到。", CHAR_COLORWHITE); } } par = ENCOUNT_getEncountPercentMin( charaindex, of,ox,oy); if( par != -1 ) { if( CHAR_getWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MIN) != par ){ flg = TRUE; CHAR_setWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MIN, par); } } par = ENCOUNT_getEncountPercentMax( charaindex, of,ox,oy); if( par != -1 ) { if( CHAR_getWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MAX) != par ){ flg = TRUE; CHAR_setWorkInt( charaindex, CHAR_WORKENCOUNTPROBABILITY_MAX, par); } } // Arminius 7.12 login announce /* { int enfd = getfdFromCharaIndex( charaindex ); if (CONNECT_get_announced(enfd)==0) { // Robin 0720 //AnnounceToPlayer(charaindex); AnnounceToPlayerWN( enfd ); CONNECT_set_announced(enfd,1); } } */ // Arminius 6.22 check Encounter // Nuke 0622: Provide No Enemy function { int enfd = getfdFromCharaIndex( charaindex ); int eqen = getEqNoenemy( enfd ); // Arminius 7.2: Ra's amulet int noen = getNoenemy(enfd); // Arminius 7.31 cursed stone if (getStayEncount(enfd)>0) { clearStayEncount(enfd); } //print("\n enfd=%d,eqen=%d,noen=%d", enfd, eqen, noen); // Arminius 7.2 Ra's amulet if (eqen>=200) { noen=1; } else if (eqen>=120) { if ((ff==100)||(ff==200)||(ff==300)||(ff==400)||(ff==500)) noen=1; } else if (eqen>=80) { if ((ff==100)||(ff==200)||(ff==300)||(ff==400)) noen=1; } else if (eqen>=40) { if ((ff==100)||(ff==200)) noen=1; } //print("\n noen=%d", noen); if (noen==0) { int maxep = CHAR_getWorkInt(charaindex, CHAR_WORKENCOUNTPROBABILITY_MAX); int minep = CHAR_getWorkInt(charaindex, CHAR_WORKENCOUNTPROBABILITY_MIN); int cep = CONNECT_get_CEP(enfd); #ifdef _PROFESSION_SKILL // WON ADD 人物职业技能 int temp=0; int p_cep = CHAR_getWorkInt(charaindex, CHAR_ENCOUNT_FIX); if( p_cep != 0 ){ if( CHAR_getWorkInt( charaindex, CHAR_ENCOUNT_NUM) < (int)time(NULL) ){ CHAR_talkToCli( charaindex, -1, "技能效用结束。", CHAR_COLORYELLOW); CHAR_setWorkInt( charaindex, CHAR_ENCOUNT_FIX, 0); CHAR_setWorkInt( charaindex, CHAR_ENCOUNT_NUM, 0); } temp = cep * (100 + p_cep ) / 100; }else{ temp = cep; } #endif if (cepmaxep) cep=maxep; if (CHAR_getWorkInt(charaindex,CHAR_WORKBATTLEMODE)==BATTLE_CHARMODE_NONE) { int entflag=1; { int objindex,index; OBJECT obj; for ( obj = MAP_getTopObj( ff, fx, fy); obj; obj = NEXT_OBJECT( obj)) { objindex = GET_OBJINDEX( obj); if (OBJECT_getType( objindex) == OBJTYPE_CHARA) { int etype; index = OBJECT_getIndex( objindex); if (!CHAR_CHECKINDEX( index)) continue; if( CHAR_getInt( index, CHAR_WHICHTYPE) == CHAR_TYPENPCENEMY && CHAR_getWorkInt( index, CHAR_WORKEVENTTYPE) == CHAR_EVENT_ENEMY ) { CHAR_setInt( charaindex, CHAR_X, ox); CHAR_setInt( charaindex, CHAR_Y, oy); lssproto_XYD_send( getfdFromCharaIndex(charaindex), CHAR_getInt( charaindex, CHAR_X ), CHAR_getInt( charaindex, CHAR_Y ), CHAR_getInt( charaindex, CHAR_DIR ) ); break; } etype = CHAR_getWorkInt( index, CHAR_WORKEVENTTYPE); if (etype!=CHAR_EVENT_NONE) { if (etype==CHAR_EVENT_WARP) entflag=0; } } } } #ifdef _PROFESSION_SKILL // WON ADD 人物职业技能 #ifdef _ENEMY_ACTION if( rand()%(120*getEnemyAction()) < temp ){ #else if( rand()%120 < temp ){ #endif #else #ifdef _ENEMY_ACTION if( rand()%(120*getEnemyAction()) < cep ){ #else if (rand()%120 0 ) { int Rnum=0; int RandEnemy = getEqRandenemy( enfd); Rnum = RAND(0,100); if( Rnum > RandEnemy ) { #endif //encounter!! cep = minep; lssproto_EN_recv(enfd, CHAR_getInt(charaindex,CHAR_X), CHAR_getInt(charaindex,CHAR_Y)); #ifdef _Item_MoonAct } }else{ cep = minep; lssproto_EN_recv(enfd, CHAR_getInt(charaindex,CHAR_X), CHAR_getInt(charaindex,CHAR_Y)); } #endif } } else { if (cep