[Script] Summoning Items

--Creator: Bolodefchoco
--Made in: 20/07/2015
--Last update: 15/05/2016
--[[ Notes:
    Does:
        Invoca um objeto de ângulo #* e id #**.
    Commands:
        !
            a Number --> Altera o ângulo do objeto para Number.
            id Id --> Altera o objeto para Id.
    Keys:
        X --> Altera o ângulo do objeto para a direita.
        C --> Altera o ângulo do objeto para a esquerda.
]]--

mice={}
eventNewPlayer=function(n)
    if not mice[n] then
        mice[n] = {
            angle = 0,
            object = 0
        }
    end
    system.bindMouse(n,true)
    for _,k in next,{string.byte('XC',1,2)} do
        system.bindKeyboard(n,k,true,true)
    end
end
table.foreach(tfm.get.room.playerList,eventNewPlayer)

eventMouse=function(n,x,y)
    tfm.exec.addShamanObject(mice[n].object,x,y,mice[n].angle)
end

eventChatCommand=function(n,c)
    if c:sub(1,1)=="a" then
        mice[n].angle = tonumber(c:sub(3) or 0)
    end
    if c:sub(1,2)=="id" then
        mice[n].object = tonumber(c:sub(4) or 0)
    end
end

eventKeyboard=function(n,k)
    if k==('X'):byte() then
        mice[n].angle = mice[n].angle - 10
    elseif k==('C'):byte() then
        mice[n].angle = mice[n].angle + 10
    end
end