How do I make this server side instead of client side? [closed]

Asked by

5qfb -8

4 years ago

Edited 4 years ago

Please provide more explanation in your question. If you explain exactly what you are trying to accomplish, it will be much easier to answer your question correctly.

01local gui = script.Parent
02local players = game:GetService("Players")
03local player = players.LocalPlayer
04local run = game:GetService("RunService")
05local sound = script.KillSound
06 
07 
08gui.KillButton.MouseButton1Click:Connect(function()
09local character = player.Character
10if not character then return end
11local head = character:FindFirstChild("Head")
12if not head then return end
13for _, v in pairs(workspace:GetChildren()) do
14    if v:IsA("Model") and v:FindFirstChild("Humanoid") and v:FindFirstChild("Head") and v ~= character then
15 
16        if (character.Head.Position - v.Head.Position).Magnitude <= 20 and      v.Humanoid.Health > 0 and script.Parent.KillButton.Timer.Visible == false then
17            sound:Play()
18            v.Humanoid.Health = 0
19            character:MoveTo(v.HumanoidRootPart.Position)
20            script.Parent.KillButton.Timer.Visible = true
21            wait(1)
22            script.Parent.KillButton.Timer.Text = "9"
23            wait(1)
24            script.Parent.KillButton.Timer.Text = "8"
25            wait(1)
26            script.Parent.KillButton.Timer.Text = "7"
27            wait(1)
28            script.Parent.KillButton.Timer.Text = "6"
29            wait(1)
30            script.Parent.KillButton.Timer.Text = "5"
31            wait(1)
32            script.Parent.KillButton.Timer.Text = "4"
33            wait(1)
34            script.Parent.KillButton.Timer.Text = "3"
35            wait(1)
36            script.Parent.KillButton.Timer.Text = "2"
37            wait(1)
38            script.Parent.KillButton.Timer.Text = "1"
39            wait(1)
40            script.Parent.KillButton.Timer.Visible = false
41            break
42        end
43    end
44end
45end)
46 
47run.Heartbeat:Connect(function()
48    local character = player.Character
49    if not character then return end
50    local head = character:FindFirstChild("Head")
51    if not head then return end
52    local cankill = false
53    for _, v in pairs(workspace:GetChildren()) do
54        if v:IsA("Model") and v:FindFirstChild("Humanoid") and          v:FindFirstChild("Head") and    v ~= character then
55 
56if (character.Head.Position - v.Head.Position).Magnitude <= 20 and v.Humanoid.Health > 0 and script.Parent.KillButton.Timer.Visible == false then cankill = true end
57        end
58    end
59    if cankill then
60        gui.KillButton.ImageTransparency = 0
61    else
62        gui.KillButton.ImageTransparency = 0.65
63    end
64    end)
 View all 64 lines...

Edit By JesseSong:

Please do not use deceitful means to get users to do your request. If you want to pay people to help you with your code you should make a portfolio in the Roblox Developer forums.

Make sure your question is paraphrased with a sentence explaining what is wrong and not working with the code. You can click on the hyperlink provided

Closed as Non-Descriptive by JesseSong

This question has been closed because its title or content does not adequately describe the problem you are trying to solve.
Please ensure that your question pertains to your actual problem, rather than your attempted solution. That is, you were trying to solve problem X, and you thought solution Y would work, but instead of asking about X when you ran into trouble, you asked about Y.

Why was this question closed?

This might not work, but oh well lets give this a try,

LocalScript:

01gui = script.Parent
02local players = game:GetService("Players")
03local player = players.LocalPlayer
04local run = game:GetService("RunService")
05 
06 
07gui.KillButton.MouseButton1Click:Connect(function()
08    gui.RemoteEvent:FireServer(player) -- Carry over the player variable
09end)
10 
11run.Heartbeat:Connect(function()
12    gui.RemoteEvent2:FireServer(player) -- Different Remote ok?
13end)

FIRE THE REMOTEFUNCTION

ServerScript:

01gui = script.Parent
02local sound = script.KillSound
03 
04 
05gui.RemoteEvent.OnServerEvent:Connect(function(player)  -- Player variable used
06    local character = player.Character
07    if not character then return end
08    local head = character:FindFirstChild("Head")
09    if not head then return end
10    for _, v in pairs(workspace:GetChildren()) do
11        if v:IsA("Model") and v:FindFirstChild("Humanoid") and v:FindFirstChild("Head") and v ~= character then
12 
13            if (character.Head.Position - v.Head.Position).Magnitude <= 20 and      v.Humanoid.Health > 0 and script.Parent.KillButton.Timer.Visible == false then
14                sound:Play()
15                v.Humanoid.Health = 0
16                character:MoveTo(v.HumanoidRootPart.Position)
17                script.Parent.KillButton.Timer.Visible = true
18                wait(1)
19                script.Parent.KillButton.Timer.Text = "9"
20                wait(1)
21                script.Parent.KillButton.Timer.Text = "8"
22                wait(1)
23                script.Parent.KillButton.Timer.Text = "7"
24                wait(1)
25                script.Parent.KillButton.Timer.Text = "6"
26                wait(1)
27                script.Parent.KillButton.Timer.Text = "5"
28                wait(1)
29                script.Parent.KillButton.Timer.Text = "4"
30                wait(1)
31                script.Parent.KillButton.Timer.Text = "3"
32                wait(1)
33                script.Parent.KillButton.Timer.Text = "2"
34                wait(1)
35                script.Parent.KillButton.Timer.Text = "1"
36                wait(1)
37                script.Parent.KillButton.Timer.Visible = false
38                break
39            end
40        end
41    end
42end)
43 
44gui.RemoteEvent2.OnServerEvent:Connect(function(player)
45    local character = player.Character
46    if not character then return end
47    local head = character:FindFirstChild("Head")
48    if not head then return end
49    local cankill = false
50    for _, v in pairs(workspace:GetChildren()) do
51        if v:IsA("Model") and v:FindFirstChild("Humanoid") and          v:FindFirstChild("Head") and    v ~= character then
52 
53            if (character.Head.Position - v.Head.Position).Magnitude <= 20 and v.Humanoid.Health > 0 and script.Parent.KillButton.Timer.Visible == false then cankill = true end
54        end
55    end
56    if cankill then
57        gui.KillButton.ImageTransparency = 0
58    else
59        gui.KillButton.ImageTransparency = 0.65
60    end
61end)
 View all 61 lines...

This is why remote events are the best thing, unless you can enable FilteringEnabled for easier but unsafe scripting

How do I make this server side instead of client side? [closed]

Closed as Non-Descriptive by JesseSong

2 answers

This might not work, but oh well lets give this a try,