381 lines
10 KiB
C
381 lines
10 KiB
C
#include "version.h"
|
|
#include <string.h>
|
|
#include "object.h"
|
|
#include "char_base.h"
|
|
#include "char.h"
|
|
#include "map_deal.h"
|
|
#include "readmap.h"
|
|
#include "npccreate.h"
|
|
#include "npcutil.h"
|
|
#include "handletime.h"
|
|
#include "npc_eventaction.h"
|
|
|
|
//#define _RECORD_NPCMAN_ //纪录
|
|
|
|
BOOL NPC_TimeWarpCheck(int meindex,char *buf,int mode);
|
|
|
|
static void NPC_WarpsetNeverMake( int charaindex )
|
|
{
|
|
int cindex;
|
|
cindex = CHAR_getInt(charaindex,CHAR_NPCCREATEINDEX);
|
|
if( NPC_CHECKCREATEINDEX(cindex) )
|
|
NPC_create[cindex].workdata[NPC_CREATEWORKNEVERMAKE] = 1;
|
|
}
|
|
|
|
BOOL NPC_WarpInit( int charaindex )
|
|
{
|
|
char arg[NPC_UTIL_GETARGSTR_BUFSIZE];
|
|
int ret;
|
|
int floor=-1,x=-1,y=-1;
|
|
char token[128];
|
|
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
char evtype[256];
|
|
char evtime[256];
|
|
char argfile[256];
|
|
|
|
if( NPC_Util_CheckAssignArgFile( charaindex, argfile) == NULL )
|
|
sprintf( argfile, "NULL");
|
|
#endif
|
|
|
|
CHAR_setInt( charaindex, CHAR_WHICHTYPE , CHAR_TYPEWARP );
|
|
if( NPC_Util_GetArgStr( charaindex, arg, sizeof( arg)) == NULL ) {
|
|
print("\n GetArgStr ERR!!");
|
|
return FALSE;
|
|
}
|
|
#ifdef _NEW_WARPPOINT
|
|
if( strstr( arg, "FREEMORE") != NULL ) {
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
sprintf( evtype, "FREE");
|
|
sprintf( evtime, "NULL");
|
|
#endif
|
|
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP);
|
|
}else {
|
|
#endif
|
|
#ifdef _MAP_WARPPOINT
|
|
return FALSE;
|
|
#endif
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
sprintf( evtype, "NONE");
|
|
#endif
|
|
ret=getStringFromIndexWithDelim(arg,"|", 1,token,sizeof(token));
|
|
if( ret ) floor = atoi( token );
|
|
ret=getStringFromIndexWithDelim(arg,"|", 2,token,sizeof(token));
|
|
if( ret ) x = atoi( token );
|
|
ret=getStringFromIndexWithDelim(arg,"|", 3,token,sizeof(token));
|
|
if( ret ) y = atoi( token );
|
|
if( MAP_IsValidCoordinate( floor,x,y )== FALSE ){
|
|
NPC_WarpsetNeverMake( charaindex );
|
|
//print( "Warp NPC:Invalid arg:%s\n", arg );
|
|
print( "Warp Npc Err:%d:%d:%d->(%s)\n",
|
|
CHAR_getInt( charaindex, CHAR_FLOOR ),
|
|
CHAR_getInt( charaindex, CHAR_X ),
|
|
CHAR_getInt( charaindex, CHAR_Y ),
|
|
arg );
|
|
return FALSE;
|
|
}
|
|
ret=getStringFromIndexWithDelim(arg,"|",4,token,sizeof(token));
|
|
if(ret==TRUE){
|
|
int day;
|
|
day=NPC_TimeWarpCheck(charaindex,token,0);
|
|
if(day==0){
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
sprintf( evtime, "N");
|
|
#endif
|
|
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP_NIGHT);
|
|
}else if(day==1){
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
sprintf( evtime, "M");
|
|
#endif
|
|
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP_MORNING);
|
|
}else if(day==2){
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
sprintf( evtime, "A");
|
|
#endif
|
|
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP_NOON);
|
|
}else{
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
sprintf( evtime, "NULL");
|
|
#endif
|
|
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP);
|
|
}
|
|
}else{
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
sprintf( evtime, "NULL");
|
|
#endif
|
|
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP);
|
|
}
|
|
#ifdef _NEW_WARPPOINT
|
|
}
|
|
#endif
|
|
CHAR_setFlg( charaindex,CHAR_ISVISIBLE, 0 );
|
|
CHAR_setFlg( charaindex,CHAR_ISOVERED,1 );
|
|
CHAR_setFlg( charaindex,CHAR_ISATTACKED,0 );
|
|
CHAR_setFlg( charaindex,CHAR_ISATTACK,0 );
|
|
|
|
#ifdef _RECORD_NPCMAN_ //纪录
|
|
{
|
|
FILE *fp=NULL;
|
|
char filename[256];
|
|
sprintf( filename,"./data/npc/%s", "mapwarp.txt");
|
|
if( (fp = fopen( filename, "a+")) != NULL ) {
|
|
fprintf( fp, "%s:%s:%d,%d,%d:%d,%d,%d:%s\n",
|
|
evtype, evtime,
|
|
CHAR_getInt( charaindex, CHAR_FLOOR),
|
|
CHAR_getInt( charaindex, CHAR_X),
|
|
CHAR_getInt( charaindex, CHAR_Y),
|
|
floor, x, y, argfile );
|
|
fclose( fp);
|
|
}else {
|
|
}
|
|
}
|
|
#endif
|
|
return TRUE;
|
|
}
|
|
|
|
void NPC_WarpWarpCharacter( int warpnpcindex, int charaindex )
|
|
{
|
|
char arg[NPC_UTIL_GETARGSTR_BUFSIZE];
|
|
int i=0;
|
|
#ifdef _NEW_WARPPOINT
|
|
char buf1[256], buf2[256], buf3[256], freemsg[256];
|
|
BOOL nBefind = FALSE;
|
|
struct wapepoints {
|
|
int m_floor;
|
|
int m_x;
|
|
int m_y;
|
|
}Wpoint[10]={
|
|
{-1,0,0}, {-1,0,0}, {-1,0,0}, {-1,0,0}, {-1,0,0},
|
|
{-1,0,0}, {-1,0,0}, {-1,0,0}, {-1,0,0}, {-1,0,0}
|
|
};
|
|
int iRand=0;
|
|
#endif
|
|
if( CHAR_getInt( charaindex,CHAR_WHICHTYPE ) != CHAR_TYPEPLAYER ){
|
|
return;
|
|
}
|
|
|
|
if( NPC_Util_GetArgStr( warpnpcindex, arg, sizeof( arg)) == NULL ){
|
|
return;
|
|
}
|
|
|
|
{
|
|
char token[16];
|
|
int floor=0,x=0,y=0;
|
|
int ret;
|
|
|
|
#ifdef _NEW_WARPPOINT
|
|
i=1;
|
|
if( strstr( arg, "FREEMORE") != NULL ) {
|
|
int k=1, pw=-1;
|
|
while( getStringFromIndexWithDelim( arg, "OVER", i, buf1, sizeof( buf1)) != FALSE ) {
|
|
i++;
|
|
if( NPC_Util_GetStrFromStrWithDelim( buf1, "FREE", buf2, sizeof( buf2)) == NULL )
|
|
continue;
|
|
if( NPC_ActionPassCheck( warpnpcindex, charaindex, buf2) == FALSE ) {
|
|
continue;
|
|
}else {
|
|
iRand=0;
|
|
if( NPC_Util_GetStrFromStrWithDelim( buf1, "TO", buf2, sizeof( buf2)) != FALSE ) {
|
|
k=1;
|
|
while( getStringFromIndexWithDelim( buf2, "&", k, freemsg, sizeof( freemsg)) != FALSE ){
|
|
k++;
|
|
if( getStringFromIndexWithDelim( freemsg, ",", 1, buf3, sizeof( buf3)) == FALSE )
|
|
break;
|
|
Wpoint[iRand].m_floor = atoi( buf3);
|
|
if( getStringFromIndexWithDelim( freemsg, ",", 2, buf3, sizeof( buf3)) == FALSE )
|
|
break;
|
|
Wpoint[iRand].m_x = atoi( buf3);
|
|
if( getStringFromIndexWithDelim( freemsg, ",", 3, buf3, sizeof( buf3)) == FALSE )
|
|
break;
|
|
Wpoint[iRand].m_y = atoi( buf3);
|
|
iRand++;
|
|
nBefind = TRUE;
|
|
if( iRand >= arraysizeof( Wpoint))
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
if( nBefind == TRUE )
|
|
break;
|
|
}
|
|
|
|
if( nBefind == FALSE || iRand <= 0){ //没找到条件
|
|
floor = CHAR_getInt( warpnpcindex, CHAR_FLOOR);
|
|
x = CHAR_getInt( warpnpcindex, CHAR_X);
|
|
y = CHAR_getInt( warpnpcindex, CHAR_Y);
|
|
}else {
|
|
pw = RAND( 0, (iRand-1));
|
|
floor = Wpoint[pw].m_floor;
|
|
x = Wpoint[pw].m_x;
|
|
y = Wpoint[pw].m_y;
|
|
if( NPC_Util_GetStrFromStrWithDelim( arg, "CHECKPARTY", buf1, sizeof( buf1)) != NULL ) {
|
|
if( strstr( buf1, "TRUE") != NULL ){
|
|
if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE ) == CHAR_PARTY_LEADER ) {
|
|
CHAR_DischargeParty( charaindex, 0); // 拆队
|
|
}
|
|
}
|
|
}
|
|
if( MAP_IsValidCoordinate( floor,x,y )== FALSE ){
|
|
print( "*Warp NPC:Invalid %d %d %d" , floor,x,y );
|
|
return;
|
|
}
|
|
k=0;
|
|
}
|
|
}else {
|
|
#endif
|
|
ret=getStringFromIndexWithDelim(arg,"|", 1,token,sizeof(token));
|
|
if( ret == FALSE )return;
|
|
floor = atoi( token );
|
|
|
|
ret=getStringFromIndexWithDelim(arg,"|", 2,token,sizeof(token));
|
|
if( ret == FALSE )return;
|
|
x = atoi( token );
|
|
|
|
ret=getStringFromIndexWithDelim(arg,"|", 3,token,sizeof(token));
|
|
if( ret == FALSE )return;
|
|
y = atoi( token );
|
|
#ifdef _NEW_WARPPOINT
|
|
}
|
|
#endif
|
|
{
|
|
int ff=floor;
|
|
|
|
int of=CHAR_getInt(charaindex, CHAR_FLOOR);
|
|
int fd=CHAR_getWorkInt( charaindex, CHAR_WORKFD);
|
|
int eqen=getEqNoenemy(fd);
|
|
if (eqen<200) {
|
|
if (eqen>=120) {
|
|
if ((ff==100)||(ff==200)||(ff==300)||(ff==400)||(ff==500)) {
|
|
if ((of!=100)&&(of!=200)&&(of!=300)&&(of!=400)&&(of!=500)) {
|
|
CHAR_talkToCli(charaindex, -1,
|
|
"太阳神的首饰发出一道奇异的光芒，隐藏了你的行踪。", CHAR_COLORWHITE);
|
|
}
|
|
} else {
|
|
if ((of==100)||(of==200)||(of==300)||(of==400)||(of==500)) {
|
|
CHAR_talkToCli(charaindex, -1, "环绕着你的光芒消失了。", CHAR_COLORWHITE);
|
|
}
|
|
}
|
|
} else if (eqen>=80) {
|
|
if ((ff==100)||(ff==200)||(ff==300)||(ff==400)) {
|
|
if ((of!=100)&&(of!=200)&&(of!=300)&&(of!=400)) {
|
|
CHAR_talkToCli(charaindex, -1,
|
|
"太阳神的首饰发出一道奇异的光芒，隐藏了你的行踪。", CHAR_COLORWHITE);
|
|
}
|
|
} else {
|
|
if ((of==100)||(of==200)||(of==300)||(of==400)) {
|
|
CHAR_talkToCli(charaindex, -1, "环绕着你的光芒消失了。", CHAR_COLORWHITE);
|
|
}
|
|
}
|
|
} else if (eqen>=40) {
|
|
if ((ff==100)||(ff==200)) {
|
|
if ((of!=100)&&(of!=200)) {
|
|
CHAR_talkToCli(charaindex, -1,
|
|
"太阳神的首饰发出一道奇异的光芒，隐藏了你的行踪。", CHAR_COLORWHITE);
|
|
}
|
|
} else {
|
|
if ((of==100)||(of==200)) {
|
|
CHAR_talkToCli(charaindex, -1, "环绕着你的光芒消失了。", CHAR_COLORWHITE);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
#ifdef _DROPSTAKENEW
|
|
{
|
|
i = 0;
|
|
for (i = 0; i < MAXSTAKENUM; i++){
|
|
if (CHAR_getWorkInt(charaindex, CHAR_WORKSTAKETYPE1 + i) > 0){
|
|
char tmpbuf[256];
|
|
snprintf(tmpbuf, sizeof(tmpbuf), "由於你离开了房间，所以将无法取回彩券！");
|
|
CHAR_setWorkInt(charaindex, CHAR_WORKSTAKETYPE1 + i, 0);
|
|
CHAR_talkToCli(charaindex, -1, tmpbuf, CHAR_COLORYELLOW);
|
|
}
|
|
}
|
|
CHAR_setWorkInt(charaindex, CHAR_WORKSTAKEFLAG, 0);
|
|
#ifdef _FIX_GAMBLENUM
|
|
if(CHAR_getInt(charaindex, CHAR_GAMBLENUM) < 0)
|
|
CHAR_setInt(charaindex, CHAR_GAMBLENUM, 0);
|
|
#endif
|
|
}
|
|
#endif
|
|
if( floor == -1) {
|
|
return;
|
|
}else {
|
|
if( MAP_IsValidCoordinate( floor,x,y )== FALSE ){
|
|
print( "Warp NPC:Invalid %d %d %d" , floor,x,y );
|
|
return;
|
|
}
|
|
|
|
CHAR_warpToSpecificPoint(charaindex, floor, x, y);
|
|
}
|
|
}
|
|
}
|
|
|
|
void NPC_WarpWatch( int meobjindex, int objindex, CHAR_ACTION act,
|
|
int x,int y,int dir, int* opt,int optlen )
|
|
{
|
|
int meindex,moveindex;
|
|
if( OBJECT_getType( objindex ) != OBJTYPE_CHARA )return;
|
|
|
|
meindex = OBJECT_getIndex(meobjindex);
|
|
moveindex = OBJECT_getIndex(objindex);
|
|
|
|
if( CHAR_getInt( moveindex,CHAR_WHICHTYPE ) != CHAR_TYPEPLAYER ){
|
|
return;
|
|
}
|
|
if( act != CHAR_ACTWALK )return;
|
|
|
|
if( opt[0] == x && opt[1] == y )return;
|
|
if( CHAR_getInt(meindex,CHAR_X) == x && CHAR_getInt(meindex,CHAR_Y) == y ) {
|
|
NPC_WarpWarpCharacter( meindex, moveindex );
|
|
}
|
|
}
|
|
|
|
void NPC_WarpPostOver( int meindex, int charaindex )
|
|
{
|
|
NPC_WarpWarpCharacter( meindex, charaindex );
|
|
}
|
|
|
|
int NPC_WarpSearchByPosition( int fl , int x, int y)
|
|
{
|
|
OBJECT object;
|
|
for( object=MAP_getTopObj(fl,x,y) ; object ;
|
|
object=NEXT_OBJECT(object)){
|
|
int objindex = GET_OBJINDEX(object);
|
|
if( OBJECT_getType( objindex ) == OBJTYPE_CHARA
|
|
&& CHAR_getInt( OBJECT_getIndex(objindex), CHAR_WHICHTYPE)
|
|
== CHAR_TYPEWARP ){
|
|
return OBJECT_getIndex(objindex);
|
|
}
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
|
|
int NPC_TimeWarpCheck(int meindex,char *buf,int mode)
|
|
{
|
|
LSTIME nowlstime;
|
|
char *time[4]={"N","M","A"};
|
|
int now;
|
|
int i=0;
|
|
RealTimeToLSTime( NowTime.tv_sec, &nowlstime);
|
|
now = getLSTime( &nowlstime);
|
|
if(mode==0){
|
|
for( i=0 ; i < 3 ; i++){
|
|
if(strstr( buf,time[i]) != NULL){
|
|
return i;
|
|
}
|
|
}
|
|
return -1;;
|
|
}
|
|
if(mode==1){
|
|
if(now==CHAR_getWorkInt( meindex, CHAR_WORKEVENTTYPE)){
|
|
return now;
|
|
}
|
|
return -1;
|
|
}
|
|
return -1;
|
|
}
|