Verdade ou Desafio - Haxh v7.0

tfm.exec.disableAutoNewGame(true)
tfm.exec.disableAutoShaman(true)
tfm.exec.disableAutoScore(true)
tfm.exec.disableAutoTimeLeft(true)
tfm.exec.disableAfkDeath(true)
tfm.exec.disableAllShamanSkills(true)
shaman=""
player=""
system.disableChatCommandDisplay("shaman")
system.disableChatCommandDisplay("escolher")
system.disableChatCommandDisplay("reset")
system.disableChatCommandDisplay("sim")
system.disableChatCommandDisplay("não")
system.disableChatCommandDisplay("new")
mapa='<C><P F="0" L="1600" H="800" /><Z><S><S L="40" X="20" H="140" Y="190" T="6" P="0,0,0.3,0.2,0,0,0,0" /><S L="1600" H="40" X="800" Y="280" T="6" P="0,0,0.3,0.2,0,0,0,0" /><S L="40" H="140" X="300" Y="190" T="6" P="0,0,0,0.2,0,0,0,0" /><S L="40" X="218" H="140" Y="190" T="6" P="0,0,0.3,0.2,0,0,0,0" /><S L="42" H="10" X="259" Y="255" T="2" P="0,0,0,1.2,0,0,0,0" /><S L="320" H="30" X="160" Y="120" T="6" P="0,0,0.3,0.2,0,0,0,0" /></S><D><DC Y="218" X="87" /><P P="0,0" Y="270" T="1" X="434" /><P P="0,0" Y="269" T="1" X="675" /><P P="0,0" Y="271" T="1" X="969" /><P P="0,0" Y="272" T="1" X="1231" /><P P="0,0" Y="274" T="1" X="1512" /><P P="0,0" Y="262" T="0" X="1442" /><P P="0,0" Y="263" T="0" X="1565" /><P P="0,0" Y="260" T="0" X="1281" /><P P="0,0" Y="261" T="0" X="1172" /><P P="0,0" Y="261" T="0" X="1013" /><P P="0,0" Y="260" T="0" X="921" /><P P="0,0" Y="260" T="0" X="723" /><P P="0,0" Y="260" T="0" X="621" /><P P="0,0" Y="262" T="0" X="386" /><P P="0,0" Y="261" T="0" X="483" /><P P="0,0" Y="262" T="4" X="552" /><P P="0,0" Y="262" T="4" X="798" /><P P="0,0" Y="262" T="5" X="861" /><P P="0,0" Y="262" T="4" X="1089" /><P P="0,0" Y="260" T="4" X="1340" /><P P="0,0" Y="261" T="5" X="1385" /><DS Y="193" X="798" /></D><O /><L><VL n="Layer1" l="-1" /><JD c="ffffff,2,1,0" P1="25,43" P2="44,105" /><JD c="ffffff,2,1,0" P1="73,42" P2="45,108" /><JD c="ffffff,2,1,0" P1="129,39" P2="96,45" /><JD c="ffffff,2,1,0" P1="96,45" P2="93,106" /><JD c="ffffff,2,1,0" P1="93,106" P2="125,104" /><JD c="ffffff,2,1,0" P1="95,72" P2="127,74" /><JD c="ffffff,2,1,0" P1="163,41" P2="158,103" /><JD c="ffffff,2,1,0" P1="164,40" P2="188,40" /><JD c="ffffff,2,1,0" P1="188,40" P2="188,68" /><JD c="ffffff,2,1,0" P1="188,68" P2="161,68" /><JD c="ffffff,2,1,0" P1="161,68" P2="188,104" /><JD c="ffffff,2,1,0" P1="208,100" P2="212,40" /><JD c="ffffff,2,1,0" P1="212,40" P2="233,40" /><JD c="ffffff,2,1,0" P1="233,40" P2="256,64" /><JD c="ffffff,2,1,0" P1="256,64" P2="224,102" /><JD c="ffffff,2,1,0" P1="224,102" P2="207,102" /><JD c="ffffff,2,1,0" P1="284,99" P2="304,34" /><JD c="ffffff,2,1,0" P1="304,34" P2="324,99" /><JD c="ffffff,2,1,0" P1="292,73" P2="315,75" /><JD c="ffffff,2,1,0" P1="345,42" P2="345,98" /><JD c="ffffff,2,1,0" P1="345,39" P2="368,41" /><JD c="ffffff,2,1,0" P1="368,41" P2="389,62" /><JD c="ffffff,2,1,0" P1="389,62" P2="358,103" /><JD c="ffffff,2,1,0" P1="358,103" P2="345,101" /><JD c="ffffff,2,1,0" P1="445,40" P2="413,38" /><JD c="ffffff,2,1,0" P1="413,38" P2="408,97" /><JD c="ffffff,2,1,0" P1="408,97" P2="441,97" /><JD c="ffffff,2,1,0" P1="411,68" P2="444,65" /><JD c="ffffff,2,1,0" P1="555,31" P2="520,99" /><JD c="ffffff,2,1,0" P1="633,34" P2="631,94" /><JD c="ffffff,2,1,0" P1="632,33" P2="666,31" /><JD c="ffffff,2,1,0" P1="666,31" P2="685,54" /><JD c="ffffff,2,1,0" P1="685,54" P2="651,94" /><JD c="ffffff,2,1,0" P1="651,94" P2="632,96" /><JD c="ffffff,2,1,0" P1="705,29" P2="734,27" /><JD c="ffffff,2,1,0" P1="704,30" P2="700,90" /><JD c="ffffff,2,1,0" P1="700,90" P2="731,90" /><JD c="ffffff,2,1,0" P1="703,58" P2="733,62" /><JD c="ffffff,2,1,0" P1="781,28" P2="758,31" /><JD c="ffffff,2,1,0" P1="757,32" P2="757,64" /><JD c="ffffff,2,1,0" P1="757,64" P2="783,67" /><JD c="ffffff,2,1,0" P1="783,67" P2="783,95" /><JD c="ffffff,2,1,0" P1="783,95" P2="753,97" /><JD c="ffffff,2,1,0" P1="815,90" P2="834,31" /><JD c="ffffff,2,1,0" P1="834,31" P2="851,87" /><JD c="ffffff,2,1,0" P1="823,72" P2="846,73" /><JD c="ffffff,2,1,0" P1="887,87" P2="893,31" /><JD c="ffffff,2,1,0" P1="893,31" P2="929,35" /><JD c="ffffff,2,1,0" P1="891,58" P2="927,65" /><JD c="ffffff,2,1,0" P1="980,33" P2="977,87" /><JD c="ffffff,2,1,0" P1="1014,83" P2="1021,33" /><JD c="ffffff,2,1,0" P1="1021,33" P2="1057,32" /><JD c="ffffff,2,1,0" P1="1057,32" P2="1053,87" /><JD c="ffffff,2,1,0" P1="1053,87" P2="1015,83" /><JD c="ccfa37,2,1,0" P1="1208,39" P2="1171,41" /><JD c="ccfa37,2,1,0" P1="1171,41" P2="1172,69" /><JD c="ccfa37,2,1,0" P1="1172,69" P2="1210,69" /><JD c="ccfa37,2,1,0" P1="1210,69" P2="1213,101" /><JD c="ccfa37,2,1,0" P1="1213,101" P2="1172,99" /><JD c="ccfa37,2,1,0" P1="1231,35" P2="1271,33" /><JD c="ccfa37,2,1,0" P1="1229,36" P2="1233,97" /><JD c="ccfa37,2,1,0" P1="1232,97" P2="1267,97" /><JD c="ccfa37,2,1,0" P1="1232,66" P2="1271,66" /><JD c="ccfa37,2,1,0" P1="1285,35" P2="1308,100" /><JD c="ccfa37,2,1,0" P1="1308,100" P2="1334,39" /><JD c="ccfa37,2,1,0" P1="1382,33" P2="1350,37" /><JD c="ccfa37,2,1,0" P1="1350,37" P2="1353,95" /><JD c="ccfa37,2,1,0" P1="1353,95" P2="1388,91" /><JD c="ccfa37,2,1,0" P1="1350,62" P2="1389,65" /><JD c="ccfa37,2,1,0" P1="1411,94" P2="1409,31" /><JD c="ccfa37,2,1,0" P1="1409,31" P2="1445,91" /><JD c="ccfa37,2,1,0" P1="1445,91" P2="1445,35" /><JD c="ccfa37,2,1,0" P1="1169,117" P2="1447,107" /><JD c="ffffff,2,1,0" P1="66,122" P2="443,110" /><JD c="ffffff,2,1,0" P1="630,107" P2="1055,100" /><L /></L></Z></C>'
function eventKeyboard(name,code,down,x,y)
    if code == 17 then
        if x <= 825 then
            tfm.exec.movePlayer(name,860,350,false,1,1,false)
        end
    end
