Advertisement
Guest User

Vdksahhw

a guest
Nov 19th, 2019
121
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.91 KB | None | 0 0
  1. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  2.  
  3. local Player,game,owner = owner,game
  4.  
  5. local RealPlayer = Player
  6.  
  7. do print("FE Compatibility code V3 by Desered_ROBLOX")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
  8.  
  9. wait(1 / 60)
  10. Effects = { }
  11. local Player = owner
  12. local Character = Player.Character
  13. local Humanoid = Character.Humanoid
  14. local LeftArm = Character["Left Arm"]
  15. local RightArm = Character["Right Arm"]
  16. local LeftLeg = Character["Left Leg"]
  17. local RightLeg = Character["Right Leg"]
  18. local Head = Character.Head
  19. local Torso = Character.Torso
  20. local Camera = game.Workspace.CurrentCamera
  21. local RootPart = Character.HumanoidRootPart
  22. local RootJoint = RootPart.RootJoint
  23. local attack = false
  24. local Anim = 'Idle'
  25. local attacktype = 1
  26. local delays = false
  27. local play = true
  28. local targetted = nil
  29. local Torsovelocity = (RootPart.Velocity * Vector3.new(1, 0, 1)).magnitude
  30. local velocity = RootPart.Velocity.y
  31. local sine = 0
  32. local change = 1
  33. local doe = 0
  34. local Create = LoadLibrary("RbxUtility").Create
  35. Humanoid.WalkSpeed = 8
  36. local m = Create("Model"){
  37. Parent = Character,
  38. Name = "WeaponModel",
  39. }
  40. function chatfunc(text)
  41. local chat = coroutine.wrap(function()
  42. if Character:FindFirstChild("TalkingBillBoard")~= nil then
  43. Character:FindFirstChild("TalkingBillBoard"):destroy()
  44. end
  45. local naeeym2 = Instance.new("BillboardGui",Character)
  46. naeeym2.Size = UDim2.new(0,100,0,40)
  47. naeeym2.StudsOffset = Vector3.new(0,3,0)
  48. naeeym2.Adornee = Character.Head
  49. naeeym2.Name = "TalkingBillBoard"
  50. local tecks2 = Instance.new("TextLabel",naeeym2)
  51. tecks2.BackgroundTransparency = 1
  52. tecks2.BorderSizePixel = 0
  53. tecks2.Text = ""
  54. tecks2.Font = "Cartoon"
  55. tecks2.TextSize = 30
  56. tecks2.TextStrokeTransparency = 0
  57. tecks2.TextColor3 = Color3.new(.6,0,0)
  58. tecks2.TextStrokeColor3 = Color3.new(0,0,0)
  59. tecks2.Size = UDim2.new(1,0,0.5,0)
  60. local tecks3 = Instance.new("TextLabel",naeeym2)
  61. tecks3.BackgroundTransparency = 1
  62. tecks3.BorderSizePixel = 0
  63. tecks3.Text = ""
  64. tecks3.Font = "Cartoon"
  65. tecks3.TextSize = 30
  66. tecks3.TextStrokeTransparency = 0
  67. tecks3.TextColor3 = BrickColor.new("Hot white").Color
  68. tecks3.TextStrokeColor3 = Color3.new(0,0,0)
  69. tecks3.Size = UDim2.new(1,0,0.5,0)
  70. spawn(function()
  71. while wait() do
  72. tecks3.TextColor3 = BrickColor.random().Color
  73. tecks2.TextColor3 = BrickColor.random().Color
  74. end
  75. end
  76.  
  77. end
  78. end
  79. end
  80. end
  81. end
  82. end
  83. end
  84. end
  85. else
  86. Part.Parent = nil
  87. table.remove(Effects, e)
  88. end
  89. end
  90. end
  91. end
  92. end
  93. end
  94. end
  95. end
  96. end
  97. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement