Banheiro Magico

xml='<C><P D="x_bouboum/x_fond/x_f4.jpg" /><Z><S><S L="50" X="649" H="10" Y="207" T="14" P="0,0,0,0,60,0,0,0" /><S L="88" H="23" X="684" v="0001" Y="200" T="9" P="0,0,,,,0,0,0" /><S L="50" H="10" X="718" Y="208" T="14" P="0,0,0,0,-60,0,0,0" /><S L="50" X="682" H="10" Y="220" T="14" P="0,0,0,0,0,0,0,0" /><S P="0,0,0.3,0.2,0,0,0,0" L="280" o="ffffff" X="660" Y="243" T="12" H="45" /><S L="280" o="ffffff" X="141" H="45" Y="243" T="12" P="0,0,0.3,0.2,0,0,0,0" /><S L="320" o="ffffff" X="640" H="45" Y="288" T="12" P="0,0,0.3,0.2,0,0,0,0" /><S P="0,0,0.3,0.2,0,0,0,0" L="320" o="ffffff" H="45" Y="288" T="12" X="161" /><S L="360" o="ffffff" H="45" X="181" Y="333" T="12" P="0,0,0.3,0.2,0,0,0,0" /><S P="0,0,0.3,0.2,0,0,0,0" L="360" o="ffffff" X="620" Y="333" T="12" H="45" /><S L="800" o="ffffff" X="400" H="45" Y="378" T="12" P="0,0,0.3,0.2,0,0,0,0" /></S><D><P C="ffffff" Y="224" T="120" P="1,0" X="684" /><P C="e8e9eb,e8e9eb" Y="221" T="119" P="0,1" X="25" /><T Y="359" X="400" /><P X="159" Y="148" T="114" P="0,0" /><P C="e3e3e3,1b1d1c,e3e3e3" Y="222" T="128" X="183" P="0,0" /><P C="e3e3e3,1b1d1c,e3e3e3" Y="222" T="128" P="0,1" X="135" /><P C="e3e3e3,a31638" Y="227" T="127" X="158" P="0,0" /></D><O /></Z></C>'
local priv={}
local espelho={}
local saiespelho={}
local es={}
mensag = 0
for name in pairs(tfm.get.room.playerList) do
    priv[name] = false
    espelho[name] = false
    saiespelho[name] = false
    es[name] = 0
end

function localidade()
    for name,i in pairs(tfm.get.room.playerList) do
        if i.x > 641 and i.x < 725 and i.y > 180 and i.y < 220 then
            for k = 10,0,-1 do
                tfm.exec.displayParticle(14,math.random(641,725),math.random(176,215),0,math.random(1.1),0,math.random(0.22))
            end
        end
        if es[name] == 0 and i.x > 140 and i.x < 175 and i.y > 160 and i.y < 195 then
            ui.addTextArea(1, "<font size=\"15\">Diga: Espelho, espelho meu, tem alguem mais bonita do que eu?", name, 74, 212, 262, 44, 0x000001, 0x000001, 1, true)
            saiespelho[name] = true
        end
        if priv[name] == true and i.x < 114 and i.x > 150 and i.y < 152 and i.y > 190 then
            ui.removeTextArea(0, name)
        end
    end
end

function eventChatMessage(name, msg)
    if msg == "Espelho, espelho meu, tem alguem mais bonita do que eu?" or msg == "espelho, espelho meu, tem alguem mais bonita do que eu?" or msg == "espelho espelho meu tem alguem mais bonita do que eu?" or msg == "Espelho espelho meu tem alguem mais bonita do que eu?" or msg == "espelho, espelho meu, tem alguém mais bonita do que eu?" or msg == "Espelho, espelho meu, tem alguém mais bonita do que eu?" or msg == "espelho espelho meu tem alguém mais bonita do que eu?" then
        mensag = math.random(5)
    end
end

function falasdoespelho(name)
    if mensag == 1 then
        ui.addTextArea(2, "<font size=\"15\">Espelho", nil, 223, 309, 70, 26, 0x000001, 0x000000, 1, true)
        ui.addTextArea(3, "<font size=\"15\">Será que diante do espelho da vida, você se sente incomodado com o diferente e por isso é tão preconceituosa?", nil, 223, 335, 327, 59, 0x000001, 0x000001, 1, true)
        es[name]=6
    elseif mensag == 2 then
        ui.addTextArea(2, "<font size=\"15\">Espelho", nil, 223, 309, 70, 26, 0x000001, 0x000000, 1, true)
        ui.addTextArea(3, "<font size=\"15\">E você ainda pergunta?", nil, 223, 335, 190, 21, 0x000001, 0x000001, 1, true)
        es[name]=6
    elseif mensag == 3 then
        ui.addTextArea(2, "<font size=\"15\">Espelho", nil, 223, 309, 70, 26, 0x000001, 0x000000, 1, true)
        ui.addTextArea(3, "<font size=\"15\">Você é considerada a mais bela em Chernobyl!!!", nil, 223, 335, 212, 40, 0x000001, 0x000001, 1, true)
        es[name]=6
    elseif mensag == 4 then
        ui.addTextArea(2, "<font size=\"15\">Espelho", nil, 223, 309, 70, 26, 0x000001, 0x000000, 1, true)
        ui.addTextArea(3, "<font size=\"15\">Não, beleza igual a sua, não existe. OH, mais bela das belas!", nil, 223, 335, 253, 40, 0x000001, 0x000001, 1, true)
        es[name]=6
    elseif mensag == 5 then
        ui.addTextArea(2, "<font size=\"15\">Espelho", nil, 223, 309, 70, 26, 0x000001, 0x000000, 1, true)
        ui.addTextArea(3, "<font size=\"15\">Só todas as mulheres do planeta!", nil, 223, 335, 260, 25, 0x000001, 0x000001, 1, true)
        es[name]=6
    end
end

function eventLoop()
    localidade()
    for name in pairs(tfm.get.room.playerList) do
        falasdoespelho(name)
        if saiespelho[name] then
            es[name] = es[name] +.5
        end
        if es[name] == 4 then
            ui.removeTextArea(1, name)
            saiespelho[name] = false
        elseif es[name] >= 6 then
            es[name] = es[name] +.5
        elseif es[name] == 8 then
            ui.removeTextArea(2, name)
            ui.removeTextArea(3, name)
            es[name] = 5
        end
    end
end

function eventEmotePlayed(name, emo)
    for name,i in pairs(tfm.get.room.playerList) do
        if emo == 8 and i.x > 11 and i.x < 46 and i.y >166 and i.y <204 then
            ui.addTextArea(0, "", nil, (i.x - 20), i.y, 50, 20, 0x000001, 0x000001, 1, false)
            priv[name] = true
        end
    end
end

tfm.exec.disableAutoShaman(true)
tfm.exec.disableAfkDeath(true)
tfm.exec.disableAutoNewGame(true)
tfm.exec.disableAutoTimeLeft(true)
tfm.exec.newGame(xml)
tfm.exec.setGameTime(99999)
ui.setMapName("Banheiro Magico Do Travonrodfer#0000")