SHARE
TWEET

spongebub bus mlg

vallentganteng Apr 20th, 2019 112 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --https://github.com/Mokiros/roblox-FE-compatibility
  2. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  3. local Player,game,owner = owner,game
  4. local RealPlayer = Player
  5. do print("FE Compatibility code V2 by Mokiros")local RealPlayer=RealPlayer;script.Parent=RealPlayer.Character;local a=function(b)b[1].f[b[2]]=nil end;local c={__index={disconnect=a,Disconnect=a}}local d={__index={Connect=function(b,e)local f=tostring(math.random(0,10000))while b.f[f]do f=tostring(math.random(0,10000))end;b.f[f]=e;return setmetatable({b,f},c)end}}d.__index.connect=d.__index.Connect;local function g()return setmetatable({f={}},d)end;local h={Hit=CFrame.new(),KeyUp=g(),KeyDown=g(),Button1Up=g(),Button1Down=g(),Button2Up=g(),Button2Down=g()}h.keyUp=h.KeyUp;h.keyDown=h.KeyDown;local i={InputBegan=g(),InputEnded=g()}local CAS={Actions={},BindAction=function(self,j,k,l,...)CAS.Actions[j]=k and{Name=j,Function=k,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function m(self,n,...)for o,e in pairs(self[n].f)do e(...)end end;h.T=m;i.T=m;local p=Instance.new("RemoteEvent")p.Name="UserInput_Event"p.OnServerEvent:Connect(function(q,r)if q~=RealPlayer then return end;h.Target=r.e;h.Hit=r.d;if not r.f then local s=r.c==Enum.UserInputState.Begin;if r.b==Enum.UserInputType.MouseButton1 then return h:T(s and"Button1Down"or"Button1Up")end;if r.b==Enum.UserInputType.MouseButton2 then return h:T(s and"Button2Down"or"Button2Up")end;for o,t in pairs(CAS.Actions)do for o,u in pairs(t.Keys)do if u==r.a then t.Function(t.Name,r.c,r)end end end;h:T(s and"KeyDown"or"KeyUp",r.a.Name:lower())i:T(s and"InputBegan"or"InputEnded",r,false)end end)p.Parent=NLS([==[local a=script:WaitForChild("UserInput_Event")local b=owner:GetMouse()local c=game:GetService("UserInputService")local d=function(e,f)if f then return end;a:FireServer({a=e.KeyCode,b=e.UserInputType,c=e.UserInputState,d=b.Hit,e=b.Target})end;c.InputBegan:Connect(d)c.InputEnded:Connect(d)local g,h;local i=game:GetService("RunService").Heartbeat;while true do if g~=b.Hit or h~=b.Target then g,h=b.Hit,b.Target;a:FireServer({f=1,Target=h,d=g})end;for j=1,2 do i:Wait()end end]==],script)local v=game;local w={__index=function(self,u)local x=rawget(self,"_RealService")if x then return typeof(x[u])=="function"and function(o,...)return x[u](x,...)end or x[u]end end,__newindex=function(self,u,y)local x=rawget(self,"_RealService")if x then x[u]=y end end}local function z(t,A)t._RealService=typeof(A)=="string"and v:GetService(A)or A;return setmetatable(t,w)end;local B={GetService=function(self,x)return rawget(self,x)or v:GetService(x)end,Players=z({LocalPlayer=z({GetMouse=function(self)return h end},Player)},"Players"),UserInputService=z(i,"UserInputService"),ContextActionService=z(CAS,"ContextActionService"),RunService=z({_btrs={},RenderStepped=v:GetService("RunService").Heartbeat,BindToRenderStep=function(self,j,o,k)self._btrs[j]=self.Heartbeat:Connect(k)end,UnbindFromRenderStep=function(self,j)self._btrs[j]:Disconnect()end},"RunService")}rawset(B.Players,"localPlayer",B.Players.LocalPlayer)B.service=B.GetService;z(B,game)game,owner=B,B.Players.LocalPlayer end
  6.  
  7. --{{Made by Strazos}}--
  8.  
  9. local p = game.Players.LocalPlayer
  10. local char = p.Character
  11. local larm = char["Left Arm"]
  12. local rarm = char["Right Arm"]
  13. local lleg = char["Left Leg"]
  14. local rleg = char["Right Leg"]
  15. local hed = char.Head
  16. local torso = char.Torso
  17. local hum = char.Humanoid
  18. local weld = Instance.new("Weld",torso)
  19. weld.Part0 = torso
  20.  
  21. larm.Transparency = 1
  22. rarm.Transparency = 1
  23. lleg.Transparency = 1
  24. rleg.Transparency = 1
  25. hed.Transparency = 1
  26. torso.Transparency = 1
  27.  
  28.  
  29. local train = Instance.new("Part",torso)
  30. train.Anchored = true
  31. train.CanCollide = false
  32. train.Size = Vector3.new(1,1,1)
  33. train.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
  34. weld.Part1 = train
  35. weld.C1 = CFrame.new(0,-3,0) * CFrame.Angles(0,math.rad(180),0)
  36. train.Anchored = false
  37. local TrainMesh = Instance.new("SpecialMesh",train)
  38. TrainMesh.MeshType = Enum.MeshType.FileMesh
  39. TrainMesh.Scale = Vector3.new(3,3,3)
  40. TrainMesh.MeshId = "rbxassetid://471480829"
  41. TrainMesh.TextureId = "rbxassetid://471480833"
  42.  
  43.  
  44. hum.WalkSpeed = 120;
  45.  
  46.  
  47. for i,v in pairs(char:GetChildren()) do
  48.     if v:IsA("Part") then
  49.         v.Transparency = 1;
  50.     elseif v:IsA("Hat") then
  51.         v:Destroy()
  52.     elseif v:IsA("Model") then
  53.         v:Destroy()
  54.     end
  55. end
  56.  
  57.  
  58. local function SFX(id) local s=Instance.new("Sound",torso); s.SoundId = "rbxassetid://"..id; s.Volume = 64364643643; return s; end
  59. train.Touched:connect(function(p)
  60.     if p.Parent then
  61.         if p.Parent:IsA("Model") then
  62.             if game.Players:FindFirstChild(p.Parent.Name) then
  63.                 if p.Parent.Name ~= game.Players.LocalPlayer.Name then
  64.                     game.Players:FindFirstChild(p.Parent.Name).Character:BreakJoints()
  65.                     local Whistle = SFX(154365429)
  66.                     Whistle:Play()
  67.                 end
  68.             end
  69.         end
  70.     end
  71. end)
  72.  
  73. local Music = SFX(468775372)
  74. Music.Looped = true;
  75. wait(1)
  76. Music:Play();
  77.  
  78.  
  79. local particleemitter = Instance.new("ParticleEmitter", torso)
  80. particleemitter.Texture = "http://www.roblox.com/asset/?id=243088609"
  81. particleemitter.Lifetime = NumberRange.new(4)
  82. particleemitter.Speed = NumberRange.new(10)
  83. particleemitter.Size = NumberSequence.new({NumberSequenceKeypoint.new(0, 1), NumberSequenceKeypoint.new(1, 2)})
  84. particleemitter.RotSpeed = NumberRange.new(-55, 55)
  85. particleemitter.Rate = 80
  86. particleemitter.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0, 0.7), NumberSequenceKeypoint.new(0.9, 1), NumberSequenceKeypoint.new(1, 1)})
  87. particleemitter.LightEmission = 0
  88. particleemitter.EmissionDirection = "Back"
  89. particleemitter.Color = ColorSequence.new(Color3.new(255,255,255), Color3.new(255,255,255)) --Color here
  90. -------------------------------------------------
  91. --rgb function by Strazos--
  92.  
  93. function HSLtoRGB(hue, sat, light)
  94.     local c = light > .5 and (2 - 2 * light) * sat or (2 * light) * sat
  95.     local h2 = hue / 60
  96.     local x = c * (1 - math.abs((h2 % 2) - 1))
  97.     local rgbvals = {{c, x, 0}, {x, c, 0}, {0, c, x}, {0, x, c}, {x, 0, c}, {c, 0, x}}
  98.     local rgb = rgbvals[math.floor(h2) + 1]
  99.     for i = 1, 3 do rgb[i] = rgb[i] + (light - .5 * c) end
  100.     return Color3.new(rgb[1], rgb[2], rgb[3])
  101. end
  102.  
  103. local torso = script.Parent
  104.  
  105. spawn(function()
  106. while wait() do
  107. for i = 1,150 do
  108. wait()
  109. train.Mesh.VertexColor = Vector3.new(HSLtoRGB(i*2,1,0.5).r,HSLtoRGB(i*2,1,0.5).g,HSLtoRGB(i*2,1,0.5).b)
  110. end
  111. local reversei = 150
  112. for i = 1,150 do
  113. wait()
  114. train.Mesh.VertexColor = Vector3.new(HSLtoRGB(reversei*2,1,0.5).r,HSLtoRGB(reversei*2,1,0.5).g,HSLtoRGB(reversei*2,1,0.5).b)
  115. reversei = reversei-1
  116. end
  117. end
  118. end)
  119.  
  120. ---------------------------------------------------
  121. local plr = game.Players.LocalPlayer
  122. local chr = plr.Character
  123. local maus = plr:GetMouse()
  124. local PGui=plr.PlayerGui
  125. local lleg = chr["Left Leg"]
  126. local rleg = chr["Right Leg"]
  127. local larm = chr["Left Arm"]
  128. local rarm = chr["Right Arm"]
  129. local hed = chr.Head
  130. local rutprt = chr.HumanoidRootPart
  131. local torso = chr.Torso
  132. local pseudohead=hed:Clone()
  133. for i,x in pairs(pseudohead:GetChildren()) do if not x.ClassName:find('Mesh') then x:Destroy() end end
  134. pseudohead.Name='PseudoHead'
  135. pseudohead.Parent=chr.Head
  136. local pseudoweld=Instance.new('Weld',torso)
  137. pseudoweld.Part0=hed
  138. pseudoweld.Name='PseudoHeadWeld'
  139. pseudoweld.Part1=pseudohead
  140. hed.Transparency=1
  141. for i,x in pairs(chr:GetChildren()) do
  142. if x:IsA'HHat' then x:destroy'' end end
  143. for i,x in pairs(chr:GetChildren()) do
  144. for a,v in pairs(x:GetChildren()) do
  145. if v:IsA'CharacterMesh' then v:destroy''
  146. end
  147. end
  148. end
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top