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

For some reason my arrest system is not working, any help?

Asked by

Pooglies 7

6 years ago

Edited by User#5423 6 years ago

The script works fine, but it doesnt keep the player in jail if they reset. Heres the script

001JailPos = script.Parent.JailPosition.Value
002 
003FreemanPosition = Vector3.new(5, 4, 191)
004 
005JailedFolder = script.Parent.JailedPlayers
006 
007   
008 
009   
010 
011function TeleportPlayer(Plyer,Pos)
012 
013if Plyer.Character ~= nil then
014 
015local HMRP = Plyer.Character:FindFirstChild("HumanoidRootPart")
016 
017if HMRP then
018 
019HMRP.CFrame = CFrame.new(Pos)
020 
021end
022 
023end
024 
025end
026 
027   
028 
029function PlayerFromName(Nam)
030 
031local Search = game.Players:FindFirstChild(Nam)
032 
033if Search then return Search else return nil end
034 
035end
036 
037   
038 
039function GiveJailGui(Plyname)
040 
041local Play = PlayerFromName(Plyname)
042 
043if Play then
044 
045if Play.PlayerGui then
046 
047local JG = script.JailedGui:Clone()
048 
049JG.Parent = Play.PlayerGui
050 
051JG.GUpdater.Disabled = false
052 
053end end end
054 
055   
056 
057function GiveFreemanGui(Plyname)
058 
059local Play = PlayerFromName(Plyname)
060 
061if Play then
062 
063if Play.PlayerGui then
064 
065local FG = script.PlayerFree:Clone()
066 
067FG.Parent = Play.PlayerGui
068 
069FG.CloseScript.Disabled = false
070 
071end end end
072 
073   
074 
075function ClearName(PlyName)
076 
077local fin = JailedFolder:GetChildren()
078 
079for i = 1,#fin do if fin[i].Name == PlyName then
080 
081fin[i]:Destroy()
082 
083end end
084 
085end
086 
087   
088 
089function HandleJailTime(PlyName,TimeToServe)
090 
091ClearName(PlyName)
092 
093local Timer = Instance.new("IntValue")
094 
095Timer.Name = PlyName
096 
097Timer.Parent = JailedFolder
098 
099Timer.Value = TimeToServe
100 
101coroutine.wrap(function()
102 
103for i = 1,TimeToServe do
104 
105Timer.Value = Timer.Value - 1
106 
107wait(1)
108 
109end
110 
111Timer.Value = 0 wait(1) Timer:Destroy()
112 
113end)()
114 
115end
116 
117   
118 
119function JailPlayer(Caller,PlyN)
120 
121local JPlayer = PlayerFromName(PlyN)
122 
123if JPlayer then
124 
125if JPlayer.Backpack then JPlayer.Backpack:ClearAllChildren() end
126 
127if not JPlayer.PlayerGui:FindFirstChild("JailedGui") then
128 
129HandleJailTime(PlyN,90)
130 
131TeleportPlayer(JPlayer,JailPos)
132 
133GiveJailGui(PlyN)
134 
135end end
136 
137end
138 
139   
140 
141script.Parent.OnServerEvent:connect(function(Caller,Prisoner,format)
142 
143if Caller then if Prisoner ~= nil then if format ~= nil then
144 
145if format == "Jail" then
146 
147JailPlayer(Caller,Prisoner)
148 
149elseif format == "Confirm" then
150 
151local CGui = script.JConfirmGui:Clone()
152 
153local CopPGUI = Caller:FindFirstChild("PlayerGui")
154 
155if CopPGUI then
156 
157if not CopPGUI:FindFirstChild("JConfirmGui") then
158 
159CGui.Parent = CopPGUI
160 
161CGui.TargetPlayer.Value = Prisoner.Name
162 
163CGui.ArrestPlayer.Disabled = false
164 
165end end
166 
167elseif format == "Freeman" then
168 
169TeleportPlayer(Caller,FreemanPosition)
170 
171ClearName(Caller.Name)
172 
173GiveFreemanGui(Caller.Name)
174 
175elseif format == "BackToJail" then
176 
177TeleportPlayer(Caller,JailPos)
178 
179elseif format == "BackToJailNP" then -- where when the player respawns, they should be in jail still, which for some reason does not.
180 
181TeleportPlayer(Caller,JailPos)
182 
183GiveJailGui(Caller.Name)
184 
185elseif format == "ClearJGUIs" then
186 
187local ser = Caller:FindFirstChild("PlayerGui") if ser then
188 
189local search = ser:GetChildren()
190 
191for i = 1,#search do
192 
193if search[i].Name == "JConfirmGui" or search[i].Name == "JailedGui" or search[i].Name == "PlayerFree" then
194 
195search[i]:Destroy()
196 
197end end end
198 
199end
200 
201end end end
202 
203end)

Maybe you can attach it as a script so it's easier to read? MrDaniel_TX 5 — 6y

