local chatRadius = 100
 
function sendMessageToNearbyPlayers ( message, messageType )
    if ( messageType == 0 ) then
        local posX, posY, posZ = getElementPosition ( source )
 
        local chatSphere = createColSphere ( posX, posY, posZ, chatRadius )
        local nearbyPlayers = getElementsWithinColShape ( chatSphere, "player" )
        destroyElement ( chatSphere )
 
        for index, nearbyPlayer in ipairs( nearbyPlayers ) do
            local red, green, blue = getPlayerNametagColor ( source )
            outputChatBox( getPlayerName ( source )..": #ffffff".. message, nearbyPlayer, red, green, blue, true )
        end
        cancelEvent ( )
    end
end
addEventHandler ( "onPlayerChat", getRootElement(), sendMessageToNearbyPlayers )


addEventHandler ( "onPlayerChat", getRootElement(),
function ( message, messageType )
    if messageType == 1 then
        cancelEvent()
    end
end)

local chatRadius = 100
 
function sendMessageToNearbyPlayers ( message, messageType )
    if ( messageType == 0 ) then
        local posX, posY, posZ = getElementPosition ( source )
 
        local chatSphere = createColSphere ( posX, posY, posZ, chatRadius )
        local nearbyPlayers = getElementsWithinColShape ( chatSphere, "player" )
        destroyElement ( chatSphere )
 
        for index, nearbyPlayer in ipairs( nearbyPlayers ) do
            local red, green, blue = getPlayerNametagColor ( source )
            outputChatBox( getPlayerName ( source )..": #ffffff".. message, nearbyPlayer, red, green, blue, true )
        end
        cancelEvent ( )
    end
end
addEventHandler ( "onPlayerChat", getRootElement(), sendMessageToNearbyPlayers )

local chatRadius = 100
 
function sendMessageToNearbyPlayers ( message, messageType )
    if ( messageType == 0 ) then
        local posX, posY, posZ = getElementPosition ( source )
 
        local chatSphere = createColSphere ( posX, posY, posZ, chatRadius )
        local nearbyPlayers = getElementsWithinColShape ( chatSphere, "player" )
        destroyElement ( chatSphere )
 
        for index, nearbyPlayer in ipairs( nearbyPlayers ) do
            local red, green, blue = getPlayerNametagColor ( source )
            outputChatBox( getPlayerName ( source )..": #ffffff".. message, nearbyPlayer, red, green, blue, true )
        end
        cancelEvent ( )
     elseif (messageType == 1) then 
        local posX, posY, posZ = getElementPosition ( source )
 
        local chatSphere = createColSphere ( posX, posY, posZ, chatRadius )
        local nearbyPlayers = getElementsWithinColShape ( chatSphere, "player" )
        destroyElement ( chatSphere )
 
        for index, nearbyPlayer in ipairs( nearbyPlayers ) do
            local red, green, blue = getPlayerNametagColor ( source )
            outputChatBox( "* "..getPlayerName ( source ).." ".. message, nearbyPlayer, 128,0,128, true )
        end
        cancelEvent ( )
    end
end
addEventHandler ( "onPlayerChat", getRootElement(), sendMessageToNearbyPlayers )