npc_petracemaster.c

石器时代2.0完整版源代码.已经加入新功能. 在REDHAT9下GCC3.4编译成功.

#include "version.h"
#include <string.h>
#include <time.h>
#include "char.h"
#include "object.h"
#include "char_base.h"
#include "npcutil.h"
#include "lssproto_serv.h"
#include "handletime.h"
 
#ifdef _PETRACE
#include "npc_petracemaster.h"

#define PETRACEPETNUM		3
#define PETRACEMASTER_INITPET_LOOPTIME			3000	// 3秒
#define PETRACEMASTER_WAITDROPI_LOOPTIME		30000	// 30秒
#define PETRACEMASTER_WAITDROPII_LOOPTIME		10000	// 10秒
#define PETRACEMASTER_WAITDROPIII_LOOPTIME	5000	// 5秒
#define PETRACEMASTER_WAITDROPIV_LOOPTIME		1000	// 1秒
#define PETRACEMASTER_PETRACING_LOOPTIME		3000	// 3秒
#define PETRACEMASTER_SHOWWINPET_LOOPTIME		10000	// 10秒
#define PETRACEDROPSTAKETIME						120	// 2分钟 120
#define PETRACESHOWWINPET							30		// 30秒
#define PETRACESTDPAYRATE							6
#define PETRACESTDGOLD								1		// 计算赔率时基本金额 1000

static void NPC_PetRaceMaster_selectWindow(int meindex, int toindex, int num, int select);
void NPC_findRacePetIndex(int meindex, int floor);
void NPC_givePriceToPlayer(int meindex, int floor, int winpetindex);

