--锟节讹拷战锟斤拷锟剿拷锟絅PC锟斤拷锟斤拷锟斤拷锟杰家ｏ拷锟斤拷锟斤拷锟斤拷峁┯︼拷锟斤拷锟?4:00锟斤拷17:00锟斤拷21:00锟斤拷刷锟斤拷锟斤拷锟斤拷时锟斤拷为2小时
--圣锟斤拷锟节活动锟节间（2010-12-14锟斤拷2011-1-14锟斤拷  圣锟斤拷锟斤拷
--每锟秸碉拷12锟斤拷30锟斤拷16锟斤拷30锟斤拷20锟斤拷30锟结开始锟斤拷6030001锟斤拷

Xinniandayan_start = 0
sheng_dan_shu = 0 --锟斤拷录锟斤拷锟斤拷圣锟斤拷锟斤拷
shengdan_yanhuishang = 0
shengdan_shu = 0

function yuandan_OnTimerMin(actID)
	--local curmon = tonumber(os.date("%m"))
	--local curday = tonumber(os.date("%d"))
	local curmin = tonumber(os.date("%M"))
	local curhour = tonumber(os.date("%H"))
	--local curweekyear = tonumber(os.date("%Y"))

--刷锟斤拷圣锟斤拷锟斤拷
	if sheng_dan_shu == 0 then
		sheng_dan_shu = map.MapCreateCreature(3424073512, -1, 5600019, 616, 22900, 534)-- 28163   23510   29803
	end

    if curmin == 0 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 102, 300019)    --圣锟斤拷锟斤拷锟斤拷锟斤拷锟节讹拷战锟斤拷堑牡锟?563锟斤拷596>锟斤拷30锟斤拷锟斤拷锟较碉拷锟斤拷铱锟斤拷缘锟绞ワ拷锟斤拷锟斤拷锟斤拷锟饺∈ワ拷锟斤拷锟斤拷锟斤拷圣锟斤拷祝锟斤拷
		msg.DispatchWorldMsgEvent(MsgID)
	end

--锟斤拷锟斤拷圣锟斤拷锟斤拷刷锟斤拷
	if ((curhour == 12 or curhour == 16 or curhour == 20) and curmin >= 30) or (curhour == 13 or curhour == 17 or curhour == 21) or ((curhour == 14 or curhour == 18 or curhour == 22) and curmin < 30) then
		if shengdan_shu == 0 then
				local a = math.random(1,3)
				if a == 1 then
					shengdanshu = map.MapCreateColCreature(3424073256, -1, 6030001, 894, 2872, 1237)--锟竭伙拷之锟斤拷s03  44741   2873   61871
					unit.AddBuff(3424073256, -1, shengdanshu, 6936601, shengdanshu)
					unit.AddBuff(3424073256, -1, shengdanshu, 6936801, shengdanshu)
					local MsgID = msg.BeginMsgEvent()
					msg.AddMsgEvent(MsgID, 102, 300020)    --锟斤拷锟斤拷圣锟斤拷锟斤拷锟窖撅拷锟斤拷锟斤拷锟斤拷锟竭伙拷之锟斤拷锟斤拷<894, 1237>锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟叫碉拷圣锟斤拷锟斤拷去取锟斤拷锟斤拷圣锟斤拷锟斤拷锟斤拷桑锟?030001锟斤拷取1000锟斤拷锟斤拷品锟斤拷锟斤拷取锟斤拷锟皆后，伙拷锟斤拷锟叫革拷锟斤拷锟斤拷锟斤拷锟铰硷拷锟斤拷锟斤拷锟斤拷圣锟斤拷锟斤拷只锟斤拷锟斤拷2小时锟斤拷锟斤拷锟斤拷锟阶ワ拷锟斤拷锟?
					msg.DispatchWorldMsgEvent(MsgID)
				elseif a == 2 then
					shengdanshu1 = map.MapCreateColCreature(3424071976, -1, 6030001, 646, 14111, 1027)--锟斤拷锟斤拷锟窖癸拷s04   32337   14170  50737
					unit.AddBuff(3424071976, -1, shengdanshu1, 6936601, shengdanshu1)
					unit.AddBuff(3424071976, -1, shengdanshu1, 6936801, shengdanshu1)
					local MsgID = msg.BeginMsgEvent()
					msg.AddMsgEvent(MsgID, 102, 300021)    --锟斤拷锟斤拷圣锟斤拷锟斤拷锟窖撅拷锟斤拷锟斤拷锟节憋拷锟斤拷锟窖谷碉拷<646, 1027>锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟叫碉拷圣锟斤拷锟斤拷去取锟斤拷锟斤拷圣锟斤拷锟斤拷锟斤拷桑锟?030001锟斤拷取1000锟斤拷锟斤拷品锟斤拷锟斤拷取锟斤拷锟皆后，伙拷锟斤拷锟叫革拷锟斤拷锟斤拷锟斤拷锟铰硷拷锟斤拷锟斤拷锟斤拷圣锟斤拷锟斤拷只锟斤拷锟斤拷2小时锟斤拷锟斤拷锟斤拷锟阶ワ拷锟斤拷锟?
					msg.DispatchWorldMsgEvent(MsgID)
				elseif a == 3 then
					shengdanshu2 = map.MapCreateColCreature(3424071720, -1, 6030001, 1201, 10476, 1236)--锟斤拷锟斤拷锟斤拷雪s05    60055   10475   61821
					unit.AddBuff(3424071720, -1, shengdanshu2, 6936601, shengdanshu2)
					unit.AddBuff(3424071720, -1, shengdanshu2, 6936801, shengdanshu2)
					local MsgID = msg.BeginMsgEvent()
					msg.AddMsgEvent(MsgID, 102, 300022)    --锟斤拷锟斤拷圣锟斤拷锟斤拷锟窖撅拷锟斤拷锟斤拷锟节憋拷锟斤拷锟斤拷雪锟斤拷<1201, 1236>锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟叫碉拷圣锟斤拷锟斤拷去取锟斤拷锟斤拷圣锟斤拷锟斤拷锟斤拷桑锟?030001锟斤拷取1000锟斤拷锟斤拷品锟斤拷锟斤拷取锟斤拷锟皆后，伙拷锟斤拷锟叫革拷锟斤拷锟斤拷锟斤拷锟铰硷拷锟斤拷锟斤拷锟斤拷圣锟斤拷锟斤拷只锟斤拷锟斤拷2小时锟斤拷锟斤拷锟斤拷锟阶ワ拷锟斤拷锟?
					msg.DispatchWorldMsgEvent(MsgID)
				end
			shengdan_shu = 1
			end
	elseif (curhour == 14 or curhour == 18 or curhour == 22) and curmin == 30 then
	    if shengdan_shu ~= 0 then
			map.MapDeleteCreature(shengdan_shu_Map, -1, shengdan_shu)
			shengdan_shu = 0
		end
	elseif (curhour == 12 or curhour == 16 or curhour == 20) and curmin == 25 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 102, 300023)    --锟斤拷锟斤拷圣锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟竭伙拷之锟斤拷锟斤拷锟斤拷锟斤拷锟窖谷伙拷锟竭憋拷锟斤拷锟斤拷雪锟斤拷锟斤拷锟斤拷锟斤拷锟叫碉拷圣锟斤拷锟斤拷去取锟斤拷锟斤拷圣锟斤拷锟斤拷锟斤拷桑锟斤拷锟斤拷锟绞ワ拷锟斤拷锟斤拷锟饺?000锟斤拷锟斤拷品锟斤拷锟斤拷取锟斤拷锟皆后，伙拷锟斤拷锟叫革拷锟斤拷锟斤拷锟斤拷锟铰硷拷锟斤拷锟斤拷锟斤拷圣锟斤拷锟斤拷只锟斤拷锟斤拷2小时锟斤拷锟斤拷锟斤拷锟阶ワ拷锟斤拷锟?
		msg.DispatchWorldMsgEvent(MsgID)
	else
	    shengdan_shu = 0
	end
