烈焰私服服务端增加散财仙子脚本
发表时间：2017-12-15 07:06点击人气：责任编辑：admin
--接受定制各种脚本
--qq19925508
--本脚本说明：
--3个全局变量 99 98 97 99记录奖品内容，98记录每轮红包个数，97记录红包轮数
--1个个人变量 399 399记录每轮红包是否领取
--变量请根据自己的具体情况更换，以免冲突
function OnTimeEvent(hour,min) --第14 15 16 17点的0分钟系统自动发红包
if hour == 12 or hour == 15 or hour == 18 or hour == 21 then --自己添加发红包时间
if min == 0 then
g_set_param(99,0); --奖品内容重置
g_set_param(98,10); --红包个数重置
g_set_param(97,g_get_param(97)+1); --红包轮数标识
g_alert("<font color='#FF00FF'>新一轮红包已发放完毕</font><font color='#FF0000'>孩儿们速速来抢</font>",1,1000,0,2);
g_alert("<font color='#FF00FF'>新一轮红包已发放完毕</font><font color='#FF0000'>孩儿们速速来抢</font>",2,1000,0,1);
end
end
end
function ontalk3015(npc,event,player)
player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
<font face='华文行楷' color='#84C1FF' size ='20'>系统红包</font>
#&talk_line#&
每天12、15、18、21点发10个红包，海量大礼免费抢
#&talk_line#&
当前剩余：]]..g_get_param(98)..[[个红包
<a href='event:M2402,111'>我要抢红包</a>
当前剩余红包内容：
]]);
if bitget(g_get_param(99),1) == 1 and bitget(g_get_param(99),2) == 1 and
bitget(g_get_param(99),3) == 1 and bitget(g_get_param(99),4) == 1 and
bitget(g_get_param(99),5) == 1 and bitget(g_get_param(99),6) == 1 and
bitget(g_get_param(99),7) == 1 and bitget(g_get_param(99),8) == 1 and
bitget(g_get_param(99),9) == 1 and bitget(g_get_param(99),10) == 1 then
player:echo(0,npc:GetLowGUID(),[[
奖品已经被扒光了
]]);
else
if bitget(g_get_param(99),1) == 0 then
player:echo(0,npc:GetLowGUID(),[[
1、元宝10万-50万
]]);
end
if bitget(g_get_param(99),2) == 0 then
player:echo(0,npc:GetLowGUID(),[[
2、元宝10万-50万
]]);
end
if bitget(g_get_param(99),3) == 0 then
player:echo(0,npc:GetLowGUID(),[[
3、元宝10万-50万
]]);
end
if bitget(g_get_param(99),4) == 0 then
player:echo(0,npc:GetLowGUID(),[[
4、元宝10万-50万
]]);
end
if bitget(g_get_param(99),5) == 0 then
player:echo(0,npc:GetLowGUID(),[[
5、元宝50万-100万
]]);
end
if bitget(g_get_param(99),6) == 0 then
player:echo(0,npc:GetLowGUID(),[[
6、元宝50万-100万
]]);
end
if bitget(g_get_param(99),7) == 0 then
player:echo(0,npc:GetLowGUID(),[[
7、元宝50万-100万
]]);
end
if bitget(g_get_param(99),8) == 0 then
player:echo(0,npc:GetLowGUID(),[[
8、元宝100万-200万
]]);
end
if bitget(g_get_param(99),9) == 0 then
player:echo(0,npc:GetLowGUID(),[[
9、战罡1-3个
]]);
end
if bitget(g_get_param(99),10) == 0 then
player:echo(0,npc:GetLowGUID(),[[
10、神器结晶
]]);
end
end
end
function ontalk3015_111(npc,event,player)
if player:get_player_type() >= 10 then --VIP等级
if g_get_param(98) >0 then
if player:get_param(222) < g_get_param(97) then
local i = math.random(1,100);
if i>=1 and i<=10 then
if bitget(g_get_param(99),1) == 0 then
local yb = math.random(100000,500000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),1));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=11 and i<=20 then
if bitget(g_get_param(99),2) == 0 then
local yb = math.random(100000,500000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),2));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=21 and i<=30 then
if bitget(g_get_param(99),3) == 0 then
local yb = math.random(100000,500000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),3));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=31 and i<=40 then
if bitget(g_get_param(99),4) == 0 then
local yb = math.random(100000,500000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),4));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=41 and i<=50 then
if bitget(g_get_param(99),5) == 0 then
local yb = math.random(500000,1000000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),5));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=51 and i<=60 then
if bitget(g_get_param(99),6) == 0 then
local yb = math.random(500000,1000000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),6));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=61 and i<=70 then
if bitget(g_get_param(99),7) == 0 then
local yb = math.random(500000,1000000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),7));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=71 and i<=80 then
if bitget(g_get_param(99),8) == 0 then
local yb = math.random(1000000,1500000);
player:add_vcoin(yb); --中得奖品
g_set_param(99,bitset(g_get_param(99),8));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..yb.."元宝");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..yb.."</font>]元宝！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=81 and i<=90 then
if bitget(g_get_param(99),9) == 0 then
local i = math.random(1,3);
player:add_item(10058,i,0);
g_set_param(99,bitset(g_get_param(99),9));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..i.."个战罡");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..i.."</font>]个战罡！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
if i>=91 and i<=100 then
if bitget(g_get_param(99),10) == 0 then
local i = math.random(50,100);
player:add_vcoin(i); --中得奖品
player:add_item(10291,i,0);
g_set_param(99,bitset(g_get_param(99),10));
g_set_param(98,g_get_param(98)-1);
player:set_param(222,g_get_param(97));
player:alert(10,0,0,"恭喜你打开红包获得"..i.."神器结晶");
g_alert("<font color='#FF0000'>VIP"..player:get_player_type().."</font>玩家[<font color='#FF0000'>"..player:GetName().."</font>]打开红包获得[<font color='#FF0000'>"..i.."</font>]神器结晶！f03_mcf03_mcf03_mc",2,1000,0,1);
else
player:alert(10,0,0,"运气有点差哦，红包里面什么都没有!");
end
end
else
player:alert(110,0,0,"每轮红包只能领取一次");
end
else
player:alert(110,0,0,"本轮红包已被抢光，请等待下一轮");
end
else
player:alert(110,0,0,"VIP等级低于10级，无法抢红包");
end
ontalk3015(npc,0,player,0);
end
Npc3015Funid =
{
[0] = ontalk3015;
[111] = ontalk3015_111;
}
function CreatureNpcFun(npc,event,player,funid)
if Npc3015Funid[funid] ~= nil then
Npc3015Funid[funid](npc,event,player);
end
end
RegisterUnitEvent(3015,20,"ontalk3015")
RegisterUnitEvent(3015,29,"CreatureNpcFun")
RegisterServerHook(44,"OnTimeEvent");
- 上一篇：烈焰私服服务端增加龙魔神殿传送NPC脚本
- 下一篇：烈焰私服服务端自定义装备回收脚本