enum
{
	NPC_WORK_STATE =  CHAR_NPCWORKINT1,
	NPC_WORK_PET1 = CHAR_NPCWORKINT2,
	NPC_WORK_PET2 = CHAR_NPCWORKINT3,
	NPC_WORK_PET3 = CHAR_NPCWORKINT4,
	NPC_WORK_PETGROUP = CHAR_NPCWORKINT5,
	NPC_WORK_STATECHANGE = CHAR_NPCWORKINT6,
	NPC_WORK_FINDPETFLAG = CHAR_NPCWORKINT7,
	NPC_WORK_WINPET = CHAR_NPCWORKINT8,
	NPC_WORK_PETGOAL = CHAR_NPCWORKINT9,
};
enum
{
	NPC_State_Init,
	NPC_State_WaitDropStake,
	NPC_State_PetRacing,
	NPC_State_ShowWinPet,
};
enum
{
	NPC_State_Wait,
	NPC_State_Run,
	NPC_State_ShowWin,
};
typedef struct tagPetRaceGraTable
{
	int pet1gra;
	int pet2gra;
	int pet3gra;
	char pet1name[64];
	char pet2name[64];
	char pet3name[64];
	int pet1win;
	int pet2win;
	int pet3win;
#ifdef _DROPSTAKENEW
#else
	float payrate1;
	float payrate2;
	float payrate3;
#endif
	char state1[64];
	char state2[64];
	char state3[64];
}PetRaceGraTable;
#ifdef _DROPSTAKENEW
PetRaceGraTable petracegra[27] =
{
	{100820, 100821, 100822, "扑满乌力", "乌力莱德", "乌力固力", 0, 0, 0, "良好", "良好", "良好"},
	{100823, 100824, 100825, "布依布鲁", "布依布依", "布依胖", 0, 0, 0, "良好", "良好", "良好"},
	{100842, 100843, 100844, "尼加斯", "尼基斯", "特洛可斯", 0, 0, 0, "良好", "良好", "良好"},
	{100852, 100853, 100855, "克拉尔", "拉斯基", "克达达", 0, 0, 0, "良好", "良好", "良好"},
	{100859, 100856, 100857, "可卡特", "卡卡特", "昆依特", 0, 0, 0, "良好", "良好", "良好"},
	{100864, 100865, 100866, "蓝宝", "瑞德宝", "毛宝", 0, 0, 0, "良好", "良好", "良好"},
	{100829, 100826, 100827, "比比加", "加加", "加斯奥", 0, 0, 0, "良好", "良好", "良好"},
	{100830, 100832, 100833, "乌宝依", "威比", "乌拉拉", 0, 0, 0, "良好", "良好", "良好"},
	{100883, 100884, 100885, "尤里蛙", "裘里蛙", "艾尔蛙", 0, 0, 0, "良好", "良好", "良好"},
	{100898, 100900, 100901, "可可恩", "布兰恩", "迪布恩", 0, 0, 0, "良好", "良好", "良好"},
	{100834, 100836, 100837, "贝洛金", "贝洛贝", "贝洛波波", 0, 0, 0, "良好", "良好", "良好"},
	{100838, 100840, 100841, "蓝龟", "龟之钢", "卡拉龟", 0, 0, 0, "良好", "良好", "良好"},
	{100879, 100881, 100880, "迪加", "波波顿", "砂鲨", 0, 0, 0, "良好", "良好", "良好"},
	{100888, 100887, 100889, "莫拉司", "欧瑟菲", "玛斯特", 0, 0, 0, "良好", "良好", "良好"},
	{100913, 100914, 100915, "莱姆洛斯", "朱利洛斯", "辛普洛斯", 0, 0, 0, "良好", "良好", "良好"},
	{100845, 100846, 100847, "呼波波", "呼鲁鲁", "鲁拉其斯", 0, 0, 0, "良好", "良好", "良好"},
	{100849, 100850, 100851, "邦诺斯娜", "杨格斯", "迪基格斯", 0, 0, 0, "良好", "良好", "良好"},
	{100878, 100876, 100877, "玻洛布斯", "加耶布斯", "迪米布斯", 0, 0, 0, "良好", "良好", "良好"},
	{100908, 100909, 100906, "阿米朵", "邦司凉朵", "朵巴奈特", 0, 0, 0, "良好", "良好", "良好"},
	{100916, 100918, 100919, "立杜鲁斯", "巴克亚司", "雷德力克斯", 0, 0, 0, "良好", "良好", "良好"},
	{100860, 100862, 100861, "司尔顿", "梅尔顿", "格尔希洛", 0, 0, 0, "良好", "良好", "良好"},
	{100867, 100870, 100868, "欧林吉鲁", "芭拉芭", "史凯鲁", 0, 0, 0, "良好", "良好", "良好"},
	{100871, 100873, 100874, "普鲁夏", "萨格鲁", "玛斯贝卡", 0, 0, 0, "良好", "良好", "良好"},
	{100894, 100895, 100896, "固力摩", "摩吉摩吉", "摩米索拉", 0, 0, 0, "良好", "良好", "良好"},
	{100902, 100903, 100905, "格里兰", "摩里", "塔斯夫", 0, 0, 0, "良好", "良好", "良好"},
	{100912, 100911, 100910, "伊夫霍恩", "布依伦斯", "布莱兹", 0, 0, 0, "良好", "良好", "良好"},
	{100891, 100892, 100893, "嘎吱拉", "哥斯哥斯", "蒙哥拉斯", 0, 0, 0, "良好", "良好", "良好"},
};
#else
PetRaceGraTable petracegra[27] =
{
	{100820, 100821, 100822, "扑满乌力", "乌力莱德", "乌力固力", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100823, 100824, 100825, "布依布鲁", "布依布依", "布依胖", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100842, 100843, 100844, "尼加斯", "尼基斯", "特洛可斯", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100852, 100853, 100855, "克拉尔", "拉斯基", "克达达", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100859, 100856, 100857, "可卡特", "卡卡特", "昆依特", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100864, 100865, 100866, "蓝宝", "瑞德宝", "毛宝", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100829, 100826, 100827, "比比加", "加加", "加斯奥", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100830, 100832, 100833, "乌宝依", "威比", "乌拉拉", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100883, 100884, 100885, "尤里蛙", "裘里蛙", "艾尔蛙", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100898, 100900, 100901, "可可恩", "布兰恩", "迪布恩", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100834, 100836, 100837, "贝洛金", "贝洛贝", "贝洛波波", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100838, 100840, 100841, "蓝龟", "龟之钢", "卡拉龟", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100879, 100881, 100880, "迪加", "波波顿", "砂鲨", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100888, 100887, 100889, "莫拉司", "欧瑟菲", "玛斯特", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100913, 100914, 100915, "莱姆洛斯", "朱利洛斯", "辛普洛斯", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100845, 100846, 100847, "呼波波", "呼鲁鲁", "鲁拉其斯", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100849, 100850, 100851, "邦诺斯娜", "杨格斯", "迪基格斯", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100878, 100876, 100877, "玻洛布斯", "加耶布斯", "迪米布斯", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100908, 100909, 100906, "阿米朵", "邦司凉朵", "朵巴奈特", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100916, 100918, 100919, "立杜鲁斯", "巴克亚司", "雷德力克斯", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100860, 100862, 100861, "司尔顿", "梅尔顿", "格尔希洛", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100867, 100870, 100868, "欧林吉鲁", "芭拉芭", "史凯鲁", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100871, 100873, 100874, "普鲁夏", "萨格鲁", "玛斯贝卡", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100894, 100895, 100896, "固力摩", "摩吉摩吉", "摩米索拉", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100902, 100903, 100905, "格里兰", "摩里", "塔斯夫", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100912, 100911, 100910, "伊夫霍恩", "布依伦斯", "布莱兹", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
	{100891, 100892, 100893, "嘎吱拉", "哥斯哥斯", "蒙哥拉斯", 0, 0, 0, 2, 2, 2, "良好", "良好", "良好"},
};
#endif
BOOL NPC_PetRaceMasterInit( int meindex )
{
	CHAR_setInt(meindex, CHAR_LOOPINTERVAL,	PETRACEMASTER_INITPET_LOOPTIME);
	CHAR_setInt(meindex, CHAR_WHICHTYPE, CHAR_PETRACEMASTER);
	CHAR_setWorkInt(meindex, NPC_WORK_STATE, NPC_State_Init);
	CHAR_setWorkInt(meindex, NPC_WORK_PETGROUP, 0);
#ifdef _DROPSTAKENEW
#else
	petracegra[0].payrate1 = 0;
	petracegra[0].payrate2 = 0;
	petracegra[0].payrate3 = 0;
#endif
	return	TRUE;
}

void NPC_PetRaceMasterTalked( int meindex , int talkerindex , char *szMes , int color )
{
	// 尚须新增说明以及宠物状况
	if (CHAR_getInt(talkerindex, CHAR_WHICHTYPE) != CHAR_TYPEPLAYER)
		return;
	if (NPC_Util_isFaceToFace(talkerindex, meindex, 2) == FALSE)
		if (NPC_Util_CharDistance(talkerindex, meindex) > 1)
			return;
	NPC_PetRaceMaster_selectWindow(meindex, talkerindex, 0, -1);
}

static void NPC_PetRaceMaster_selectWindow(int meindex, int toindex, int num, int select)
{
	char token[1024];
	int buttontype = 0, windowtype = 0, windowno = 0;
	int fd = getfdFromCharaIndex(toindex);
	if (fd == -1) return;
	token[0] = '\0';
	switch(num)
	{
		case 0:
			sprintf(token, "4\n\n	          ★宠物竞速场★\n"
				"你好，想要知道什麽情报吗？\n"
				"\n	          《察看游戏规则》"
				"\n             《宠物状况》"
				"\n               《离开》");
			buttontype = WINDOW_BUTTONTYPE_NONE;
			windowtype = WINDOW_MESSAGETYPE_SELECT;
			windowno = 	CHAR_WINDOWTYPE_PETRACEMASTER_START;
			break;
		case 1:
#ifdef _DROPSTAKENEW
			sprintf(token, 
				"\n竞速场规则："
				"\n参加竞速的宠物总共有三只，您可以依照宠物"
				"\n的状况或个人喜好下注，请将兑换得到的彩券"
				"\n放置於欲下注的号码前方。当竞速结束时，主"
				"\n持人将会自动帮您计算积分。"
				"\n请注意：当您离开此房间或登出时，下注的彩"
				"\n卷及积分将无法取回唷！");
#else
			sprintf(token, 
				"\n竞速场规则：参加竞速的宠物共有三只，您可"
				"\n以依照宠物状况或个人喜好下注，每个宠物有"
				"\n自己的赔率。请将石币丢置於欲下注的号码前"
				"\n方。当竞速结束时，主持人会自动地将金额放"
				"\n回你的身上或存入个人银行。"
				"\n请注意：银行金额请勿超过一千万！当您离开"
				"\n此房间或登出时，下注的金额将无法取回唷！");
#endif
			buttontype = WINDOW_BUTTONTYPE_OK;
			windowtype = WINDOW_MESSAGETYPE_MESSAGE;
			windowno = CHAR_WINDOWTYPE_PETRACEMASTER_RULE;
		break;
		case 2:
		{
			int petgroup = CHAR_getWorkInt(meindex, NPC_WORK_PETGROUP);
			int petindex1 = CHAR_getWorkInt(meindex, NPC_WORK_PET1);
			int petindex2 = CHAR_getWorkInt(meindex, NPC_WORK_PET2);
			int petindex3 = CHAR_getWorkInt(meindex, NPC_WORK_PET3);
			int pet1win = petracegra[petgroup].pet1win;
			int pet2win = petracegra[petgroup].pet2win;
			int pet3win = petracegra[petgroup].pet3win;
			int total = pet1win + pet2win + pet3win;
			float winrate1 = 0, winrate2 = 0, winrate3 = 0;
#ifdef _DROPSTAKENEW
#else
			char cpayrate1[64], cpayrate2[64], cpayrate3[64];
			if (petracegra[petgroup].payrate1 == 0)
				snprintf(cpayrate1, sizeof(cpayrate1), "???");
			else
				snprintf(cpayrate1, sizeof(cpayrate1), "%6.2f", petracegra[petgroup].payrate1);
			if (petracegra[petgroup].payrate2 == 0)
				snprintf(cpayrate2, sizeof(cpayrate2), "???");
			else
				snprintf(cpayrate2, sizeof(cpayrate2), "%6.2f", petracegra[petgroup].payrate2);
			if (petracegra[petgroup].payrate3 == 0)
				snprintf(cpayrate3, sizeof(cpayrate3), "???");
			else
				snprintf(cpayrate3, sizeof(cpayrate3), "%6.2f", petracegra[petgroup].payrate3);
#endif
			if (total == 0)
			{
				winrate1 = 0; winrate2 = 0; winrate3 = 0;
			}
			else
			{
				winrate1 = (float)pet1win / (float)total;
				winrate2 = (float)pet2win / (float)total;
				winrate3 = (float)pet3win / (float)total;
			}
#ifdef _DROPSTAKENEW
			sprintf(token, "宠物状况\n\n  宠物    胜场  败场  状况    胜场率\n"
				"========================================"
				"%-10s%-6d%-6d%-8s%-6.2f\n"
				"%-10s%-6d%-6d%-8s%-6.2f\n"
				"%-10s%-6d%-6d%-8s%-6.2f\n",
				CHAR_getChar(petindex1, CHAR_NAME), pet1win, total - pet1win,
				petracegra[petgroup].state1, winrate1,
				CHAR_getChar(petindex2, CHAR_NAME), pet2win, total - pet2win,
				petracegra[petgroup].state2, winrate2,
				CHAR_getChar(petindex3, CHAR_NAME), pet3win, total - pet3win,
				petracegra[petgroup].state3, winrate3);
#else
			sprintf(token, "宠物状况\n\n  宠物    胜场  败场  状况  胜场率  赔率\n"
				"========================================"
				"%-10s%-6d%-6d%-6s%-6.2f%-4s\n"
				"%-10s%-6d%-6d%-6s%-6.2f%-4s\n"
				"%-10s%-6d%-6d%-6s%-6.2f%-4s\n",
				CHAR_getChar(petindex1, CHAR_NAME), pet1win, total - pet1win,
				petracegra[petgroup].state1, winrate1, cpayrate1,
				CHAR_getChar(petindex2, CHAR_NAME), pet2win, total - pet2win,
				petracegra[petgroup].state2, winrate2, cpayrate2,
				CHAR_getChar(petindex3, CHAR_NAME), pet3win, total - pet3win,
				petracegra[petgroup].state3, winrate3, cpayrate3);
#endif
			buttontype = WINDOW_BUTTONTYPE_OK;
			windowtype = WINDOW_MESSAGETYPE_MESSAGE;
			windowno = CHAR_WINDOWTYPE_PETRACEMASTER_PET;
		}
		break;
		case 3:
		default:
			break;
	}
	lssproto_WN_send(fd, windowtype, buttontype, windowno,
		CHAR_getWorkInt(meindex, CHAR_WORKOBJINDEX), token);
}

void NPC_PetRaceMasterWindowTalked(int meindex, int talkerindex, int seqno, int select, char *data)
{
	int datanum = 0;
	makeStringFromEscaped(data);
	datanum = atoi(data);
	switch(seqno)
	{
		case CHAR_WINDOWTYPE_PETRACEMASTER_START:
			if (datanum == 1)