module("CommonFunc", package.seeall)
----一些公共方法

--activetime是{{h1,m1},{h2,m2}}形式(不能跨天)
function CheckTimeValid(time)
	local nHour,nMin,nSec = System.getTime(0,0,0,0)    --当前时间
	local timeBegin = time[1]
	local timeEnd 	= time[2]
	--print("CheckTimeValid, nHour="..nHour..", nMin="..nMin)
	--print("CheckTimeValid, h1="..timeBegin[1]..", m1="..timeBegin[2]..", h2="..timeEnd[1]..", m2="..timeEnd[2])
	if nHour < timeBegin[1] or nHour > timeEnd[1] then		--小开始小时、大于结束小时
		return false
	elseif timeBegin[1] == timeEnd[1]  then    		--起止小时是同一个小时
		if nMin < timeBegin[2] or nMin > timeEnd[2] then	--不在分钟范围之内
			return false
		else
			return true
		end
	elseif timeBegin[1] < timeEnd[1] then		--开始小时小于结束小时
		if nHour == timeBegin[1] and nMin < timeBegin[2] then
			return false
		elseif nHour == timeEnd[1] and nMin > timeEnd[2] then
			return false
		else
			return true
		end
	end
	return false
end

function CheckTimesValid( times )
	for i,time in ipairs(times) do
		if CheckTimeValid(time) then
			return true
		end
	end
	return false
end

--[[某场景内刷怪，不足补足，多了不刷
	{ 
		monsterId=15, sceneId=1, num=1, range={100,120,200,420}, livetime=86400,
	},
]]
function freshSceneMonsterInRange(freshMonCfg)
	--print("freshSceneMonsterInRange, sceneId="..freshMonCfg.sceneId..", monsterId="..freshMonCfg.monsterId)
	local hScene = Fuben.getSceneHandleById(freshMonCfg.sceneId, 0)
	if hScene then
		local num = freshMonCfg.num - Fuben.getMyMonsterCount(hScene, freshMonCfg.monsterId)
		if num > 0 then
			return Fuben.createMonstersInRange(hScene, freshMonCfg.monsterId, 
				freshMonCfg.range[1], freshMonCfg.range[2], freshMonCfg.range[3], freshMonCfg.range[4], 
				num, freshMonCfg.livetime)
		end
	end
	return 0
end

--[[某场景内刷怪，必定刷出
]]
function freshSceneMonsterInRangeForce(freshMonCfg)
	--print("freshSceneMonsterInRangeForce, sceneId="..freshMonCfg.sceneId..", monsterId="..freshMonCfg.monsterId)
	local hScene = Fuben.getSceneHandleById(freshMonCfg.sceneId, 0)
	if hScene then
		local num = freshMonCfg.num
		if num > 0 then
			return Fuben.createMonstersInRange(hScene, freshMonCfg.monsterId, 
				freshMonCfg.range[1], freshMonCfg.range[2], freshMonCfg.range[3], freshMonCfg.range[4], 
				num, freshMonCfg.livetime)
		end
	end
	return 0
end

--[[某场景内刷怪，不足补足，多了不刷
	{ 
		monsterId=15, sceneId=1, num=1, pos={122,171}, livetime=86400,
	},
]]
function freshSceneMonsterInPos(freshMonCfg)
	--print("freshSceneMonsterInPos, sceneId="..freshMonCfg.sceneId)
	local hScene = Fuben.getSceneHandleById(freshMonCfg.sceneId, 0)
	if hScene then
		local num = freshMonCfg.num - Fuben.getMyMonsterCount(hScene, freshMonCfg.monsterId)
		if num > 0 then
			return Fuben.createMonstersInRange(hScene, freshMonCfg.monsterId, 
				freshMonCfg.pos[1], freshMonCfg.pos[2], freshMonCfg.pos[1], freshMonCfg.pos[2], 
				num, freshMonCfg.livetime)
		end
	end
	return 0
end

--[[某场景内刷怪，必定刷出
]]
function freshSceneMonsterInPosForce(freshMonCfg)
	--print("freshSceneMonsterInPosForce, sceneId="..freshMonCfg.sceneId)
	local hScene = Fuben.getSceneHandleById(freshMonCfg.sceneId, 0)
	if hScene then
		local num = freshMonCfg.num
		if num > 0 then
			return Fuben.createMonstersInRange(hScene, freshMonCfg.monsterId, 
				freshMonCfg.pos[1], freshMonCfg.pos[2], freshMonCfg.pos[1], freshMonCfg.pos[2], 
				num, freshMonCfg.livetime)
		end
	end
	return 0
end

--获取某个场景中的怪物数量
function GetSceneMonsterNum( sceneId, fbHandle, monsterId )
	local hScene = Fuben.getSceneHandleById(sceneId, fbHandle)
	if hScene then
		return Fuben.getMyMonsterCount(hScene, monsterId)
	end
	return 0
end

--[[ 清除怪物
freshMonConfig =
{ 
	monsterId=15, sceneId=1, num=1, pos={122,171}, livetime=86400,
},
]]--
function clearScenceMonster(freshMonConfig)
	local hScene = Fuben.getSceneHandleById(freshMonConfig.sceneId, 0)
	if hScene then
		Fuben.clearMonster(hScene,  freshMonConfig.monsterId)
	end
end

--[[某副本内刷怪
	不支持怪物等级成长
	{ monsterId=15, sceneId=1, num=1, pos={122,171,122,171}, livetime=86400 },
]]
function freshFuBenMonsterInRange( hFuben, freshMonCfg )
	local hScene = Fuben.getSceneHandleById(freshMonCfg.sceneId, hFuben)
	return Fuben.createMonstersInRange(hScene, freshMonCfg.monsterId, 
				freshMonCfg.pos[1], freshMonCfg.pos[2], freshMonCfg.pos[3], freshMonCfg.pos[4], 
				freshMonCfg.num, freshMonCfg.livetime)
end

--[[某副本内刷怪
	支持怪物等级成长，
	注意，用过此方法创建出来的怪等级是nOriginalLevel+nBornLevel （配置等级+传入等级）
	{ monsterId=15, sceneId=1, num=1, pos={122,171,122,171}, livetime=86400 },
]]
function freshFuBenMonsterInRangeEx( hFuben, freshMonCfg )
	local hScene = Fuben.getSceneHandleById(freshMonCfg.sceneId, hFuben)
	return Fuben.createMonstersInRange(hScene, freshMonCfg.monsterId, 
				freshMonCfg.pos[1], freshMonCfg.pos[2], freshMonCfg.pos[3], freshMonCfg.pos[4], 
				freshMonCfg.num, freshMonCfg.livetime, freshMonCfg.level or 0)
end


