DP-S-Script/Dps_A/ProjectClass/MarrySystem/MarrySystem.nut

559 lines
20 KiB
Plaintext

/*
文件名:MarrySystem.nut
路径:Dps_A/ProjectClass/MarrySystem/MarrySystem.nut
创建日期:2024-10-01 10:02
文件用途:结婚系统
*/
class Marry {
//当前频道
Channel = null;
//配置
Config = null;
//包头
OP = 20078000;
//请求结婚的列表
RequestMarryList = {};
//进入礼堂前的位置信息
EnterAuditoriumPosList = {};
//礼堂id 对应的用户信息
AuditoriumUserInfo = {};
//数据库操作集
Mysql_Operate_Func = {
//查询结婚状态
CheckMarryState = function(Cid) {
local CheckSql = format(MARRY_SQL_LIST.CheckMarryState, Cid);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
local Ret = SqlObj.Select(CheckSql, ["int"]);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
//没结婚要返回false
if (Ret.len()< 1 || Ret[0][0] == null) {
return 0;
} else {
return Ret[0][0];
}
}
//新增结婚信息
InseartMarryInfo = function(Cid, Name, TargerCid, Job, Level, Experience, Equip, State) {
local sql = format(MARRY_SQL_LIST.InseartMarryInfo, Cid, Name, TargerCid, Job, Level, Experience, Equip, State, TargerCid, Equip, State);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
SqlObj.Exec_Sql(sql);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
}
//查询结婚对象CID
CheckMarryTarget = function(Cid) {
local CheckSql = format(MARRY_SQL_LIST.CheckMarryTarget, Cid);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
local Ret = SqlObj.Select(CheckSql, ["int"]);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
//没结婚要返回false
if (Ret.len()< 1 || Ret[0][0] == null) {
return null;
} else {
return Ret[0][0];
}
}
//删除结婚信息
DeleteMarryInfo = function(Cid) {
local delete_sql = format(MARRY_SQL_LIST.DeleteMarryInfo, Cid);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
SqlObj.Exec_Sql(delete_sql);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
}
//查询结婚对象名字
CheckMarryTargetName = function(Cid) {
local CheckSql = format(MARRY_SQL_LIST.CheckMarryTargetName, Cid);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
local Ret = SqlObj.Select(CheckSql, ["string"]);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
//没结婚要返回false
if (Ret.len()< 1 || Ret[0][0] == null) {
return null;
} else {
return Ret[0][0];
}
}
//修改结婚状态
ChangeMarryState = function(Cid, State) {
local Sql = format(MARRY_SQL_LIST.ChangeMarryState, State, Cid);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
SqlObj.Exec_Sql(Sql);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
}
//新增礼堂信息
InsertMarryRoom = function(Cid, Name, Time, Level, Target_CId, Target_Name, State, Index) {
local Sql = format(MARRY_SQL_LIST.InsertMarryRoom, Cid, Name, Time, Level, Target_CId, Target_Name, State, Index);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
SqlObj.Exec_Sql(Sql);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
}
//查询礼堂信息
GetAuditoriumList = function() {
local Sql = format(MARRY_SQL_LIST.GetAuditoriumList);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
local Ret = SqlObj.Select(Sql, ["int", "string", "int", "int", "int", "string", "int", "int"]);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
return Ret;
}
//根据cid查询自己的礼堂编号
GetAuditoriumIndexById = function(cid) {
local Sql = format(MARRY_SQL_LIST.GetAuditoriumIndexById, cid);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
local Ret = SqlObj.Select(Sql, ["int"]);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
if (Ret.len()< 1 || Ret[0][0] == null) {
return null;
} else {
return Ret[0][0];
}
}
//根据cid查询婚礼开始时间
GetAuditoriumTimeById = function(cid) {
local Sql = format(MARRY_SQL_LIST.GetAuditoriumTimeById, cid);
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
local Ret = SqlObj.Select(Sql, ["int"]);
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
if (Ret.len()< 1 || Ret[0][0] == null) {
return null;
} else {
return Ret[0][0];
}
}
}
//查看是否结婚包
function CheckMarryStateCallBack(SUser, Jso) {
local T = {
op = OP + 10,
Flag = Mysql_Operate_Func.CheckMarryState(SUser.GetCID())
}
SUser.SendJso(T);
}
//申请订婚包
function RequestMarry(SUser, Jso) {
local PSUser = World.GetUserByName(Jso.Name);
//判断对象角色是否在线
if (!PSUser) {
//没找到这个角色要返回一个错误包
local T = {
op = OP + 90,
str = "未找到角色,请检查角色名或查看玩家是否在线"
}
SUser.SendNotiBox("未找到角色,请检查角色名或查看玩家是否在线", 1);
}
//判断是否是自己
if (SUser.GetCID() == PSUser.GetCID()) {
SUser.SendNotiBox("不能和自己结婚!", 1);
return;
}
//查询两人状态必须都为未结婚
local SUserState = Mysql_Operate_Func.CheckMarryState(SUser.GetCID());
local PSUserState = Mysql_Operate_Func.CheckMarryState(PSUser.GetCID());
if (SUserState) {
SUser.SendNotiBox("抱歉,您已经结婚了!", 1);
return;
}
if (PSUserState) {
SUser.SendNotiBox("抱歉,对方已经结婚了...", 1);
return;
}
local T = {
op = OP + 4,
applicantCid = SUser.GetCID(),
applicantUid = SUser.GetUID(),
applicantName = SUser.GetCharacName(),
}
PSUser.SendJso(T);
//把请求加入到请求列表
RequestMarryList.rawset(SUser.GetCID(), PSUser.GetCID());
}
//订婚答复包
function ResponseMarry(SUser, Jso) {
local Flag = Jso.Flag;
local applicantUser = World.GetUserByUidCid(Jso.applicantUid, Jso.applicantCid);
if (Flag) {
if (applicantUser) {
//在请求列表里查看是否有请求
if (!(RequestMarryList.rawin(Jso.applicantCid)) || RequestMarryList[Jso.applicantCid] != SUser.GetCID()) {
SUser.SendNotiBox("抱歉,对方未发送请求!", 1);
return;
}
applicantUser.SendNotiBox("恭喜您!\n对方同意了您的请求。\n请寻找大司祭制定结婚的详细事宜。", 1);
Mysql_Operate_Func.InseartMarryInfo(Jso.applicantCid, applicantUser.GetCharacName(), SUser.GetCID(), applicantUser.GetCharacJob(), 0, 0, "no", 1);
Mysql_Operate_Func.InseartMarryInfo(SUser.GetCID(), SUser.GetCharacName(), Jso.applicantCid, SUser.GetCharacJob(), 0, 0, "no", 1);
//刷新客户端的订婚状态
local T = {
op = OP + 10,
Flag = 1
};
applicantUser.SendJso(T);
SUser.SendJso(T);
}
} else {
if (applicantUser) applicantUser.SendNotiBox("很遗憾!\n对方拒绝了您的请求", 1);
}
}
//退婚包
function CancelMarry(SUser, Jso) {
//加判断 必须两人都在订婚状态才能退婚
local DeleteArr = [];
DeleteArr.push(SUser.GetCID());
local Target_CId = Mysql_Operate_Func.CheckMarryTarget(SUser.GetCID());
if (Target_CId) {
DeleteArr.push(Target_CId);
//如果对象存在则判断两人是否都在订婚状态
local SUserState = Mysql_Operate_Func.CheckMarryState(SUser.GetCID())
local TargetState = Mysql_Operate_Func.CheckMarryTarget(Target_CId);
if (SUserState != 1 || TargetState != 1) return;
}
foreach(s_cid in DeleteArr) {
Mysql_Operate_Func.DeleteMarryInfo(s_cid);
}
//刷新客户端的订婚状态
local T = {
op = OP + 10,
Flag = 0
};
SUser.SendJso(T);
//如果需要通知被退婚的对象
if (DeleteArr.len() > 1) {
local WorldMap = World.GetOnlinePlayer();
foreach(W_User in WorldMap) {
if (W_User.GetCID() == DeleteArr[1]) {
W_User.SendJso(T);
}
}
}
}
//打开准备婚礼窗口
function OpenPreparationWindow(SUser, Jso) {
local Target_CId = Mysql_Operate_Func.CheckMarryTarget(SUser.GetCID());
if (!Target_CId) {
SUser.SendNotiBox("没有婚礼信息!", 1);
return;
}
local Target_Name = Mysql_Operate_Func.CheckMarryTargetName(Target_CId);
if (!Target_Name) {
SUser.SendNotiBox("没有婚礼信息!", 1);
return;
}
local T = {
op = OP + 12,
MyName = SUser.GetCharacName(),
TargetName = Target_Name,
};
SUser.SendJso(T);
}
//确认婚礼
function ConfirmMarry(SUser, Jso) {
local Target_CId = Mysql_Operate_Func.CheckMarryTarget(SUser.GetCID());
if (!Target_CId) {
SUser.SendNotiBox("没有婚礼信息!", 1);
return;
}
local Time = Jso.Time;
local Level = Jso.Level;
local NeedItem = Config[("结婚等级" + (Level + 1) + "道具ID")];
//获取背包对象
local InvenObj = SUser.GetInven();
local SlotIdx = InvenObj.GetSlotById(NeedItem);
if (SlotIdx == -1) {
SUser.SendNotiBox("没有足够的道具!", 1);
return;
} else {
InvenObj.DeleteItemCount(NeedItem, 1);
//获得婚礼仪式开始时间
local Index = time() + (Time + 1) * 10 * 60;
//注册婚礼礼堂信息
Mysql_Operate_Func.InsertMarryRoom(SUser.GetCID(), SUser.GetCharacName(), Time, Level, Target_CId, Mysql_Operate_Func.CheckMarryTargetName(Target_CId), 1, Index);
Mysql_Operate_Func.InsertMarryRoom(Target_CId, Mysql_Operate_Func.CheckMarryTargetName(Target_CId), Time, Level, SUser.GetCID(), SUser.GetCharacName(), 1, Index);
AuditoriumUserInfo.rawset(SUser.GetCID(), {});
Mysql_Operate_Func.ChangeMarryState(SUser.GetCID(), 2);
Mysql_Operate_Func.ChangeMarryState(Target_CId, 2);
local T = {
op = OP + 10,
Flag = 2
}
local WorldMap = World.GetOnlinePlayer();
foreach(W_User in WorldMap) {
if (W_User.GetCID() == Target_CId) {
W_User.SendJso(T);
W_User.SendNotiBox(format("婚礼将在%d分钟后举行!\n点击大司祭可进入礼堂。", (Time + 1) * 10), 1);
}
}
SUser.SendJso(T);
SUser.SendNotiBox(format("婚礼将在%d分钟后举行!\n点击大司祭可进入礼堂。", (Time + 1) * 10), 1);
}
}
//进入礼堂
function EnterAuditorium(SUser, Jso) {
local RoomId = Jso.room;
local location = SUser.GetLocation();
//进入自己的礼堂
if (RoomId == -1) {
local MyState = Mysql_Operate_Func.CheckMarryState(SUser.GetCID());
if (MyState != 2) {
SUser.SendNotiBox("您访问的礼堂不存在!", 1);
return;
}
RoomId = SUser.GetCID();
//如果根据自己的cid不能拿到礼堂信息 说明这个礼堂的key是对象的
if (!(AuditoriumUserInfo.rawin(RoomId))) {
//对象的cid
RoomId = Mysql_Operate_Func.GetAuditoriumIndexById(SUser.GetCID());
}
location.rawset("所在礼堂编号", RoomId);
//向缓存写入进入时的坐标
EnterAuditoriumPosList.rawset(SUser.GetCID(), location);
//移动到礼堂
World.MoveArea(SUser, Config["礼堂城镇编号"], Config["礼堂区域编号"], 55, 349);
} else {
location.rawset("所在礼堂编号", RoomId);
//向缓存写入进入时的坐标
EnterAuditoriumPosList.rawset(SUser.GetCID(), location);
//移动到礼堂
World.MoveArea(SUser, Config["礼堂城镇编号"], Config["礼堂区域编号"], 55, 349);
}
AuditoriumUserInfo[RoomId].rawset(SUser.GetCID(), 1);
local UserCanSee = [];
foreach(cid in AuditoriumUserInfo[RoomId]) {
UserCanSee.push(cid);
}
local T = {
op = OP + 22,
time = Mysql_Operate_Func.GetAuditoriumTimeById(RoomId) - time()
}
SUser.SendJso(T);
}
//离开礼堂
function LeaveAuditorium(SUser, Jso) {
if (EnterAuditoriumPosList.rawin(SUser.GetCID())) {
local Info = EnterAuditoriumPosList[SUser.GetCID()];
//离开礼堂回到进入时的位置
World.MoveArea(SUser, Info.Town, Info.Area, Info.Pos.X, Info.Pos.Y);
AuditoriumUserInfo[Info["所在礼堂编号"]].rawdelete(SUser.GetCID());
}
}
//获得礼堂列表
function GetAuditoriumList(SUser, Jso) {
local re = Mysql_Operate_Func.GetAuditoriumList();
local SendArr = [];
//判断用的
local SelectMap = {};
foreach(v in re) {
local TimeBuf = v.pop();
local id = v[0];
//不存在时PUSH
if (!(SelectMap.rawin(v[4]))) {
v.push(AuditoriumUserInfo.rawget(id).len());
v.push(Channel);
v.push(TimeBuf);
SendArr.push(v);
SelectMap.rawset(id, 1);
}
}
local T = {
op = OP + 20,
info = SendArr
}
SUser.SendJso(T);
}
function GetConfig(SUser, Jso) {
local T = {
op = OP + 778,
town = Config["礼堂城镇编号"],
area = Config["礼堂区域编号"],
}
SUser.SendJso(T);
}
//表示是否可见 参数为用户数组
function MarryUserCallBack(RealList, MUser) {
foreach(_Index, Value in RealList) {
local SUser = Value;
if (!SUser || !SUser.GetState() >= 3) continue;
if (SUser.GetUID() == MUser.GetUID()) continue;
local Pack = Packet();
Pack.Put_Header(0, 24);
Pack.Put_Byte(SUser.GetLocation().Town); //城镇
Pack.Put_Byte(SUser.GetArea(1)); //区域
Pack.Put_Short((RealList.len() - 1)); //几个玩家 要减去自己
foreach(__Index, MapObj in RealList) {
if (SUser.GetUID() == MapObj.GetUID()) continue;
Pack.Put_Short(MapObj.GetUniqueId());
Pack.Put_Short(MapObj.GetAreaPos().X);
Pack.Put_Short(MapObj.GetAreaPos().Y);
Pack.Put_Byte(MapObj.GetDirections()); //朝向
Pack.Put_Byte(MapObj.GetVisibleValues()); //是否可见
}
Pack.Put_Byte(1); //是否可见
Pack.Finalize(true);
SUser.Send(Pack);
Pack.Delete();
}
}
//退出可见列表
function MarryUserDeleteCallBack(RealList, MUser) {
foreach(_Index, Value in RealList) {
local SUser = Value;
if (!SUser || !(SUser.GetState() >= 3) || !MUser || !(MUser.GetState() >= 3)) continue;
if (SUser.GetUID() == MUser.GetUID()) continue;
local Pack = Packet();
Pack.Put_Header(0, 23);
Pack.Put_Short(MUser.GetUniqueId()); //唯一id
Pack.Put_Byte(MUser.GetLocation().Town); //城镇
Pack.Put_Byte(MUser.GetArea(1)); //区域
Pack.Put_Short(MUser.GetAreaPos().X);
Pack.Put_Short(MUser.GetAreaPos().Y);
Pack.Put_Byte(MUser.GetDirections()); //朝向
Pack.Put_Byte(MUser.GetVisibleValues()); //是否可见
Pack.Finalize(true);
SUser.Send(Pack);
Pack.Delete();
}
}
constructor() {
Config = dofile("/root/娱心插件配置/结婚系统配置.dat");
local ConfigPath = Sq_Game_GetConfig();
Channel = ConfigPath.slice(-6).slice(0, 2);
//注册来自客户端的收包
ClientSocketPackFuncMap.rawset(OP + 9, CheckMarryStateCallBack.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 3, RequestMarry.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 5, ResponseMarry.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 7, CancelMarry.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 11, OpenPreparationWindow.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 13, ConfirmMarry.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 15, EnterAuditorium.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 17, LeaveAuditorium.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 19, GetAuditoriumList.bindenv(this));
ClientSocketPackFuncMap.rawset(OP + 777, GetConfig.bindenv(this));
//每次加载的时候都注册礼堂信息
AuditoriumUserInfo.rawset(1, {});
local RealList = [];
RealList.push(World.GetUserByUid(1));
RealList.push(World.GetUserByUid(2));
Timer.SetTimeOut(MarryUserDeleteCallBack, 3000, RealList, World.GetUserByUid(1));
//从池子拿连接
local SqlObj = MysqlPool.GetInstance().GetConnect();
local query = "SELECT COUNT(*) AS table_exists FROM information_schema.tables WHERE table_schema = 'zyk' AND table_name = 'marry';"
local Res = SqlObj.Select(query, ["int"]);
//需要建库
if (Res.len() > 0 && Res[0][0] == 0) {
local CreateSql = "CREATE TABLE IF NOT EXISTS zyk.marry (cid INT(11) NOT NULL AUTO_INCREMENT PRIMARY KEY, name VARCHAR(255), target_cid INT(11), job INT(11), level INT(11), experience INT(11), equip VARCHAR(255), state INT(11));"
local CreateSql2 = "CREATE TABLE IF NOT EXISTS zyk.marry_room (cid INT(11) NOT NULL AUTO_INCREMENT PRIMARY KEY, name VARCHAR(255), time INT(11), level INT(11), target_cid INT(11), target_name VARCHAR(255), state INT(11), index INT(11));"
SqlObj.Exec_Sql(CreateSql);
SqlObj.Exec_Sql(CreateSql2);
}
//把连接还池子
MysqlPool.GetInstance().PutConnect(SqlObj);
}
}
ProjectInitFuncMap.P_Marry <- Marry();