eshOS version 3.0

system.disableChatCommandDisplay("m", true)
system.disableChatCommandDisplay("clear", true)
tfm.exec.disableAutoNewGame(true)
tfm.exec.disableAutoShaman(true)
tfm.exec.newGame("@4459589")
version = "3.0"
tfm.exec.setUIMapName("<VP>eshOS "..version.." por Eshkation, Bugs/Feedback é aceito! <p")
-- Tables para o EventLoop
n = 0
hora = false
atualizar = false
efeitos = false
tempo = os.date("Hoje é %A, de %B")
messeger = {""}
msn = false

--
ui.addTextArea(700, "<B><R><a href='event:on'><font size='9'>O</a></B>", nil, 400, 293, 14, 14, 0, 0, 1.1);
--

COLOR = "<VP>"
bordColor = 0x2ECF73

function guiColor()
if COLOR == "<VI>" then
bordColor = 0xC53DFF
end
if COLOR == "<VP>" then
bordColor = 0x2ECF73
end
if COLOR == "<N>" then
bordColor = 0xC2C2DA
end
if COLOR == "<CH>" then
bordColor = 0x98E2EB
end
if COLOR == "<ROSE>" then
bordColor = 0xED67EA
end
if COLOR == "<J>" then
bordColor = 0xFFFF00
end
if COLOR == "<R>" then
bordColor = 0xCB546B
end
if COLOR == "<V>" then
bordColor = 0x009D9D
end
end


