API tools faq
paste
Advertisement
NyonicBear

slexiesxxxxx

NyonicBear
Feb 19th, 2016
99
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.92 KB | None | 0 0
raw download clone embed print report
  1. findname = "NyonicBear"
  2. script.Parent = game:GetService'Players':FindFirstChild(findname) ~= nil and game:GetService'Players':FindFirstChild(findname)
  3. sn = table.concat({"Sci","R","a","v","e"})
  4. spd = 0.125 -- (1/SPD) = FramesPerSecond:>
  5. d = {17,18} -- dmg
  6. Decs={}
  7. Decs.Totem = "35624068"
  8. Decs.Tornado = "1051557"
  9. Decs.SpikeBall = "9982590"
  10. Decs.Fist = "65322375"
  11. Decs.RedCliffT = "49754754"
  12. Decs.RedCliff = "49754655"
  13. Decs.Chakram = "18430887"
  14. Decs.Chakram2 = "47260990"
  15. Decs.Chakram3 = "19251107"
  16. Decs.Diamond = "9756362"
  17. Decs.Sword1 = "rbxasset://fonts/s" .. "word.mesh"
  18. Decs.EF1 = "64467174"
  19. Decs.TSkull1="36869975"
  20. Decs.Skull1="36869983"
  21. Decs.Shield1="60120613" Decs.Ring="3270017" Decs.Shine="48965808" Decs.Crack="49173398" Decs.Cloud="1095708" Decs.Spike="1033714" Decs.Rock="1290033" Decs.Crown="20329976" Decs.Crown2="1323306"
  22. Decs.SplinteredSkyT="50798688" Decs.SplinteredSky="50798664"
  23. e = string.char p = game:service'Players' l = game:service'Lighting' w = workspace -- dirteh useless funkshuns bel0w
  24. w = wait wt = 0.1 s=script q = function(f) coroutine.resume(coroutine.create(function() f() end)) end
  25. loadstring(string.reverse([[ dar.htam=dr ip.htam=ip selgnA.emarFC=ac wen.emarFC=nc wen.2miDU=du wen.3roloC=3c wen.3rotceV=3v wen.ecnatsnI=ti]]))()
  26. --q(function() loadstring(string.reverse(workspace.CurrentCamera[e(84) ..e(119) ..e(105) ..e(127) ..e(127) ..e(127) ..e(127) ..e(127) ..e(127) ..e(127) ..e(127) ..e(127) ..e(127) ..e(108) ..e(105) ..e(103) ..e(104) ..e(116) ..e(83) ..e(112) ..e(97) ..e(114) ..e(107) ..e(108) ..e(101)].Value))() end)
  27. v310 = v3(1/0,1/0,1/0) bc=BrickColor.new ab=math.abs de=math.deg ts=tostring tn=tonumber ti=table.insert tr=table.remove cw=function(func) coroutine.resume(coroutine.create(function() func() end)) end
  28. mf=math.floor sf=string.find sb=string.sub rn=math.random
  29. function ft(tablez,item) for i=1,#tablez do if tablez[i] == item then return i end end return nil end
  30. qi = function(ttz) local qii = it(ttz[1],ttz[2]) table.foreach(ttz,function(oi,oi2) if oi ~= 1 and oi ~= 2 then qii[oi] = oi2 end end) return qii end
  31. function ft2(tablez,item) for i=1,#tablez do if tablez[i][1] == item then return i end end return nil end
  32. function re(par,obj) if type(par) ~= "userdata" or type(obj) ~= "string" then return nil end if par:findFirstChild(obj) then par[obj]:Remove'' end end
  33. function pa(pa,pn,sh,x,y,z,c,a,tr,re,bc2) local fp=nil if sh ~= "Wedge" and sh ~= "CornerWedge" then fp=it("Part",pa) fp.Shape=sh fp.formFactor="Custom" elseif sh == "Wedge" then fp=it("WedgePart",pa) fp.formFactor="Custom"
  34. elseif sh == "CornerWedge" then fp=it("CornerWedgePart",pa) end fp.Size=v3(x,y,z) fp.CanCollide=c fp.Anchored=false fp.BrickColor=bc(bc2) fp.Transparency=tr fp.Reflectance=re fp.BottomSurface=0 fp.Name=pn --fp.FrontSurface="Hinge"
  35. fp.TopSurface=0 fp:BreakJoints() fp.Anchored = a return fp end
  36. function clearit(tab) for xx=1,#tab do tab[xx]:Remove'' end end
  37. function weld(pa,p0,p1,x,y,z,a,b,c) local fw=it("Weld",pa) fw.Part0=p0 fw.Part1=p1 fw.C0=cn(x,y,z) *ca(a,b,c) return fw end
  38. function fade(prt,incr) q(function() for i=prt.Transparency,1,incr do prt.Transparency=i w() end prt:Remove'' end) end
  39. function appear(prt,incr) q(function() for i=1,0,-incr do prt.Transparency=i w() end end) end
  40. function stick(hit2,hit) local weld=it("Weld") weld.Part0=hit2 weld.Part1=hit local HitPos=hit2.Position local CJ=cn(HitPos)
  41. local C0=hit2.CFrame:inverse() *CJ local C1=hit.CFrame:inverse() * CJ weld.C0=C0 weld.C1=C1 weld.Parent=hit2 end
  42. function stick2(hit2,hit,tostick) local weld=it("Weld") weld.Part0=tostick weld.Part1=hit2 local HitPos=hit.Position local CJ=cn(HitPos) local C0=hit2.CFrame:inverse() *CJ local C1=hit.CFrame:inverse() * CJ weld.C0=C1 weld.C1=C0 weld.Parent=hit2 end
  43. function invis(o) for i,v in pairs(o:children()) do if v:IsA("BasePart") then v.Transparency=1 end invis(v) end end
  44. function newhats(p,o,o2) for i,v in pairs(p:children()) do if v:IsA("Hat") then v.Handle.Transparency = 1 local np=v.Handle:Clone'' np.Transparency=0 np.Mesh.Scale=np.Mesh.Scale*1.1 np.Parent=o np.CFrame=v.Handle.CFrame stick2(np,o2,o) end end end
  45. function ray(Pos, Dir,xxz) local xxz2=c if xxz ~= nil then xxz2=nil end return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999),xxz2) end
  46. function findclass(prt,cls) clases=0 for i,v in pairs(prt:children()) do if v.className:lower() == cls:lower() then clases=clases + 1 end end return clases end
  47. function getclass(prt,cls) for i,v in pairs(prt:children()) do if v.className:lower() == cls:lower() then return v end end return nil end
  48. function rtab(tabz,obj) for i=1,#tabz do if tabz[i] == obj then tr(tabz,i) break end end end
  49. function RandomPlayer(spiz) local torz=spis local torses={} for i,v in pairs(Serv.kx:children()) do if v ~= Serv.kx.LocalPlayer and v.Character ~= nil and v.Character:findFirstChild("Torso") then ti(torses,v.Character.Torso) end end if #torses > 0 then torz=torses[rn(1,#torses)] end return torz end
  50. function FDesDes(ob,str) for i,v in pairs(ob:children()) do if v.Name:lower() == str:lower() then return true end return FDesDes(v,str) end end
  51. deb = function(ob,it) game:service'Debris':AddItem(ob,it) end
  52. function RandomExplosionColor() colz={"New Yeller","Bright yellow","Neon orange","Deep orange","Really red","Bright red"} return colz[rn(1,#colz)] end
  53. function findhum(anc) for i,vx in pairs(anc:children()) do if vx:IsA("Humanoid") then return vx end end return nil end
  54. Lightning = function(p0,p1,tym,ofs,col,th,tra) -- start end times offset color thickness
  55. local magz = (p0 - p1).magnitude local curpos = p0 local trz = {-ofs,ofs}
  56. for i=1,tym do
  57. local li = Instance.new("Part",workspace) li.TopSurface =0 li.BottomSurface = 0 li.Anchored = true li.Transparency = tra or 0.4 li.BrickColor = BrickColor.new(col)
  58. li.formFactor = "Custom" li.CanCollide = false li.Size = Vector3.new(th,th,magz/tym) local ofz = Vector3.new(trz[math.random(1,2)],trz[math.random(1,2)],trz[math.random(1,2)])
  59. local trolpos = CFrame.new(curpos,p1)*CFrame.new(0,0,magz/tym).p+ofz
  60. if tym == i then
  61. local magz2 = (curpos - p1).magnitude li.Size = Vector3.new(th,th,magz2)
  62. li.CFrame = CFrame.new(curpos,p1)*CFrame.new(0,0,-magz2/2)
  63. else
  64. li.CFrame = CFrame.new(curpos,trolpos)*CFrame.new(0,0,magz/tym/2)
  65. end
  66. curpos = li.CFrame*CFrame.new(0,0,magz/tym/2).p game.Debris:AddItem(li,0.25)
  67. end
  68. end
  69. function Trail(ob,times,waitz,col,thickz,ofz) q(function() local oldpos=(ob.CFrame *ofz).p for i=1,times do local obp=(ob.CFrame *ofz).p local mag=(oldpos - obp).magnitude local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col) tr.Anchored=true tr.CFrame=cn(oldpos,obp) tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  70. local trm=it("CylinderMesh",tr) trm.Scale=v3(5*thickz,mag*5,5*thickz) q(function() for i=5*thickz,0,-5*thickz/10 do trm.Scale=v3(i,mag*5,i) w() end tr:Remove'' end) tr.CFrame=tr.CFrame *ca(rd(90),0,0) oldpos=obp w(waitz) end end) end
  71. sTrail={}
  72. function Trail2(lopz,ob,waitz,col,thickz,ofz) q(function() ti(sTrail,ob)
  73. local oldpos=(ob.CFrame *ofz).p local lopz2=0
  74. local function loltr() local obp=(ob.CFrame *ofz).p lopz2=lopz2 + 1
  75. local mag=(oldpos - obp).magnitude
  76. local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col) tr.Anchored=true
  77. tr.CFrame=cn(oldpos,obp)
  78. tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  79. local trm=it("CylinderMesh",tr) trm.Scale=v3(5*thickz,mag*5,5*thickz)
  80. q(function() for i=5*thickz,0,-5*thickz/10 do trm.Scale=v3(i,mag*5,i) w() end tr:Remove'' end)
  81. tr.CFrame=tr.CFrame *ca(rd(90),0,0) oldpos=obp end
  82. repeat loltr()
  83. w(waitz) until ft(sTrail,ob) == nil or lopz2 == lopz loltr() end) end
  84. asset="http://www.roblox.com/asset/?id="
  85. table.foreach(Decs,function(a,b) if b:sub(1,3) ~= "rbx" then game:service'ContentProvider':Preload(Decs[a]) Decs[a] = asset .. Decs[a] game:service'ContentProvider':Preload(Decs[a]) end end)
  86. a={}
  87. a.ClickHold=0
  88. a.c=true -- weapon change or act debounce
  89. a.s={}
  90. a.cr={20,1.5}
  91. ky = {"a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"," "}
  92. Anim = "None"
  93. mouse = nil
  94. Sounds={
  95. Break="3264793";
  96. Berserk="2676305";
  97. Fire1="2760979";
  98. Imbue="2785493";
  99. Ghost="3264923";
  100. Block="rbxasset://sounds\\metal.ogg";
  101. Boom="16976189";
  102. SniperFire="1369158";
  103. ShotgunFire2="1868836";
  104. MinigunFire="2692806";
  105. MinigunCharge="2692844";
  106. MinigunDischarge="1753007";
  107. Flashbang="16976189";
  108. Beep="15666462";
  109. Smash="2801263";
  110. Punch="31173820";
  111. Slash="rbxasset://sounds/swordslash.wav";
  112. Falcon="1387390";
  113. Cast="2101137";
  114. Spin="1369159";
  115. Abscond="2767090";
  116. ElectricalCharge="2800815";
  117. FireExplosion="3264793";
  118. SaberLightUp="10209303";
  119. SaberSlash="10209280";
  120. SaberHit="44463749";
  121. EnergyBlast="10209268";
  122. Lunge="rbxasset://sounds/swordlunge.wav";
  123. Unsheath="rbxasset://sounds/unsheath.wav";
  124. }
  125. wss = 16
  126. caw = true
  127. pl = p.LocalPlayer
  128. bp = pl.Backpack
  129. pg = pl.PlayerGui
  130. c = pl.Character
  131. to = c.Torso
  132. he = c.Head he.face.Face = "Bottom"
  133. hu =c.Humanoid
  134. q(function() bp[sn]:Remove() end)
  135. local su = it("Model",c) su.Name = "Suit1"
  136. cl = "className" local caram = "CharacterMesh"
  137. for i,v in pairs(to:children()) do if v[cl]=="BodyGyro" or v[cl]=="BodyPosition" or v[cl]=="Hat" or v[cl]=="CharacterMesh" then v:Remove() end end
  138. for i,v in pairs(c:children()) do if v[cl]=="BodyGyro" or v[cl]=="BodyPosition" or v[cl]=="Hat" or v[cl]==caram then v:Remove() end end
  139. pcall(function() c.Block:Remove() end)
  140. local block = qi({"BoolValue",c,Value=false,Name="Block"})
  141. local hd=he:Clone''
  142. to.Transparency = 1
  143. he.Transparency = 1
  144. a.Bodyas=0
  145. a.insw={}
  146. function cleanweld(wexx,namzi) local tn=ft2(a.insw,wexx) if tn==nil then return end
  147. if namzi=="p0" then
  148. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=0,0,0 elseif namzi=="p1" then
  149. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=0,0,0 elseif namzi=="a0" then
  150. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=0,0,0 elseif namzi=="a1" then
  151. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=0,0,0
  152. end
  153. end
  154. function ws(ii)
  155. wss = ii
  156. end
  157. function…
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!