end

--锟斤拷锟斤拷
aux.RegisterActEvent(34, 4, "yuandan_OnTimerMin")




function Xinnian_OnTimerMin(actID)

	local curmin = tonumber(os.date("%M"))
	local curhour = tonumber(os.date("%H"))




--刷锟斤拷NPC 锟斤拷锟斤拷锟斤拷锟斤拷
	if (curhour == 14 or curhour == 17 or curhour == 21) and curmin < 31 then
		if Xinniandayan_start == 0 then

			Xinniandayan_start = 1
			for q=0,14 do                       --锟捷达拷锟斤拷锟睫革拷
				act.SetActScriptData(36, 1, q, 0)
				act.SaveActScriptData(36)
			end
		end
		--local CompNum = role.GetRoleScriptData(RoleID, 1, RoleDataType["Xinnianshipin"])
		--role.SetRoleScriptData(RoleID, 1, RoleDataType["Xinnianshipin"], 0)
        --shengdan_yanhuishang = map.MapCreateCreature(3424073512, -1, 5600015, 531, 23510, 621)-- 26583  23510  31082


	else
	    Xinniandayan_start = 0
	    if (curhour ==13 or curhour == 16 or curhour == 20 ) and curmin == 55 then
			local MsgID = msg.BeginMsgEvent()
			msg.AddMsgEvent(MsgID, 102, 300018)    --锟斤拷锟斤拷锟斤拷峁┯︼拷碳锟斤拷锟斤拷锟斤拷锟斤拷诙锟秸斤拷锟角碉拷<531锟斤拷621>锟斤拷只要锟斤拷锟斤拷锟斤拷锟斤拷锟酵就可伙拷酶锟斤拷纸锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟角帮拷锟轿伙拷锟揭伙拷锟叫伙拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟?
			msg.DispatchWorldMsgEvent(MsgID)
		elseif (curhour == 14 or curhour == 17 or curhour == 21) and curmin == 31 then
		    local MsgID = msg.BeginMsgEvent()
			msg.AddMsgEvent(MsgID, 102, 300028)    --锟斤拷锟斤拷锟斤拷锟斤拷丫锟斤拷占锟斤拷锟斤拷锟斤拷愎伙拷锟绞筹拷铮拷锟斤拷锟阶硷拷锟斤拷锟斤拷锟斤拷锟斤拷偷却锟斤拷赂锟绞憋拷锟轿碉拷锟斤拷锟斤拷锟斤拷锟缴ｏ拷
			msg.DispatchWorldMsgEvent(MsgID)
		end
	end

end
aux.RegisterActEvent(36, 4, "Xinnian_OnTimerMin")

 
function shengdan_OnEnd(actID)
	map.MapDeleteCreature(3424073512, -1, sheng_dan_shu)--删锟斤拷锟斤拷锟斤拷圣锟斤拷锟斤拷
end
aux.RegisterActEvent(34, 3, "shengdan_OnEnd")

 
function yuandan_OnEnd(actID)
    map.MapDeleteCreature(3424073512, -1, shengdan_yanhuishang)
	map.MapDeleteCreature(3424073512, -1, shixian_hecheng)--删锟斤拷锟斤拷锟斤拷圣锟斤拷锟斤拷
	for q=0,14 do                       
		act.SetActScriptData(36, 1, q, 0)
		act.SaveActScriptData(36)
	end
end
aux.RegisterActEvent(36, 3, "yuandan_OnEnd")