function areaTrabalho()
ui.addTextArea(1, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>What you want to do?</font>", nil, 179, 75, 455, 208, 1, 1, 0.3);
ui.addTextArea(2, "<a href='event:tfm'>TFM</a>", nil, 190, 150, 28, 20, 1, bordColor, 1.1);
ui.addTextArea(3, "<a href='event:atualizar'>UPD</a>", nil, 240, 150, 28, 20, 1, bordColor, 1.1);
ui.addTextArea(4, "<a href='event:hora'>TIM</a>", nil, 290, 150, 28, 20, 1, bordColor, 1.1);
ui.addTextArea(5, "<a href='event:cor'>COL</a>", nil, 340, 150, 30, 20, 1, bordColor, 1.1);
ui.addTextArea(6, "<a href='event:status'>STS</a>", nil, 390, 150, 30, 20, 1, bordColor, 1.1);
ui.addTextArea(7, "<a href='event:mp3'>MP3</a>", nil, 440, 150, 30, 20, 1, bordColor, 1.1);
ui.addTextArea(8, "<a href='event:efeitodetela'>SCR</a>", nil, 490, 150, 30, 20, 1, bordColor, 1.1);
ui.addTextArea(9, "<a href='event:msn'>MSN</a>", nil, 540, 150, 30, 20, 1, bordColor, 1.1);
ui.addTextArea(10, "<a href='event:help'>HLP</a>", nil, 590, 150, 30, 20, 1, bordColor, 1.1);
end

function removeText()
for i = 60, 1, -1 do
ui.removeTextArea(i)
end
end

function eventTextAreaCallback(textAreaId, playerName, callback)
if (callback=="on") then
ui.addTextArea(1, "<P align='center'>"..COLOR.."<b><font size='20'>eshOS</P></b><BR><font size='14'>O eshOS was started successfully!<BR>Attention, everything that is done on your computer will be shown to all players, if you want to play alone empty your tribe house.<BR><BR><a href='event:iniciar'>Start</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
end

if(callback=="off") then
atualizar = false
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>Really want to exit?</font><BR><BR><BR><BR><font size='17'><a href='event:sim'>YES</a>      <a href='event:iniciar'>NO</a>", nil, 179, 75, 455, 208, 1, 1, 1.1);
ui.addTextArea(700, "<B><R><a href='event:on'><font size='9'>O</a></B>", nil, 400, 293, 14, 14, 0, 0, 1.1);
end
if(callback=="sim") then
ui.addTextArea(700, "<B><VP><a href='event:off'><font size='9'>O</a></B>", nil, 400, 293, 14, 14, 0, 0, 1.1);
for i = 600, 1, -1 do
ui.removeTextArea(i)
end
end

if (callback=="help") then
removeText()
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='15'>Understand the acronyms!</font><BR><BR><font size='10'><B>TFM</B> - Transformice<BR><B>ATU</B> - Check if there are any new update <BR><B>TIM</B> - Date and Time!<BR><B>COL</B> - Change the gui color of eshOS!<BR><B>STS</B> - See your status!<BR><B>MP3</B> - Song search!<BR><B>SCR</B> - Rest mode!<BR><B>MSN</B> - Send messages! use !m [text] to send a message, and use the mouse scroll to down the messages.<BR><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
end

if (callback=="iniciar") then
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
ui.removeTextArea(103)
efeitos = false
hora = false
msn = false
end

if (callback=="tfm") then
ui.addTextArea(101, "<P align='center'><font size='20'><b>eshOS - Fatal Error</B></P><font size='13'>An error was encountered while attempting to perform the operation TFM_ESHOS.EXE<BR>   If the error continues please follow the instructions below:<BR>1. Uninstall the last programs that you installed <BR>2. Check if your computer has enough memory to perform the operation <BR>3. Restart you computer <BR>Error 1: Out of memory.</font>", nil, 179, 75, 455, 208, 130, 130, 1);
removeText()
end

if (callback=="msn") then
removeText()
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>Messeger!</font><BR><BR><p aling='left'><font size='10'>"..messeger[1].."<BR><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);

msn = true
end

if (callback=="atualizar") then
atualizar = true
removeText()
end

if(callback=="hora")then
hora = true
removeText()
end

if(callback=="cor")then
removeText()
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>Change the eshOS color!</font><BR><BR><font size='10'><BR><VP><a href='event:corverde'>GREEN</a><BR><VI><a href='event:corRoxo'>PURPLE</a><BR><N><a href='event:corbranca'>WHITE</a><BR><CH><a href='event:corazul'>LIGHT BLUE</a><BR><ROSE><a href='event:corrosa'>PINK</a><BR><J><a href='event:coramarelo'>YELLOW</a><BR><R><a href='event:corvermelho'>RED</a><BR><V><a href='event:corazul2'>BLUE</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
guiColor()
end
if(callback=="corverde")then
COLOR = "<VP>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end
if(callback=="corRoxo")then
COLOR = "<VI>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end
if(callback=="corbranca")then
COLOR = "<N>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end
if(callback=="corazul")then
COLOR = "<CH>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end
if(callback=="corrosa")then
COLOR = "<ROSE>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end
if(callback=="coramarelo")then
COLOR = "<J>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end
if(callback=="corvermelho")then
COLOR = "<R>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end
if(callback=="corazul2")then
COLOR = "<V>"
guiColor()
areaTrabalho()
ui.removeTextArea(101)
ui.removeTextArea(102)
end

if(callback=="status")then
removeText()
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>Player Stats</font><BR><BR><font size='10'><B>Name:</B> "..playerName.."<BR><B>Tribe:</B> "..tfm.get.room.playerList[playerName].tribeName.."<BR><B>Cfm stats</B> : <A href='en.cheese.formice.com/mouse/"..playerName.."'>HERE</a><BR><BR><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
end
if(callback=="mp3")then
removeText()
ui.addPopup(0, 2, "Type the music name here !", playerName, 303, 156, 200,20)
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='15'>Search a song!</font> <BR><BR><BR><BR><BR><BR><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
end
if(callback=="efeitodetela")then
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='15'>Rest Mode!</font> <BR><BR><BR><BR><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
efeitos = true
removeText()
end
end

function eventPopupAnswer(popupId, playerName, answer)
if popupId == 0 then
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='15'>Search a song!</font> <BR><BR><a href='beemp3s.org/index.php?q="..answer.."'>Start the search</a><BR><BR><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
end
end

function eventLoop()

if atualizar == true then
n = n+1
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>Checking updates..</font><BR><BR><font size='17'>"..n.."%", nil, 179, 75, 455, 208, 1, 1, 0.3);
end

if n == 100 then
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>UPDATED!</font><BR><BR><font size='15'><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
atualizar = false
n = 0
end

if hora == true then
tempo = os.date("Hoje é %A, de %B")
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>Current time(Portugal time)</font><BR><BR><font size='17'>"..tempo.."<BR><BR><font size='15'><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
end

if efeitos == true then
for i=20,1,-1 do
tfm.exec.displayParticle(math.random(0, 30), math.random(200,600), math.random(100,290),0,0,0,0,nil)
end
end
end


function eventChatCommand(playerName, message)
   if (message:sub(0,1) == [[m]]) then
      table.insert(messeger,1,messeger[1].."<b>["..playerName.."]</b> "..message:sub(3).."<BR>")
end
if msn == true then
ui.addTextArea(102, "<P align='center'>"..COLOR.."<font size='20'><b>eshOS</B></P><font size='13'>Messeger!</font><BR><BR><p aling='left'><font size='10'>"..messeger[1].."<BR><a href='event:iniciar'>Back</a>", nil, 179, 75, 455, 208, 1, 1, 0.3);
end
   if (message=="clear") then
   for i = 5000,1,-1 do
      table.remove(messeger,1)
      table.insert(messeger,1,"")
end
end
end

guiColor()