NewMining_Num = {} --矿镐是否能使用 function NEWmining_CanUse(MapID, InstanceID, TypeID, TargetID) local FreeSize = role.GetBagFreeSize(TargetID) if FreeSize < 1 then local MsgID = msg.BeginMsgEvent() msg.AddMsgEvent(MsgID, 26, 100003) --需要至少<p1>格背包空间才可继续操作 msg.AddMsgEvent(MsgID, 9, 1) msg.DispatchRoleMsgEvent(TargetID, MsgID) return 43, false end if MapID == 52649974 or MapID == 52649206 or MapID == 52649462 then return 0, false end if MapID == 3934900289 then local bCanUse1 = map.IsInArea(MapID, InstanceID, TargetID, 160) local bCanUse2 = map.IsInArea(MapID, InstanceID, TargetID, 161) local bCanUse3 = map.IsInArea(MapID, InstanceID, TargetID, 163) if bCanUse1 == true or bCanUse2 == true or bCanUse3 == true then return 0, false end end return 43, false end --合金矿镐 function NEWmining_OnUse(MapID, InstanceID, TypeID, TargetID) local ItemID = 4820105 local curDate = tonumber(os.date("%j")) if NewMining_Num.date == nil then NewMining_Num.date = curDate NewMining_Num.tuzhi = 0 NewMining_Num.huozhong1 = 0 NewMining_Num.huozhong2 = 0 NewMining_Num.yaoshi = 0 elseif NewMining_Num.date ~= curDate then NewMining_Num.date = curDate NewMining_Num.tuzhi = 0 NewMining_Num.huozhong1 = 0 NewMining_Num.huozhong2 = 0 NewMining_Num.yaoshi = 0 end local index = math.random(300) local tbl = {} if MapID == 3934900289 then tbl = {273,2,5,1,1,3,15,0} --宝箱钥匙每天2个,11-15魂晶每天5个,16-20魂晶,图纸两种每天1个,稀有材料无限制,神魂材料无限制 else tbl = {207,4,10,2,2,6,60,9} end local total = 0 for i= 1,8 do total = total + tbl[i] if index <= total then index = i break end end if math.random(100) == 17 then if index == 2 then --宝箱钥匙 NewMining_Num.yaoshi = NewMining_Num.yaoshi + 1 if NewMining_Num.yaoshi <= 4 then ItemID = 4820162 end elseif index == 3 then --11-15魂晶火种 NewMining_Num.huozhong1 = NewMining_Num.huozhong1 + 1 if NewMining_Num.huozhong1 <= 10 then ItemID = 4820131 + math.random(5) + (math.random(2)-1)*20 end elseif index == 4 then --16-20魂晶火种 NewMining_Num.huozhong2 = NewMining_Num.huozhong2 + 1 if NewMining_Num.huozhong2 <= 2 then ItemID = 4820136 + math.random(5) + (math.random(2)-1)*20 end elseif index == 5 then --图纸 NewMining_Num.tuzhi = NewMining_Num.tuzhi + 1 if NewMining_Num.tuzhi <= 3 then ItemID = 4820191 + math.random(36) end elseif index == 6 then --碎片 ItemID = 4820119 + math.random(2) elseif index == 7 then --普通火种 ItemID = 4820121 + math.random(10) + (math.random(2)-1)*20 elseif index == 8 then --稀有兑换神魔魂道具 ItemID = 4820111 end else if math.random(1000) >= 976 then ItemID = 4820110 end end if ItemID == 4820105 then if math.random(30) == 7 then ItemID = ItemID + 1 elseif math.random(20) == 7 then ItemID = ItemID + 2 end end role.AddRoleItem(MapID, InstanceID, TargetID, ItemID, 1, -1, 8, 420) role.FishingSendClient(MapID, InstanceID, TargetID) --告诉客户端重新使用(原钓鱼) end aux.RegisterItemEvent(4820112, 0, "NEWmining_CanUse") aux.RegisterItemEvent(4820112, 1, "NEWmining_OnUse") function NEWmining2_CanUse(MapID, InstanceID, TypeID, TargetID) local FreeSize = role.GetBagFreeSize(TargetID) if FreeSize < 1 then local MsgID = msg.BeginMsgEvent() msg.AddMsgEvent(MsgID, 26, 100003) --需要至少<p1>格背包空间才可继续操作 msg.AddMsgEvent(MsgID, 9, 1) msg.DispatchRoleMsgEvent(TargetID, MsgID) return 43, false end if MapID == 52649974 or MapID == 52649206 or MapID == 52649462 then return 0, false end if MapID == 3934900289 then local bCanUse1 = map.IsInArea(MapID, InstanceID, TargetID, 160) local bCanUse2 = map.IsInArea(MapID, InstanceID, TargetID, 161) local bCanUse3 = map.IsInArea(MapID, InstanceID, TargetID, 163) if bCanUse1 == true or bCanUse2 == true or bCanUse3 == true then return 0, false end end return 43, false end function NEWmining2_OnUse(MapID, InstanceID, TypeID, TargetID) local ItemID = 4900389 local index = math.random(300) local tbl = {} if MapID == 3934900289 then tbl = {150,50,50,50} --宝箱钥匙每天2个,11-15魂晶每天5个,16-20魂晶,图纸两种每天1个,稀有材料无限制,神魂材料无限制 else tbl = {180,40,40,40} end local total = 0 for i= 1,4 do total = total + tbl[i] if index <= total then index = i break end end if index == 1 then --碎片 ItemID = 6600155 elseif index == 2 then --普通火种 ItemID = 4900398 elseif index == 3 then --稀有兑换神魔魂道具 ItemID = 4900393 elseif index == 4 then --稀有兑换神魔魂道具 ItemID = 4900392 end role.AddRoleItem(MapID, InstanceID, TargetID, ItemID, 1, -1, 8, 420) role.FishingSendClient(MapID, InstanceID, TargetID) --告诉客户端重新使用(原钓鱼) end aux.RegisterItemEvent(4900389, 0, "NEWmining2_CanUse") aux.RegisterItemEvent(4900389, 1, "NEWmining2_OnUse")