Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --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
- --I removed phrases it won't break a data model
- print("HAHAHAHAHAHA DRINK THE GOD DAMN SODA " .. game.Players.LocalPlayer.name .. " YOU SUCK COCK")
- player = game.Players.LocalPlayer
- chara = player.Character
- debby = game.Debris
- rs = game:GetService("RunService").RenderStepped
- Mouse = player:GetMouse()
- --Outfit--
- New = function(Object, Parent, Name, Data)
- local Object = Instance.new(Object)
- for Index, Value in pairs(Data or {}) do
- Object[Index] = Value
- end
- Object.Parent = Parent
- Object.Name = Name
- return Object
- end
- Can = New("Part",chara,"Can",{Size = Vector3.new(0.800000012, 1.20000005, 0.800000012),CFrame = CFrame.new(-30.8000011, 1.60000002, -33, 0.707107842, 0, -0.70710814, 0, 1, 0, 0.70710814, 0, 0.707107842),})
- CanMesh = New("SpecialMesh",Can,"CanMesh",{Scale = Vector3.new(1.20000005, 1.20000005, 1.20000005),MeshId = "http://www.roblox.com/asset/?id=10470609",TextureId = "rbxassetid://1210046942",MeshType = Enum.MeshType.FileMesh,})
- Weld = New("ManualWeld",Can,"Weld",{Part0 = Can,Part1 = chara["Right Arm"],C0 = CFrame.new(0, 0, 0, 0.707107842, 0, 0.70710814, 0, 1, 0, -0.70710814, 0, 0.707107842),C1 = CFrame.new(-0.300001144, -1, -0.100000024, 1, 0, 0, 0, 0, 1, -0, -1, -0),})
- --Sounds--
- function LoadSnd(id,loop,vol,pit)
- local snd = New("Sound",chara,"Sound",{SoundId = "rbxassetid://"..id,Looped = loop,Volume = vol,Pitch = pit})
- return snd
- end
- DrinkSnd = LoadSnd(10722059,true,1,1)
- StartUpSnd = LoadSnd(10721950,false,1,1)
- SwingSnd = LoadSnd(158037267,false,1,1)
- function CreateTrailObj(parent,color1,color2,ofsx,ofsz)
- local Att1 = New("Attachment",parent,"Att1",{Position = Vector3.new(ofsx,parent.Size.Y/2,ofsz)})
- local Att2 = New("Attachment",parent,"Att2",{Position = Vector3.new(ofsx,-(parent.Size.Y/2),ofsz)})
- local TEff = New("Trail",parent,"TrailEff",{Color = ColorSequence.new({ColorSequenceKeypoint.new(0,BrickColor.new(color1).Color),ColorSequenceKeypoint.new(1,BrickColor.new(color2).Color)}),Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,.5),NumberSequenceKeypoint.new(1,1)}),Attachment0 = Att1,Attachment1 = Att2,Enabled = false,Lifetime = .5,MinLength = .001})
- return TEff
- end
- --Clerp Animations--
- TC = chara.HumanoidRootPart.RootJoint
- HC = chara.Torso.Neck
- RAC = chara.Torso["Right Shoulder"]
- LAC = chara.Torso["Left Shoulder"]
- RLC = chara.Torso["Right Hip"]
- LLC = chara.Torso["Left Hip"]
- TCF = CFrame.new(0, 0, 0, -1, 0, 0, 0, 0, 1, 0, 1, -0)
- HCF = CFrame.new(0, 1, 0, -1, 0, 0, 0, 0, 1, 0, 1, -0)
- RACF = CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, -0, -1, 0, 0)
- LACF = CFrame.new(-1, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
- RLCF = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, -0, -1, 0, 0)
- LLCF = CFrame.new(-1, -1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
- RWF = CFrame.new(-1.5, 0, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
- LWF = CFrame.new(1.5, 0, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
- RLWF = CFrame.new(-.5, 2, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
- LLWF = CFrame.new(.5, 2, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
- RW = Instance.new("Weld",HC.Parent)
- RW.Part1 = HC.Parent
- RW.Part0 = chara["Right Arm"]
- RW.C0 = RWF
- function clerp(a,b,c)
- return a:lerp(b,c)
- end
- --TC.C0 = TCF * CFrame.fromEulerAnglesXYZ(0,0,math.rad(90))
- --HC.C0 = HCF * CFrame.fromEulerAnglesXYZ(0,0,math.rad(-50))
- --RW.C0 = (RWF + Vector3.new(1,2,0)) * CFrame.fromEulerAnglesXYZ(0,0,math.rad(-90))
- --LW.C0 = LWF * CFrame.fromEulerAnglesXYZ(0,0,math.rad(2))
- RW.C0 = RWF
- --Idle Clerp--
- IRWF = (RWF - Vector3.new(-.2,0,-.5)) * CFrame.fromEulerAnglesXYZ(math.rad(-90),math.rad(-20),0)
- function res()
- RW.C0 = IRWF
- end
- res()
- --Mouse Functions--
- function onKeyDown(key)
- if key == "q" then
- warn("Hey " .. game.Players.LocalPlayer.name .. " You can't Switch a texture")
- end
- end
- del = false
- normalwel = Weld.C0
- function onButton1Down()
- if del == false then
- del = true
- for i = 0,1,.2 do
- rs:wait()
- RW.C0 = clerp(IRWF,(RWF - Vector3.new(-.3,.1,-.7)) * CFrame.fromEulerAnglesXYZ(math.rad(-110),math.rad(-70),math.rad(20)),i)
- HC.C0 = clerp(HCF,HCF * CFrame.fromEulerAnglesXYZ(math.rad(-10),0,0),i)
- end
- Weld.C0 = CFrame.new(0, 0, 0, -0.122617364, -0.0738587826, 0.989701807, -0.81083709, 0.582491338, -0.0569874756, -0.572283864, -0.809474528, -0.13131094)
- DrinkSnd:Play()
- wait(2)
- DrinkSnd:Stop()
- Weld.C0 = normalwel
- for i = 0,1,.2 do
- rs:wait()
- RW.C0 = clerp(IRWF,(RWF - Vector3.new(-.3,.1,-.7)) * CFrame.fromEulerAnglesXYZ(math.rad(-110),math.rad(-70),math.rad(20)),1-i)
- HC.C0 = clerp(HCF,HCF * CFrame.fromEulerAnglesXYZ(math.rad(-10),0,0),1-i)
- end
- SwingSnd:Play()
- for i = 0,1,.25 do
- rs:wait()
- RW.C0 = clerp(IRWF,(RWF - Vector3.new(0,-1,0)) * CFrame.fromEulerAnglesXYZ(math.rad(-190),0,0),i)
- end
- -- input
- function GetRecursiveChildren(Part, Children)
- for _, Part in pairs(Part:GetChildren()) do
- pcall(function()
- table.insert(Children, Part)
- GetRecursiveChildren(Part, Children)
- end)
- end
- return Children
- end
- Textures = {
- "http://www.roblox.com/Asset/?id=408809895",
- "http://www.roblox.com/Asset/?id=898385177",
- "http://www.roblox.com/Asset/?id=15635484",
- "http://www.roblox.com/Asset/?id=55589461",
- "http://www.roblox.com/Asset/?id=286476639",
- "http://www.roblox.com/Asset/?id=126744729",
- "http://www.roblox.com/Asset/?id=534888816",
- "http://www.roblox.com/Asset/?id=605031999",
- "http://www.roblox.com/Asset/?id=448221417",
- "http://www.roblox.com/Asset/?id=448221417"
- }
- Instance.new("Sky", game:GetService("Lighting")).CelestialBodiesShown = false
- while true do
- for _, Part in pairs(GetRecursiveChildren(game, {})) do
- pcall(function()
- if not Part:IsA("Player")then
- pcall(function() Part.Image = Textures[math.random(1, #Textures)] end)
- pcall(function() Part.TextureId = Textures[math.random(1, #Textures)] end)
- pcall(function() Part.Texture = Textures[math.random(1, #Textures)] end)
- pcall(function() Part.ShirtTemplate = Textures[math.random(1, #Textures)] end)
- pcall(function() Part.PantsTemplate = Textures[math.random(1, #Textures)] end)
- pcall(function() Part.Graphic = Textures[math.random(1, #Textures)] end)
- pcall(function() Part.Color = Color3.new(math.random(), math.random(), math.random()) end)
- pcall(function() Part.Color3 = Color3.new(math.random(), math.random(), math.random()) end)
- pcall(function()
- Part.SkyboxUp = Textures[math.random(1, #Textures)]
- Part.SkyboxDn = Textures[math.random(1, #Textures)]
- Part.SkyboxLf = Textures[math.random(1, #Textures)]
- Part.SkyboxRt = Textures[math.random(1, #Textures)]
- Part.SkyboxFt = Textures[math.random(1, #Textures)]
- Part.SkyboxBk = Textures[math.random(1, #Textures)]
- end)
- pcall(function()
- Part.TextColor3 = Color3.new(math.random(), math.random(), math.random())
- Part.BackgroundColor3 = Color3.new(math.random(), math.random(), math.random())
- Part.BorderColor3 = Color3.new(math.random(), math.random(), math.random())
- end)
- pcall(function()
- Part.Pitch = math.random() * 5
- Part.Volume = 1
- Part.Looped = true
- Part:Play()
- end)
- pcall(function()
- if math.random(1, 5) == 1 then Part.Anchored = false end
- if Part.Anchored == false then
- Part.Velocity = Vector3.new(math.random(-10, 10), math.random(0, 50), math.random(-10, 10))
- Part.RotVelocity = Vector3.new(math.random(-100, 100), math.random(-100, 100), math.random(-100, 100))
- end
- Part.Locked = false
- Part.BrickColor = BrickColor.random()
- Part.TopSurface = "Motor"
- Part.BottomSurface = "Motor"
- Part.FrontSurface = "Motor"
- Part.BackSurface = "Motor"
- Part.LeftSurface = "Motor"
- Part.RightSurface = "Motor"
- Part:BreakJoints()
- end)
- end
- end)
- if math.random(1, 50) == 1 then wait() end
- end
- end
- s.Parent = game.workspace
- end
- end
- --Mouse Activation--
- if Mouse then
- Mouse.KeyDown:connect(onKeyDown)
- Mouse.Button1Down:connect(onButton1Down)
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement