tl游戏资源《内置GM工具》

x926044_g_scriptId = 926044
x926044_g_GM_NAME = {
"笑我颠！",
"笑我狂！",
"笑我痴！",
}
x926044_GGNR = "公告:各位玩家本服务器将于5分钟后进行停机维护，请各位玩家及时下线以免造成不必要的数据丢失问题，预计维护10-20分钟！"

function x926044_MoNuo_GetTarObjID(sceneId,TarData)
	local targetId = 0
	local MoNuo_nHumanCount = LuaFnGetCopyScene_HumanCount(sceneId)
	for i=0,MoNuo_nHumanCount-1 do
		local MoNuo_nHumanId = LuaFnGetCopyScene_HumanObjId(sceneId,i)
		if LuaFnObjId2Guid(sceneId,MoNuo_nHumanId) == TarData then
			targetId = MoNuo_nHumanId
		end
	end
	return targetId
end
function x926044_MoNuo_AllNewGM(sceneId,selfId,arg0,arg1,arg2,arg3,arg4,arg5)
	for i = 1,getn(x926044_g_GM_NAME) do
		if GetName(sceneId,selfId) == x926044_g_GM_NAME[i] then
			x926044_MoNuo_AllNewGM2(sceneId,selfId,arg0,arg1,arg2,arg3,arg4,arg5)
		end
	end
end
function x926044_MoNuo_AllNewGM2(sceneId,selfId,arg0,arg1,arg2,arg3,arg4,arg5)
	if arg0 == 926044 then
		DispatchUICommand(sceneId,selfId,202210201)
		return
	end

	if arg0 == 18 then
		BroadMsgByChatPipe(sceneId,selfId,x926044_GGNR,4)
	end
	
	local targetId=x926044_MoNuo_GetTarObjID(sceneId,arg2)
	if targetId<=0 then
		return
	end
	
	if arg0 == 1 then
		if arg1 == 1 then
			SetMissionData(sceneId,targetId,XYJ_HONGLI,GetMissionData(sceneId,targetId,XYJ_HONGLI)+arg3)
			x926044_NotifyTips(sceneId,targetId,"你获得了红利:"..arg3)
			x926044_NotifyTips(sceneId,selfId,"对方获得了红利:"..arg3)
			return
		elseif arg1 == 2 then
			if (GetMissionData(sceneId,targetId,XYJ_HONGLI)-arg3) < 0 then
				x926044_NotifyTips(sceneId,selfId,"红利不能扣到0以下！")
				return
			end
			SetMissionData(sceneId,targetId,XYJ_HONGLI,GetMissionData(sceneId,targetId,XYJ_HONGLI)-arg3)
			x926044_NotifyTips(sceneId,targetId,"你被扣除了红利:"..arg3)
			x926044_NotifyTips(sceneId,selfId,"对方被扣除了红利:"..arg3)
			return
		end