use code block pls User#5423 17 — 6y

Okay Pooglies 7 — 6y

1 answer

Answered by

FrontsoldierYT 129

5 years ago

Here is that script but in a code block. Next time please consider posting questions with a cod block.

001JailPos = script.Parent.JailPosition.Value
002 
003FreemanPosition = Vector3.new(5, 4, 191)
004 
005JailedFolder = script.Parent.JailedPlayers
006 
007function TeleportPlayer(Plyer,Pos)
008 
009if Plyer.Character ~= nil then
010 
011local HMRP = Plyer.Character:FindFirstChild("HumanoidRootPart")
012 
013if HMRP then
014 
015HMRP.CFrame = CFrame.new(Pos)
016 
017end
018 
019end
020 
021end
022 
023function PlayerFromName(Nam)
024 
025local Search = game.Players:FindFirstChild(Nam)
026 
027if Search then return Search else return nil end
028 
029end
030 
031function GiveJailGui(Plyname)
032 
033local Play = PlayerFromName(Plyname)
034 
035if Play then
036 
037if Play.PlayerGui then
038 
039local JG = script.JailedGui:Clone()
040 
041JG.Parent = Play.PlayerGui
042 
043JG.GUpdater.Disabled = false
044 
045end end end
046 
047function GiveFreemanGui(Plyname)
048 
049local Play = PlayerFromName(Plyname)
050 
051if Play then
052 
053if Play.PlayerGui then
054 
055local FG = script.PlayerFree:Clone()
056 
057FG.Parent = Play.PlayerGui
058 
059FG.CloseScript.Disabled = false
060 
061end end end
062 
063function ClearName(PlyName)
064 
065local fin = JailedFolder:GetChildren()
066 
067for i = 1,#fin do if fin[i].Name == PlyName then
068 
069fin[i]:Destroy()
070 
071end end
072 
073end
074 
075function HandleJailTime(PlyName,TimeToServe)
076 
077ClearName(PlyName)
078 
079local Timer = Instance.new("IntValue")
080 
081Timer.Name = PlyName
082 
083Timer.Parent = JailedFolder
084 
085Timer.Value = TimeToServe
086 
087coroutine.wrap(function()
088 
089for i = 1,TimeToServe do
090 
091Timer.Value = Timer.Value - 1
092 
093wait(1)
094 
095end
096 
097Timer.Value = 0 wait(1) Timer:Destroy()
098 
099end)()
100 
101end
102 
103function JailPlayer(Caller,PlyN)
104 
105local JPlayer = PlayerFromName(PlyN)
106 
107if JPlayer then
108 
109if JPlayer.Backpack then JPlayer.Backpack:ClearAllChildren() end
110 
111if not JPlayer.PlayerGui:FindFirstChild("JailedGui") then
112 
113HandleJailTime(PlyN,90)
114 
115TeleportPlayer(JPlayer,JailPos)
116 
117GiveJailGui(PlyN)
118 
119end end
120 
121end
122 
123script.Parent.OnServerEvent:connect(function(Caller,Prisoner,format)
124 
125if Caller then if Prisoner ~= nil then if format ~= nil then
126 
127if format == "Jail" then
128 
129JailPlayer(Caller,Prisoner)
130 
131elseif format == "Confirm" then
132 
133local CGui = script.JConfirmGui:Clone()
134 
135local CopPGUI = Caller:FindFirstChild("PlayerGui")
136 
137if CopPGUI then
138 
139if not CopPGUI:FindFirstChild("JConfirmGui") then
140 
141CGui.Parent = CopPGUI
142 
143CGui.TargetPlayer.Value = Prisoner.Name
144 
145CGui.ArrestPlayer.Disabled = false
146 
147end end
148 
149elseif format == "Freeman" then
150 
151TeleportPlayer(Caller,FreemanPosition)
152 
153ClearName(Caller.Name)
154 
155GiveFreemanGui(Caller.Name)
156 
157elseif format == "BackToJail" then
158 
159TeleportPlayer(Caller,JailPos)
160 
161elseif format == "BackToJailNP" then -- where when the player respawns, they should be in jail still, which for some reason does not.
162 
163TeleportPlayer(Caller,JailPos)
164 
165GiveJailGui(Caller.Name)
166 
167elseif format == "ClearJGUIs" then
168 
169local ser = Caller:FindFirstChild("PlayerGui") if ser then
170 
171local search = ser:GetChildren()
172 
173for i = 1,#search do
174 
175if search[i].Name == "JConfirmGui" or search[i].Name == "JailedGui" or search[i].Name == "PlayerFree" then
176 
177search[i]:Destroy()
178 
179end end end
180 
181end
182 
183end end end
184 
185end)
 View all 185 lines...

I did not format anything from the script but only made it have a code block.

For some reason my arrest system is not working, any help?

1 answer

Answer this question