?? npc_warp.c
字號(hào):
#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_ //紀(jì)錄
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_ //紀(jì)錄
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_ //紀(jì)錄
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_ //紀(jì)錄
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_ //紀(jì)錄
sprintf( evtime, "N");
#endif
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP_NIGHT);
}else if(day==1){
#ifdef _RECORD_NPCMAN_ //紀(jì)錄
sprintf( evtime, "M");
#endif
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP_MORNING);
}else if(day==2){
#ifdef _RECORD_NPCMAN_ //紀(jì)錄
sprintf( evtime, "A");
#endif
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP_NOON);
}else{
#ifdef _RECORD_NPCMAN_ //紀(jì)錄
sprintf( evtime, "NULL");
#endif
CHAR_setWorkInt( charaindex, CHAR_WORKEVENTTYPE, CHAR_EVENT_WARP);
}
}else{
#ifdef _RECORD_NPCMAN_ //紀(jì)錄
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_ //紀(jì)錄
{
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){ //沒(méi)找到條件
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); // 拆隊(duì)
}
}
}
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,
"太陽(yáng)神的首飾發(fā)出一道奇異的光芒，隱藏了你的行蹤。", CHAR_COLORWHITE);
}
} else {
if ((of==100)||(of==200)||(of==300)||(of==400)||(of==500)) {
CHAR_talkToCli(charaindex, -1, "環(huán)繞著你的光芒消失了。", 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,
"太陽(yáng)神的首飾發(fā)出一道奇異的光芒，隱藏了你的行蹤。", CHAR_COLORWHITE);
}
} else {
if ((of==100)||(of==200)||(of==300)||(of==400)) {
CHAR_talkToCli(charaindex, -1, "環(huán)繞著你的光芒消失了。", CHAR_COLORWHITE);
}
}
} else if (eqen>=40) {
if ((ff==100)||(ff==200)) {
if ((of!=100)&&(of!=200)) {
CHAR_talkToCli(charaindex, -1,
"太陽(yáng)神的首飾發(fā)出一道奇異的光芒，隱藏了你的行蹤。", CHAR_COLORWHITE);
}
} else {
if ((of==100)||(of==200)) {
CHAR_talkToCli(charaindex, -1, "環(huán)繞著你的光芒消失了。", 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), "由於你離開(kāi)了房間，所以將無(wú)法取回彩券！");
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;
}
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -