367 lines
14 KiB
Plaintext
367 lines
14 KiB
Plaintext
/*
|
|
文件名:MarrySystem.nut
|
|
路径:Dps_A/ProjectClass/MarrySystem/MarrySystem.nut
|
|
创建日期:2024-10-01 10:02
|
|
文件用途:结婚系统
|
|
*/
|
|
class Marry {
|
|
//配置
|
|
Config = null;
|
|
//包头
|
|
OP = 20078000;
|
|
//请求结婚的列表
|
|
RequestMarryList = {};
|
|
//进入礼堂前的位置信息
|
|
EnterAuditoriumPosList = {};
|
|
|
|
|
|
|
|
|
|
|
|
//数据库操作集
|
|
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);
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
//查看是否结婚包
|
|
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);
|
|
|
|
// //注册婚礼礼堂信息
|
|
// AuditoriumList.rawset(SUser.GetCID(), {
|
|
// Time = Time,
|
|
// Level = Level,
|
|
// Target_CId = Target_CId,
|
|
// Target_Name = Mysql_Operate_Func.CheckMarryTargetName(Target_CId),
|
|
// });
|
|
|
|
//当前时间戳 作为礼堂编号
|
|
local Index = time();
|
|
//注册婚礼礼堂信息
|
|
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);
|
|
|
|
|
|
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;
|
|
//进入自己的礼堂
|
|
if (RoomId == -1) {
|
|
local MyState = Mysql_Operate_Func.CheckMarryState(SUser.GetCID());
|
|
if (MyState != 2) {
|
|
SUser.SendNotiBox("您访问的礼堂不存在！", 1);
|
|
return;
|
|
}
|
|
|
|
//向缓存写入进入时的坐标
|
|
EnterAuditoriumPosList.rawset(SUser.GetCID(), SUser.GetLocation());
|
|
//移动到礼堂
|
|
World.MoveArea(SUser, Config["礼堂城镇编号"], Config["礼堂区域编号"], 55, 349);
|
|
}
|
|
}
|
|
|
|
//离开礼堂
|
|
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);
|
|
}
|
|
}
|
|
|
|
|
|
constructor() {
|
|
Config = dofile("/root/娱心插件配置/结婚系统配置.dat");
|
|
|
|
//注册来自客户端的收包
|
|
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));
|
|
|
|
//从池子拿连接
|
|
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(); |