end
function eventNewPlayer(name)
    tfm.exec.bindKeyboard(name,17,true,true)
    tfm.exec.respawnPlayer(name)
end
for name,player in pairs(tfm.get.room.playerList) do
    eventNewPlayer(name)
    tfm.exec.setPlayerScore(name,0,false)
end
function eventChatCommand(name,message)
    if message == "shaman" then
        ui.addPopup(0,2,"Digite o shaman:",name,350,175,200,true)
    end
    if message == "escolher" then
        if tfm.get.room.playerList[name].isShaman then
            ui.addPopup(1,2,"Digite o rato:",name,350,175,200,true)
        end
    end
    if message == "reset" then
        if tfm.get.room.playerList[name].isShaman then
            ui.addPopup(2,1,"Reiniciar o jogo?",name,350,175,200,true)
        end
    end
    if message == "sim" then
        if tfm.get.room.playerList[name].isShaman then
            tfm.exec.newGame(mapa)
            tfm.exec.setShaman(player)
            shaman=player;
            player=""
            ui.addTextArea(0,"<font size='13'>Você agora é o shaman. Digite !escolher para escolher um rato para ser o seu prisioneiro.                              <a href='event:fecha'>Fechar</a>",shaman,0,100,800,30,0x009000,0x008000,1.0,true)
        end
    end
    if message == "não" then
        if tfm.get.room.playerList[name].isShaman then
            tfm.exec.movePlayer(player,800,440,false,1,1,false)
            ui.addTextArea(0,"<font size='13'>Você enviou o seu prisioneiro ao vazio! Agora novamente digite !escolher para ser o seu prisioneiro. Será que vai ser mais um dos exilados, hein???                                                                                                             <a href='event:fecha'>Fechar</a>",shaman,0,100,800,50,0x009000,0x008000,1.0,true)
        end
    end
