[TFM][Brenower] Carnaval 2014

-- Carnaval 2014
-- Créditos:Brenower
-- Ideia:
-- Tables
data={};
tempo=os.time();
cores={"<VP>","<R>","<V>","<J>","<N>","<ROSE>","<BV>","<CH>","<BV>","<CE>","<N2>","<PT>","<T>"};
-- Functions
function cor(msg) -- Dá cores para o texto
    local msgg=""; -- Guarda todo o texto para retonrar ele
    for i in msg:gmatch("[^%s]+") do -- Pega os espaços do texto
        msgg=msgg.." "..cores[math.random(#cores)]..""..i -- Dá uma cor aleatorio a cada palavra separada por um espaço
    end
    return msgg -- Retorna o texto com as cores aleatorias
end
-- A nota é dado pelo tempo que o jogador está dançando
function dar_Nota(p) -- Dar a nota para o jogador
    if data[p].tempo >= 0 then
        ui.addTextArea(0,"<font size='14'>"..cor("Num vi você dançar nada! VAI DANÇAR AGORA"),p,5,20,nil,nil,1,1,0.8,true)
    end
    if data[p].tempo >= 5 then
        ui.addTextArea(0,"<font size='14'>"..cor("Eita, como você é preguiçoso!VÁ DANÇAR MAIS"),p,5,20,nil,nil,1,1,0.8,true) -- Uma textarea é gerada
    end
    if data[p].tempo >= 10 then
        ui.addTextArea(0,"<font size='14'>"..cor("Só 10 segundos ou menos. -'... Vamos dançe mais, pare de moleza!!!"),p,5,20,nil,nil,1,1,0.8,true)
    end
    if data[p].tempo >= 15 then
        ui.addTextArea(0,"<font size='14'>"..cor("Até que você foi bem. MAIS NÃO FOI O SUFICIENTE"),p,5,20,nil,nil,1,1,0.8,true)
    end
    if data[p].tempo >= 20 then
        ui.addTextArea(0,"<font size='14'>"..cor("ÉÉÉÉ Dançou bem pouco, mais pode dançar MAIS!!"),p,5,20,nil,nil,1,1,0.8,true)
    end
    if data[p].tempo >= 25 then
        ui.addTextArea(0,"<font size='14'>"..cor("EITA, quase lá você podia dançar mais né!?"),p,5,20,nil,nil,1,1,0.8,true)
    end
    if data[p].tempo >= 30 then
        ui.addTextArea(0,"<font size='14'>"..cor("EEEEEEEEEEEEEEEEEEEEEEEEEEEEH, VOCÊ DANÇOU MUITO, VOCÉ É UM MESTRE EM DANÇAR!!"),p,5,20,nil,nil,1,1,0.8,true)
    end
    data[p].tempo=0; -- Volta para 0 o tempo que o jogador está dançando
end

function dar_Data(p) -- Dar data para o jogador
    if not data[p] then -- Se o jogador não tiver uma data
        data[p]={ -- Uma data é criada para ele
            ["tempo"]=0; -- Tempo que o jogador está dançando
            ["dan"]=false; -- Verifica se o jogador está dançando
        };
    end
end
-- Novo jogador entra na sala
function eventNewPlayer(p) -- Quando um novo jogador entra na sala
    dar_Data(p) -- Uma data é dada para ele se ele não tiver
    tfm.exec.respawnPlayer(p) -- Ele renasce no mapa
end
-- Inicio do script
tfm.exec.disableAutoNewGame(true) -- Desativa o inicido de um novo jogo
tfm.exec.disableAutoShaman(true) -- Desativa a auto escolha de um shaman
tfm.exec.newGame(3720531) -- Inicia um mapa
tfm.exec.disableAfkDeath(true) -- Desativa a morte por ficar afk
for i in pairs(tfm.get.room.playerList) do
    eventNewPlayer(i)
    for k = 37,40 do
        tfm.exec.bindKeyboard(i,32,false,true)
    end
    tfm.exec.bindKeyboard(i,87,false,true)
    tfm.exec.bindKeyboard(i,65,false,true)
    tfm.exec.bindKeyboard(i,83,false,true)
    tfm.exec.bindKeyboard(i,68,false,true)
end
-- Jogador faz uma emoção
function eventEmotePlayed(p,id)
    if id == 0 then -- Verifica se a id da emoção é igual a 0
        data[p].dan=true; -- Atualiza na data que o jogador está dançando
    else
        data[p].dan=false; -- Atualiza na data que o jogador não está dançando
    end
end
-- Eventos do teclado
function eventKeyboard(p,key,down,x,y) -- Quando o jogador aperta alguma key blinda
    data[p].dan=false; -- Atualiza na data que o jogador não está dançando
end
-- Loop
function eventLoop() -- Ocorre a cada 500msg
    if tempo < os.time()-30000 then -- Verifica se já se passou 30 segundos desde que a variavel tempo foi criada
        for i in pairs(tfm.get.room.playerList) do -- Pega o nome de todos jogadores da sala
            dar_Nota(i) -- É dada a nota para eles
        end
        tempo=os.time(); -- O valor de time muda para a hora que o if foi acionado
    end
    for i in pairs(tfm.get.room.playerList) do -- Pega o nome de todos os jogadores da sala
        if data[i].dan then -- Verifica se o jogador está dançando
            data[i].tempo=data[i].tempo+0.5; -- Adiciona +1 em data[i].tempo
        end
    end
    tfm.exec.setUIMapName(cores[math.random(#cores)].."Car"..cores[math.random(#cores)].."na"..cores[math.random(#cores)].."val<G>   |   "..cores[math.random(#cores)].."Car"..cores[math.random(#cores)].."ni"..cores[math.random(#cores)].."val<p") -- Muda o nome do mapa
end