Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 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
- do
- print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
- script.Parent = Player.Character
- --RemoteEvent for communicating
- local Event = Instance.new("RemoteEvent")
- Event.Name = "UserInput_Event"
- --Fake event to make stuff like Mouse.KeyDown work
- local function fakeEvent()
- local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
- t.connect = t.Connect
- return t
- end
- --Creating fake input objects with fake variables
- local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
- local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
- local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
- CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
- end}
- --Merged 2 functions into one by checking amount of arguments
- CAS.UnbindAction = CAS.BindAction
- --This function will trigger the events that have been :Connect()'ed
- local function te(self,ev,...)
- local t = m[ev]
- if t and t._fakeEvent and t.Function then
- t.Function(...)
- end
- end
- m.TrigEvent = te
- UIS.TrigEvent = te
- Event.OnServerEvent:Connect(function(plr,io)
- if plr~=Player then return end
- if io.isMouse then
- m.Target = io.Target
- m.Hit = io.Hit
- else
- local b = io.UserInputState == Enum.UserInputState.Begin
- if io.UserInputType == Enum.UserInputType.MouseButton1 then
- return m:TrigEvent(b and "Button1Down" or "Button1Up")
- end
- for _,t in pairs(CAS.Actions) do
- for _,k in pairs(t.Keys) do
- if k==io.KeyCode then
- t.Function(t.Name,io.UserInputState,io)
- end
- end
- end
- m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
- UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
- end
- end)
- Event.Parent = NLS([==[
- local Player = game:GetService("Players").LocalPlayer
- local Event = script:WaitForChild("UserInput_Event")
- local UIS = game:GetService("UserInputService")
- local input = function(io,a)
- if a then return end
- --Since InputObject is a client-side instance, we create and pass table instead
- Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
- end
- UIS.InputBegan:Connect(input)
- UIS.InputEnded:Connect(input)
- local Mouse = Player:GetMouse()
- local h,t
- --Give the server mouse data 30 times every second, but only if the values changed
- --If player is not moving their mouse, client won't fire events
- while wait(1/30) do
- if h~=Mouse.Hit or t~=Mouse.Target then
- h,t=Mouse.Hit,Mouse.Target
- Event:FireServer({isMouse=true,Target=t,Hit=h})
- end
- end]==],Player.Character)
- Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
- end
- --{{Made by Strazos}}--
- local p = game.Players.THECREATOR200291
- local char = p.Character
- local larm = char["Left Arm"]
- local rarm = char["Right Arm"]
- local lleg = char["Left Leg"]
- local rleg = char["Right Leg"]
- local hed = char.Head
- local torso = char.Torso
- local hum = char.Humanoid
- local weld = Instance.new("Weld",torso)
- weld.Part0 = torso
- larm.Transparency = 1
- rarm.Transparency = 1
- lleg.Transparency = 1
- rleg.Transparency = 1
- hed.Transparency = 1
- torso.Transparency = 1
- local train = Instance.new("Part",torso)
- train.Anchored = true
- train.CanCollide = false
- train.Size = Vector3.new(5,5,5)
- train.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
- weld.Part1 = train
- weld.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(0,math.rad(-90),0)
- train.Anchored = false
- local TrainMesh = Instance.new("SpecialMesh",train)
- TrainMesh.MeshType = Enum.MeshType.FileMesh
- TrainMesh.Scale = Vector3.new(0.01, 0.01, 0.01)
- TrainMesh.MeshId = "rbxassetid://430330296"
- TrainMesh.TextureId = "rbxassetid://430330316"
- hum.WalkSpeed = 60;
- for i,v in pairs(char:GetChildren()) do
- if v:IsA("Part") then
- v.Transparency = 1;
- elseif v:IsA("Hat") then
- v:Destroy()
- elseif v:IsA("Model") then
- v:Destroy()
- end
- end
- local function SFX(id) local s=Instance.new("Sound",torso); s.SoundId = "rbxassetid://"..id; s.Volume = 999; return s; end
- train.Touched:connect(function(p)
- if p.Parent then
- if p.Parent:IsA("Model") then
- if game.Players:FindFirstChild(p.Parent.Name) then
- if p.Parent.Name ~= game.Players.THECREATOR200291.Name then
- game.Players:FindFirstChild(p.Parent.Name).Character:BreakJoints()
- local Whistle = SFX(360007673)
- Whistle:Play()
- end
- end
- end
- end
- end)
- local Music = SFX(468954972)
- Music.Looped = true;
- wait(1)
- Music:Play();
- local particleemitter = Instance.new("ParticleEmitter", torso)
- particleemitter.Texture = "http://www.roblox.com/asset/?id=0"
- particleemitter.VelocitySpread = 180
- particleemitter.Lifetime = NumberRange.new(5)
- particleemitter.Speed = NumberRange.new(6)
- particleemitter.Size = NumberSequence.new({NumberSequenceKeypoint.new(0, 1), NumberSequenceKeypoint.new(1, 5)})
- particleemitter.RotSpeed = NumberRange.new(-55, 55)
- particleemitter.Rate = 150
- particleemitter.Rotation = NumberRange.new(-55, 55)
- particleemitter.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0, 0), NumberSequenceKeypoint.new(0.7, 0.9), NumberSequenceKeypoint.new(1, 1)})
- particleemitter.LightEmission = 0
- particleemitter.Color = ColorSequence.new(Color3.new(255,255,255), Color3.new(255,255,255)) --Color here
- local plr = game.Players.THECREATOR200291
- local chr = plr.Character
- local maus = plr:GetMouse()
- local PGui=plr.PlayerGui
- local lleg = chr["Left Leg"]
- local rleg = chr["Right Leg"]
- local larm = chr["Left Arm"]
- local rarm = chr["Right Arm"]
- local hed = chr.Head
- local rutprt = chr.HumanoidRootPart
- local torso = chr.Torso
- local pseudohead=hed:Clone()
- for i,x in pairs(pseudohead:GetChildren()) do if not x.ClassName:find('Mesh') then x:Destroy() end end
- pseudohead.Name='PseudoHead'
- pseudohead.Parent=chr.Head
- local pseudoweld=Instance.new('Weld',torso)
- pseudoweld.Part0=hed
- pseudoweld.Name='PseudoHeadWeld'
- pseudoweld.Part1=pseudohead
- hed.Transparency=1
- for i,x in pairs(chr:GetChildren()) do
- if x:IsA'HHat' then x:destroy'' end end
- for i,x in pairs(chr:GetChildren()) do
- for a,v in pairs(x:GetChildren()) do
- if v:IsA'CharacterMesh' then v:destroy''
- end
- end
- end
- -- Objects
- local ScreenGui = Instance.new("ScreenGui")
- local TextButton = Instance.new("TextButton")
- -- Properties
- ScreenGui.Parent = game.Players.THECREATOR200291.PlayerGui
- TextButton.Parent = ScreenGui
- TextButton.BackgroundColor3 = Color3.new(1, 1, 1)
- TextButton.Size = UDim2.new(0, 160, 0, 50)
- TextButton.Font = Enum.Font.SourceSans
- TextButton.FontSize = Enum.FontSize.Size14
- TextButton.Text = "have a bowl,faggot"
- TextButton.TextSize = 14
- --[[Function/s being made!]]
- function PlayMusic(ID)
- for i, v in pairs (game.Workspace:GetChildren()) do
- if v:IsA("Sound") then
- end
- end
- local music = Instance.new("Sound")
- local asset = "rbxassetid://"
- music.SoundId = asset .. ID
- music.Parent = workspace
- music.Volume = 999
- music.Looped = false
- music:Play()
- end
- --[[Connecting functions!]]
- TextButton.MouseButton1Down:connect(function()
- PlayMusic(000)
- end)
- --This is a localscript; you will need to have access to using scripts wherever you want this
- p = game:GetService('Players').LocalPlayer if p.Character then if p.Character:FindFirstChild('Humanoid') then p.Character.Humanoid.MaxHealth = math.huge end end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement