--https://github.com/Mokiros/roblox-FE-compatibility
if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
local RealPlayer = Player
do print("FE Compatibility code by Mokiros")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end --made by retrojooooono duh
lp = game.Players.LocalPlayer
char = lp.Character
head = char.Head
followmouse = false
gunsout = false
hum = char:FindFirstChildOfClass("Humanoid")
agentnames = {"Andy","Oliver","Xavier","David","Bob","John","Fred","Greg","George","Peter","Paul","Christopher","Luke"}
bodyguards = {}
function makeagent(name)
char.Archivable = true
clone = char:Clone()
clone.Parent = workspace
clone.Name = name
gc = clone:GetChildren()
for i=1, #gc do
if gc[i].ClassName == "Shirt" or gc[i].ClassName == "Pants" or gc[i].ClassName == "Accessory" or gc[i].ClassName == "Hat" or gc[i].ClassName == "ShirtGraphic" or gc[i].ClassName == "ShirtGraphics" then
gc[i]:Destroy()
end
end
findbc = clone:FindFirstChildOfClass("BodyColors")
if findbc then
findbc:Destroy()
end
newbc = Instance.new("BodyColors",clone)
newbc.HeadColor = BrickColor.new("Buttermilk")
newbc.LeftArmColor = BrickColor.new("Medium stone grey")
newbc.RightArmColor = BrickColor.new("Medium stone grey")
newbc.TorsoColor = BrickColor.new("Medium stone grey")
newbc.LeftLegColor = BrickColor.new("Really black")
newbc.RightLegColor = BrickColor.new("Really black")
clone.Head:FindFirstChildOfClass("Decal").Texture = "rbxasset://textures/face.png"
game:GetService("Chat"):Chat(clone.Head, "Agent "..clone.Name.." is in the area.", Enum.ChatColor.White)
table.insert(bodyguards, clone)
end
print([[
retrojooooono's bodyguard script
inspired by mustardfoot's bodyguard script
Commands:
bg/enter area -- Spawns a bodyguard.
bg/enter area/[number] -- Replace [number]
with a number. This will spawn [number] amount of
bodyguards.
bg/leave area -- Removes all bodyguards.
bg/follow mouse -- Toggles if the bodyguards
will follow the mouse or follow your character.
bg/chat/[msg] -- Replace "[msg]" with a message.
bg/guns out -- Makes bodyguards bring out their guns
and become ready to shoot someone. When the bodyguards'
guns are out you can hold the left mouse button to
make them shoot to where your mouse is pointing.
Has a 1 to 10 chance that the shot brick
will be destroyed. Will hurt NPCs, bodyguards,
and player characters that you shoot at.
bg/guns away -- Makes bodyguards hide their guns.
All of your bodyguards will say the message.
]])
lp.Chatted:connect(function(msg)
if msg == "bg/enter area" then
makeagent(agentnames[math.random(1,#agentnames)])
end
if string.sub(msg,1,14) == "bg/enter area/" then
howmuchtospawn = tonumber(string.sub(msg,15))
for spawnnumber=1, howmuchtospawn do
wait(0.01)
makeagent(agentnames[math.random(1,#agentnames)])
end
end
if msg == "bg/leave area" then
for get=1, #bodyguards do
curbg = bodyguards[get]
curbg:Destroy()
end
end
if msg == "bg/follow mouse" then
if followmouse then
followmouse = false
else
followmouse = true
end
end
if string.sub(msg,1,8) == "bg/chat/" then
if string.len(msg) > 8 then
whattochat = string.sub(msg,9)
for chat=1, #bodyguards do
if bodyguards[chat] ~= nil then
if bodyguards[chat]:FindFirstChild("Head") then
wait(0.01)
game:GetService("Chat"):Chat(bodyguards[chat]:FindFirstChild("Head"), whattochat, Enum.ChatColor.White)
end
end
end
end
end
if msg == "bg/guns out" then
for gun=1, #bodyguards do
wait(0.01)
gunsout = true
guntool = Instance.new("Tool")
guntool.Name = "Gun"
handle = Instance.new("Part",guntool)
handle.Name = "Handle"
handle.Size = Vector3.new(3,1,1)
handle.FrontSurface = Enum.SurfaceType.Hinge
guntool.Parent = bodyguards[gun]
end
end
if msg == "bg/guns away" then
for nogun=1, #bodyguards do
wait(0.01)
if bodyguards[nogun]:FindFirstChild("Gun") then
bodyguards[nogun]:FindFirstChild("Gun"):Destroy()
gunsout = false
end
end
end
end)
lp:GetMouse().Button1Down:connect(function()
wait(0.01)
mouse = lp:GetMouse()
hit = mouse.Hit
if gunsout then
target = mouse.Target
for shoot=1, #bodyguards do
bghead = bodyguards[shoot]:FindFirstChild("Head")
if bghead then
bullet = Instance.new("Part",workspace)
bullet.Size = Vector3.new(0.25,0.25,0.25)
bullet.CFrame = mouse.Hit
bullet.BrickColor = BrickColor.Black()
sound = Instance.new("Sound",bullet)
sound.SoundId = "rbxassetid://130770091"
sound:Play()
if target.Parent:FindFirstChildOfClass("Humanoid") then
target.Parent:FindFirstChildOfClass("Humanoid"):TakeDamage(5)
end
if math.random(1,10) == 5 then
target:Destroy()
end
end
end
end
end)
while true do
wait(1)
for a=1, #bodyguards do
if bodyguards[a] ~= nil then
if bodyguards[a]:FindFirstChild("Head") then
if followmouse == false then
bodyguards[a]:FindFirstChildOfClass("Humanoid").WalkToPoint = head.Position
else
bodyguards[a]:FindFirstChildOfClass("Humanoid").WalkToPoint = Vector3.new(lp:GetMouse().Hit.X, lp:GetMouse().Hit.Y, lp:GetMouse().Hit.Z)
end
end
end
end
end