end
function eventNewGame()
    tfm.exec.snow(0,0)
    tfm.exec.setUIMapName("<N>Verdade ou Desafio versão <VP>7.0")
    tfm.exec.setShaman(shaman)
    for name,player in pairs(tfm.get.room.playerList) do
        if tfm.get.room.playerList[name].isShaman then
            ui.addTextArea(0,"<font size='13'>Você agora é o shaman. Digite !escolher para escolher um rato para ser o seu prisioneiro.                              <a href='event:fecha'>Fechar</a>",shaman,0,130,800,30,0x009000,0x008000,1.0,true)
        end end
end
function eventPopupAnswer(id,name,answer)
    if id == 0 then
        shaman=answer;
        ui.addTextArea(0,"<font size='13'>O shaman escolhido foi "..shaman.."                                                                                    <a href='event:fecha'>Fechar</a>",shaman,0,100,800,30,0x009000,0x008000,1.0,true)
        tfm.exec.newGame(mapa)
        ui.addTextArea(1,"<font size='13'>Você agora é o shaman. Digite !escolher para escolher um rato para ser o seu prisioneiro.                              <a href='event:fechr'>Fechar</a>",shaman,0,130,800,30,0x009000,0x008000,1.0,true)
    end
    if id == 1 then
        player=answer;
        tfm.exec.movePlayer(answer,260,160,false,1,1,false)
        ui.addTextArea(0,"<font size='13'>O rato escolhido foi "..player.."                                                                                      <a href='event:fecha'>Fechar</a>",shaman,0,130,800,30,0x009000,0x008000,1.0,true)
        ui.addTextArea(1,"<font size='13'>Você escolhe <b>Verdade</b> ou <b>Desafio</b>? Selecione a sua opção                    <a href='event:verd'>Verdade</a> | <a href='event:desa'>Desafio</a>",answer,0,100,800,30,0x009000,0x008000,1.0,true)
    end
    if id == 2 then
        if answer == "yes" then
            tfm.exec.newGame(mapa)
            shaman="Haxhhhhhhhhh"
            player=""
            eventChatCommand("shaman","Haxhhhhhhhhh")
        end
    end
end
function eventPlayerDied(name)
    tfm.exec.setPlayerScore(name,-1,true)
end
function eventTextAreaCallback(id,name,callback)
    if callback == "fecha" then
        ui.removeTextArea(0,name)
    end
    if callback == "fechr" then
        ui.removeTextArea(1,name)
    end
    if callback == "verd" then
        verdade()
    end
    if callback == "desa" then
        desafio()
    end
end
function verdade()
    ui.removeTextArea(1,nil)
    ui.addTextArea(1,"<font size='13'>"..player.." escolheu <b>verdade!                                                                                    <a href='event:fechr'>Fechar</a>",nil,0,130,800,30,0x009000,0x008000,1.0,true)
    ui.addPopup(500,0,"<font size='13'>O seu prisioneiro escolheu <b>Verdade</b>! Faça uma pergunta de verdade para ele.<br><br>Caso o ser humano acerte, digite !sim. Caso ele erre, digite !não .<br><br>Dica de hoje: Caso você perca algo ou alguém, tenha sempre a sua disposição para procurar em todo lugar que estiver acontecendo. (capítulo 114 - ForZaldenon - temporada 3)",shaman,300,175,400,true)
end
function desafio()
    ui.removeTextArea(1,nil)
    ui.addTextArea(1,"<font size='13'>"..player.." escolheu <b>desafio!                                                                                    <a href='event:fechr'>Fechar</a>",nil,0,130,800,30,0x009000,0x008000,1.0,true)
    ui.addPopup(500,0,"<font size='13'>O seu prisioneiro escolheu <b>Desafio</b>! Faça um desafio para ele.<br><br>Caso o ser humano faça o desafio e acerte, digite !sim. Caso contrário, digite !não .<br><br>Dica de hoje: Caso você perca algo ou alguém, tenha sempre a sua disposição para procurar em todo lugar que estiver acontecendo. (capítulo 114 - ForZaldenon - temporada 3)",shaman,300,175,400,true)
end