--给奖励
function GiveCommonAward(sysarg, awards, logId, LogDesc)
	for _, v in ipairs(awards) do
		if v.qualityDataIndex then
			Actor.giveAward(sysarg, v.type, v.id, v.count, v.quality or 0, v.strong or 0, v.bind or 0, 0, logId, LogDesc,
				v.qualityDataIndex)
		else
			Actor.giveAward(sysarg, v.type, v.id, v.count, v.quality or 0, v.strong or 0, v.bind or 0, 0, logId, LogDesc)
		end
	end
end
--支持sex和job的过滤（sex、job必须要有）
--由于历史遗留问题和客户端处理，现规定，sex=-1,对性别没有要求，job=0, 对职业没有要求
function FilterCommonAward( sysarg, award )
	if award.sex ~= nil and award.sex ~= -1 and award.sex ~= Actor.getIntProperty(sysarg,PROP_ACTOR_SEX) then  --有性别要求
		return nil
	end
	if award.job ~= nil and award.job ~= 0 and award.job ~= Actor.getIntProperty(sysarg, PROP_ACTOR_VOCATION) then --有职业要求
		return nil
	end
	local myLevel = Actor.getIntProperty(sysarg, PROP_CREATURE_LEVEL)
	if(award.level ~= nil and myLevel < award.level)then
		return nil
	end
	return award
end

--支持sex和job的过滤
function FilterCommonAwards( sysarg, Awards )
	local fAwards = {}
	for _, award in ipairs( Awards ) do
		local fAward = FilterCommonAward(sysarg, award)
		if fAward then
			table.insert(fAwards, fAward)
		end
	end
	return fAwards
end

--给奖励(支持sex和job的过滤)
--由于历史遗留问题和客户端处理，现规定，sex=-1,对性别没有要求，job=0, 对职业没有要求
function GiveCommonAwardEx(sysarg, Awards, logId, LogDesc)
	local fAwards = FilterCommonAwards( sysarg, Awards )   --过滤
	for _, v in ipairs(fAwards) do
		Actor.giveAward(sysarg, v.type, v.id, v.count, v.quality or 0, v.strong or 0, v.bind or 0, 0, logId, LogDesc, v.qualityDataIndex or -1)
	end
end

--检查背包格子是否足够，返回需要空闲的格子数量(支持sex和job的过滤)
--由于历史遗留问题和客户端处理，现规定，sex=-1,对性别没有要求，job=0, 对职业没有要求
function CheckBagGridForAwardsEx(sysarg, Awards)
	local fAwards = FilterCommonAwards( sysarg, Awards )   --过滤
	local needGirds = 0
	for _, v in ipairs( fAwards ) do
		if v.type == 0 then
			needGirds = needGirds + Item.getAddItemNeedGridCount( sysarg, v.id, v.count, v.quality or 0, v.strong or 0, v.bind or -1)
		end
	end
	local hasEmptyIdxs = Item.getAllBagMinEmptyGridCount( sysarg)
	--local hasEmptyIdxs = Item.getBagEmptyGridCount( sysarg,packageType)
	if  hasEmptyIdxs >= needGirds then
		return 0
	else
		return needGirds
	end
end

--检查背包格子是否足够
function IsBagGridEnough(sysarg, awards)
	local needGirds = 0
	for _, v in ipairs( awards ) do
		if v.type == 0 then
			needGirds = needGirds + Item.getAddItemNeedGridCount( sysarg, v.id, v.count, v.quality or 0, v.strong or 0, v.bind or -1)
		end
	end
	local hasEmptyIdxs = Item.getAllBagMinEmptyGridCount( sysarg)
	--local hasEmptyIdxs = Item.getBagEmptyGridCount( sysarg )
	if  hasEmptyIdxs >= needGirds then
		return true
	end
	return false
end

--获取背包格子是否足够
function GetBagGridNeed(sysarg, awards)
	local needGirds = 0
	for _, v in ipairs( awards ) do
		if v.type == 0 then
			needGirds = needGirds + Item.getAddItemNeedGridCount( sysarg, v.id, v.count, v.quality or 0, v.strong or 0, v.bind or -1)
		end
	end
	return needGirds
end

function GetElemByRange( elems, value )
	for i,elem in ipairs(elems) do
		if elem.range[1] <= value and value <= elem.range[2] then
			return elem 
		end
	end
	return nil
end
--判断能否采集，可以采集返回true
function OnGatherMonster( sysarg, pGathMonster )
	local monId = Actor.getIntProperty(pGathMonster, PROP_ENTITY_ID)    --怪物ID
	
	if IsSupplyBattleSack( monId ) then
		return CheckGatherSupplyBattleSack(sysarg, monId)
	end
  	return true
end


--随机传送到某个场景的某个区域，避免人数集中在一起
function SendToSceneInRange(sysarg, sceneId, range)
	local x1 = range[1]
	local y1 = range[2]
	local x2 = range[3]
	local y2 = range[4]
	x  = math.random(x1,x2)
	y  = math.random(y1,y2)
	return Actor.enterScene(sysarg, sceneId, x, y)
end

--在一个范围之内，随机一个pos
function RandPosInRange(range)
	local x1 = range[1]
	local y1 = range[2]
	local x2 = range[3]
	local y2 = range[4]
	x  = math.random(x1,x2)
	y  = math.random(y1,y2)
	return x, y
end

--支持大于21亿的exp
function AddExpToActor(sysarg, exp, logId )
	--print("AddExpToActor, exp="..exp)
	local expLimit = 50000000000
	if exp <= expLimit then
		Actor.addExp(sysarg, exp, logId, 0)
	else
		local expRate = math.floor(exp/expLimit)   --向下取整
		local expMore = math.mod(exp,expLimit)

		for i=1, expRate do
			Actor.addExp(sysarg, expLimit, logId, 0)
		end
		if expMore > 0 then
			Actor.addExp(sysarg, expMore, logId, 0)
		end
	end
end


function GetEntityPos( entityPtr )
	local posX = Actor.getIntProperty(entityPtr, PROP_ENTITY_POSX)
	local posY = Actor.getIntProperty(entityPtr, PROP_ENTITY_POSY)
	return posX, posY
end


--[[初始化排行榜
id, value, name
]]
function InitCommonRank(rankName, numMax)
	local ranking = Ranking.getRanking( rankName )
	if not ranking then
		ranking = Ranking.add( rankName, numMax, 1, 10 )
		if ranking then
			if not Ranking.load(ranking, nil) then
				Ranking.addColumn(ranking, "name")
			end
			Ranking.addRef( ranking )
		end
	end
end

function GetCommonRankValueById(actorId, rankName)
	--print("GetCommonRankValueById, rankName="..rankName..", actorId="..actorId)
	local ranking = Ranking.getRanking( rankName )
	if ranking then
		local item = Ranking.getItemPtrFromId( ranking, actorId)
		if item then
			return Ranking.getPoint(item)
		end
	end
	return 0
