Advertisement
Guest User

Untitled

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