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

how can i make my kick have the player and a optional reason?

Asked by

4 years ago

I want my kick command to be able to kick the said player and at the same time have an option to be able to say a reason as well but, I cant seem to be able to get the player and the reason separately. Here is my script:

01function Run(args)
02    script.Parent.Parent.exe.SE:FireServer("",args)
03end
04 
05game:GetService("UserInputService").InputBegan:Connect(function(e,gpe)
06    if e.UserInputType == Enum.UserInputType.Keyboard then
07        if e.KeyCode == Enum.KeyCode.Return then
08            local text = script.Parent.Text
09            local txt = script.Parent
10            if string.find(text:sub(1, 4), "kick") and string.find(text:sub(6, #text), ".+") then
11                txt.Text = ''
12                local user = text:sub(6, #text)
13                local reason = "No Reason Given."
14                if string.find(text:sub((6 + #user), #text), ".+") then
15                    reason = text:sub((6 + #user), #text)
16                end
17                if user:lower() == "others" then
18                    for _,plrs in pairs(game.Players:GetChildren()) do
19                        if plrs.Name ~= game.Players.LocalPlayer.Name then
20                            Run("game.Players." .. plrs.Name ..":Kick('" .. reason .. "')")
21                        end
22                    end
23                elseif user:lower() == "all" then
24                    for _,plrs in pairs(game.Players:GetChildren()) do
25                        Run("game.Players." .. plrs.Name ..":Kick('" .. reason .. "')")
26                    end
27                end
28                for _,plr in pairs(game.Players:GetChildren()) do
29                    if (plr.Name:lower():sub(1,#user) == user) then
30                        Run("game.Players." .. plr.Name ..":Kick('" .. reason .. "')")
31                    end
32                end
33            end
34        end
35    end
36end)
 View all 36 lines...

i have used prints in parts of the script and they have been removed, the result I'm getting is the user and reason together when I try to print local user. Please someone help me because I don't know what to do at this point.

You can use string.split(STRINGTOSPLIT, " "), string.split() returns as a table, so you can loop through it. nekosiwifi 398 — 4y

2 answers

Answered by

WideSteal321 773

4 years ago

string.split(str, match) is a function that, like it describes returns a table that is split at a certain match, example:

1local a = "aioskodaoik oasdojs"
2local b = string.split("a", " ")
3print(b[1]) -- will print aioskodaoik 

In your case, use this:

01function Run(args)
02    script.Parent.Parent.exe.SE:FireServer("",args)
03end
04 
05game:GetService("UserInputService").InputBegan:Connect(function(e,gpe)
06    if e.UserInputType == Enum.UserInputType.Keyboard then
07        if e.KeyCode == Enum.KeyCode.Return then
08            local text = script.Parent.Text
09            local txt = script.Parent
10            if string.find(text:sub(1, 4), "kick") and string.find(text:sub(6, #text), ".+") then
11                txt.Text = ''
12                local user = text:sub(6, #text)
13                local reason = string.split(text, " ")[3]
14                if string.find(text:sub((6 + #user), #text), ".+") then
15                    reason = text:sub((6 + #user), #text)
16                end
17                if user:lower() == "others" then
18                    for _,plrs in pairs(game.Players:GetChildren()) do
19                        if plrs.Name ~= game.Players.LocalPlayer.Name then
20                            Run("game.Players." .. plrs.Name ..":Kick('" .. reason .. "')")
21                        end
22                    end
23                elseif user:lower() == "all" then
24                    for _,plrs in pairs(game.Players:GetChildren()) do
25                        Run("game.Players." .. plrs.Name ..":Kick('" .. reason .. "')")
26                    end
27                end
28                for _,plr in pairs(game.Players:GetChildren()) do
29                    if (plr.Name:lower():sub(1,#user) == user) then
30                        Run("game.Players." .. plr.Name ..":Kick('" .. reason .. "')")
31                    end
32                end
33            end
34        end
35    end
36end)
 View all 36 lines...

Answered by

mahid786 41

4 years ago

Edited 4 years ago

Ive got a working one thx to widesteal, if you wanna check my version out here it is:

01function Run(args)
02    script.Parent.Parent.exe.SE:FireServer("",args)
03end
04 
05game:GetService("UserInputService").InputBegan:Connect(function(e,gpe)
06    if e.UserInputType == Enum.UserInputType.Keyboard then
07        if e.KeyCode == Enum.KeyCode.Return then
08            local text = script.Parent.Text
09            local txt = script.Parent
10            if string.find(text:sub(1, 4), "kick") and string.split(text, " ")[2] then
11                txt.Text = ''
12                local user = string.split(text, " ")[2]
13                local reason = "No Reason Given."
14                if string.split(text, " ")[3] then
15                    local rTable = {}
16                    reason = ""
17                    for i = 3, #string.split(text, " ") do
18                        table.insert(rTable, (#rTable + 1), string.split(text, " ")[i])
19                    end
20                    reason = table.concat(rTable, " ")
21                end
22                if user:lower() == "others" then
23                    for _,plrs in pairs(game.Players:GetChildren()) do
24                        if plrs.Name ~= game.Players.LocalPlayer.Name then
25                            Run("game.Players." .. plrs.Name ..":Kick('" .. reason .. "')")
26                        end
27                    end
28                elseif user:lower() == "all" then
29                    for _,plrs in pairs(game.Players:GetChildren()) do
30                        Run("game.Players." .. plrs.Name ..":Kick('" .. reason .. "')")
31                    end
32                end
33                for _,plr in pairs(game.Players:GetChildren()) do
34                    if (plr.Name:lower():sub(1,#user) == user) then
35                        Run("game.Players." .. plr.Name ..":Kick('" .. reason .. "')")
36                    end
37                end
38            end
39        end
40    end
41end)
 View all 41 lines...

I use a table to put the spaces back together so the words are seperated

idk why i cant accept my own answer anymore so ill just accept wide's mahid786 41 — 4y

how can i make my kick have the player and a optional reason?

2 answers

Answer this question