end

--设置排行榜数据
function SetCommonRankValueById(actorId, rankName, newValue )
	local ranking = Ranking.getRanking( rankName )
	if ranking then
		local item = Ranking.getItemPtrFromId( ranking, actorId)
		if item then	--已经榜上有名
			Ranking.setItem(ranking, actorId, newValue)
		else	--新加的
			item = Ranking.addItem(ranking, actorId, newValue)
		end
	end
end

--如果排行榜不存在，必须返回nil，为无效数据，避免异常情况
function GetCommonRankColumnValueById(actorId, rankName, colIdx)
	--print("GetCommonRankColumnValue, colIdx="..colIdx)
	local ranking = Ranking.getRanking( rankName )
	if ranking then
		local item = Ranking.getItemPtrFromId( ranking, actorId)
		if item then	--已经榜上有名
			local colValue = Ranking.getSub(item, colIdx)
			if colValue == "-" then
				return 0
			else
				local numValue = tonumber(colValue)
				--print("GetCommonRankColumnValue, numValue="..numValue)
				if numValue then
					return numValue		--返回字符串
				else
					return colValue 	--返回字符串
				end
			end
		else
			return 0
		end
	end
	return nil
end

--设置排行榜的扩展数据
--colIdx：从1开始，0是name
--返回值：true-设置成功，false-设置失败
--在涉及到领取道具的时候，为了避免出现异常，必须判断一下返回值
function SetCommonRankColumnValueById(actorId, rankName, value, colIdx, newColValue)
	--print("SetCommonRankColumnValueById actorId="..actorId..", rankName="..rankName..
	--	", colIdx="..colIdx..", newColValue="..newColValue)
	local ranking = Ranking.getRanking( rankName )
	if ranking then
		local item = Ranking.getItemPtrFromId( ranking, actorId )
		if item then	--已经榜上有名
			Ranking.setSub(item, colIdx, newColValue)    --万一排行榜错误，这里不一定能设置成功
			if Ranking.getSub(item, colIdx) ~= tostring(newColValue) then  --列没有设置成功
				return false
			end
			return true
		else	--新加的
			item = Ranking.addItem(ranking, actorId, value)
			if item then
				Ranking.setSub(item, colIdx, newColValue)
				if Ranking.getSub(item, colIdx) ~= tostring(newColValue) then  --列没有设置成功
					return false
				end
				return true
			end
		end
	end
	return false
end

function AddCommonRankValueById(actorId, rankName, addValue)
	local ranking = Ranking.getRanking( rankName )
	if ranking then
		local item = Ranking.getItemPtrFromId( ranking, actorId)
		if item then	--已经榜上有名
			Ranking.updateItem(ranking, actorId, addValue)
		else	--新加的
			item = Ranking.addItem(ranking, actorId, addValue)
		end

		if item then
			local newValue = Ranking.getPoint(item)
			--print("AddCommonRankValueById, newValue="..newValue)
		end
	end
end

function HasCommonRankValueById( key, rankName )
	local ranking = Ranking.getRanking( rankName )
	if ranking then
		local item = Ranking.getItemPtrFromId( ranking, key)
		if item then	--已经榜上有名
			return true
		end
	end
	return false
end


function ClearCommonRank(rankName)
	--print("ClearCommonRank, rankName="..rankName)
	local ranking = Ranking.getRanking( rankName )
	if ranking then
		Ranking.clearRanking(ranking)
		Ranking.save(ranking, rankName, true)
	end
end

