chuyiwen_gmsv/npc/npc_fmletter.c
2017-01-14 00:37:03 +09:00

680 lines
18 KiB
C

#include "version.h"
#include <string.h>
#include "char.h"
#include "object.h"
#include "char_base.h"
#include "npcutil.h"
#include "configfile.h"
#include "lssproto_serv.h"
#include "saacproto_cli.h"
#include "npc_fmletter.h"
#include "family.h"
#include "log.h"
extern struct FM_POINTLIST fmpointlist;
char sendbuf[1024];
char buf[1024];
char subbuf[128];
int i, j;
/*
* 涩烂今木凶它奴件玉它毛请允NPC
* 棵哑 平旦玄失玉矛件民乓□仁日中卅日综木月井手[
*
*/
struct {
int windowno;
int windowtype;
int buttontype;
int takeitem;
int giveitem;
char message[4096];
int letter;
}w;
struct {
BOOL use;
int checkhaveitem;
int checkhaveitemgotowin;
int checkdonthaveitem;
int checkdonthaveitemgotowin;
int warp;
int battle;
int gotowin;
}buttonproc[13]; /* ok,cancel, yes,no,prev,next 及凛及质 */
enum {
CHAR_WORK_MSGCOLOR = CHAR_NPCWORKINT1,
};
static void NPC_FmLetter_selectWindow( int meindex, int toindex, int num);
static BOOL NPC_FmLetter_readData( int meindex, int windowno, BOOL chkflg);
static int NPC_FmLetter_restoreButtontype( char *data );
/*********************************
* 赓渝质
*********************************/
BOOL NPC_FmLetterInit( int meindex )
{
char argstr[NPC_UTIL_GETARGSTR_BUFSIZE];
char buf[1024];
//int i;
//char secondToken[1024];
// Robin test
// print(" fmleter_Init ");
NPC_Util_GetArgStr( meindex, argstr, sizeof( argstr));
if( NPC_Util_GetStrFromStrWithDelim( argstr, "conff", buf, sizeof( buf))
== NULL )
{
print( "fmletter:没有指定设定的档案 。\n");
return FALSE;
}
/* 赓渝凛卞涩烂犯□正毛民尼永弁仄化支月 */
if( !NPC_FmLetter_readData( meindex, -1, TRUE) ) {
return FALSE;
}
CHAR_setInt( meindex , CHAR_WHICHTYPE , CHAR_TYPEWINDOWMAN );
return TRUE;
}
/*********************************
* 仄井仃日木凶凛及质
*********************************/
void NPC_FmLetterTalked( int meindex , int talkerindex , char *szMes ,int color )
{
//print(" FmLetter_fmindex:%d ", CHAR_getInt( meindex, CHAR_FMINDEX) );
int fmindex = 0, village, i;
char token[256];
char buf[256];
for( i=0 ; i<FMPOINTNUM ; i++ ) {
getStringFromIndexWithDelim(fmpointlist.pointlistarray[i], "|", 9, token, sizeof(token));
village = atoi(token);
if( village == CHAR_getInt( meindex, CHAR_FMINDEX ) ) {
getStringFromIndexWithDelim(fmpointlist.pointlistarray[i], "|", 5, token, sizeof(token));
fmindex = atoi(token);
break;
}
}
#ifdef _FMVER21
if( CHAR_getInt( talkerindex, CHAR_FMLEADERFLAG ) == FMMEMBER_LEADER
#else
if( CHAR_getInt( talkerindex, CHAR_FMLEADERFLAG ) == 1
#endif
&& CHAR_getInt( talkerindex, CHAR_FMINDEX ) == fmindex )
NPC_FmLetter_selectWindow( meindex, talkerindex, 1 );
else
//NPC_FmLetter_selectWindow( meindex, talkerindex, 2 );
lssproto_WN_send( getfdFromCharaIndex( talkerindex ), WINDOW_MESSAGETYPE_MESSAGE,
WINDOW_BUTTONTYPE_OK,
-1, -1,
makeEscapeString( "\n只有本庄园的族长才能制作邀请函及同意书!", buf, sizeof(buf)));
}
/*********************************
* 苇日木凶凛及质
*********************************/
void NPC_FmLetterLooked( int meindex , int lookedindex)
{
//print(" Look:me:%d,looked:%d ",meindex,lookedindex);
NPC_FmLetter_selectWindow( meindex, lookedindex,1 );
}
static void NPC_FmLetter_selectWindow( int meindex, int toindex, int num)
{
int fd;
char buf[256];
/* 皿伊奶乩□卞覆仄化分仃 杀允月 */
if( CHAR_getInt( toindex , CHAR_WHICHTYPE ) != CHAR_TYPEPLAYER ) {
return;
}
/* ㄠ弘伉永玉动 及心 */
if( !NPC_Util_charIsInFrontOfChar( toindex, meindex, 1 )) return;
if( !NPC_FmLetter_readData( meindex, num, FALSE) ) {
print( "fmletter:readdata error\n");
return;
}
fd = getfdFromCharaIndex( toindex);
if( fd != -1 ) {
lssproto_WN_send( fd, w.windowtype,
w.buttontype,
w.windowno+100,
CHAR_getWorkInt( meindex, CHAR_WORKOBJINDEX),
makeEscapeString( w.message, buf, sizeof(buf)));
}
}
void NPC_FmLetterWindowTalked( int meindex, int talkerindex,
int seqno, int select, char *data)
{
int button = -1;
char buf[512];
/* ㄠ弘伉永玉动 及心 */
if( NPC_Util_CharDistance( talkerindex, meindex ) > 1) return;
/* 仇及它奴件玉它 寞及犯□正毛 心 戈 */
if( !NPC_FmLetter_readData( meindex, seqno - 100, FALSE) ) {
print( "fmletter:readdata error\n");
return;
}
/* 瓷仄凶示正件毛譬屯月 */
if( w.windowtype == WINDOW_MESSAGETYPE_SELECT ) {
button = atoi( data)+5;
if( button > 12 ) {
print( "fmletter:invalid button[%d]\n", button);
return;
}
}
else if( select & WINDOW_BUTTONTYPE_OK) button = 0;
else if( select & WINDOW_BUTTONTYPE_CANCEL) button = 1;
else if( select & WINDOW_BUTTONTYPE_YES) button = 2;
else if( select & WINDOW_BUTTONTYPE_NO) button = 3;
else if( select & WINDOW_BUTTONTYPE_PREV) button = 4;
else if( select & WINDOW_BUTTONTYPE_NEXT) button = 5;
else {
print( "fmletter:invalid button[%d]\n", select);
return;
}
if( buttonproc[button].use == TRUE ) {
int fd;
int newwin = -1;
fd = getfdFromCharaIndex( talkerindex);
/* 示正件卞方匀化质 毛孔曰歹仃月 */
if( newwin == -1 ) {
newwin = buttonproc[button].gotowin;
}
// Robin
if( newwin == 5 ) {
int emptyitemindexinchara = CHAR_findEmptyItemBox( talkerindex );
int itemindex = ITEM_makeItemAndRegist( w.letter );
if( emptyitemindexinchara < 0 ) return;
if( itemindex != -1 ){
char msgbuf[128];
CHAR_setItemIndex( talkerindex, emptyitemindexinchara, itemindex );
/* Work犯□正毛涩烂 */
ITEM_setWorkInt(itemindex, ITEM_WORKOBJINDEX,-1);
ITEM_setWorkInt(itemindex, ITEM_WORKCHARAINDEX, talkerindex);
CHAR_sendItemDataOne( talkerindex, emptyitemindexinchara);
LogItem(
CHAR_getChar( talkerindex, CHAR_NAME ), /* 平乓仿 */
CHAR_getChar( talkerindex, CHAR_CDKEY ),
#ifdef _add_item_log_name // WON ADD 在item的log中增加item名称
itemindex,
#else
ITEM_getInt( itemindex, ITEM_ID ), /* 失奶 丞 寞 */
#endif
"AddLetter(制作邀请函)",
CHAR_getInt( talkerindex,CHAR_FLOOR),
CHAR_getInt( talkerindex,CHAR_X ),
CHAR_getInt( talkerindex,CHAR_Y ),
ITEM_getChar( itemindex, ITEM_UNIQUECODE),
ITEM_getChar( itemindex, ITEM_NAME),
ITEM_getInt( itemindex, ITEM_ID)
);
snprintf( msgbuf, sizeof( msgbuf), "制作%s成功。",
ITEM_getChar( itemindex, ITEM_NAME));
CHAR_talkToCli( talkerindex, -1,msgbuf, CHAR_COLORWHITE);
}
}
// Robin
if( newwin == 6 ) {
int emptyitemindexinchara = CHAR_findEmptyItemBox( talkerindex );
int itemindex = ITEM_makeItemAndRegist( w.letter );
if( emptyitemindexinchara < 0 ) return;
if( itemindex != -1 ){
char msgbuf[128];
CHAR_setItemIndex( talkerindex, emptyitemindexinchara, itemindex );
/* Work犯□正毛涩烂 */
ITEM_setWorkInt(itemindex, ITEM_WORKOBJINDEX,-1);
ITEM_setWorkInt(itemindex, ITEM_WORKCHARAINDEX, talkerindex);
CHAR_sendItemDataOne( talkerindex, emptyitemindexinchara);
LogItem(
CHAR_getChar( talkerindex, CHAR_NAME ), /* 平乓仿 */
CHAR_getChar( talkerindex, CHAR_CDKEY ),
#ifdef _add_item_log_name // WON ADD 在item的log中增加item名称
itemindex,
#else
ITEM_getInt( itemindex, ITEM_ID ), /* 失奶 丞 寞 */
#endif
"AddLetter(制作邀请函)",
CHAR_getInt( talkerindex,CHAR_FLOOR),
CHAR_getInt( talkerindex,CHAR_X ),
CHAR_getInt( talkerindex,CHAR_Y ),
ITEM_getChar( itemindex, ITEM_UNIQUECODE),
ITEM_getChar( itemindex, ITEM_NAME),
ITEM_getInt( itemindex, ITEM_ID)
);
snprintf( msgbuf, sizeof( msgbuf), "制作%s成功。",
ITEM_getChar( itemindex, ITEM_NAME));
CHAR_talkToCli( talkerindex, -1,msgbuf, CHAR_COLORWHITE);
}
}
if( !NPC_FmLetter_readData( meindex, newwin, FALSE) ) {
print( "fmletter:readdata error\n");
return;
}
//fd = getfdFromCharaIndex( talkerindex);
if( fd != -1 ) {
lssproto_WN_send( fd, w.windowtype,
w.buttontype,
w.windowno+100,
CHAR_getWorkInt( meindex, CHAR_WORKOBJINDEX),
makeEscapeString( w.message, buf, sizeof(buf)));
}
}
}
/*
* 涩烂白央奶伙毛 氏匹隙烂今木凶windowno及犯□正毛本永玄允月
*
* 娄醒“
* meindex int 仇及NPC及charaindex
* windowno int 它奴件玉它 寞
*
*/
static BOOL NPC_FmLetter_readData( int meindex, int windowno, BOOL chkflg)
{
int i;
int linenum = 0;
int endflg = FALSE;
int buttonendflg;
int winno = -1;
int buttonconfmode;
int b_mode;
int selectnum ;
int messagepos;
BOOL errflg = FALSE;
BOOL readflg = TRUE;
FILE *fp;
char argstr[NPC_UTIL_GETARGSTR_BUFSIZE];
char filename[64];
char opfile[128];
char line[1024];
char firstToken[1024];
char secondToken[1024];
/* 它奴件玉它及涩烂毛 曰 戈厌瞻 */
NPC_Util_GetArgStr( meindex, argstr, sizeof( argstr));
/* 涩烂白央奶伙 潸 */
NPC_Util_GetStrFromStrWithDelim( argstr, "conff", filename, sizeof( filename));
sprintf( opfile, "%s/", getNpcdir( ) );
strcat( opfile, filename);
fp = fopen( opfile, "r");
if( fp == NULL ) {
print( "fmletter:file open error [%s]\n", opfile);
return FALSE;
}
while( readflg == TRUE ) {
endflg = FALSE;
buttonendflg = TRUE;
buttonconfmode = FALSE;
selectnum = 0;
messagepos = 0;
winno = -1;
b_mode = -1;
errflg = FALSE;
/* 赓渝祭 */
w.windowno = -1;
w.windowtype = -1;
w.buttontype = -1;
w.takeitem = -1;
w.giveitem = -1;
w.message[0] = '\0';
for( i = 0; i < arraysizeof( buttonproc); i ++ ) {
buttonproc[i].use = FALSE;
buttonproc[i].checkhaveitem = -1;
buttonproc[i].checkhaveitemgotowin = -1;
buttonproc[i].checkdonthaveitem = -1;
buttonproc[i].checkdonthaveitemgotowin = -1;
buttonproc[i].warp = -1;
buttonproc[i].battle = -1;
buttonproc[i].gotowin = -1;
}
while( 1) {
char buf[256];
int ret;
if( !fgets( line, sizeof( line), fp)){
readflg = FALSE;
break;
}
linenum ++;
/* 戊丢件玄反 骰 */
if( line[0] == '#' || line[0] == '\n') continue;
/* 荼垫潸月 */
chomp( line );
/* 垫毛帮溥允月 */
/* 引内 tab 毛 " " 卞 五晶尹月 */
replaceString( line, '\t' , ' ' );
/* 燮 及旦矢□旦毛潸月[*/
for( i = 0; i < strlen( line); i ++) {
if( line[i] != ' ' ) {
break;
}
strcpy( buf, &line[i]);
}
if( i != 0 ) strcpy( line, buf);
/* delim "=" 匹 赓(1)及玄□弁件毛 月*/
ret = getStringFromIndexWithDelim( line, "=", 1, firstToken,
sizeof( firstToken ) );
if( ret == FALSE ){
print( "Find error at %s in line %d. Ignore\n",
filename , linenum);
continue;
}
/* delim "=" 匹2 及玄□弁件毛 月*/
ret = getStringFromIndexWithDelim( line, "=", 2, secondToken,
sizeof( secondToken ) );
if( ret == FALSE ){
print( "Find error at %s in line %d. Ignore\n",
filename , linenum);
continue;
}
if( strcasecmp( firstToken, "winno") == 0 ) {
if( winno != -1 ) {
print( "fmletter:已有winno却重新定义winno\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
errflg = TRUE;
readflg = FALSE;
break;
}
/* 它奴件玉它No毛忡绣 */
winno = atoi( secondToken);
continue;
}
/* 它奴件玉它No 互瑁引匀化中卅中凛及垫反 骰允月 */
if( winno == -1 ) {
print( "fmletter:winno 尚未定义,资料却已设定。\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
readflg = FALSE;
errflg = FALSE;
break;
}
/* 它奴件玉它No 互域谯仄凶凛反椭瘀毛 戈[
* 公木动陆反 骰允月 */
if( (chkflg == FALSE && winno == windowno )||
chkflg == TRUE)
{
if( buttonconfmode == TRUE ) {
if( strcasecmp( firstToken, "gotowin") == 0 ) {
buttonproc[b_mode].gotowin = atoi( secondToken);
}
else if( strcasecmp( firstToken, "checkhaveitem") == 0 ) {
buttonproc[b_mode].checkhaveitem = atoi( secondToken);
}
else if( strcasecmp( firstToken, "haveitemgotowin") == 0 ) {
buttonproc[b_mode].checkhaveitemgotowin = atoi( secondToken);
}
else if( strcasecmp( firstToken, "checkdonthaveitem") == 0 ) {
buttonproc[b_mode].checkdonthaveitem = atoi( secondToken);
}
else if( strcasecmp( firstToken, "donthaveitemgotowin") == 0 ) {
buttonproc[b_mode].checkdonthaveitemgotowin = atoi( secondToken);
}
else if( strcasecmp( firstToken, "endbutton") == 0 ) {
if( buttonproc[b_mode].gotowin == - 1 ) {
if( buttonproc[b_mode].checkhaveitem == -1 &&
buttonproc[b_mode].checkdonthaveitem == -1)
{
errflg = TRUE;
}
else {
/* 升匀切井井凶匀吊分仃匹手涩烂今木化中木壬 */
if( !((buttonproc[b_mode].checkhaveitem != -1 &&
buttonproc[b_mode].checkhaveitemgotowin != -1)
|| (buttonproc[b_mode].checkdonthaveitem != -1 &&
buttonproc[b_mode].checkdonthaveitemgotowin != -1)))
{
errflg = TRUE;
}
}
}
if( errflg == TRUE) {
print( "fmletter: 找不到gotowin\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
readflg = FALSE;
errflg = TRUE;
break;
}
buttonproc[b_mode].use = TRUE;
buttonconfmode = FALSE;
buttonendflg = TRUE;
}
}
else {
w.windowno = winno;
sprintf( buf, "letter%d", CHAR_getInt( meindex, CHAR_FMINDEX) );
/* 它奴件玉它正奶皿及涩烂 */
if( strcasecmp( firstToken, "wintype") == 0 ) {
w.windowtype = atoi( secondToken);
}
/* 示正件正奶皿及涩烂 */
else if( strcasecmp( firstToken, "buttontype") == 0 ) {
w.buttontype = NPC_FmLetter_restoreButtontype( secondToken);
}
/* getitem及涩烂 */
else if( strcasecmp( firstToken, "takeitem") == 0 ) {
w.takeitem = atoi( secondToken);
}
/* giveitem及涩烂 */
else if( strcasecmp( firstToken, "giveitem") == 0 ) {
w.giveitem = atoi( secondToken);
}
else if( strcasecmp( firstToken, buf) == 0 ) {
w.letter = atoi( secondToken);
}
/* message及涩烂 */
else if( strcasecmp( firstToken, "message") == 0 ) {
if( messagepos == 0 ) {
strcpy( w.message, secondToken);
messagepos = strlen( w.message);
}
else {
w.message[messagepos]='\n';
messagepos++;
strcpy( &w.message[messagepos], secondToken);
messagepos+=strlen(secondToken);
}
}
/* 示正件毛瓷仄凶凛及涩烂 */
else if( strcasecmp( firstToken, "okpressed") == 0 ) {
buttonconfmode = TRUE;
b_mode = 0;
buttonendflg = FALSE;
}
else if( strcasecmp( firstToken, "cancelpressed") == 0 ) {
buttonconfmode = TRUE;
b_mode = 1;
buttonendflg = FALSE;
}
else if( strcasecmp( firstToken, "yespressed") == 0 ) {
buttonconfmode = TRUE;
b_mode = 2;
buttonendflg = FALSE;
}
else if( strcasecmp( firstToken, "nopressed") == 0 ) {
buttonconfmode = TRUE;
b_mode = 3;
buttonendflg = FALSE;
}
else if( strcasecmp( firstToken, "prevpressed") == 0 ) {
buttonconfmode = TRUE;
b_mode = 4;
buttonendflg = FALSE;
}
else if( strcasecmp( firstToken, "nextpressed") == 0 ) {
buttonconfmode = TRUE;
b_mode = 5;
buttonendflg = FALSE;
}
else if( strcasecmp( firstToken, "selected") == 0 ) {
buttonconfmode = TRUE;
b_mode = 6 + selectnum;
buttonendflg = FALSE;
selectnum ++;
}
/* 涩烂蔽歹曰 */
else if( strcasecmp( firstToken, "endwin") == 0 ) {
endflg = TRUE;
if( chkflg == FALSE) {
readflg = FALSE;
}
break;
}
else {
//print( "fmletter:设定是不可能的参数\n");
//print( "filename:[%s] line[%d]\n", filename, linenum);
}
}
}
else {
if( strcasecmp( firstToken, "endwin") == 0 ) {
winno = -1;
}
}
}
if( buttonendflg == FALSE) {
print( "fmletter: 找不到endbutton\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
errflg = TRUE;
break;
}
if( winno != -1 ) {
if( w.windowtype == -1 ) {
print( "fmletter: 找不到wintype\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
errflg = TRUE;
break;
}
if( w.buttontype == -1 ) {
print( "fmletter: 找不到button\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
errflg = TRUE;
break;
}
if( strlen( w.message) == 0 ) {
print( "fmletter: 找不到message\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
errflg = TRUE;
break;
}
}
}
fclose( fp);
if( chkflg == FALSE && w.windowno == -1 ) {
print( "fmletter: 找不到所指定的windowno\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
return FALSE;
}
if( winno != -1 && endflg == FALSE) {
print( "fmletter: 找不到endwin\n");
print( "filename:[%s] line[%d]\n", filename, linenum);
return FALSE;
}
if( errflg == TRUE) return FALSE;
return TRUE;
}
/*
* buttontype=匹隙烂仄凶 侬 毛醒袄卞 晶允月[
*
*/
static int NPC_FmLetter_restoreButtontype( char *data )
{
int ret = 0;
int rc;
int i;
char buff[1024];
for( i = 1; ; i ++ ) {
rc = getStringFromIndexWithDelim( data, "|", i, buff,
sizeof( buff ) );
if( rc == FALSE) break;
if( strcasecmp( buff, "ok") == 0 ) {
ret |= WINDOW_BUTTONTYPE_OK;
}
else if( strcasecmp( buff, "cancel") == 0 ) {
ret |= WINDOW_BUTTONTYPE_CANCEL;
}
else if( strcasecmp( buff, "yes") == 0 ) {
ret |= WINDOW_BUTTONTYPE_YES;
}
else if( strcasecmp( buff, "no") == 0 ) {
ret |= WINDOW_BUTTONTYPE_NO;
}
else if( strcasecmp( buff, "prev") == 0 ) {
ret |= WINDOW_BUTTONTYPE_PREV;
}
else if( strcasecmp( buff, "next") == 0 ) {
ret |= WINDOW_BUTTONTYPE_NEXT;
}
}
if( ret == 0 ) {
ret = atoi( data);
}
return ret;
}