Goo345

Put AT the Start of script

Mar 11th, 2019
163
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.85 KB | None | 0 0
  1. local Player = game:GetService("Players").USERNAME
  2. local Mouse,mouse,UserInputService,ContextActionService
  3. do
  4. script.Parent = Player.Character
  5. local CAS = {Actions={}}
  6. local Event = Instance.new("RemoteEvent")
  7. Event.Name = "UserInput_Event"
  8. Event.Parent = Player.Character
  9. local fakeEvent = function()
  10. local t = {_fakeEvent=true}
  11. t.Connect = function(self,f)self.Function=f end
  12. t.connect = t.Connect
  13. return t
  14. end
  15. local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
  16. local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  17. function CAS:BindAction(name,fun,touch,...)
  18. CAS.Actions[name] = {Name=name,Function=fun,Keys={...}}
  19. end
  20. function CAS:UnbindAction(name)
  21. CAS.Actions[name] = nil
  22. end
  23. local function te(self,ev,...)
  24. local t = m[ev]
  25. if t and t._fakeEvent and t.Function then
  26. t.Function(...)
  27. end
  28. end
  29. m.TrigEvent = te
  30. UIS.TrigEvent = te
  31. Event.OnServerEvent:Connect(function(plr,io)
  32. if plr~=Player then return end
  33. if io.isMouse then
  34. m.Target = io.Target
  35. m.Hit = io.Hit
  36. elseif io.UserInputType == Enum.UserInputType.MouseButton1 then
  37. if io.UserInputState == Enum.UserInputState.Begin then
  38. m:TrigEvent("Button1Down")
  39. else
  40. m:TrigEvent("Button1Up")
  41. end
  42. else
  43. for n,t in pairs(CAS.Actions) do
  44. for _,k in pairs(t.Keys) do
  45. if k==io.KeyCode then
  46. t.Function(t.Name,io.UserInputState,io)
  47. end
  48. end
  49. end
  50. if io.UserInputState == Enum.UserInputState.Begin then
  51. m:TrigEvent("KeyDown",io.KeyCode.Name:lower())
  52. UIS:TrigEvent("InputBegan",io,false)
  53. else
  54. m:TrigEvent("KeyUp",io.KeyCode.Name:lower())
  55. UIS:TrigEvent("InputEnded",io,false)
  56. end
  57. end
  58. end)
  59. Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
  60. end
Add Comment
Please, Sign In to add comment