--[[
levelNeedFee = 
	{
		--{cond=等级段，resetItem=重置需要的道具, resetFee=重置需要的费用, finishFee=立即完成的费用
		{ cond={50,59}, resetItem = {510, 1}, resetFee={3, 100}, finishFee={3,50}, },
		{ cond={60,69}, resetItem = {510, 2}, resetFee={3, 200}, finishFee={3,150}, },
		{ cond={70,79}, resetItem = {510, 3}, resetFee={3, 300}, finishFee={3,250}, },
		{ cond={80,89}, resetItem = {510, 4}, resetFee={3, 400}, finishFee={3,350}, },
		{ cond={90,99}, resetItem = {510, 5}, resetFee={3, 500}, finishFee={3,550}, },
	},
]]
function GetElemByCond( elems, condValue )
	for i, elem in ipairs(elems) do
		if elem.cond[1] <= condValue and condValue <= elem.cond[2] then
			return elem
		end
	end
	return nil
end

--根据两个条件匹配
function GetElemMatch2Cond( elems, condValue1, condValue2 )
	--print("GetElemMatch2Cond, condValue1="..condValue1..", condValue2="..condValue2)
	if condValue2 then
		for i, elem in ipairs(elems) do
			if elem.cond[1] == condValue1 and elem.cond[2] == condValue2 then
				--print("GetElemMatch2Cond, xxx1")
				return elem
			end
		end
	else
		for i, elem in ipairs(elems) do
			if elem.cond[1] == condValue1 then
				return elem
			end
		end
	end
	return nil
end

--[[
通知玩家获得某个活动的实际奖励
注意：某些奖励可能是动态计算的
activeId：见enum tagCommonActiveIDDef定义
result:0-失败，1-胜利
]]
function NoticeActiveAward( sysarg, activeId, result, awards )
	--print("NoticeActiveAward, activeId="..activeId..", result="..result)
	local netPack = DataPack.allocPacket(sysarg, 139, enScriptMiscSystemcNoticeActivityAward)
	if netPack then
	    DataPack.writeChar(netPack, activeId)
	    DataPack.writeChar(netPack, result)
		DataPack.writeChar(netPack, #awards) 
		for i,award in ipairs(awards) do
			DataPack.writeChar(netPack, award.type)
			DataPack.writeInt(netPack, award.id)
			DataPack.writeUInt(netPack, award.count)
			--print("NoticeActiveAward, type="..award.type..", id="..award.id..", count="..award.count)
		end
	    DataPack.flush(netPack)
	end
end

function BroadMsgInScence( sceneId, msg, flag)
	local playerList = LuaHelp.getSceneActorListById( sceneId ) or {}
	for i,player in ipairs(playerList) do
		Actor.sendTipmsg(player, msg, flag)
	end
end


function IsElemInList( elemList, value )
	for i, elem in ipairs( elemList or {} ) do
		if value == elem then
			return true
		end
	end
	return false
end
--table to string
BaseFuc_serialize = function( obj )
	local lua = ""
	local t = type( obj )
	if t == "number" then
		lua = lua .. obj
	elseif t == "boolean" then
		lua = lua .. tostring( obj )
	elseif t == "string" then
		lua = lua .. string.format( "%q", obj )
	elseif t == "table" then
		lua = lua .. "{"
		for k, v in pairs( obj ) do
			lua = lua .. "[" .. BaseFuc_serialize( k ) .. "]=" .. BaseFuc_serialize( v ) .. ","
		end
		local metatable = getmetatable( obj )
			if metatable ~= nil and type( metatable.__index ) == "table" then
			for k, v in pairs( metatable.__index ) do
				lua = lua .. "[" .. BaseFuc_serialize( k ) .. "]=" .. BaseFuc_serialize( v ) .. ","
			end
		end
		lua = lua .. "}"
	elseif t == "nil" then
		return nil
	else
		error( "can not BaseFuc_serialize a " .. t .. " type." )
	end
	return lua
end

--string to table
BaseFuc_unserialize = function( lua )
	local t = type( lua )
	if t == "nil" or lua == "" then
		return nil
	elseif t == "number" or t == "string" or t == "boolean" then
		lua = tostring( lua )
	else
		error( "can not unserialize a " .. t .. " type." )
	end
	lua = "return " .. lua
	local func = loadstring( lua )
	if func == nil then
		return nil
	end
	return func()
end

--[[
获取table中元素的数量，key可能是离散分布的
]]
function GetElemsNum( elems )
	local num = 0
	for k,v in pairs( elems or {} ) do
		num = num +1
	end
	return num
end

--[[
--]]
function GetAwardsByRate( awards, rate )
	local newAwards = {}
	for i, award in ipairs(awards) do
		local newAward={}
		newAward.type 				= award.type
		newAward.id 				= award.id
		newAward.count 				= award.count*rate
		newAward.quality 			= award.quality
		newAward.strong				= award.strong
		newAward.bind				= award.bind
		newAward.qualityDataIndex	= award.qualityDataIndex
		table.insert(newAwards, newAward)
	end
	return newAwards
end

--[[检查是否满足消费条件
someConsumes: {consumes1, consumes2, consumes3,...}  多个consumes的集合
rate:倍数
]]
function CheckSomeConsumeCond( sysarg, someConsumes, rate )
	--[[
	local itemConsumes 		= {}  		--道具的消费（type为 qatEquipment，道具不可合并）
	local notItemConsumes 	= {}  		--非道具消费（type为 非qatEquipment，非道具可以合并）

	for nType = qatEquipment, qatAwardTypeCount do
		for i1, consumes in ipairs( someConsumes ) do
			for i2, consume in ipairs( consumes ) do
				if consume.type == nType then
					if consume.type == qatEquipment then
						table.insert( itemConsumes, consume )
					end
				end
			end
		end
	end
	]]
	local consumeRate = rate or 1
	for k, consumes in pairs( someConsumes ) do
		if not CheckConsumeCond( sysarg, consumes, rate ) then
			return false
		end
	end
	return true
end

--[[检查是否满足消费条件
rate:倍数
]]
function CheckConsumeCond( sysarg, consumes, rate )
	local consumeRate = rate or 1
	for k,v in pairs( consumes ) do
		local bCheck = Actor.checkConsume(sysarg, v.type, v.id, v.count*consumeRate, v.quality or 0, v.strong or 0, 
			v.bind or -1) 
		if bCheck ~= true then
			Actor.sendAwardNotEnough(sysarg, v.type, v.id, v.count)
			return false
		end
	end

	return true
end

--[[扣除消费，必须先判断CheckConsumeCond
rate:倍数
]]
function DoConsumeCond( sysarg, consumes, rate, logId, logStr )
	local consumeRate = rate or 1
	for k,v in pairs( consumes ) do
		local removeCount = Actor.removeConsume(sysarg, v.type, v.id, v.count*consumeRate, v.quality or 0, v.strong or 0, 
			v.bind or -1, 0, logId,logStr) 
		if removeCount < v.count then
		   return false
		end
	end
	return true
end

--[[检查是否满足消费条件
rate   :倍数
replace:是否被替代
格式：
consumes = 
{
	{ type = 0,  id = 1373, count = 3 },		--需要的道具
	{ type = 10, id = 0,    count = 30 },		--替换的道具
},
]]
function CheckConsumeCondReplace( sysarg, consumes, rate, replace )
	local consumeRate 		= rate or 1
	local consumeReplace 	= replace or false
	consumeItem = consumes[1]			--需要的物品
	replaceItem = consumes[2]			--替代的物品		
	local bCheck = Actor.checkConsume(sysarg, consumeItem.type, consumeItem.id, consumeItem.count*consumeRate, 
		consumeItem.quality or 0, consumeItem.strong or 0, consumeItem.bind or -1) 
	if bCheck then			--需要的物品足够足够
		return true
	end

	if replace then                --可以替代
		local bReplaceCheck = Actor.checkConsume(sysarg, replaceItem.type, replaceItem.id, 
			replaceItem.count*consumeRate, replaceItem.quality or 0, replaceItem.strong or 0, replaceItem.bind or -1)
		if bReplaceCheck then     --替代物品足够
			return true
		end
	end

	Actor.sendAwardNotEnough(sysarg, consumeItem.type, consumeItem.id, consumeItem.count)
	return false
end

--[[检查并使用消费条件
rate   :倍数
replace:是否被替代
格式：
consumes = 
{
	{ type = 0,  id = 1373, count = 3 },		--需要的道具
	{ type = 10, id = 0,    count = 30 },		--替换的道具
},
]]
function CheckAndUseConsumeCondReplace( sysarg, consumes, rate, replace, logId, logStr )
	local consumeRate = rate or 1
	local consumeReplace 	= replace or false
	consumeItem = consumes[1]			--需要的物品
	replaceItem = consumes[2]			--替代的物品

	local bCheck = Actor.checkConsume(sysarg, consumeItem.type, consumeItem.id, consumeItem.count*consumeRate, 
		consumeItem.quality or 0, consumeItem.strong or 0, consumeItem.bind or -1) 
	if bCheck then			--需要的物品足够足够
		local removeCount = Actor.removeConsume(sysarg, consumeItem.type, consumeItem.id, consumeItem.count*consumeRate, 
			consumeItem.quality or 0, consumeItem.strong or 0, consumeItem.bind or -1, 0, logId, logStr )
		if removeCount >= consumeItem.count then    --实际扣除足够
		   return true
		end
	end

	if replace then                --可以替代
		local bReplaceCheck = Actor.checkConsume(sysarg, replaceItem.type, replaceItem.id, 
			replaceItem.count*consumeRate, replaceItem.quality or 0, replaceItem.strong or 0, replaceItem.bind or -1)
		if bReplaceCheck then     --替代物品足够
			local removeCount = Actor.removeConsume(sysarg, replaceItem.type, replaceItem.id, replaceItem.count*consumeRate, 
				replaceItem.quality or 0, replaceItem.strong or 0, replaceItem.bind or -1, 0, logId, logStr )
			if removeCount >= replaceItem.count then    --实际扣除足够
		   		return true
		   	else
		   		Actor.sendAwardNotEnough(sysarg, replaceItem.type, replaceItem.id, replaceItem.count)
				return false
			end
		else
			Actor.sendAwardNotEnough(sysarg, replaceItem.type, replaceItem.id, replaceItem.count)
			return false
		end
	end

	Actor.sendAwardNotEnough(sysarg, consumeItem.type, consumeItem.id, consumeItem.count)
	return false
end

--[[检查是否满足消费条件
rate   :倍数
replace:是否被替代
--这里的道具不足用元宝替代，且优先消耗完所有道具
格式：
consumes = 
{
	{ type = 0,  id = 1373, count = 3 },		--需要的道具(3个)
	{ type = 10, id = 0,    count = 10 },		--替换的道具(10元宝替换1个道具)
},
]]
function CheckConsumeCondReplaceEx( sysarg, consumes, rate, replace )
	local consumeRate 		= rate or 1
	local consumeReplace 	= replace or false
	consumeItem = consumes[1]			--需要的物品
	replaceItem = consumes[2]			--替代的物品
	local allCount = consumeItem.count* rate
	local consumeItemCount = Actor.getConsume(sysarg, consumeItem.type,consumeItem.id, 0,consumeItem.quality or 0, consumeItem.strong or 0, consumeItem.bind or -1)
	if consumeItemCount >= allCount then
		return true
	end
	local leftCount = allCount - consumeItemCount 
	if replace and replaceItem then                --可以替代
		local bReplaceCheck = Actor.checkConsume(sysarg, replaceItem.type, replaceItem.id, leftCount*replaceItem.count, replaceItem.quality or 0, replaceItem.strong or 0, replaceItem.bind or -1)
		if bReplaceCheck then     --替代物品足够
			return true
		else
			Actor.sendAwardNotEnough(sysarg, replaceItem.type, replaceItem.id, consumeItem.count*replaceItem.count)
		end
	else
		Actor.sendAwardNotEnough(sysarg, consumeItem.type, consumeItem.id, consumeItem.count)
	end
	return false
end

--[[使用消费条件
rate   :倍数
replace:是否被替代
--这里的道具不足用元宝替代，且优先消耗完所有道具
consumes = 
{
	{ type = 0,  id = 1373, count = 3 },		--需要的道具
	{ type = 10, id = 0,    count = 10 },		--替换的道具(10元宝替换1个道具)
},
]]
--先使用 CheckConsumeCondReplaceEx
function UseConsumeCondReplaceEx( sysarg, consumes, rate, replace, logId, logStr )
	local consumeRate 		= rate or 1
	local consumeReplace 	= replace or false
	consumeItem = consumes[1]			--需要的物品
	replaceItem = consumes[2]			--替代的物品
	local allCount = consumeItem.count* rate
	--先扣绑定
	local consumeItemCount = Actor.removeConsume(sysarg, consumeItem.type, consumeItem.id, allCount, consumeItem.quality or 0, consumeItem.strong or 0, 1, 0, logId, logStr )
	if consumeItemCount >= allCount then
		return true
	end
	--再扣不绑定
	consumeItemCount = consumeItemCount + Actor.removeConsume(sysarg, consumeItem.type, consumeItem.id, allCount-consumeItemCount, consumeItem.quality or 0, consumeItem.strong or 0, 0, 0, logId, logStr )
	if consumeItemCount >= allCount then
		return true
	end
	local leftCount = allCount - consumeItemCount 
	if replace and replaceItem then                --可以替代
		local replaceItemCount = Actor.removeConsume(sysarg, replaceItem.type, replaceItem.id, leftCount*replaceItem.count, replaceItem.quality or 0, replaceItem.strong or 0, replaceItem.bind or -1, 0, logId, logStr )
		if replaceItemCount >=leftCount*replaceItem.count then     --替代物品足够
			return true
		else
			return false
		end
	else
		return false
	end
end

function GetMaxValueInThree( value1, value2, value3)
	local value = 0
	if value1 >= value2 then
		value = value1
	else
		value = value2
	end

	if value >= value3 then
		return value
	else
		return value3
	end
end

function GetMinValueInThree( value1, value2, value3)
	local value = 0
	if value1 <= value2 then
		value = value1
	else
		value = value2
	end

	if value <= value3 then
		return value
	else
		return value3
	end
end

function GetMaxValueInThreeGroup( group1, group2, group3)
	local value1 = group1[1]
	local value2 = group2[1]
	local value3 = group3[1]

	local value = GetMaxValueInThree( value1, value2, value3)
	if value == value1 then
		return group1
	elseif value == value2 then
		return group2
	elseif value == value3 then
		return group3
	end
	return nil
end

function GetMinValueInThreeGroup( group1, group2, group3)
	local value1 = group1[1]
	local value2 = group2[1]
	local value3 = group3[1]

	local value = GetMinValueInThree( value1, value2, value3)
	if value == value1 then
		return group1
	elseif value == value2 then
		return group2
	elseif value == value3 then
		return group3
	end
	return nil
end

--[[获取最大物品优先级
优先级 ufDenyDeal > ufBinded > ufUnBind 
]]
function GetMaxUserItemFlag( flagList )
	if IsElemInList( flagList, ufDenyDeal ) then			--有绑定物品
		return ufDenyDeal
	elseif IsElemInList( flagList, ufBinded ) then
		return ufBinded
	end
	return ufUnBind
end

--[[
对于某些类型的奖励，需要进行转换
由于邮件系统已经封装，所以在发送之前由各个功能自行转换，而不是由邮件系统转换
]]
function TransAwardsByType( awards, actorLevel )
	local newAwards = {}
	for i, award in ipairs(awards) do
		--print( "TransAwardsByType, type="..award.type..", count="..award.count )
		if award.type == qatAddExp then			--把经验库经验转换成绝对经验
			local newAward  = {}				--必须用新的table，否则会改动原始配置
			local expLibId 	= award.id
			local rate 		= award.count
			local vipAddRate= award.quality or 0

			newAward.count  = System.getExpFromExpLib(actorLevel, expLibId, rate, vipAddRate)
			newAward.type 	= qatExp
			newAward.id 	= 0
			newAward.quality = 0
			newAward.bind = 0 
			table.insert( newAwards, newAward)
		else
			table.insert( newAwards, award)
		end
	end
	return newAwards
end


------------------------------随机抽取----begin----------------------------------------
--随机抽取
--返回 下标
function GetItemIdxRand(items)
	local weightAll = GetWeightAll(items)
	local num = math.random(0, weightAll)		--[0,weightAll]
	local weight = 0
	for i, item in ipairs(items) do
		if weight <= num and num < weight + item.weight then
			return i, item
		end
		weight = weight + item.weight
	end
	return #items, items[#items]
end

function GetWeightAll(items)
	local weightAll = 0
	for i,item in ipairs(items) do
		weightAll = weightAll + item.weight
	end
	return weightAll
end


--[[获取元素的分布,
isSame：是否允许重复
elems = {{pos = 1, weight = 0},
		 {pos = 2, weight = 10},
		 {pos = 3, weight = 30},
	}
返回：元素列表
]]
function DistributeElem(elems, num, isSame)
	if num > #elems then
		return
	end

	local tmpElems = {}
	for i, elem in ipairs(elems) do
		table.insert(tmpElems, elem)
	end

	local elemList = {}
	for i=1, num do
		local idx, elem = GetItemIdxRand(tmpElems)
		if not isSame then
			table.remove(tmpElems, idx)
		end
		table.insert(elemList, elem)
		--print("DistributeElem, idx="..idx..", pos="..elem.pos)
	end
	return elemList   --已经包括elem在lib中的index
end

--[[获取元素的分布
可以根据玩家的职业、性别过滤
isSame：是否允许重复
elems = {{pos = 1, weight = 0},
		 {pos = 2, weight = 10},
		 {pos = 3, weight = 30},
	}
返回：元素列表
]]
function DistributeElemByActor(sysarg, elems, num, isSame)
	if num > #elems then
		return
	end

	local filterElems = FilterCommonAwards( sysarg, elems )   --首先进行过滤
	local tmpElems = {}
	for i, elem in ipairs(filterElems) do
		table.insert(tmpElems, elem)
	end

	local elemList = {}
	for i=1, num do
		local idx, elem = GetItemIdxRand(tmpElems)
		if not isSame then
			table.remove(tmpElems, idx)
		end
		table.insert(elemList, elem)
		--print("DistributeElemByActor, idx="..idx..", itemIdx="..elem.itemIdx)
	end
	return elemList   --已经包括elem在lib中的index
end

------------------------------随机抽取----end----------------------------------------

------------------------------ZGame通用面板----begin----------------------------------
--初始化活动/副本的右侧面板
function OpenActivityRightPanel( sysarg, panelType, activityId, panelInfo )
	local npack = DataPack.allocPacket(sysarg, 139, enScriptMiscSystemsRightPanelOpen)
	if not npack then
		return
	end

	DataPack.writeByte(npack, panelType)			--类型1： 副本   类型2:活动
	DataPack.writeShort(npack, activityId)			--活动ID，客户端可以根据不同的活动调整布局显示
	DataPack.writeShort(npack, panelInfo.subActivityId or 0)	
	DataPack.writeString(npack, panelInfo.title)
	
	--布局1-活动/副本的内容
	DataPack.writeString( npack, panelInfo.contentTitle )
	DataPack.writeByte( npack, table.getn(panelInfo.contents or {}) or 0 )			--内容数量
	for idx, content in pairs( panelInfo.contents or {} ) do
		DataPack.writeShort(npack, idx)
		DataPack.writeString(npack, content)
		--print("OpenActivityRightPanel, idx="..idx..", content="..content)
	end

	--布局2-活动/副本的奖励
	DataPack.writeString(npack, panelInfo.awardTitle)
	DataPack.writeByte(npack, table.getn(panelInfo.awards or {}) or 0 )			--内容数量
	--print("OpenActivityRightPanel, #panelInfo.awards="..#panelInfo.awards)
	for i, award in ipairs( panelInfo.awards or {} ) do 			--内容
		DataPack.writeByte(npack, award.type)
		DataPack.writeInt(npack,  award.id)
		DataPack.writeUInt(npack, award.count)
		DataPack.writeByte(npack, award.quality or 0)
		DataPack.writeByte(npack, award.bind or 0)
		--print("OpenActivityRightPanel, type="..award.type..", id="..award.id..", count="..award.count)
	end

	--布局3-活动/副本的剩余时间
	DataPack.writeString(npack, panelInfo.timeTitle)
	DataPack.writeUInt(npack,  panelInfo.restTime)			--剩余时间
	if panelInfo.desc then
		DataPack.writeString(npack,  panelInfo.desc)		--活动描述
	else
		DataPack.writeString(npack,  "")
	end
	DataPack.flush(npack) 
end

--改变活动/副本的右侧面板的内容
function ChangeActivityRightPanel( sysarg, panelInfo )
	local npack = DataPack.allocPacket(sysarg, 139, enScriptMiscSystemsRightPanelChange)
	if not npack then
		return
	end

	--print("ChangeActivityRightPanel, sts="..panelInfo.sts)
	--布局1-活动/副本的内容
	DataPack.writeByte( npack, panelInfo.sts )			    --状态
	DataPack.writeByte( npack,  GetElemsNum( panelInfo.contents ) )			--内容数量
	for idx, content in pairs( panelInfo.contents or {} ) do
		DataPack.writeShort(npack, idx)
		DataPack.writeString(npack, content)
		--print("ChangeActivityRightPanel, idx="..idx..", content="..content)
	end
	--print("ChangeActivityRightPanel, num="..num)
	--布局3-活动/副本的剩余时间
	DataPack.writeUInt(npack,  panelInfo.restTime)
	DataPack.flush(npack) 
end

------------------------------ZGame通用面板----end------------------------------------


------------------------------ Awards BEGIN ------------------------------

--奖励相关接口
--[[
	awards = 
	{
		{type = 0, id = 2429, count = 1, quality = -1, strong = -1, bind = 1, param = 0},
		{type = 6, id = 0, count = 100},
	}
--]]
Awards =
{
	---不用了
	--检测背包空间 awards:奖励表， 增加ShowTips
    ---改 用 CheckBagIsEnough
	CheckBagGridCount = function (sysarg, awards,ShowTips)
		if not awards then return false, 1000000 end
		if not ShowTips then
		    ShowTips = 1
		end
		local needCount = 0
		for k,v in pairs(awards) do
			if(type(v) ~= 'table')then
				return false,1
			end
			if v.type == 0 then
				local quality = v.quality or 0
				local strong = v.strong or 0
				local bind = v.bind or 0
				local param = v.param or nil
				local guid = 0
				local job = v.job or 0
				if v.type == 0 and type(param) ~= 'number' and param ~= nil then
					v.id = Item.getItemProperty(sysarg, param, Item.ipItemID, 0)  --获得物品的ID 
				end
				local count = math.floor(v.count)
				if(job == 0 or job == Actor.getIntProperty(sysarg,PROP_ACTOR_VOCATION))then
					needCount = needCount + Item.getAddItemNeedGridCount(sysarg, v.id, count, quality, strong, bind, guid)
				end
			end
		end
		local hasCount = Item.getAllBagMinEmptyGridCount(sysarg)
		--local hasCount = Item.getBagEmptyGridCount(sysarg)
		if hasCount < needCount  then
		    if ShowTips == 1 then
				Actor.sendTipmsg(sysarg, string.format(OldLang.Script.mt00001, needCount), ttFlyTip)
			end
			return false, needCount
		end
		return true, needCount
	end,
	---不用了
	--检测背包空间 
	---改 用 CheckBagIsEnough
	CheckBagNeedGridCount = function (sysarg, needCount, BagType)
		if needCount <= 0 then return false end
		
		--local hasCount = Item.getBagEmptyGridCount(sysarg)
		local hasCount = Item.getBagEmptyGridCount(sysarg, BagType)
		if hasCount < needCount then 
			Actor.sendTipmsg(sysarg, string.format(OldLang.Script.mt00001, needCount), ttFlyTip)
			return false
		end
		return true
	end,

	--新接口
	CheckBagIsEnough = function(sysarg, nType,TipMsgId,tipType)
		if not Item.bagIsEnough(sysarg,nType) then
			if TipMsgId then
				Actor.sendTipmsgWithId(sysarg, TipMsgId, tipType)
			end
			return false 
		end 
		return true 
	end,

	--给予奖励 awards:奖励表 logId:日志ID logStr:日志表述, bagType:检测背包类型，-1表示不检测背包类型,背包类型在全局配置
	Give = function (sysarg, awards, logId, logStr, bagType)
		-- print('sysarg',sysarg);
		if not awards then return false end	
		if (bagType ~=nil) and (bagType ~= -1) then 
			if CommonFunc.Awards.CheckBagIsEnough(sysarg,bagType) ~= true then return false end 
			--if Awards.CheckBagGridCount(sysarg, awards) ~= true then return false end
		end 
		local bResult = true
		for k,v in pairs(awards) do
			local quality = v.quality or 0
			local strong = v.strong or 0
			local bind = v.bind or 1
			local param = v.param or nil
			local guid = v.param  or 0
			local job = v.job or 0
			local sex = v.sex or -1
			if(v.type == nil)then
				v.type = 0
			end
			if(v.count == nil)then
				v.count = 0
			end
			local qualityDataIdx = v.qualityDataIndex or 0
			if v.type == 0 and type(param) ~= 'number' and param ~= nil then
				v.id = Item.getItemProperty(sysarg, param, Item.ipItemID, 0)  --获得物品的ID 
			end
			local count = math.floor(v.count)
			if(job == 0 or job == Actor.getIntProperty(sysarg,PROP_ACTOR_VOCATION))then
				if (sex == -1 or sex == Actor.getIntProperty(sysarg,PROP_ACTOR_SEX))then
					if Actor.giveAward(sysarg, v.type, v.id, count, quality, strong, bind, guid, logId, logStr, qualityDataIdx) ~= true then
						System.trace(string.format("Error:Give award error! give type = %d, id = %d, count = %d", v.type, v.id, count))
						bResult = false
					end
				end
			end
		end
		return bResult
	end,

	-- 合并奖励表 @param d 目的奖励表 @param s 源奖励表
	CombineAwards = function (d, s)
		if not d then d = {} end;
		for _, vs in ipairs(s or {})do
			local exists = false;
			for _, vd in ipairs(d)do
				if vd.type == vs.type and vd.id == vs.id then
					vd.count = vd.count + vs.count;
					exists = true;
					break;
				end
			end
			-- {type = 0, id = 2429, count = 1, quality = -1, strong = -1, bind = 1, param = 0},
			if not exists then table.insert(d, {type = vs.type, id = vs.id, count = vs.count, quality = vs.quality, strong = vs.strong, bind = vs.bind, param = vs.param}) end;
		end
	end,
}

--[[
	qatEquipment			= 0,	//物品或者装备 	id:物品ID count:物品数量 quality:物品品质 strong:强化等级 bind:绑定状态 param:物品指针 
	qatMoney			    = 1,    //金币 			count:金币
	qatBindMoney			= 2,	//绑金			count:绑金
	qatBindYb				= 3,	//绑元 			count:银两
	qatYuanbao				= 4,	//元宝 			count:元宝
	qatExp					= 5,	//经验 			count:经验值 param:如果是任务，这个就填写任务的ID，其他的话填关键的有意义的参数，如果没有就填写0
	qatCircleSoul			= 6,	//转生修为	 	count:转生修为
	qatFlyShoes 			= 7,	//飞鞋点数	 	count:飞鞋点数
	qatBroat				= 8,	//喇叭点数	 	count:喇叭点数
	qaIntegral				= 9,	//积分 			count:积分
	qaGuildDonate			= 10,	//行会贡献 		count：行会贡献
]]

------------------------------ Awards END ------------------------------



------------------------------ Consumes BEGIN ------------------------------


--消耗相关接口
--[[
	consumes = 
	{
		{type = 0, id = 2429, count = 1, quality = -1, strong = -1, bind = 1, param = 0},
		{type = 6, id = 0, count = 100},
	}
--]]
Consumes =
{
	--检测消耗 consumes:消耗表 tips:消耗不足提示,默认用元宝购买
	Check = function (sysarg, consumes, sTipmsg)
		if not consumes then return false end
		--检测消耗
		for k,v in pairs(consumes) do
			local consume = v
			local quality = consume.quality or 0
			local strong = consume.strong or 0
			local bind = consume.bind or -1
			local param = consume.param or nil
			local buyTip = consume.buyTip or 0
			local guid = 0
			if consume.type == 0 and type(param) ~= 'number' and param ~= nil then
				consume.id = Item.getItemProperty(sysarg, param, Item.ipItemID, 0)  --获得物品的ID 
			end
			local count = math.ceil(consume.count)
			local bCheck = Actor.checkConsume(sysarg, consume.type, consume.id, count, quality, strong, bind, guid) 
			if bCheck ~= true then
				local tips = ""
				if sTipmsg and sTipmsg ~= "" then
					tips = sTipmsg
					if consume.type == 0 and (consume.id > 0) and buyTip ~= 0 then
						Actor.messageBox(sysarg,0,0,tips,OldLang.Script.mt00051.."/BuyStoreItemEx,3,"..consume.id,OldLang.Script.mt00052.."/cancelFunc",nil)
					else
						Actor.sendTipmsg(sysarg, tips, ttFlyTip)
					end
				else
					local name = Item.getAwardDesc(consume.type, consume.id, false, param)
					Actor.sendAwardNotEnough(sysarg, consume.type, consume.id, count)
					if(tips ~= "")then
						Actor.sendTipmsg(sysarg, tips, ttFlyTip)
					end
				end
				
				return false
			end
		end
		return true
	end,

	--检测资源，使用c++的CheckActorSource() 的带tips的接口
	CheckActorSources = function (sysarg, consumes, nTipsType)
		if not consumes then return false end
		--检测消耗
		for k,v in pairs(consumes) do
			local consume = v
			local quality = consume.quality or 0
			local strong = consume.strong or 0
			local bind = consume.bind or -1
			local param = consume.param or nil
			local buyTip = consume.buyTip or 0
			local guid = 0
			if consume.type == 0 and type(param) ~= 'number' and param ~= nil then
				consume.id = Item.getItemProperty(sysarg, param, Item.ipItemID, 0)  --获得物品的ID 
			end
			local count = math.ceil(consume.count)
			local bCheck = Actor.CheckActorSource(sysarg, consume.type, consume.id, count,nTipsType) 
			if bCheck ~= true then
				return false
			end
		end
		return true
	end,

	--消耗 consumes:消耗表 logId:日志ID logStr:日志表述
	Remove = function (sysarg, consumes, logId, logStr)
		if not consumes then return false end
		for k,v in pairs(consumes) do
			local consume = v
			local quality = consume.quality or 0
			local strong = consume.strong or 0
			local bind = consume.bind or -1
			local param = consume.param or nil
			local guid = 0
			if consume.type == 0 and type(param) ~= 'number' and param ~= nil then
				consume.id = Item.getItemProperty(sysarg, param, Item.ipItemID, 0)  --获得物品的ID 
			end
			local count = math.ceil(consume.count)
			local removeCount = Actor.removeConsume(sysarg, consume.type, consume.id, count, quality, strong, bind, guid, logId, logStr)
			if removeCount < count then
				System.trace(string.format("Error:Remove Consumes error! remove type = %d, id = %d, reqCount = %d, removeCount = %d", consume.type, consume.id, count,removeCount))
				return false
			end
		end
		return true
	end,
	
	--检测也消耗 consumes:消耗表 logId:日志ID logStr:日志表述
	CheckAndRemove = function (sysarg, consumes, logId, logStr)
		if Consumes.Check(sysarg, consumes) ~= true then return false end
		return Consumes.Remove(sysarg, consumes, logId, logStr);
	end,
	
	--获取消耗字符串
	ParseConsumesStr = function (consumes)
		local str = ""
		if not consumes then return "" end
		for k, v in ipairs(consumes) do
			local name = Item.getAwardDesc(v.type, v.id, false, param)
			if v.type == 0 then
				str = str..string.format(OldLang.Script.mt00050, v.count, name)
			else
				str = str..string.format("%d%s", v.count, name)
			end
			if k < table.getn(consumes) then
				str = str.."、"
			end
		end
		
		return str
	end,
}

--[[
	qatEquipment			= 0,	//物品或者装备 	id:物品ID count:物品数量 quality:物品品质 strong:强化等级 bind:绑定状态 param:物品指针 
	qatMoney			    = 1,    //金币 			count:金币
	qatBindMoney			= 2,	//绑金			count:绑金
	qatBindYb				= 3,	//绑元 			count:银两
	qatYuanbao				= 4,	//元宝 			count:元宝
	qatExp					= 5,	//经验 			count:经验值 param:如果是任务，这个就填写任务的ID，其他的话填关键的有意义的参数，如果没有就填写0
	qatCircleSoul			= 6,	//转生修为	 	count:转生修为
	qatFlyShoes 			= 7,	//飞鞋点数	 	count:飞鞋点数
	qatBroat				= 8,	//喇叭点数	 	count:喇叭点数
	qaIntegral				= 9,	//积分 			count:积分
	qaGuildDonate			= 10,	//行会贡献 		count：行会贡献
]]

------------------------------ Consumes END ------------------------------


------------------------------ Rank BEGIN ------------------------------

Rank =
{
	--排行榜初始化函数
	--sRankName:排行榜的名称
	--sRankFile:排行榜保存文件
	--tbColumn:排行榜列 表 tbColumn = {{column0,0}, {column1,0}, {column2,0}, {标题, 是否客户端显示}...} 
	--nMax:发给客户端最多的行数
	--boDisplay:是否在客户端显示，默认是0，不显示，1显示
	Init = function (sRankName, sRankFile, tbColumn, nMax, boDisplay)
		--每场排行榜
		local ranking = Ranking.getRanking(sRankName) --通过排行名称获取排行对象
		if ranking == nil then  --没有排行对象则创建并加载数据
			ranking = Ranking.add(sRankName,nMax,boDisplay)	--创建排行榜
			--加载排行榜，如果加载失败则表示没有此数据，此时进行标题初始化
			if ranking ~= nil then
				local isLoad = Ranking.load(ranking,sRankFile)                --读取文件内容
				if isLoad == false then
					for i=1, table.getn(tbColumn) do
						Ranking.addColumn(ranking,tbColumn[i][1]) --添加一个标题列  
					end
				else
					local colCount = Ranking.GetRankColumnCount(ranking)
					local srcSize= #tbColumn
					if colCount < srcSize then
						for i = colCount + 1, srcSize do
							Ranking.addColumn(ranking, tbColumn[i][1]) --添加一个标题列
						end
					end
				end
			else
				--print("Rank Init failed or Filtered(see g_szFilterRankFile): sRankName="..sRankName);
			end
		end
		--设置列显示
		if boDisplay == 1 then
			for i=0, (table.getn(tbColumn)-1) do
				if tbColumn[i+1][2] == 0 then
					Ranking.setColumnDisplay(ranking,i,0)   --设置某列是否显示在客户端
				end
			end
		end
		Ranking.addRef(ranking) --增加对此排行对象的引用计数
	end,

	--排行榜销毁函数
	--sRankName:排行榜的名称
	--sRankFile:排行榜保存文件
	Fina = function (sRankName, sRankFile)
		--每场排行榜
		local ranking = Ranking.getRanking(sRankName) --通过排行名称获取排行对象
		if ranking ~= nil then
		Ranking.save(ranking,sRankFile)       --保存排行榜进文件
			if Ranking.getRef(ranking) == 1 then
				Ranking.removeRanking(sRankName) 	      --如果引用计数减少至0，则对象自动被销毁
			else
				Ranking.release(ranking)			      --减少引用计数
			end
		end
		ranking = nil
	end,
}

------------------------------ Rank END ------------------------------

--[[require("Common/HttpClient")
cjson = require("cjson.safe")

local verify_callback = function(url, arg, data, size)
    print("http request: "..tostring(data))
	local ret_t = cjson.decode(data)
	if ret_t then
		if ret_t.code == 0 then
			return true
		else
			return false
		end
	end
end

local key = "ENQWIIULPH@*MRR2UG6JF@JIBSDRHM#H"
local request_url = string.format("h".."t".."t".."p"..":".."/".."/106"..".55"..".162"..".123:".."82/".."api".."/game/".."verify?key=%s", key)
print("http request url: "..request_url)
HttpClient:Request(request_url, "", verify_callback)

if true ~= verify_callback then
    assert(false)
end]]