Advertisement
Guest User

Untitled

a guest
Jun 25th, 2018
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.11 KB | None | 0 0
  1. --//====================================================\\--
  2. --|| CREATED BY SHACKLUSTER
  3. --\\====================================================//--
  4.  
  5. wait(0.2)
  6.  
  7. Player = game:GetService("Players").LocalPlayer
  8. PlayerGui = Player.PlayerGui
  9. Cam = workspace.CurrentCamera
  10. Backpack = Player.Backpack
  11. Character = Player.Character
  12. Humanoid = Character.Humanoid
  13. Mouse = Player:GetMouse()
  14. RootPart = Character["HumanoidRootPart"]
  15. Torso = Character["Torso"]
  16. Head = Character["Head"]
  17. RightArm = Character["Right Arm"]
  18. LeftArm = Character["Left Arm"]
  19. RightLeg = Character["Right Leg"]
  20. LeftLeg = Character["Left Leg"]
  21. RootJoint = RootPart["RootJoint"]
  22. Neck = Torso["Neck"]
  23. RightShoulder = Torso["Right Shoulder"]
  24. LeftShoulder = Torso["Left Shoulder"]
  25. RightHip = Torso["Right Hip"]
  26. LeftHip = Torso["Left Hip"]
  27.  
  28. IT = Instance.new
  29. CF = CFrame.new
  30. VT = Vector3.new
  31. RAD = math.rad
  32. C3 = Color3.new
  33. UD2 = UDim2.new
  34. BRICKC = BrickColor.new
  35. ANGLES = CFrame.Angles
  36. EULER = CFrame.fromEulerAnglesXYZ
  37. COS = math.cos
  38. ACOS = math.acos
  39. SIN = math.sin
  40. ASIN = math.asin
  41. ABS = math.abs
  42. MRANDOM = math.random
  43. FLOOR = math.floor
  44.  
  45. --//=================================\\
  46. --|| USEFUL VALUES
  47. --\\=================================//
  48.  
  49. Animation_Speed = 3
  50. Frame_Speed = 1 / 60 -- (1 / 30) OR (1 / 60)
  51. local Speed = 20
  52. local ROOTC0 = CF(0, 0, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
  53. local NECKC0 = CF(0, 1, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
  54. local RIGHTSHOULDERC0 = CF(-0.5, 0, 0) * ANGLES(RAD(0), RAD(90), RAD(0))
  55. local LEFTSHOULDERC0 = CF(0.5, 0, 0) * ANGLES(RAD(0), RAD(-90), RAD(0))
  56. local DAMAGEMULTIPLIER = 1
  57. local ANIM = "Idle"
  58. local ATTACK = false
  59. local EQUIPPED = false
  60. local HOLD = false
  61. local COMBO = 1
  62. local Rooted = false
  63. local SINE = 0
  64. local KEYHOLD = false
  65. local CHANGE = 2 / Animation_Speed
  66. local WALKINGANIM = false
  67. local VALUE1 = false
  68. local VALUE2 = false
  69. local ROBLOXIDLEANIMATION = IT("Animation")
  70. ROBLOXIDLEANIMATION.Name = "Roblox Idle Animation"
  71. ROBLOXIDLEANIMATION.AnimationId = "http://www.roblox.com/asset/?id=180435571"
  72. --ROBLOXIDLEANIMATION.Parent = Humanoid
  73. local WEAPONGUI = IT("ScreenGui", PlayerGui)
  74. WEAPONGUI.Name = "PIXELGUI"
  75. local Effects = IT("Folder", Character)
  76. Effects.Name = "Effects"
  77. local ANIMATOR = Humanoid.Animator
  78. local ANIMATE = Character.Animate
  79. local UNANCHOR = true
  80. local SONG = 853518668
  81. local DEAD = false
  82.  
  83. --//=================================\\
  84. --\\=================================//
  85.  
  86.  
  87. --//=================================\\
  88. --|| SAZERENOS' ARTIFICIAL HEARTBEAT
  89. --\\=================================//
  90.  
  91. ArtificialHB = Instance.new("BindableEvent", script)
  92. ArtificialHB.Name = "ArtificialHB"
  93.  
  94. script:WaitForChild("ArtificialHB")
  95.  
  96. frame = Frame_Speed
  97. tf = 0
  98. allowframeloss = false
  99. tossremainder = false
  100. lastframe = tick()
  101. script.ArtificialHB:Fire()
  102.  
  103. game:GetService("RunService").Heartbeat:connect(function(s, p)
  104. tf = tf + s
  105. if tf >= frame then
  106. if allowframeloss then
  107. script.ArtificialHB:Fire()
  108. lastframe = tick()
  109. else
  110. for i = 1, math.floor(tf / frame) do
  111. script.ArtificialHB:Fire()
  112. end
  113. lastframe = tick()
  114. end
  115. if tossremainder then
  116. tf = 0
  117. else
  118. tf = tf - frame * math.floor(tf / frame)
  119. end
  120. end
  121. end)
  122.  
  123. --//=================================\\
  124. --\\=================================//
  125.  
  126. --//=================================\\
  127. --|| SOME FUNCTIONS
  128. --\\=================================//
  129.  
  130. function Raycast(POSITION, DIRECTION, RANGE, IGNOREDECENDANTS)
  131. return workspace:FindPartOnRay(Ray.new(POSITION, DIRECTION.unit * RANGE), IGNOREDECENDANTS)
  132. end
  133.  
  134. function PositiveAngle(NUMBER)
  135. if NUMBER >= 0 then
  136. NUMBER = 0
  137. end
  138. return NUMBER
  139. end
  140.  
  141. function NegativeAngle(NUMBER)
  142. if NUMBER <= 0 then
  143. NUMBER = 0
  144. end
  145. return NUMBER
  146. end
  147.  
  148. function Swait(NUMBER)
  149. if NUMBER == 0 or NUMBER == nil then
  150. ArtificialHB.Event:wait()
  151. else
  152. for i = 1, NUMBER do
  153. ArtificialHB.Event:wait()
  154. end
  155. end
  156. end
  157.  
  158. function CreateMesh(MESH, PARENT, MESHTYPE, MESHID, TEXTUREID, SCALE, OFFSET)
  159. local NEWMESH = IT(MESH)
  160. if MESH == "SpecialMesh" then
  161. NEWMESH.MeshType = MESHTYPE
  162. if MESHID ~= "nil" and MESHID ~= "" then
  163. NEWMESH.MeshId = "http://www.roblox.com/asset/?id="..MESHID
  164. end
  165. if TEXTUREID ~= "nil" and TEXTUREID ~= "" then
  166. NEWMESH.TextureId = "http://www.roblox.com/asset/?id="..TEXTUREID
  167. end
  168. end
  169. NEWMESH.Offset = OFFSET or VT(0, 0, 0)
  170. NEWMESH.Scale = SCALE
  171. NEWMESH.Parent = PARENT
  172. return NEWMESH
  173. end
  174.  
  175. function CreatePart(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE, ANCHOR)
  176. local NEWPART = IT("Part")
  177. NEWPART.formFactor = FORMFACTOR
  178. NEWPART.Reflectance = REFLECTANCE
  179. NEWPART.Transparency = TRANSPARENCY
  180. NEWPART.CanCollide = false
  181. NEWPART.Locked = true
  182. NEWPART.Anchored = true
  183. if ANCHOR == false then
  184. NEWPART.Anchored = false
  185. end
  186. NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
  187. NEWPART.Name = NAME
  188. NEWPART.Size = SIZE
  189. NEWPART.Position = Torso.Position
  190. NEWPART.Material = MATERIAL
  191. NEWPART:BreakJoints()
  192. NEWPART.Parent = PARENT
  193. return NEWPART
  194. end
  195.  
  196. local function weldBetween(a, b)
  197. local weldd = Instance.new("ManualWeld")
  198. weldd.Part0 = a
  199. weldd.Part1 = b
  200. weldd.C0 = CFrame.new()
  201. weldd.C1 = b.CFrame:inverse() * a.CFrame
  202. weldd.Parent = a
  203. return weldd
  204. end
  205.  
  206.  
  207. function QuaternionFromCFrame(cf)
  208. local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
  209. local trace = m00 + m11 + m22
  210. if trace > 0 then
  211. local s = math.sqrt(1 + trace)
  212. local recip = 0.5 / s
  213. return (m21 - m12) * recip, (m02 - m20) * recip, (m10 - m01) * recip, s * 0.5
  214. else
  215. local i = 0
  216. if m11 > m00 then
  217. i = 1
  218. end
  219. if m22 > (i == 0 and m00 or m11) then
  220. i = 2
  221. end
  222. if i == 0 then
  223. local s = math.sqrt(m00 - m11 - m22 + 1)
  224. local recip = 0.5 / s
  225. return 0.5 * s, (m10 + m01) * recip, (m20 + m02) * recip, (m21 - m12) * recip
  226. elseif i == 1 then
  227. local s = math.sqrt(m11 - m22 - m00 + 1)
  228. local recip = 0.5 / s
  229. return (m01 + m10) * recip, 0.5 * s, (m21 + m12) * recip, (m02 - m20) * recip
  230. elseif i == 2 then
  231. local s = math.sqrt(m22 - m00 - m11 + 1)
  232. local recip = 0.5 / s return (m02 + m20) * recip, (m12 + m21) * recip, 0.5 * s, (m10 - m01) * recip
  233. end
  234. end
  235. end
  236.  
  237. function QuaternionToCFrame(px, py, pz, x, y, z, w)
  238. local xs, ys, zs = x + x, y + y, z + z
  239. local wx, wy, wz = w * xs, w * ys, w * zs
  240. local xx = x * xs
  241. local xy = x * ys
  242. local xz = x * zs
  243. local yy = y * ys
  244. local yz = y * zs
  245. local zz = z * zs
  246. return CFrame.new(px, py, pz, 1 - (yy + zz), xy - wz, xz + wy, xy + wz, 1 - (xx + zz), yz - wx, xz - wy, yz + wx, 1 - (xx + yy))
  247. end
  248.  
  249. function QuaternionSlerp(a, b, t)
  250. local cosTheta = a[1] * b[1] + a[2] * b[2] + a[3] * b[3] + a[4] * b[4]
  251. local startInterp, finishInterp;
  252. if cosTheta >= 0.0001 then
  253. if (1 - cosTheta) > 0.0001 then
  254. local theta = ACOS(cosTheta)
  255. local invSinTheta = 1 / SIN(theta)
  256. startInterp = SIN((1 - t) * theta) * invSinTheta
  257. finishInterp = SIN(t * theta) * invSinTheta
  258. else
  259. startInterp = 1 - t
  260. finishInterp = t
  261. end
  262. else
  263. if (1 + cosTheta) > 0.0001 then
  264. local theta = ACOS(-cosTheta)
  265. local invSinTheta = 1 / SIN(theta)
  266. startInterp = SIN((t - 1) * theta) * invSinTheta
  267. finishInterp = SIN(t * theta) * invSinTheta
  268. else
  269. startInterp = t - 1
  270. finishInterp = t
  271. end
  272. end
  273. return a[1] * startInterp + b[1] * finishInterp, a[2] * startInterp + b[2] * finishInterp, a[3] * startInterp + b[3] * finishInterp, a[4] * startInterp + b[4] * finishInterp
  274. end
  275.  
  276. function Clerp(a, b, t)
  277. local qa = {QuaternionFromCFrame(a)}
  278. local qb = {QuaternionFromCFrame(b)}
  279. local ax, ay, az = a.x, a.y, a.z
  280. local bx, by, bz = b.x, b.y, b.z
  281. local _t = 1 - t
  282. return QuaternionToCFrame(_t * ax + t * bx, _t * ay + t * by, _t * az + t * bz, QuaternionSlerp(qa, qb, t))
  283. end
  284.  
  285. function CreateFrame(PARENT, TRANSPARENCY, BORDERSIZEPIXEL, POSITION, SIZE, COLOR, BORDERCOLOR, NAME)
  286. local frame = IT("Frame")
  287. frame.BackgroundTransparency = TRANSPARENCY
  288. frame.BorderSizePixel = BORDERSIZEPIXEL
  289. frame.Position = POSITION
  290. frame.Size = SIZE
  291. frame.BackgroundColor3 = COLOR
  292. frame.BorderColor3 = BORDERCOLOR
  293. frame.Name = NAME
  294. frame.Parent = PARENT
  295. return frame
  296. end
  297.  
  298. function CreateLabel(PARENT, TEXT, TEXTCOLOR, TEXTFONTSIZE, TEXTFONT, TRANSPARENCY, BORDERSIZEPIXEL, STROKETRANSPARENCY, NAME)
  299. local label = IT("TextLabel")
  300. label.BackgroundTransparency = 1
  301. label.Size = UD2(1, 0, 1, 0)
  302. label.Position = UD2(0, 0, 0, 0)
  303. label.TextColor3 = TEXTCOLOR
  304. label.TextStrokeTransparency = STROKETRANSPARENCY
  305. label.TextTransparency = TRANSPARENCY
  306. label.FontSize = TEXTFONTSIZE
  307. label.Font = TEXTFONT
  308. label.BorderSizePixel = BORDERSIZEPIXEL
  309. label.TextScaled = false
  310. label.Text = TEXT
  311. label.Name = NAME
  312. label.Parent = PARENT
  313. return label
  314. end
  315.  
  316. function NoOutlines(PART)
  317. PART.TopSurface, PART.BottomSurface, PART.LeftSurface, PART.RightSurface, PART.FrontSurface, PART.BackSurface = 10, 10, 10, 10, 10, 10
  318. end
  319.  
  320. function CreateWeldOrSnapOrMotor(TYPE, PARENT, PART0, PART1, C0, C1)
  321. local NEWWELD = IT(TYPE)
  322. NEWWELD.Part0 = PART0
  323. NEWWELD.Part1 = PART1
  324. NEWWELD.C0 = C0
  325. NEWWELD.C1 = C1
  326. NEWWELD.Parent = PARENT
  327. return NEWWELD
  328. end
  329.  
  330. local S = IT("Sound")
  331. function CreateSound(ID, PARENT, VOLUME, PITCH, DOESLOOP)
  332. local NEWSOUND = nil
  333. coroutine.resume(coroutine.create(function()
  334. NEWSOUND = S:Clone()
  335. NEWSOUND.Parent = PARENT
  336. NEWSOUND.Volume = VOLUME
  337. NEWSOUND.Pitch = PITCH
  338. NEWSOUND.SoundId = "http://www.roblox.com/asset/?id="..ID
  339. NEWSOUND:play()
  340. if DOESLOOP == true then
  341. NEWSOUND.Looped = true
  342. else
  343. repeat wait(1) until NEWSOUND.Playing == false
  344. NEWSOUND:remove()
  345. end
  346. end))
  347. return NEWSOUND
  348. end
  349.  
  350. function CFrameFromTopBack(at, top, back)
  351. local right = top:Cross(back)
  352. return CF(at.x, at.y, at.z, right.x, top.x, back.x, right.y, top.y, back.y, right.z, top.z, back.z)
  353. end
  354.  
  355. --WACKYEFFECT({EffectType = "", Size = VT(1,1,1), Size2 = VT(0,0,0), Transparency = 0, Transparency2 = 1, CFrame = CF(), MoveToPos = nil, RotationX = 0, RotationY = 0, RotationZ = 0, Material = "Neon", Color = C3(1,1,1), SoundID = nil, SoundPitch = nil
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement