Scripting Helpers is winding down operations and is now read-only. More info→

[Solved]: How do I Add String Filtering Function in my Script?

Asked by

Hi_People1133 218

2 years ago

Edited 2 years ago

Hello my kind scripters,

I had a simple chat script in ServerScriptService. I made it so that client sent a message through text box and the Server-Sided script would receive it and send it back to all clients. The script in ServerScriptService also adds cool feature like; System messages, Devs and Owner messages etc. I need help setting a Message filtering function to tag inappropriate messages in the Server-Sided script

The Local Script

01local serverMessageColor = Color3.fromRGB(255, 255, 0)
02local Event = game.ReplicatedStorage.ServerMessageSystem
03local SentBack = game.ReplicatedStorage.BackToClient
04--==================================================
05-- sends message from textbox when pressed Enter
06script.Parent.FocusLost:Connect(function(Enter)
07 
08    if Enter then
09        Event:FireServer(script.Parent.Text)
10    end
11    script.Parent.Text = ""
12end)
13--==========================
14-- adds messages to scrolling frame and deletes oldest one when there are 17 messages
15function Newlabel(text,bool,color) 
16    if bool == false then
17    local MessageNew = game.ReplicatedStorage.NewMessage:Clone()
18        MessageNew.Text = text
19        MessageNew.TextColor3 = color
20    MessageNew.Parent = script.Parent.Parent.ScrollingFrame
21        if #script.Parent.Parent.ScrollingFrame:GetChildren() >= 17 then
22            for i,v in pairs (script.Parent.Parent.ScrollingFrame:GetChildren()) do
23                if v.Name ~= "LocalScript" and v.Name ~= "UIListLayout" and i == 3 then
24                    v:Destroy() 
25                end
26            end
27        end
28--==========================
29-- System message; color is yellow.
30    elseif bool == true then
31        local MessageNew = game.ReplicatedStorage.NewMessage:Clone()
32        MessageNew.Text = text
33        MessageNew.Parent = script.Parent.Parent.ScrollingFrame
34        MessageNew.TextColor3 = serverMessageColor
35 
36    end
37end
38--======================================
39SentBack.OnClientEvent:Connect(Newlabel)
 View all 39 lines...

The local script above gets the message in text box and sends the name and message to the script in ServerScriptService by remote events. It also receives the messages through remote events from the script in ServerScriptService back to the client and adds a new text label with the name and message and also colors the System messages.

The Script in ServerScriptService

01local Event = game.ReplicatedStorage.ServerMessageSystem
02local SendAllEvent = game.ReplicatedStorage.BackToClient
03local DevTextMessageColor = Color3.fromRGB(255, 0, 0)
04local NormalMessageColor = Color3.fromRGB(255, 255, 255)
05local color
06local text2
07--=========================================
08-- if the name is in devs it makes devs specific message
09function NewMessageDisplay(player, text) 
10    if player.Name == "ABDULGHANI1010" or player.Name == "ImAGoodBoy12317" then
11        color = DevTextMessageColor
12        text2 = "[Dev]["..player.Name.."]: "..text
13    else
14if name is not in devs then makes a normal message
15        color = NormalMessageColor
16        text2 = "["..player.Name.."]: "..text
17    end
18 
19    SendAllEvent:FireAllClients(text2,false,color)
20end
21--==================================
22-- Sends a text that player has joined the game
23game.Players.PlayerAdded:Connect(function(plr)
24    local textsend = "[System]: "..plr.Name.." has joined the game!"
25    SendAllEvent:FireAllClients(textsend,true)
26end)
27--===============================
28-- sends message that player left the game
29game.Players.ChildRemoved:Connect(function(plr)
30    local textsend = "[System]: "..plr.Name.." has left the game!"
31    SendAllEvent:FireAllClients(textsend,true)
32end)
33 
34Event.OnServerEvent:Connect(NewMessageDisplay)
 View all 34 lines...

The server Script sends the message received from a client and sends it back to all clients. It also creates custom messages for the admins of the game. I need help with filtering the messages sent from the client to the server script. I want to add the function in the Server-Sided script. If I don't filter the message my game might get moderated. I am providing extra data so I can receive replies as soon as possible.

feel free to ask questions.

Your Average Roblox scripter,

ABDULGHANI1010

1 answer

Answered by

Miniller 562

2 years ago

Edited 2 years ago

Read this article about text and chat filtering efficiently.

First you will have to use TextService:FilterStringAsync(message, fromPlayerID) to get an Instance of TextFilterResult.

You will then use textObject:GetNonChatStringForBroadcastAsync() to get the actual filtered string. (You could also use GetNonChatStringForUserAsync and GetChatForUserAsync for other purposes)

01local TextService = game:GetService("TextService")
02 
03local function getTextObject(message, fromPlayerId)
04    local textObject
05    local success, errorMessage = pcall(function()
06        textObject = TextService:FilterStringAsync(message, fromPlayerId)
07    end)
08    if success then
09        return textObject
10    end
11    return false
12end
13 
14local function getFilteredMessage(textObject)
15    local filteredMessage
16    local success, errorMessage = pcall(function()
17        filteredMessage = textObject:GetNonChatStringForBroadcastAsync()
18    end)
19    if success then
20        return filteredMessage
21    end
22    return false
23end
24--=========================================
25-- if the name is in devs it makes devs specific message
26function NewMessageDisplay(player, text)
27    local messageObject = getTextObject(text, player.UserId)
28    local filteredTextResult = ""
29    if messageObject then
30        filteredTextResult = getFilteredMessage(messageObject)
31        print(filteredTextResult)
32    end
33 
34    if player.Name == "ABDULGHANI1010" or player.Name == "ImAGoodBoy12317" then
35        color = DevTextMessageColor
36        text2 = "[Dev]["..player.Name.."]: "..filteredTextResult
37    else
38        --if name is not in devs then makes a normal message
39        color = NormalMessageColor
40        text2 = "["..player.Name.."]: "..filteredTextResult
41    end
42 
43    SendAllEvent:FireAllClients(text2,false,color)
44end
 View all 44 lines...

Please note that this isn't the most efficient solution, when sending the same message multiple times the TextFilterResult will always be the exact same.

Thank you so much for the Help "Miniller" . It helped so much. We need more people like you and have a good Day/Night Hi_People1133 218 — 2y

[Solved]: How do I Add String Filtering Function in my Script?

1 answer

Answer this question