local skynet = require "skynet" local oo = require "Class" local log = require "Log" local pb = require "pb" local dataType = require "DataType" local errorInfo = require "ErrorInfo" local shop = require "Shop" local json = require "json" local FishShop = oo.class(shop) FishShop.shopType = dataType.ShopType_Fish FishShop.NPCId = 7 -- 余师傅 -- 初始化渔店数据 function FishShop:InitData(player, shopType) local cfgFishType = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishType") -- 鱼类信息 local cfgFishRod = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishRod") -- 鱼竿信息 local cfgSValue = skynet.server.gameConfig:GetPlayerAllCfg(player, "SValue") -- 玩家渔店相关数据 player.gameData.shop[shopType] = {} player.gameData.shop[shopType].fishInfos = {} -- 鱼类信息 player.gameData.shop[shopType].fishingRodInfos = {} -- 鱼竿信息 player.gameData.shop[shopType].fishTypeInfos = {} -- 鱼百科信息 player.gameData.shop[shopType].fishingLure = cfgSValue.beginFishFood -- 初始化鱼饵数量 player.gameData.shop[shopType].canGetFish = false -- 玩家是否完成鱼饵扣除 player.gameData.shop[shopType].FishRodUnlock = {true, false, false, false} -- 玩家鱼竿是否完成解锁 player.gameData.shop[shopType].ExchangeRecord={} --渔店家具兑换记录 -- 玩家鱼类数据赋值 for k, v in pairs(cfgFishType) do local count = v.id player.gameData.shop[shopType].fishInfos[count] = {} player.gameData.shop[shopType].fishInfos[count].id = count -- 鱼类id player.gameData.shop[shopType].fishInfos[count].status = 0 -- 鱼类状态 0 未拥有 1 已拥有 2已领取奖励 默认未拥有 player.gameData.shop[shopType].fishInfos[count].award = v.unlockPrice -- 鱼对应解锁的奖励 player.gameData.shop[shopType].fishInfos[count].furnitureNum = v.furnitureNum -- 家具对应兑换数量 player.gameData.shop[shopType].fishInfos[count].fishType = v.fishType end -- 玩家鱼竿数据赋值 for k, v in pairs(cfgFishRod) do local count = v.id if 1 == count then player.gameData.shop[shopType].fishingRodInfos[count] = {} player.gameData.shop[shopType].fishingRodInfos[count].id = count -- 鱼竿 player.gameData.shop[shopType].fishingRodInfos[count].status = 1 -- 为鱼竿的解锁状态 0-未解锁 1-当前装备 2-已解锁 else player.gameData.shop[shopType].fishingRodInfos[count] = {} player.gameData.shop[shopType].fishingRodInfos[count].id = count -- 鱼竿 player.gameData.shop[shopType].fishingRodInfos[count].status = 0 -- 为鱼竿的解锁状态 0-未解锁 1-当前装备 2-已解锁 end end -- 玩家鱼类百科数据赋值 for k, v in pairs(cfgFishType) do -- 判断该玩家有没有存储该鱼类图鉴 if not player.gameData.shop[shopType].fishTypeInfos[v.fishType] then local count = v.fishType player.gameData.shop[shopType].fishTypeInfos[count] = {} player.gameData.shop[shopType].fishTypeInfos[count].fishType = v.fishType -- 鱼类图鉴id player.gameData.shop[shopType].fishTypeInfos[count].progress = 0 -- 鱼类图鉴进度 player.gameData.shop[shopType].fishTypeInfos[count].fishIds = {} -- 该鱼类包含的鱼id player.gameData.shop[shopType].fishTypeInfos[count].status = 0 -- 鱼种类奖励领取状态 0-未领取 1-已领取 2-待领取 for k1, v1 in pairs(cfgFishType) do if v1.fishType == count then table.insert(player.gameData.shop[shopType].fishTypeInfos[count].fishIds, v1.id) end end end end -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) end -- 玩家登录调用 function FishShop:LoginInitData(player) skynet.server.msgTips:Reset(player, 55) skynet.server.msgTips:Reset(player, 56) skynet.server.msgTips:Reset(player, 57) -- 红点系统 -- 鱼饵红点 local cfgSValue = skynet.server.gameConfig:GetPlayerAllCfg(player, "SValue") local cfgFishType = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishType") -- 鱼类信息 if player.gameData.shop[self.shopType] then self:FishRefresh(player) -- if player.gameData.shop[self.shopType].fishingLure >= 1 then -- skynet.server.msgTips:AddNoNotice(player, 55) -- end -- 图鉴红点 -- local redDot = false for k, v in pairs(player.gameData.shop[self.shopType].fishInfos) do if v.status == 1 then -- redDot = true skynet.server.msgTips:AddNoNotice(player, 56) end end for k, v in pairs(player.gameData.shop[self.shopType].fishTypeInfos) do if v.status == 2 then -- redDot = true skynet.server.msgTips:AddNoNotice(player, 56) end end -- 手工坊红点 local CraftRedDot = false for k, v in pairs(player.gameData.bag) do if dataType.GoodsType_Fish == v.type then for k1, v1 in pairs(cfgFishType) do if v.count >= v1.furnitureNum and v.id == v1.id then CraftRedDot = true end end end end if CraftRedDot then skynet.server.msgTips:AddNoNotice(player, 57) end -- 登录发放鱼饵 self:giveFishingLure(player) end end -- 发放鱼饵 function FishShop:giveFishingLure(player) local cfgSValue = skynet.server.gameConfig:GetPlayerAllCfg(player, "SValue") local openTime = skynet.GetTime() local todayTwelve = self:FormatTime(skynet.GetTime(), 0, 12) local todayEighteen = self:FormatTime(skynet.GetTime(), 0, 18) local fishFoodAutoLimit = cfgSValue.fishFoodAutoLimit -- 查看玩家是否有月卡权益 local extraFishFood = 0 if player.gameData.storePack.monthCard.buyStatus then fishFoodAutoLimit = cfgSValue.monthCardFish[2] extraFishFood = cfgSValue.monthCardFish[1] - cfgSValue.dailyFishFood[1] end --检查过了设置成已检查 12:00 到 18:00 if openTime >= todayTwelve and openTime <= todayEighteen then if player.gameData.todayGain.todayTwelveGameTime == 0 and player.gameData.shop[self.shopType].fishingLure < fishFoodAutoLimit then player.gameData.shop[self.shopType].fishingLure = player.gameData.shop[self.shopType].fishingLure + cfgSValue.dailyFishFood[1] + extraFishFood --是否达到上限 if player.gameData.shop[self.shopType].fishingLure > fishFoodAutoLimit then player.gameData.shop[self.shopType].fishingLure = fishFoodAutoLimit end end player.gameData.todayGain.todayTwelveGameTime = 1 end --检查过了设置成已检查 18:00 if openTime >= todayEighteen then if player.gameData.todayGain.todayEighteenGameTime == 0 and player.gameData.shop[self.shopType].fishingLure < fishFoodAutoLimit then player.gameData.shop[self.shopType].fishingLure = player.gameData.shop[self.shopType].fishingLure + cfgSValue.dailyFishFood[2] --是否达到上限 if player.gameData.shop[self.shopType].fishingLure > fishFoodAutoLimit then player.gameData.shop[self.shopType].fishingLure = fishFoodAutoLimit end end player.gameData.todayGain.todayEighteenGameTime = 1 end if player.gameData.shop[self.shopType].fishingLure >= 1 and skynet.server.msgTips:GetOneTips(player, 55).count == 0 then skynet.server.msgTips:AddNoNotice(player, 55) end end -- 返回指定时间戳的方法 function FishShop:FormatTime(lastDate, day, hour) local dayTimestamp = 24 * 60 * 60 lastDate = lastDate + dayTimestamp * day local date = os.date("*t", lastDate) -- 这里返回的是你指定的时间点的时间戳 return os.time({ year = date.year, month = date.month, day = date.day, hour = hour, minute = 00,--date.minute, second = 00--date.second }) end -- 好友赠送鱼红点增加方法 function FishShop:FishRefreshRedDot(player, fishId) -- 判断玩家的鱼类数据是否需要进行修改 local fishInfos = player.gameData.shop[self.shopType].fishInfos local fishTypeInfos = player.gameData.shop[self.shopType].fishTypeInfos local cfgFishType = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishType") if skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Fish, fishId) > 0 and 0 == fishInfos[fishId].status then fishInfos[fishId].status = 1 -- 将鱼的完成度计算出并存入玩家数据+ for k, v in pairs(fishInfos) do local haveData = 0 local allData = #fishTypeInfos[v.fishType].fishIds for k1, v1 in pairs(fishTypeInfos[v.fishType].fishIds) do if fishInfos[v1].status == 1 or fishInfos[v1].status == 2 then haveData = haveData + 1 end end fishTypeInfos[v.fishType].progress = math.floor((haveData / allData + 0.005) * 100) end -- 判断鱼的完成度是否解锁了鱼竿 local FishRodUnlock = player.gameData.shop[self.shopType].FishRodUnlock for k, v in pairs(player.gameData.shop[self.shopType].fishTypeInfos) do if v.fishType == 1 and v.progress >= 66 and not FishRodUnlock[2] then player.gameData.shop[self.shopType].fishingRodInfos[2].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[2] = true self:FishUnlock(player, 1, 2) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) elseif v.fishType == 2 and v.progress >= 83 and not FishRodUnlock[3] then player.gameData.shop[self.shopType].fishingRodInfos[3].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[3] = true self:FishUnlock(player, 1, 3) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) elseif v.fishType == 3 and v.progress >= 87 and not FishRodUnlock[4] then player.gameData.shop[self.shopType].fishingRodInfos[4].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[4] = true self:FishUnlock(player, 1, 4) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) end end skynet.server.msgTips:Add(player, 56) end -- 完成度达到一百增加类型奖励红点 for k, v in pairs(fishTypeInfos) do if v.progress == 100 and v.status == 0 then v.status = 2 skynet.server.msgTips:Add(player, 56) self:FishUnlock(player, 2, v.fishType) end end -- 手工坊红点 local bagCount = skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Fish, fishId) local CraftRedDot = false for k1, v1 in pairs(cfgFishType) do if bagCount == v1.furnitureNum and v1.id == fishId then CraftRedDot = true end end if CraftRedDot then skynet.server.msgTips:Add(player, 57) end end -- 判断玩家鱼类数据是否需要刷新 function FishShop:FishRefresh(player) -- 判断玩家的鱼类数据是否需要进行 local fishInfos = player.gameData.shop[self.shopType].fishInfos local fishTypeInfos = player.gameData.shop[self.shopType].fishTypeInfos for k, v in pairs(fishInfos) do if skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Fish, v.id) > 0 and 0 == v.status then v.status = 1 -- 将鱼的完成度计算出并存入玩家数据+ local haveData = 0 local allData = #fishTypeInfos[v.fishType].fishIds for k1, v1 in pairs(fishTypeInfos[v.fishType].fishIds) do if fishInfos[v1].status == 1 or fishInfos[v1].status == 2 then haveData = haveData + 1 end end fishTypeInfos[v.fishType].progress = math.floor((haveData / allData + 0.005) * 100) -- 判断鱼的完成度是否解锁了鱼竿 local FishRodUnlock = player.gameData.shop[self.shopType].FishRodUnlock for k, v in pairs(player.gameData.shop[self.shopType].fishTypeInfos) do if v.fishType == 1 and v.progress >= 66 and not FishRodUnlock[2] then player.gameData.shop[self.shopType].fishingRodInfos[2].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[2] = true self:FishUnlock(player, 1, 2) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) elseif v.fishType == 2 and v.progress >= 83 and not FishRodUnlock[3] then player.gameData.shop[self.shopType].fishingRodInfos[3].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[3] = true self:FishUnlock(player, 1, 3) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) elseif v.fishType == 3 and v.progress >= 87 and not FishRodUnlock[4] then player.gameData.shop[self.shopType].fishingRodInfos[4].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[4] = true self:FishUnlock(player, 1, 4) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) end end -- 完成度达到一百将奖励状态修改 for k1, v1 in pairs(fishTypeInfos) do if v1.progress == 100 and v1.status == 0 then v1.status = 2 self:FishUnlock(player, 2, v1.fishType) end end end end end -- 使用蜗壳币购买鱼饵 function FishShop:FishingLuresBuy(player, c2sData, s2cData) c2sData.data = assert(pb.decode("C2SFishingLuresBuy", c2sData.data)) local data = {} local cfgSValue = skynet.server.gameConfig:GetPlayerAllCfg(player, "SValue") local methodType = c2sData.data.methodType -- 加速类型 local isSuc = false if methodType == dataType.AccelerateType_Volute then -- 消耗玩家蜗壳币 local eventId = pb.enum("EnumMoneyChangeEventID", "EventID_10") isSuc = player:MoneyChange(pb.enum("EnumGoodsType", "VoluteCoin"), -cfgSValue.voluteCoinFishFood[1], eventId) elseif methodType == dataType.AccelerateType_AccTicket and skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Prop, 12) > 0 then -- 扣除一个饲料包 增加对应的鱼饵 skynet.server.bag:RemoveGoods(player, dataType.GoodsType_Prop, 12, 1) player.gameData.shop[self.shopType].fishingLure = player.gameData.shop[self.shopType].fishingLure + cfgSValue.fishFoodPack -- isSuc = true elseif methodType == dataType.AccelerateType_ADTicket and skynet.server.ad:CanWatch(player, "GetFishingLures") and skynet.server.ad:PayADTicket(player, "GetFishingLures") then isSuc = true elseif methodType == dataType.AccelerateType_WatchAD and skynet.server.ad:CanWatch(player, "GetFishingLures") then skynet.server.ad:Update(player, "GetFishingLures") isSuc = true end if isSuc then player.gameData.shop[self.shopType].fishingLure = player.gameData.shop[self.shopType].fishingLure + cfgSValue.voluteCoinFishFood[2] end -- -- 判断蜗壳币数量是否足够 -- local eventId = pb.enum("EnumMoneyChangeEventID", "EventID_10") -- -- 优先使用饲料包进行补充鱼饵 -- if skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Prop, 12) > 0 then -- -- 扣除一个饲料包 增加对应的鱼饵 -- skynet.server.bag:RemoveGoods(player, dataType.GoodsType_Prop, 12, 1) -- player.gameData.shop[self.shopType].fishingLure = player.gameData.shop[self.shopType].fishingLure + -- cfgSValue.fishFoodPack -- else -- local isSuc = player:MoneyChange(pb.enum("EnumGoodsType", "VoluteCoin"), -cfgSValue.voluteCoinFishFood[1], -- eventId) -- if isSuc then -- player.gameData.shop[self.shopType].fishingLure = -- player.gameData.shop[self.shopType].fishingLure + cfgSValue.voluteCoinFishFood[2] -- -- player.gameData.shop[self.shopType].fishingLure = player.gameData.shop[self.shopType].fishingLure + 5 -- end -- end data.fishLures = player.gameData.shop[self.shopType].fishingLure -- 鱼饵红点 if data.fishLures == 5 then skynet.server.msgTips:Add(player, 55) end s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishingLuresBuy") s2cData.data = assert(pb.encode("S2CFishingLuresBuy", data)) end -- 进入渔店 function FishShop:FishGearShopEnter(player, c2sData, s2cData) c2sData.data = assert(pb.decode("C2SFishGearShopEnter", c2sData.data)) -- 发放鱼饵 self:giveFishingLure(player) local data = {} data.furnitureGoodsInfo={} local fishInfos = player.gameData.shop[self.shopType].fishInfos -- 背包所有鱼的信息 data.fish = {} for k, v in pairs(player.gameData.bag) do if dataType.GoodsType_Fish == v.type then table.insert(data.fish, { goodsType = v.type, goodsId = v.id, goodsCount = v.count }) end end -- 当前鱼竿id for k, v in pairs(player.gameData.shop[self.shopType].fishingRodInfos) do if 1 == v.status then data.fishRod = v.id end end -- 当前鱼饵数量 data.fishLures = player.gameData.shop[self.shopType].fishingLure --玩家兑换家具信息 local cfgFishType = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishType") --玩家兑换家具 for _, value in ipairs(cfgFishType) do if not value.furniture or value.furniture <= 0 then goto continue end local goodsNum = skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Furniture, value.furniture) if (player.gameData.shop[self.shopType].ExchangeRecord == nil or player.gameData.shop[self.shopType].ExchangeRecord[value.furniture] == nil) and goodsNum <= 0 then goto continue end table.insert(data.furnitureGoodsInfo, { goodsType = dataType.GoodsType_Furniture, goodsId = value.furniture, goodsCount = goodsNum }) ::continue:: end skynet.server.levelTask:Modify(player, 92, 1) skynet.server.taskListEvent:Modify( player ,92, 1) s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishGearShopEnter") s2cData.data = assert(pb.encode("S2CFishGearShopEnter", data)) end -- 渔店解锁 function FishShop:FishUnlock(player, unlockType, unlockId) local data = {} data.unlockType = unlockType; -- 解锁类型 1-鱼竿 2-任意品种的鱼 data.unlockId = unlockId; -- 解锁id skynet.server.gameServer:SendMsgToUser(player.userId, "CMD_S2C_FishUnlock", data) end -- 开始钓鱼 function FishShop:FishingStart(player, c2sData, s2cData) c2sData.data = assert(pb.decode("C2SFishingStart", c2sData.data)) local data = {} -- 消耗鱼饵 if player.gameData.shop[self.shopType].fishingLure > 0 then player.gameData.shop[self.shopType].canGetFish = true player.gameData.shop[self.shopType].fishingLure = player.gameData.shop[self.shopType].fishingLure - 1 data.fishLures = player.gameData.shop[self.shopType].fishingLure if data.fishLures == 0 then skynet.server.msgTips:Reduce(player, 55) end else data.fishLures = 0 player.gameData.shop[self.shopType].canGetFish = false end s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishingStart") s2cData.data = assert(pb.encode("S2CFishingStart", data)) end -- -- 判断当前玩家返回鱼的等级是否满足所拥有的鱼竿 -- function FishShop:CheckLevel(player, scopeLvl) -- for k, v in pairs(player.gameData.shop[self.shopType].fishingRodInfos) do -- if 1 == v.status then -- for k1, v1 in pairs(v.primaryProb) do -- if tonumber(string.sub(v1, 1, 1)) >= scopeLvl then -- return true -- end -- end -- end -- end -- end -- 钓鱼完成之后 function FishShop:FishingComplete(player, c2sData, s2cData) if player.gameData.shop[self.shopType].canGetFish then local cfgFishRod = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishRod") local cfgFishType = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishType") c2sData.data = assert(pb.decode("C2SFishingComplete", c2sData.data)) local scopeLvl = c2sData.data.scopeLvl -- if self:CheckLevel(player, scopeLvl) then -- 完成时鱼的等级 local data = {} data.fish = {} local fishTypeInfos = player.gameData.shop[self.shopType].fishTypeInfos local fishInfos = player.gameData.shop[self.shopType].fishInfos -- 当前鱼竿id local fishRodId = 0 for k, v in pairs(player.gameData.shop[self.shopType].fishingRodInfos) do if 1 == v.status then fishRodId = v.id -- 高级鱼竿npc任务 if 2 == fishRodId then skynet.server.npcTask:Modify(player, 100, 1) skynet.server.taskListEvent:Modify( player ,100, 1) end -- 精英鱼竿npc任务 if 3 == fishRodId then skynet.server.npcTask:Modify(player, 101, 1) skynet.server.taskListEvent:Modify( player ,101, 1) end end end local fishScope = {} -- 拿到鱼类概率 for k, v in pairs(cfgFishRod) do if 1 == scopeLvl then if v.id == fishRodId then for k1, v1 in pairs(v.primaryProb) do local arr = skynet.server.common:Split(v1, "_") arr[1], arr[2] = tonumber(arr[1]), tonumber(arr[2]) table.insert(fishScope, { fishLevel = arr[1], probability = arr[2] * 100 }) end end elseif 2 == scopeLvl then if v.id == fishRodId then for k1, v1 in pairs(v.mediumProb) do local arr = skynet.server.common:Split(v1, "_") arr[1], arr[2] = tonumber(arr[1]), tonumber(arr[2]) table.insert(fishScope, { fishLevel = arr[1], probability = arr[2] * 100 }) end end elseif 3 == scopeLvl then if v.id == fishRodId then for k1, v1 in pairs(v.seniorProb) do local arr = skynet.server.common:Split(v1, "_") arr[1], arr[2] = tonumber(arr[1]), tonumber(arr[2]) table.insert(fishScope, { fishLevel = arr[1], probability = arr[2] * 100 }) end end end end local fishType = 0 -- 鱼的类型等级 local rand = math.random(1, 100) local count = 0 for k, v in pairs(fishScope) do local probability = v.probability if count > 0 then for i = 1, count, 1 do probability = probability + fishScope[i].probability end end if rand <= probability then fishType = v.fishLevel break end count = count + 1 end -- 将出现在范围的鱼类的id存入列表 local allFish = {} for k, v in pairs(cfgFishType) do if fishType == v.fishType then table.insert(allFish, v.id) end end -- 从满足鱼的列表中随机一个鱼的id local count = math.random(1, #allFish) -- #allfish 列表的长度 local fishId = allFish[count] -- 钓鱼完成之后判断是否将玩家的相关数据修改 {id = 1,status = 0} local redDot = false if 0 == fishInfos[fishId].status then fishInfos[fishId].status = 1 redDot = true end -- 图鉴红点 if redDot then skynet.server.msgTips:Add(player, 56) end -- 将鱼的完成度计算出并存入玩家数据+ local haveData = 0 local allData = #fishTypeInfos[fishType].fishIds for k, v in pairs(fishTypeInfos[fishType].fishIds) do if fishInfos[v].status == 1 or fishInfos[v].status == 2 then haveData = haveData + 1 end end fishTypeInfos[fishType].progress = math.floor((haveData / allData + 0.005) * 100) -- 判断鱼的完成度是否解锁了鱼竿 local FishRodUnlock = player.gameData.shop[self.shopType].FishRodUnlock for k, v in pairs(player.gameData.shop[self.shopType].fishTypeInfos) do if v.fishType == 1 and v.progress >= 66 and not FishRodUnlock[2] then player.gameData.shop[self.shopType].fishingRodInfos[2].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[2] = true self:FishUnlock(player, 1, 2) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) elseif v.fishType == 2 and v.progress >= 83 and not FishRodUnlock[3] then player.gameData.shop[self.shopType].fishingRodInfos[3].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[3] = true self:FishUnlock(player, 1, 3) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) elseif v.fishType == 3 and v.progress >= 87 and not FishRodUnlock[4] then player.gameData.shop[self.shopType].fishingRodInfos[4].status = 2 player.gameData.shop[self.shopType].FishRodUnlock[4] = true self:FishUnlock(player, 1, 4) -- 将玩家可以获取鱼的最高等级存入redis中 提供给送礼进行使用 skynet.server.personal:SetDetail(player.gameData.partner.id, "fishLevel", self:GetMustFishLevel(player)) end end -- 完成度达到一百将奖励状态修改 for k, v in pairs(fishTypeInfos) do if v.progress == 100 and v.status == 0 then v.status = 2 skynet.server.msgTips:Add(player, 56) self:FishUnlock(player, 2, v.fishType) end end -- 将鱼存入背包，并将鱼的id返回客户端 skynet.server.bag:AddGoods(player, dataType.GoodsType_Fish, fishId, 1) local bagCount = skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Fish, fishId) data.fish = { goodsType = dataType.GoodsType_Fish, goodsId = fishId, goodsCount = bagCount } player:AddExpCount(5) -- 手工坊红点 local CraftRedDot = false for k1, v1 in pairs(cfgFishType) do if bagCount == v1.furnitureNum and v1.id == fishId then CraftRedDot = true end end if CraftRedDot then skynet.server.msgTips:Add(player, 57) end -- 钓鱼任务 if 1 == cfgFishType[fishId].fishType then--淡水鱼 skynet.server.taskListEvent:Modify( player ,128, 1) elseif 2 == cfgFishType[fishId].fishType then--沿海鱼 skynet.server.taskListEvent:Modify( player ,113, 1) elseif 3 == cfgFishType[fishId].fishType then--远海鱼 skynet.server.taskListEvent:Modify( player ,129, 1) elseif 4 == cfgFishType[fishId].fishType then--深海鱼 skynet.server.taskListEvent:Modify( player ,130, 1) end skynet.server.levelTask:Modify(player, 64, 1) skynet.server.achieveTask:Modify(player, 64, 1) skynet.server.taskListEvent:Modify( player ,64, 1) --skynet.server.taskListEvent:Modify( player ,27, 1) s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishingComplete") s2cData.data = assert(pb.encode("S2CFishingComplete", data)) -- end end end -- 手工坊家具兑换 function FishShop:FishCraftRedeem(player, c2sData, s2cData) c2sData.data = assert(pb.decode("C2SFishCraftRedeem", c2sData.data)) local fishId = c2sData.data.fishId local data = {} local cfgFishType = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishType") local bagCount = skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Fish, fishId) data.goodsType = dataType.GoodsType_Furniture -- 兑换商品类型 11-家具 12-装修 data.buyGoods = {} -- 兑换货物 data.fish = {} -- 对应消耗完成之后的鱼 --是否存在该商品 local repeatRebate = nil --兑换家具 local furniture = 0 for k, v in pairs(player.gameData.shop[self.shopType].fishInfos) do if v.id == fishId then --资源不足 if bagCount < v.furnitureNum then s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishCraftRedeem") s2cData.code = errorInfo.ErrorCode.OpFailed return end data.fish = { goodsType = dataType.GoodsType_Fish, goodsId = v.id, goodsCount = bagCount - v.furnitureNum } -- 将鱼从背包扣除 skynet.server.bag:RemoveGoods(player, dataType.GoodsType_Fish, fishId, v.furnitureNum) skynet.server.levelTask:Modify(player, 93, 1) skynet.server.npcTask:Modify(player, 93, 1) skynet.server.taskListEvent:Modify( player ,93, 1) break end end for k, v in pairs(cfgFishType) do if v.id == fishId then data.buyGoods = { id = v.furniture, -- 商品ID buyCount = 1 -- 购买数量 } --是否已存在 repeatRebate=v.repeatRebate furniture=v.furniture break end end local redDot = false -- 判断红点是否移除 for k1, v1 in pairs(cfgFishType) do for k2, v2 in pairs(player.gameData.bag) do if dataType.GoodsType_Fish == v2.type then if v1.id == v2.id and v2.count >= v1.furnitureNum then redDot = true end end end end if not redDot then skynet.server.msgTips:ReduceAll(player, 57) end --获取原有道具 local goodsNum = skynet.server.bag:GetGoodsCount(player, dataType.GoodsType_Furniture, data.buyGoods.id) -- 将兑换后的家具存入背包 skynet.server.bag:AddGoods(player, dataType.GoodsType_Furniture, data.buyGoods.id, 1) --发奖返利奖励 if (player.gameData.shop[self.shopType].ExchangeRecord ~= nil and player.gameData.shop[self.shopType].ExchangeRecord[furniture] ~= nil or goodsNum > 0) and repeatRebate then data.repeatRebate=repeatRebate --发放返利奖励 local eventId = pb.enum("EnumMoneyChangeEventID","EventID_141") player:GiveReward(repeatRebate , eventId ,1) end --添加兑换记录信息 if player.gameData.shop[self.shopType].ExchangeRecord == nil then player.gameData.shop[self.shopType].ExchangeRecord={} end if player.gameData.shop[self.shopType].ExchangeRecord[furniture] == nil then player.gameData.shop[self.shopType].ExchangeRecord[furniture]=furniture end s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishCraftRedeem") s2cData.data = assert(pb.encode("S2CFishCraftRedeem", data)) end -- 鱼类百科展示 function FishShop:FishIllustartionShow(player, c2sData, s2cData) self:FishRefresh(player) c2sData.data = assert(pb.decode("C2SFishIllustartionShow", c2sData.data)) local data = {} local fishTypeInfos = player.gameData.shop[self.shopType].fishTypeInfos local fishInfos = player.gameData.shop[self.shopType].fishInfos -- 已领取的每个种类鱼类图鉴id data.fishGroupIllustrationId = {} for k, v in pairs(fishTypeInfos) do if 1 == v.status then table.insert(data.fishGroupIllustrationId, v.fishType) end end -- 已领取的单个鱼类图鉴id data.singleFishillustrationId = {} for k, v in pairs(fishInfos) do if 2 == v.status then table.insert(data.singleFishillustrationId, v.id) end end s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishIllustartionShow") s2cData.data = assert(pb.encode("S2CFishIllustartionShow", data)) end -- 鱼竿展示 function FishShop:FishRodShow(player, c2sData, s2cData) c2sData.data = assert(pb.decode("C2SFishRodShow", c2sData.data)) local data = {} -- local fishingRodInfos = player.gameData.shop[self.shopType].fishingRodInfos data.fishRod = {} for k, v in pairs(player.gameData.shop[self.shopType].fishingRodInfos) do table.insert(data.fishRod, { id = v.id, status = v.status }) end s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishRodShow") s2cData.data = assert(pb.encode("S2CFishRodShow", data)) end -- 鱼竿切换 function FishShop:FishRodChange(player, c2sData, s2cData) c2sData.data = assert(pb.decode("C2SFishRodChange", c2sData.data)) local rodId = c2sData.data.rodId local data = {} -- local fishingRodInfos = player.gameData.shop[self.shopType].fishingRodInfos data.fishRod = {} -- 切换鱼竿改变鱼竿状态 for k, v in pairs(player.gameData.shop[self.shopType].fishingRodInfos) do if v.id == rodId then v.status = 1 table.insert(data.fishRod, v) else if v.status == 1 then v.status = 2 table.insert(data.fishRod, v) else table.insert(data.fishRod, v) end end end player.gameData.shop[self.shopType].fishingRodInfos = data.fishRod s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishRodChange") s2cData.data = assert(pb.encode("S2CFishRodChange", data)) end -- 三叶币奖励增加 function FishShop:CloversAdd(player, awardId) local cfgReward = skynet.server.gameConfig:GetPlayerAllCfg(player, "Reward") for k, v in pairs(cfgReward) do if v.id == awardId then local eventId = pb.enum("EnumMoneyChangeEventID", "EventID_46") player:MoneyChange(pb.enum("EnumGoodsType", "Clovers"), v.mapCoin, eventId) return v.mapCoin end end end -- 获取奖励配置三叶币数量 function FishShop:GetCloversAddNum(player, awardId) local cfgReward = skynet.server.gameConfig:GetPlayerAllCfg(player, "Reward") for k, v in pairs(cfgReward) do if v.id == awardId then return v.mapCoin end end end -- 领取图鉴奖励 function FishShop:FishIllustrationAward(player, c2sData, s2cData) c2sData.data = assert(pb.decode("C2SFishIllustrationAward", c2sData.data)) local type = c2sData.data.type local id = c2sData.data.id local data = {} local cfgSValue = skynet.server.gameConfig:GetPlayerAllCfg(player, "SValue") local fishTypeInfos = player.gameData.shop[self.shopType].fishTypeInfos local fishInfos = player.gameData.shop[self.shopType].fishInfos -- 判断该鱼类奖励有没有领取 data.type = type data.award = {} -- 领取鱼类图鉴对应奖励 if 1 == type then data.fishGroupIllustrationId = {} for k, v in pairs(fishTypeInfos) do if v.fishType == id then if 2 == v.status then v.status = 1 for k1, v1 in pairs(cfgSValue.fishUnlockReward) do if k1 == id then table.insert(data.award, { type = dataType.GoodsType_Clovers, id = v1, count = self:GetCloversAddNum(player, v1) -- 对应奖励增加对应三叶币 }) local eventId = pb.enum("EnumMoneyChangeEventID", "EventID_81") player:GiveRewardNpc(v1, self.NPCId, eventId) skynet.server.msgTips:Reduce(player, 56) end end else s2cData.code = errorInfo.ErrorCode.AlreadyGetFishAward s2cData.desc = errorInfo.ErrorMsg[s2cData.code] end end if 1 == v.status or v.fishType == id then table.insert(data.fishGroupIllustrationId, v.fishType) end end end -- 领取单个鱼图鉴对应奖励 if 2 == type then data.singleFishillustrationId = {} for k, v in pairs(fishInfos) do if v.id == id then if 1 == v.status then v.status = 2 table.insert(data.award, { type = dataType.GoodsType_Clovers, id = v.award, count = self:GetCloversAddNum(player, v.award) -- 对应奖励增加对应三叶币 }) local eventId = pb.enum("EnumMoneyChangeEventID", "EventID_81") player:GiveRewardNpc(v.award, self.NPCId, eventId) skynet.server.msgTips:Reduce(player, 56) else s2cData.code = errorInfo.ErrorCode.AlreadyGetFishAward s2cData.desc = errorInfo.ErrorMsg[s2cData.code] end end if v.status == 2 or v.id == id then table.insert(data.singleFishillustrationId, v.id) end end end local redDot = false -- 判断图鉴红点是否移除 for k, v in pairs(player.gameData.shop[self.shopType].fishInfos) do if v.status == 1 then redDot = true end end for k, v in pairs(player.gameData.shop[self.shopType].fishTypeInfos) do if v.status == 2 then redDot = true end end if not redDot then skynet.server.msgTips:Reduce(player, 56) -- log.info('红点数量' .. skynet.server.common:TableToString(skynet.server.common:GetOneTips(player).count)) end s2cData.cmd = pb.enum("MsgType", "CMD_S2C_FishIllustrationAward") s2cData.data = assert(pb.encode("S2CFishIllustrationAward", data)) end -- 该玩家可获取的最高等级的鱼 function FishShop:GetMustFishLevel(player) local fishRodId = 1 local cfgFishRod = skynet.server.gameConfig:GetPlayerAllCfg(player, "FishRod") for k, v in pairs(player.gameData.shop[self.shopType].fishingRodInfos) do if v.status > 1 and v.id > fishRodId then fishRodId = v.id end end local fishLevel = 1 for k, v in pairs(cfgFishRod[fishRodId].primaryProb) do local arr = skynet.server.common:Split(v, "_") arr[1], arr[2] = tonumber(arr[1]), tonumber(arr[2]) if arr[1] > fishLevel then fishLevel = arr[1] end end return fishLevel end skynet.server.fishShop = FishShop return FishShop