[TFM] FFA + Painel

tfm.exec.disableAutoNewGame(true)
tfm.exec.disableAutoShaman(true)
players={}
toDespawn={}
maps={521833,401421,541917,541928,541936,541943,527935,559634,559644,888052,878047,885641,770600,770656,772172,891472,589736,589800,589708,900012,901062,754380,901337,901411,907870,910078,1190467,1252043,1124380,1016258,1252299,1255902,1256808,986790,1285380,1271249,1255944,1255983,1085344,1273114,1276664,1279258,1286824,1280135,1280342,1284861,1287556,1057753,1196679,1288489,1292983,1298164,1298521,1293189,1296949,1308378,1311136,1314419,1314982,1318248,1312411,1312589,1312845,1312933,1313969,1338762,1339474,1349878,1297154,644588,1351237,1354040,1354375,1362386,1283234,1370578,1306592,1360889,1362753,1408124,1407949,1407849,1343986,1408028,1441370,1443416,1389255,1427349,1450527,1424739,869836,1459902,1392993,1426457,1542824,1533474,1561467,1563534,1566991,1587241,1416119,1596270,1601580,1525751,1582146,1558167,1420943,1466487,1642575,1648013,1646094,1393097,1643446,1545219,1583484,1613092,1627981,1633374,1633277,1633251,1585138,1624034,1616785,1625916,1667582,1666996,1675013,1675316,1531316,1665413,1681719,1699880,1688696,623770,1727243,1531329,1683915,1689533,1738601,3756146,912118,3326933,3722005,3566478,1456622,1357994,1985670,1884075,1708065,1700322,2124484,3699046,2965313,4057963,4019126,3335202,2050466}

function eventNewPlayer(name)
        for i,key in ipairs({32,40,83}) do
        tfm.exec.bindKeyboard(name,key,true,true)
        end
        players[name]={
        timestamp=os.time(),
        offsets={x=2, y=10}
        }
end

function eventChatCommand(name,command)
        local arg={}
        for argument in command:gmatch("[^%s]+") do
        table.insert(arg,argument)
        end
        if arg[1]=="off" then
        if tonumber(arg[2]) and tonumber(arg[3]) then
        players[name].offsets.x=tonumber(arg[2])
        players[name].offsets.y=tonumber(arg[3])
        else
        players[name].offsets.x=2
        players[name].offsets.y=10
        end
        tfm.exec.chatMessage("Offsets changed to X:"..players[name].offsets.x.." Y:"..players[name].offsets.y,name)
        end
end

function eventNewGame()
        started=false
end

