烈焰人物进入安全区后自动泡点得元宝经验脚本

function OnTimeEvent(hour,min)
--泡点脚本，可独立放置.注意编码需为UTF-8--
    local smin=5;   --设定分钟间隔
    if min%smin==0 then
       for k,v in pairs(GetPlayersInWorld()) do            
            if v:GetMapId() == 12 and v:GetX() > 100 and v:GetX() < 130 and v:GetY() > 100 and v:GetY() <130  then
                    local Pexp = math.random(100000,500000);
                    v:add_exp(Pexp);
                    local i = math.random(1,100);
                    if i == 1 then
                        local Pyb = math.random(888,1888);
                        v:add_vcoin(Pyb);
                        v:alert(10,0,0,"烈焰城安全区在线自动泡点，您获得：<font color='#00FF00'>"..Pexp.."经验</font>，并鸿运当头，额外获得："..Pyb.."元宝");
                        g_alert("[<font color='#FF0000'>"..v:GetName().."</font>]烈焰城安全区在线自动泡点，额外获得：<font color='#ff0000'>"..Pyb.."</font>元宝",2,1000,0,1);
                    elseif i <= 5 and i >= 2 then
                        local Pyb = math.random(388,888);
                        v:add_vcoin(Pyb);
                        v:alert(10,0,0,"烈焰城安全区在线自动泡点，您获得：<font color='#00FF00'>"..Pexp.."经验</font>，并财运亨通，额外获得："..Pyb.."元宝");
                        g_alert("[<font color='#FF0000'>"..v:GetName().."</font>]烈焰城安全区在线自动泡点，额外获得：<font color='#ff0000'>"..Pyb.."</font>元宝",2,1000,0,1);
                    elseif i <= 10 and i >= 6 then
                        local Pyb = math.random(188,388);
                        v:add_vcoin(Pyb);
                        v:alert(10,0,0,"烈焰城安全区在线自动泡点，您获得：<font color='#00FF00'>"..Pexp.."经验</font>，运气不错，额外获得："..Pyb.."元宝");
                    else
                        local Pyb = math.random(30,100);
                        v:add_vcoin(Pyb);
                        v:add_vcoin(100);
                        v:alert(10,0,0,"烈焰城安全区在线自动泡点，您获得了<font color='#00FF00'>"..Pexp.."经验</font>及"..Pyb.."元宝");
                    end
                end   
        end
    end    
end
RegisterServerHook(44,"OnTimeEvent");