Advertisement
ItzInfern

anti skid

Jan 9th, 2019
154
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.15 KB | None | 0 0
  1. --//====================================================\\--
  2. --|| SIMPLE ANTISKID BY SHACKLUSTER
  3. --\\====================================================//--
  4.  
  5. script.Parent = game.ServerScriptService
  6. local PLAYERSERVICE = game:GetService("Players")
  7. local SPACE = workspace
  8. IT = Instance.new
  9. CF = CFrame.new
  10. VT = Vector3.new
  11. RAD = math.rad
  12. ANGLES = CFrame.Angles
  13. MRANDOM = math.random
  14. script.Name = "|| SHACKLUSTER - ANTISKID ||"
  15.  
  16. --//=================================\\
  17. --|| FUNCTIONS
  18. --\\=================================//
  19.  
  20. local S = IT("Sound")
  21. function CreateSound(ID, PARENT, VOLUME, PITCH)
  22. local NEWSOUND = nil
  23. coroutine.resume(coroutine.create(function()
  24. NEWSOUND = S:Clone()
  25. NEWSOUND.Parent = PARENT
  26. NEWSOUND.Volume = VOLUME
  27. NEWSOUND.Pitch = PITCH
  28. NEWSOUND.SoundId = "rbxassetid://"..ID
  29. NEWSOUND:play()
  30. end))
  31. return NEWSOUND
  32. end
  33.  
  34. function JointKiller(Model)
  35. for index, CHILD in pairs(Model:GetDescendants()) do
  36. if CHILD:IsA("JointInstance") then
  37. CHILD.Part0 = nil
  38. CHILD.Part1 = nil
  39. CHILD:remove()
  40. end
  41. end
  42. end
  43.  
  44. function KILL(MODEL)
  45. coroutine.resume(coroutine.create(function()
  46. local PARENT = MODEL
  47. JointKiller(MODEL)
  48. MODEL:BreakJoints()
  49. for index, CHILD in pairs(MODEL:GetChildren()) do
  50. if CHILD:IsA("BasePart") then
  51. local FLIGHTFORCE = IT("BodyPosition",CHILD)
  52. FLIGHTFORCE.D = 215
  53. FLIGHTFORCE.P = 200
  54. FLIGHTFORCE.maxForce = VT(40000,40000,40000)
  55. FLIGHTFORCE.position = CHILD.CFrame*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))*CF(0,0,MRANDOM(2,15)).p
  56. game:GetService("Debris"):AddItem(FLIGHTFORCE,MRANDOM(12,25)/10)
  57. if (CHILD.Name == "Torso" or CHILD.Name == "UpperTorso") and CHILD:FindFirstChild("ANTISKID") == nil then
  58. local F = IT("Folder",CHILD)
  59. F.Name = "ANTISKID"
  60. CreateSound(245910488, CHILD, 10, MRANDOM(7,13)/10)
  61. end
  62. coroutine.resume(coroutine.create(function()
  63. wait(0.2)
  64. CHILD.Parent = workspace
  65. CHILD.CanCollide = true
  66. end))
  67. elseif CHILD:IsA("Humanoid") then
  68. game:GetService("Debris"):AddItem(CHILD,0.1)
  69. end
  70. game:GetService("Debris"):AddItem(CHILD,4)
  71. end
  72. end))
  73. end
  74.  
  75. --//=================================\\
  76. --|| LOOP THE SCRIPT
  77. --\\=================================//
  78.  
  79. warn([[
  80. YO WHADDUP G
  81. //=================================\\
  82. SHACKLUSTER ANTISKID
  83.  
  84. LOADED SUCCESFULLY
  85. \\=================================//]])
  86.  
  87. local LOOP = 0
  88. while true do
  89. wait()
  90. for index, CHILD in pairs(PLAYERSERVICE:GetChildren()) do
  91. if CHILD.Character then
  92. local KILLTHISSKID = false
  93. AVATAR = CHILD.Character
  94. if AVATAR.Parent ~= workspace then
  95. KILLTHISSKID = true
  96. else
  97. if AVATAR:FindFirstChild("Warden") or AVATAR:FindFirstChild("Deadeyes") or AVATAR:FindFirstChild("Monarch") then
  98. KILLTHISSKID = true
  99. end
  100. end
  101. if KILLTHISSKID == true then
  102. AVATAR.Parent = workspace
  103. KILL(AVATAR)
  104. end
  105. end
  106. if LOOP == 0 then
  107. LOOP = 1
  108. warn("SUCCESFULLY LOOPED")
  109. end
  110. end
  111. end
  112.  
  113. --//==================================\\
  114. --||IT'S SIMPLE, BUT GETS THE JOB DONE
  115. --\\==================================//
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement