Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- min=0
- max=100
- arg="%d+"
- numero=math.random(min+1,max-1)
- resultado=""..numero..""
- msg="<p align='center'><V>[Evento]</V> Aguarde o administrador iniciar o Sorteio!"
- iniciou=false
- vencedor=false
- admin="Doador"
- premio="Prêmio"
- player={}
- function eventNewPlayer(name)
- player[name]={
- v=0,
- }
- ui.addTextArea(1,msg,name,5,28,790,0,1,1,1,true)
- end
- for name,player in pairs(tfm.get.room.playerList) do
- eventNewPlayer(name)
- end
- function eventChatMessage(name,message)
- if message == "!iniciar" and name == admin then
- print("A resposta correta é: "..numero)
- msg="<p align='center'><V>[Evento]</V> Digite um número entre "..min.." e "..max.." <V>[Sorteio Patrocinado Por: <J>"..admin.."</J>]</V> | <V>Prêmio: </V>"..premio.."!"
- ui.addTextArea(1,msg,todos,5,28,790,0,1,1,1,true)
- iniciou=true
- end
- if message == "!parar" and name == admin then
- msg="<p align='center'><V>[Evento]</V> O administrador parou o evento! "
- ui.addTextArea(1,msg,todos,5,28,790,0,1,1,1,true)
- iniciou=false
- end
- for num=min,max do
- for i in string.gmatch(num,arg) do
- if message == i and vencedor == true and iniciou == true then
- result="<R>Oops, parece que alguém já acertou!</R>"
- ui.addTextArea(2,"<p align='center'>"..result,name,5,380,790,0,1,1,1,true)
- end
- if message == i and vencedor == false and iniciou == true then
- local result = "ERROR"
- if message == resultado then
- result="<J>Parabéns, você acertou!</J>"
- msg="<p align='center'><V>[Evento]</V> O/A jogador/a "..name.." acertou o número! Resposta: <R>"..resultado.."</R>"
- ui.addTextArea(1,msg,todos,5,28,790,0,1,1,1,true)
- for jogadores,player in pairs(tfm.get.room.playerList) do
- if name ~= jogadores then
- ui.removeTextArea(2,jogadores)
- end
- end
- vencedor=true
- end
- if message ~= resultado then
- player[name].v=player[name].v+1
- result="<R>Oops, você errou! Tente novamente. ("..player[name].v..")</R>"
- end
- ui.addTextArea(2,"<p align='center'>"..result,name,5,380,790,0,1,1,1,true)
- end
- end
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement