1908 lines
63 KiB
C
1908 lines
63 KiB
C
#include "version.h"
|
|
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#include <time.h>
|
|
//???
|
|
#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<objbufindex;i++){
|
|
typedef void (*OFFFUNC)(int,int);
|
|
OFFFUNC ofunc=NULL;
|
|
int objindex = objbuf[i];
|
|
|
|
switch( OBJECT_getType( objindex ) ){
|
|
case OBJTYPE_CHARA:
|
|
ofunc = (OFFFUNC)CHAR_getFunctionPointer( OBJECT_getIndex(objindex), CHAR_OFFFUNC);
|
|
break;
|
|
case OBJTYPE_ITEM:
|
|
/* 別に何もしない */
|
|
break;
|
|
case OBJTYPE_GOLD:
|
|
/* 別に何もしない */
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
if( ofunc )ofunc( OBJECT_getIndex(objindex), charaindex );
|
|
|
|
}
|
|
}
|
|
CHAR_AFTERWALK:
|
|
if( retvalue == CHAR_WALK1357 || retvalue == CHAR_WALKHITOBJECT ){
|
|
{
|
|
int opt[2] = { ox, oy};
|
|
CHAR_sendWatchEvent( CHAR_getWorkInt(charaindex,
|
|
CHAR_WORKOBJINDEX),
|
|
CHAR_ACTWALK,opt,2,TRUE );
|
|
}
|
|
CHAR_setWorkChar( charaindex, CHAR_WORKWALKARRAY, "");
|
|
if( CHAR_getInt( charaindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER) {
|
|
CHAR_sendWatchEvent( CHAR_getWorkInt(charaindex, CHAR_WORKOBJINDEX),
|
|
CHAR_ACTWARP,NULL,0,TRUE);
|
|
}
|
|
}else if( CHAR_getInt( charaindex, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER ){
|
|
|
|
BOOL flg = FALSE;
|
|
int par;
|
|
int count;
|
|
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( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE) == CHAR_PARTY_CLIENT ) {
|
|
CHAR_sendMapAtWalk( charaindex, of,
|
|
ox,oy,
|
|
CHAR_getInt( charaindex, CHAR_X),
|
|
CHAR_getInt( charaindex, CHAR_Y));
|
|
}
|
|
count = CHAR_getWorkInt( charaindex, CHAR_WORK_TOHELOS_COUNT);
|
|
if( count > 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 (cep<minep) cep=minep;
|
|
if (cep>maxep) 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<cep){ // Arminius 6.28 lower encounter prob.
|
|
#endif
|
|
#endif
|
|
if (entflag) {
|
|
#ifdef _Item_MoonAct
|
|
if( getEqRandenemy( enfd) > 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<maxep) cep++;
|
|
}
|
|
}
|
|
CONNECT_set_CEP(enfd, cep);
|
|
}
|
|
}
|
|
if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE )!= CHAR_PARTY_CLIENT ){
|
|
CHAR_setFlg( charaindex, CHAR_ISWARP, 0);
|
|
}
|
|
}
|
|
else if( CHAR_getInt( charaindex, CHAR_WHICHTYPE ) == CHAR_TYPEPET ||
|
|
CHAR_getInt( charaindex, CHAR_WHICHTYPE) == CHAR_TYPEBUS
|
|
#ifdef _GAMBLE_ROULETTE
|
|
|| CHAR_getInt( charaindex, CHAR_WHICHTYPE) == CHAR_GAMBLEROULETTE
|
|
#endif
|
|
#ifdef _PETRACE
|
|
|| CHAR_getInt(charaindex, CHAR_WHICHTYPE) == CHAR_PETRACEPET
|
|
#endif
|
|
#ifdef _ALLBLUES_LUA
|
|
|| CHAR_getInt(charaindex, CHAR_WHICHTYPE) >= 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<objbufindex;i++){
|
|
typedef void (*OFFFUNC)(int,int);
|
|
OFFFUNC ofunc=NULL;
|
|
int objindex = objbuf[i];
|
|
|
|
switch( OBJECT_getType( objindex ) ){
|
|
case OBJTYPE_CHARA:
|
|
ofunc = (OFFFUNC)CHAR_getFunctionPointer( OBJECT_getIndex(objindex), CHAR_OFFFUNC);
|
|
break;
|
|
case OBJTYPE_ITEM:
|
|
/* 別に何もしない */
|
|
break;
|
|
case OBJTYPE_GOLD:
|
|
/* 別に何もしない */
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
if( ofunc )ofunc( OBJECT_getIndex(objindex), charaindex );
|
|
|
|
}
|
|
}
|
|
CHAR_AFTERWALK:
|
|
if( retvalue == CHAR_WALK1357 || retvalue == CHAR_WALKHITOBJECT ){
|
|
{
|
|
int opt[2] = { ox, oy};
|
|
CHAR_sendWatchEvent( CHAR_getWorkInt(charaindex,
|
|
CHAR_WORKOBJINDEX),
|
|
CHAR_ACTWALK,opt,2,TRUE );
|
|
}
|
|
CHAR_setWorkChar( charaindex, CHAR_WORKWALKARRAY, "");
|
|
if( CHAR_getInt( charaindex, CHAR_WHICHTYPE) == CHAR_TYPEPLAYER) {
|
|
CHAR_sendWatchEvent( CHAR_getWorkInt(charaindex, CHAR_WORKOBJINDEX),
|
|
CHAR_ACTWARP,NULL,0,TRUE);
|
|
}
|
|
}else if( CHAR_getInt( charaindex, CHAR_WHICHTYPE ) == CHAR_TYPEPLAYER ){
|
|
|
|
BOOL flg = FALSE;
|
|
int par;
|
|
int count;
|
|
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( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE) == CHAR_PARTY_CLIENT ) {
|
|
CHAR_sendMapAtWalk( charaindex, of,
|
|
ox,oy,
|
|
CHAR_getInt( charaindex, CHAR_X),
|
|
CHAR_getInt( charaindex, CHAR_Y));
|
|
}
|
|
count = CHAR_getWorkInt( charaindex, CHAR_WORK_TOHELOS_COUNT);//什么道具的效力
|
|
if( count > 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 (cep<minep) cep=minep;
|
|
if (cep>maxep) 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<cep){ // Arminius 6.28 lower encounter prob.
|
|
#endif
|
|
#endif
|
|
if (entflag) {
|
|
#ifdef _Item_MoonAct
|
|
if( getEqRandenemy( enfd) > 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<maxep) cep++;
|
|
}
|
|
}
|
|
CONNECT_set_CEP(enfd, cep);
|
|
}
|
|
}
|
|
if( CHAR_getWorkInt( charaindex, CHAR_WORKPARTYMODE )!= CHAR_PARTY_CLIENT ){
|
|
CHAR_setFlg( charaindex, CHAR_ISWARP, 0);
|
|
}
|
|
}
|
|
else if( CHAR_getInt( charaindex, CHAR_WHICHTYPE ) == CHAR_TYPEPET ||
|
|
CHAR_getInt( charaindex, CHAR_WHICHTYPE) == CHAR_TYPEBUS
|
|
#ifdef _GAMBLE_ROULETTE
|
|
|| CHAR_getInt( charaindex, CHAR_WHICHTYPE) == CHAR_GAMBLEROULETTE
|
|
#endif
|
|
#ifdef _PETRACE
|
|
|| CHAR_getInt(charaindex, CHAR_WHICHTYPE) == CHAR_PETRACEPET
|
|
#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;
|
|
}
|
|
#endif
|