function shout(player, cmd, ...)
local accountname = getAccountName(getPlayerAccount(player))
if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "Admin" ))  then
for id, players in ipairs(getElementsByType("player")) do
local message = table.concat({...}," ")
local textDisplay = textCreateDisplay ()
local nombre = getPlayerName(player)
local textItem = textCreateTextItem( ""..message, 0.5, 0.5, 2, 205, 0, 0, 255, 3, "center", "center" )
textDisplayAddText ( textDisplay, textItem )
textDisplayAddObserver ( textDisplay, players )
setTimer ( textDestroyTextItem, 5000, 1, textItem )
setTimer ( textDestroyDisplay, 5000, 1, textDisplay )
end
else
outputChatBox("You don't have permission to use this command!",player,255,12,15)
    end
end

addCommandHandler("shout", shout)