function eventPlayerDied(name)
        local i=0
        local n
        for pname,player in pairs(tfm.get.room.playerList) do
        if not player.isDead then
        i=i+1
        n=pname
        end
        end
        if i==0 then
        tfm.exec.newGame(maps[math.random(#maps)])
        elseif i==1 then
        tfm.exec.giveCheese(n)
        tfm.exec.playerVictory(n)
        tfm.exec.setGameTime(5)
        end
end

for name,player in pairs(tfm.get.room.playerList) do
        eventNewPlayer(name)
end

tfm.exec.newGame(maps[math.random(#maps)])

function main()
toDespawnCanon={}
player={}
admin={Sagazgamer=true,Tectoon=true}
ffactuel="Off"
flyactuel="Off"
tpactuel="Off"
autoinvoactuel="Off"
end
function eventNewPlayer(name)
    ui.addTextArea(1,"<a href='event:ffaoff'><font size='10px'>Ffa : <R>"..ffactuel.."</font></a>", nil, 5, 25, 60, 20,0x768189,0x768189,0.9,true)
ui.addTextArea(2,"<a href='event:flyoff'><font size='10px'>Fly : <R>"..flyactuel.."</font></a>", nil, 70, 25, 60, 20,0x768189,0x768189,0.9,true)
ui.addTextArea(3,"<a href='event:tpoff'><font size='10px'>Tp : <R>"..tpactuel.."</font></a>", nil, 135, 25, 60, 20,0x768189,0x768189,0.9,true)
ui.addTextArea(4,"<a href='event:autoinvooff'><font size='10px'>AutoInvo : <R>"..autoinvoactuel.."</font></a>", nil, 200, 25, 90, 20,0x768189,0x768189,0.9,true)
    player[name]={
        timestamp=os.time(),
        tp=false,
        fly=false,
        ffa=false,
        autoinvo=false
    }
    system.bindMouse(name, true)
    tfm.exec.bindKeyboard(name,83,true,true)
    tfm.exec.bindKeyboard(name,40,true,true)
    tfm.exec.bindKeyboard(name,32,true,true)
    if admin[name] then
    ui.addTextArea(5,"<a href='event:msg'><p align='center'><font size='12px'>Message</font></p></a>", name, 295, 25, 90, 20,0x768189,0x768189,0.9,true)
    admin[name]={
    mod=false,
    animation=false
}
    end
end
function eventChatCommand(name, cmd)
    if admin[name] then
        if cmd=="ch" then
            tfm.exec.setShaman(name)
        end
    end
end
function eventTextAreaCallback(id, name, callback)
if admin[name] then
    if callback=="ffaoff" then
        ffa=true
        ffactuel="On"
            ui.addTextArea(1,"<a href='event:ffaon'><font size='10px'>Ffa : <VP>"..ffactuel.."</font></a>", nil, 5, 25, 60, 20,0x768189,0x768189,0.9,true)
    elseif callback=="ffaon" then
        ffa=false
        ffactuel="Off"
            ui.addTextArea(1,"<a href='event:ffaoff'><font size='10px'>Ffa : <R>"..ffactuel.."</font></a>", nil, 5, 25, 60, 20,0x768189,0x768189,0.9,true)
    end
    if callback=="flyoff" then
        fly=true
        flyactuel="On"
            ui.addTextArea(2,"<a href='event:flyon'><font size='10px'>Fly : <VP>"..flyactuel.."</font></a>", nil, 70, 25, 60, 20,0x768189,0x768189,0.9,true)
    elseif callback=="flyon" then
        fly=false
        flyactuel="Off"
            ui.addTextArea(2,"<a href='event:flyoff'><font size='10px'>Fly : <R>"..flyactuel.."</font></a>", nil, 70, 25, 60, 20,0x768189,0x768189,0.9,true)
    end
    if callback=="tpoff" then
        tp=true
        tpactuel="On"
            ui.addTextArea(3,"<a href='event:tpon'><font size='10px'>Tp : <VP>"..tpactuel.."</font></a>", nil, 135, 25, 60, 20,0x768189,0x768189,0.9,true)
    elseif callback=="tpon" then
        tp=false
        tpactuel="Off"
            ui.addTextArea(3,"<a href='event:tpoff'><font size='10px'>Tp : <R>"..tpactuel.."</font></a>", nil, 135, 25, 60, 20,0x768189,0x768189,0.9,true)
    end
    if callback=="autoinvooff" then
        autoinvo=true
        autoinvoactuel="On"
            ui.addTextArea(4,"<a href='event:autoinvoon'><font size='10px'>AutoInvo : <VP>"..autoinvoactuel.."</font></a>", nil, 200, 25, 90, 20,0x768189,0x768189,0.9,true)
    elseif callback=="autoinvoon" then
        autoinvo=false
        autoinvoactuel="Off"
            ui.addTextArea(4,"<a href='event:autoinvooff'><font size='10px'>AutoInvo : <R>"..autoinvoactuel.."</font></a>", nil, 200, 25, 90, 20,0x768189,0x768189,0.9,true)
    end
end
    if callback=="close" then
        ui.removeTextArea(12, name)
    end
    if callback=="msg" then
    ui.addPopup (9, 2, "Introduza a mensagem a enviar a todos :", name, 200, 180, 300, true)
    ui.addTextArea(5,"<a href='event:msg'><font size='12px'><p align='center'>Mensagem</p></font></a>", name, 295, 25, 90, 20,0x768189,0x768189,0.9,true)
    ui.addTextArea(6,"<a href='event:mod'><font size='14px'><p align='center'>Modération</p></font></a>", name, 200, 265, 90, 20,0x768189,0x555555,0.9,true)
    ui.addTextArea(7,"<a href='event:animation'><font size='14px'><p align='center'>Animador</p></font></a>", name, 300, 265, 100, 20,0x768189,0x555555,0.9,true)
    ui.addTextArea(8,"<a href='event:moi'><font size='14px'><p align='center'>pvd</p></font></a>", name, 410, 265, 90, 20,0x768189,0x555555,0.9,true)
    end
    if callback=="mod" then
        admin[name].mod=true
        admin[name].animation=false
    end
    if callback=="animation" then
        admin[name].animation=true
        admin[name].mod=false
    end
    if callback=="moi" then
        admin[name].animation=false
        admin[name].mod=false
    end
  end

function eventPopupAnswer(popupid, name, answer)
    if popupid==9 then
        ui.removeTextArea(6, name)
            ui.removeTextArea(7, name)
            ui.removeTextArea(8, name)
    if not admin[name].animation and not admin[name].mod then
        ui.addTextArea(12,"<font size='16' color='#2F7FCC'>"..name.." : "..answer.."</font> <p align='right'><font size='14px'><a href='event:close'><R>[Fechar]<N></a></font></p>",nil,5,373,790,30,0x324650,0x2a2a2a,0.9,true)
        end
        if admin[name].animation then
        ui.addTextArea(12,"<font size='16' color='#BABD2F'>[Animador] : "..answer.."</font> <p align='right'><font size='14px'><a href='event:close'><R>[Fechar]<N></a></font></p>",nil,5,373,790,30,0x324650,0x2a2a2a,0.9,true)
        admin[name].animation=false
        end
        if admin[name].mod then
        ui.addTextArea(12,"<font size='16' color='#ED67EA'>[Moderation] : "..answer.."</font> <p align='right'><font size='14px'><a href='event:close'><R>[Fechar]<N></a></font></p>",nil,5,373,790,30,0x324650,0x2a2a2a,0.9,true)
        admin[name].mod=false
        end
    end
end
function eventKeyboard(name, key, down, x, y)
    if (key==40 or key==83) and not tfm.get.room.playerList[name].isDead and player[name].timestamp<os.time()-1000 and ffa then
            local id
        if tfm.get.room.playerList[name].isFacingRight then
            id=tfm.exec.addShamanObject(17,x-2,y+10,90,5)
        else
            id=tfm.exec.addShamanObject(17,x+2,y+10,-90,-5)
        end
        player[name].timestamp=os.time()
        table.insert(toDespawnCanon,{os.time(), id})
    end
    if key==32 and fly then
        tfm.exec.movePlayer(name,xPosition, yPosition, offset, xSpeed, -52, false)
    end
end


function eventLoop(currentTime,timeRemaining)
for i,canons in ipairs(toDespawnCanon) do
        if canons[1]<=os.time()-1000 then
                tfm.exec.removeObject(canons[2])
            table.remove(toDespawnCanon,i)
        end
    end
end


function eventMouse(name, x, y)
    if tp then
        tfm.exec.movePlayer(name, x, y)
    end
end

function eventSummoningStart(name, objectType, xPosition, yPosition, angle)
    if autoinvo then
        tfm.exec.addShamanObject (objectType, xPosition, yPosition, angle, xSpeed)
    end
end

main()

for name in pairs (tfm.get.room.playerList) do eventNewPlayer(name) end