Aniversário

adm, aniv, idade= {Robonado= true}, 'Flindix', 17; -- Admin(s), Aniversariante, Idade a ser completada
part, parts= 0, {0,1,2,4,5,9,11,13,21,22,23,24,29,31,34}; -- Partículas por segundo, IDs das partículas

bv= '<j>Clique <r><a href="event:a">aqui</a><j> para receber sua surpresa! <g><i>Somente você pode ver esta mensagem.'; -- Boas vindas
nm= 'Parabéns, <vp><b>'..aniv..'</b><j>, por mais um ano de vida.\n'; -- Nome do Mapa

p, foreach= '<p align="center"><font size="', function(t,f) for i,v in pairs(t) do f(i,v) end end;
foreach({string,math,table,tfm.exec,system,ui},function(a,b) table.foreach(b,function(c,d) _G[c]= d; end) end)

eventLoop= disableAutoShaman(true) or disableAfkDeath(true) or newGame(5929170) or setGameTime(99999) or function()
    for i= 1, part/2 do
        displayParticle(parts[random(#parts)],random(800),random(400),0,0,0,0)
    end
end

main= addTextArea(1,p..'">'..bv,aniv,5,22,790,nil,1,1,0.7) or foreach({'run','exit'},function(i,v) disableChatCommandDisplay(v) end);

run= function()
    tb,a,s= {{p..'64"><j>Parabéns <vp>'..aniv,5,25,790},{p..'60"><vp>'..idade,634,202,122}},addTextArea,setNameColor;
    part= s(aniv,0x2ECF73) or foreach(tb,function(i,v) a(i,v[1],nil,v[2],v[3],v[4],nil,1,1,0) end) or setMapName(nm) or 100;
end

eventTextAreaCallback, eventChatCommand= run, function(p,c)
    main= killPlayer(c == 'mort' and p or '') or adm[p] and ({run= 1; exit= 1})[c:lower()] and _G[c:lower()]();
end