API tools faq
paste
ManlyFoes

Ro-Xploit v5

ManlyFoes
Apr 28th, 2016
177
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 47.82 KB | None | 0 0
raw download clone embed print report
  1. wait(0.15)
  2. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,z,x,y
  3. local 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
  4. local GENEFolder = game.CoreGui -- game.Players.LocalPlayer.PlayerGui-- game.CoreGui
  5. local cnonyme,anonyme,bnonyme,dnonyme,enonyme
  6.  
  7.  
  8.  
  9. local cModule = {}
  10.  
  11.  
  12. function cModule.cColors(rc,gc,bc) return Color3.new(rc/255,gc/255,bc/255) end
  13.  
  14. function cModule.Execute(f)
  15. return coroutine.resume(coroutine.create(function()f()end))
  16. end
  17.  
  18. function cModule.Tween(GUI,x1,x2,y1,y2,sec,ifit)
  19. if GUI:IsA("Frame") or GUI:IsA("TextButton") then
  20. if sec == nil then
  21. sec = 1
  22. end
  23. if ifit == nil then
  24. ifit = true
  25. end
  26. GUI:TweenPosition(UDim2.new(x1, x2, y1, y2), "Out", "Quad", sec, ifit)
  27. end
  28. end
  29.  
  30. function cModule.cLabel(name,parents,x1,x2,y1,y2,x3,x4,y3,y4)
  31. cnonyme = Instance.new("TextLabel")
  32. cnonyme.Parent = parents
  33. cnonyme.Size = UDim2.new(x1,x2,y1,y2)
  34. cnonyme.Position = UDim2.new(x3,x4,y3,y4)
  35. cnonyme.BackgroundTransparency = 1
  36. cnonyme.Name = "cLabel"
  37. cnonyme.Text = name
  38. cnonyme.TextColor3 = cModule.cColors(255, 255, 255)
  39. cnonyme.TextStrokeTransparency = 0.75
  40. cnonyme.Font = 2
  41. cnonyme.FontSize = Enum.FontSize.Size12
  42. cnonyme.TextWrapped = true
  43. cnonyme.BackgroundColor3 = cModule.cColors(130, 130, 130)
  44. cnonyme.BorderSizePixel = 0
  45. return cnonyme
  46. end
  47.  
  48. function cModule.cFrame(name,parents,x1,x2,y1,y2,x3,x4,y3,y4)
  49. bnonyme = Instance.new("Frame")
  50. bnonyme.Parent = parents
  51. bnonyme.Name = name
  52. bnonyme.Size = UDim2.new(x1,x2,y1,y2)
  53. bnonyme.BorderSizePixel = 0
  54. bnonyme.Position = UDim2.new(x3,x4,y3,y4)
  55. bnonyme.BackgroundColor3 = cModule.cColors(147, 147, 147)
  56. return bnonyme
  57. end
  58.  
  59. function cModule.cScrollingFrame(name,parents,x1,x2,y1,y2,x3,x4,y3,y4,height)
  60. anonyme = Instance.new("ScrollingFrame")
  61. anonyme.Parent = parents
  62. anonyme.Name = name
  63. anonyme.Size = UDim2.new(x1,x2,y1,y2)
  64. anonyme.BorderSizePixel = 0
  65. anonyme.Position = UDim2.new(x3,x4,y3,y4)
  66. anonyme.BackgroundColor3 = cModule.cColors(147, 147, 147)
  67. anonyme.ScrollBarThickness = 10
  68. anonyme.CanvasSize = UDim2.new(0,0,0,height)
  69. return anonyme
  70. end
  71.  
  72. function cModule.cButton(name,parents,x1,x2,y1,y2,x3,x4,y3,y4,func)
  73. dnonyme = Instance.new("TextButton")
  74. dnonyme.Parent = parents
  75. dnonyme.Name = name
  76. dnonyme.Text = name
  77. dnonyme.Size = UDim2.new(x1,x2,y1,y2)
  78. dnonyme.BackgroundColor3 = cModule.cColors(130, 130, 130)
  79. dnonyme.BorderSizePixel = 0
  80. dnonyme.Position = UDim2.new(x3,x4,y3,y4)
  81. dnonyme.TextColor3 = cModule.cColors(255, 255, 255)
  82. dnonyme.TextStrokeTransparency = 0.75
  83. dnonyme.Font = 2
  84. dnonyme.FontSize = Enum.FontSize.Size12
  85. dnonyme.AutoButtonColor = true
  86. dnonyme.TextWrapped = true
  87. cModule.Execute(dnonyme.MouseButton1Click:connect(function() func() end))
  88. return dnonyme
  89. end
  90.  
  91. function cModule.addButton(name,parents,func,id)
  92. cModule.cButton(name,parents,1,-20,0,25,0,5,0,((35*id)-35)+5,func).BackgroundTransparency = 0.5
  93. if parents:IsA("ScrollingFrame") then
  94. parents.CanvasSize = UDim2.new(0,0,0,35*id)
  95. end
  96. end
  97.  
  98. function cModule.addToggleButton(name,parents,func1,func2,id)
  99. x=cModule.cFrame(name,parents,1,-10,0,35,0,0,0,(35*id)-35)
  100. x.BackgroundTransparency = 0.75
  101. x.BackgroundColor3 = cModule.cColors(130, 130, 130)
  102.  
  103. z=cModule.cLabel(name,x,1,-160,0,25,0,5,0,5)
  104. z.BackgroundTransparency = 0.5
  105.  
  106. y=cModule.cButton("On",x,0,-70,0,25,1,-80,0,5,function()
  107. func1()
  108. end)
  109. y.BackgroundTransparency = 0.5
  110. g=cModule.cButton("Off",x,0,-70,0,25,1,-5,0,5,function()
  111. func2()
  112. end)
  113. g.BackgroundTransparency = 0.5
  114. if parents:IsA("ScrollingFrame") then
  115. parents.CanvasSize = UDim2.new(0,0,0,35*id)
  116. end
  117. return x
  118. end
  119.  
  120. function cModule.addLabel(name,parents,id)
  121. cModule.cLabel(name,parents,1,-20,0,25,0,5,0,((35*id)-35)+5).BackgroundTransparency = 0.35
  122. if parents:IsA("ScrollingFrame") then
  123. parents.CanvasSize = UDim2.new(0,0,0,35*id)
  124. end
  125. end
  126.  
  127. function cModule.cTextBox(name,parents,x1,x2,y1,y2,x3,x4,y3,y4)
  128. enonyme = Instance.new("TextBox")
  129. enonyme.Parent = parents
  130. enonyme.Name = name
  131. enonyme.Text = name
  132. if name == "ValueBox" then
  133. enonyme.Text = "0"
  134. end
  135. enonyme.Size = UDim2.new(x1,x2,y1,y2)
  136. enonyme.BackgroundColor3 = cModule.cColors(130, 130, 130)
  137. enonyme.BorderSizePixel = 0
  138. enonyme.Position = UDim2.new(x3,x4,y3,y4)
  139. enonyme.TextColor3 = cModule.cColors(255, 255, 255)
  140. enonyme.TextStrokeTransparency = 0.75
  141. enonyme.Font = 2
  142. enonyme.FontSize = Enum.FontSize.Size12
  143. enonyme.TextWrapped = true
  144. return enonyme
  145. end
  146.  
  147. letters = { "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"; " "; ":"; "/" }
  148. function cModule.CheckForNumbers(textbox)
  149. for i = 1, #letters do
  150. n = string.find(string.lower(textbox.Text), letters[i])
  151. if n ~= nil then
  152. textbox.Text = string.sub(string.lower(textbox.Text), 1, n-1)..string.sub(string.lower(textbox.Text), n+1)
  153. end
  154. end
  155. end
  156.  
  157. function cModule.cNumTextBox(textbox)
  158. ypcall(function()
  159. cModule.Execute(function()
  160. wait(0.25)
  161. textbox.Changed:connect(function(property)
  162. if property == "Text" then
  163. cModule.CheckForNumbers(textbox)
  164. end
  165. end)
  166. end)
  167. end)
  168. end
  169.  
  170. function cModule.addTextUsedButton(name,parents,func,id,type)
  171. x=cModule.cFrame(name,parents,1,-10,0,35,0,0,0,(35*id)-35)
  172. x.BackgroundTransparency = 0.75
  173. x.BackgroundColor3 = cModule.cColors(130, 130, 130)
  174. y=cModule.cTextBox("ValueBox",x,1,-85,0,25,0,5,0,5)
  175. y.BackgroundTransparency = 0.5
  176. if type == nil then
  177. cModule.cNumTextBox(y)
  178. else
  179. y.Text = ""
  180. end
  181. z=cModule.cButton(name,x,0,70,0,25,1,-75,0,5,function() if y.Text ~= "" then func() end end)
  182. z.BackgroundTransparency = 0.5
  183. if parents:IsA("ScrollingFrame") then
  184. parents.CanvasSize = UDim2.new(0,0,0,35*id)
  185. end
  186. return x
  187. end
  188.  
  189. function cModule.addTextUsedLabel(name,parents,id,type)
  190. x=cModule.cFrame(name,parents,1,-10,0,35,0,0,0,(35*id)-35)
  191. x.BackgroundTransparency = 0.75
  192. x.BackgroundColor3 = cModule.cColors(130, 130, 130)
  193. y=cModule.cTextBox("ValueBox",x,1,-85,0,25,0,80,0,5)
  194. if type == nil then
  195. y.Text = "0"
  196. else
  197. y.Text = ""
  198. end
  199. y.BackgroundTransparency = 0.5
  200. if type == nil then
  201. cModule.cNumTextBox(y)
  202. end
  203. z=cModule.cLabel(name,x,0,70,0,25,0,5,0,5)
  204. z.BackgroundTransparency = 0.5
  205. if parents:IsA("ScrollingFrame") then
  206. parents.CanvasSize = UDim2.new(0,0,0,35*id)
  207. end
  208. return x
  209. end
  210.  
  211. function cModule.cWindow(name,parents,x1,x2,y1,y2,x3,x4,y3,y4)
  212. z = cModule.cFrame(name,parents,x1,x2,y1,y2+20,x3,x4,y3,y4-20)
  213. z.BackgroundTransparency = 1
  214. a = cModule.cFrame(name,parents,x1,x2,0,20,0,0,0,0)--,x1,x2,0,20,x3,x4,y3,y4)
  215. a.Position = z.Position - UDim2.new(0,0,0,20)
  216. a.BackgroundColor3 = cModule.cColors(118, 118, 118)
  217. a.Active = true
  218. a.Draggable = true
  219. b = cModule.cFrame("Main",a,x1,x2,y1,y2,x3,x4,0,20)
  220. c = cModule.cLabel(name,a,1,0,1,0,0,0,0,0)
  221. z:Remove()
  222. return a
  223. end
  224.  
  225. local Mouse
  226. function cModule.cAddHotkey(key,func)
  227. Mouse = game.Players.LocalPlayer:GetMouse()
  228. if Mouse ~= nil then
  229. Mouse.KeyDown:connect(function(Key)
  230. if Key == string.lower(string.char(key)) then
  231. func()
  232. end
  233. end)
  234. else
  235. Mouse = game.Players.LocalPlayer:GetMouse()
  236. end
  237. end
  238.  
  239. function cModule.showTab(parent,name)
  240. for i,v in pairs(parent:GetChildren()) do
  241. if v:IsA("Frame") then
  242. if v:FindFirstChild("IsATab") ~= nil then
  243. v.Visible = false
  244. if v.Name == name then
  245. v.Visible = true
  246. end
  247. end
  248. end
  249. end
  250. end
  251.  
  252. local tab,tabbutton,IsATab
  253. function cModule.AddTab(name,parent,id)
  254. tab=cModule.cFrame(name,parent,1,0,1,-20,0,0,0,20)
  255. if id == 1 then
  256. tab.Visible = true
  257. else
  258. tab.Visible = false
  259. end
  260. tab.BackgroundTransparency = 1
  261. tabbutton=cModule.cButton(name,parent,0,100,0,20,0,100*id-100,0,0, function() cModule.showTab(parent,name) end)
  262. IsATab=Instance.new("IntValue",tab)
  263. IsATab.Name = "IsATab"
  264. return tab
  265. end
  266.  
  267. local SelectedPlayer
  268. function cModule.AddPlayer(player,Folder)
  269. SelectedPlayer = Instance.new("StringValue")
  270. SelectedPlayer.Name = player
  271. SelectedPlayer.Parent = Folder
  272. end
  273.  
  274. function cModule.RemovePlayer(player,Folder)
  275. if Folder:FindFirstChild(player) ~= nil then
  276. Folder:FindFirstChild(player):Remove()
  277. end
  278. end
  279.  
  280. function cModule.ClearPlayer(Folder)
  281. if Folder ~= nil then
  282. Folder:ClearAllChildren()
  283. end
  284. end
  285.  
  286. function cModule.VerifyPlayer(player,Folder)
  287. if Folder:FindFirstChild(player) ~= nil then
  288. return true
  289. else
  290. return false
  291. end
  292. end
  293.  
  294. function cModule.VerifyBan(child,Banned)
  295. if child:IsA("Player") then
  296. if cModule.VerifyPlayer(child.Name,Banned) then
  297. wait(0.25)
  298. child:Remove()
  299. end
  300. end
  301. end
  302.  
  303. function cModule.cWarningWindow(Message,maingui)
  304. if A ~= nil then
  305. A:Remove()
  306. A = nil
  307. end
  308. spawn(function()
  309. A=cModule.cWindow("Warning",maingui,0,350,0,100,.5,-175,.5,-50)
  310. B=cModule.cButton("OK",a.Main,0,150,0,35,0.5,-75,1,-40, function() A:Remove() end)
  311. C=cModule.cLabel(Message,a.Main,1,-10,1,-45,0,5,0,5)
  312. end)
  313. end
  314.  
  315. function cModule.runScript(SC)
  316. ypcall(function()loadstring(SC)()end)
  317. end
  318.  
  319. function cModule.runLocalScript(SC)
  320. repeat wait() until game:service'Players'.LocalPlayer; wait();
  321. if game.Players.LocalPlayer ~= nil then
  322. if game.Players.LocalPlayer.PlayerGui ~= nil then
  323. ypcall(function()
  324. K = Instance.new("LocalScript",game.Players.LocalPlayer.PlayerGui)
  325. K.Disabled = true
  326. K.Source = SC
  327. wait()
  328. K.Disabled = false
  329. end)
  330. end
  331. end
  332. end
  333.  
  334. function cModule.spamDecal(v)
  335. if v:IsA("Part") then
  336. for i=0, 5 do
  337. D = Instance.new("Decal")
  338. D.Name = "ROXPLOITDECAL"
  339. D.Face = i
  340. D.Parent = v
  341. D.Texture = "http://www.roblox.com/asset/?id=274157997"
  342. end
  343. else
  344. if v:IsA("Model") then
  345. for a,b in pairs(v:GetChildren()) do
  346. cModule.spamDecal(b)
  347. end
  348. end
  349. end
  350. end
  351.  
  352. function cModule.clearDecal(v)
  353. if v:IsA("Part") then
  354. for a,b in pairs(v:GetChildren()) do
  355. if b:IsA("Decal") then
  356. if b.Name == "ROXPLOITDECAL" then
  357. b:Remove()
  358. end
  359. end
  360. end
  361. else
  362. if v:IsA("Model") then
  363. for a,b in pairs(v:GetChildren()) do
  364. cModule.clearDecal(b)
  365. end
  366. end
  367. end
  368. end
  369.  
  370. function cModule.spamColor(v)
  371. if v:IsA("Part") then
  372. v.BrickColor = BrickColor.Random()
  373. else
  374. if v:IsA("Model") then
  375. for a,b in pairs(v:GetChildren()) do
  376. cModule.spamColor(b)
  377. end
  378. end
  379. end
  380. end
  381.  
  382.  
  383.  
  384.  
  385. local DataLoading = 0
  386. local DataTotal = 0
  387. game:GetObjects("rbxassetid://273899678")[1].Parent = GENEFolder --GlobalData Folder
  388. --[[local cModule]]
  389. GENEFolder:WaitForChild("GlobalData")
  390. if GENEFolder:FindFirstChild("GlobalData") ~= nil then
  391. for i,v in pairs(GENEFolder:FindFirstChild("GlobalData"):GetChildren()) do
  392. v.Parent = GENEFolder
  393. end
  394. end
  395. --[[
  396. if GENEFolder:FindFirstChild("MainData"):FindFirstChild("cModule") ~= nil then
  397. cModule = require(GENEFolder:FindFirstChild("MainData"):FindFirstChild("cModule"))
  398. end
  399. ]]
  400. local LoadingScreen = Instance.new("ScreenGui",GENEFolder)
  401. local lFrame = cModule.cFrame("Loading",LoadingScreen,0,300,0,40,0.5,-150,-1,0)
  402. lFrame.BackgroundColor3 = cModule.cColors(118, 118, 118)
  403. local lBar = cModule.cFrame("Loading",lFrame,0,-10,0,30,0,5,0,5)
  404. local sLabel = cModule.cLabel("Initiating...",lFrame,1,-10,0,30,0,5,0,5)
  405.  
  406. cModule.Tween(lFrame,0.5,-150,0,0,1)
  407. wait(0.25)
  408. function doloading(Folder)
  409. DataTotal = 0
  410. DataLoading = 0
  411. for i,v in pairs(Folder:GetChildren()) do
  412. DataTotal = i
  413. end
  414. for i,v in pairs(Folder:GetChildren()) do
  415. DataLoading = DataLoading + 1
  416. lBar.Size = UDim2.new(DataLoading/DataTotal,-10,0,30,0,5,0,5)
  417. sLabel.Text = Folder.Name.. ": " .. v.Name .. " " .. DataLoading .."/".. DataTotal
  418. print(Folder.Name.. ": " .. v.Name .. " " .. DataLoading .."/".. DataTotal)
  419. wait(0.05/10000000000)
  420. end
  421. end
  422. doloading(GENEFolder:FindFirstChild("MainData"))
  423. doloading(GENEFolder:FindFirstChild("HatData"))
  424. doloading(GENEFolder:FindFirstChild("GearData"))
  425. doloading(GENEFolder:FindFirstChild("MusicData"))
  426. doloading(GENEFolder:FindFirstChild("ScriptData"))
  427. sLabel.Text = "Loading Completed!"
  428. wait(0.1)
  429. cModule.Tween(lFrame,0.5,-150,-1,0,3)
  430. local Selected=Instance.new("Folder",GENEFolder)
  431. Selected.Name = "Selected"
  432. local Banned=Instance.new("Folder",GENEFolder)
  433. Banned.Name = "Banned"
  434. local Option=Instance.new("Folder",GENEFolder)
  435. Option.Name = "Option"
  436.  
  437. local SelectedPlayer = nil
  438.  
  439.  
  440. local maingui = Instance.new("ScreenGui",GENEFolder)
  441. maingui.Name = "Ro-Xploit_GUI"
  442.  
  443. ExploitGui=cModule.cWindow("Ro-Xploit 5.0",maingui,0,500,0,300,.5,-250,.5,-1000)
  444. Tab1=cModule.AddTab("Command",ExploitGui.Main,1)
  445. Tab2=cModule.AddTab("Script",ExploitGui.Main,2)
  446. Tab3=cModule.AddTab("Misc",ExploitGui.Main,3)
  447. Tab4=cModule.AddTab("Ban DataBase",ExploitGui.Main,4)
  448. Tab5=cModule.AddTab("Player Selection",ExploitGui.Main,5)
  449. MTab1=cModule.AddTab("Music Player",Tab3,1)
  450. MTab2=cModule.AddTab("Gear Giver",Tab3,2)
  451. MTab3=cModule.AddTab("Hat Giver",Tab3,3)
  452. MTab4=cModule.AddTab("Explorer",Tab3,4)
  453. MTab5=cModule.AddTab("WayPoint",Tab3,5)
  454. PlayerScroll=cModule.cScrollingFrame("PlayerScroll",Tab5,1,0,1,-20,0,0,0,20,0)
  455. BannedScroll=cModule.cScrollingFrame("BannedScroll",Tab4,1,0,1,-20,0,0,0,20,0)
  456. CMDScroll=cModule.cScrollingFrame("CMDScroll",Tab1,1,0,1,0,0,0,0,0,0)
  457. cModule.cLabel("Click name for unban.",Tab4,1,0,0,20,0,0,0,0)
  458.  
  459. cModule.AddPlayer("Muxes",Banned)
  460. cModule.AddPlayer("filosoof",Banned)
  461. cModule.AddPlayer("Fotlon",Banned)
  462. cModule.AddPlayer("DeathVessel",Banned)
  463. cModule.AddPlayer("Stotlon",Banned)
  464. cModule.AddPlayer("Thehackermen14",Banned)
  465.  
  466. CommandScroll=cModule.cScrollingFrame("CommandScroll",Tab1,1,0,1,0,0,0,0,0,0)
  467. MusicScroll=cModule.cScrollingFrame("MusicScroll",MTab1,1,0,1,-35*5,0,0,0,35*5,0)
  468. cModule.addButton("Ban",CommandScroll,function()
  469. for i,v in pairs(Selected:GetChildren()) do
  470. if not cModule.VerifyPlayer(v.Name,Banned) then
  471. if v.Name ~= "KrystalTeam" then
  472. if game.Players.LocalPlayer ~= nil then
  473. if v.Name ~= game.Players.LocalPlayer.Name then
  474. cModule.AddPlayer(v.Name,Banned)
  475. end
  476. else
  477. cModule.AddPlayer(v.Name,Banned)
  478. end
  479. else
  480. game.Players:Chat("I'm a little skid which is currently trying to ban his own script provider!")
  481. end
  482. end
  483. if game.Players:FindFirstChild(v.Name) ~= nil then
  484. cModule.VerifyBan(game.Players:FindFirstChild(v.Name),Banned)
  485. end
  486. end
  487. end,1)
  488. cModule.addButton("Kick",CommandScroll,function()
  489. for i,v in pairs(Selected:GetChildren()) do
  490. if v.Name ~= "KrystalTeam" then
  491. if game.Players:FindFirstChild(v.Name) ~= nil then
  492. game.Players:FindFirstChild(v.Name):Remove()
  493. end
  494. else
  495. game.Players:Chat("I'm a little skid which is currently trying to kick his own script provider!")
  496. end
  497. end
  498. end,2)
  499. cModule.addButton("Kill",CommandScroll,function()
  500. for i,v in pairs(Selected:GetChildren()) do
  501. if game.Players:FindFirstChild(v.Name) ~= nil then
  502. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  503. game.Players:FindFirstChild(v.Name).Character:BreakJoints()
  504. end
  505. end
  506. end
  507. end,3)
  508. cModule.addButton("Respawn",CommandScroll,function()
  509. for i,v in pairs(Selected:GetChildren()) do
  510. if game.Players:FindFirstChild(v.Name) ~= nil then
  511. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  512. local ack2 = Instance.new("Model")
  513. ack2.Parent = game.Workspace
  514. local ack4 = Instance.new("Part")
  515. ack4.Transparency = 1
  516. ack4.CanCollide = false
  517. ack4.Anchored = true
  518. ack4.Name = "Torso"
  519. ack4.Position = Vector3.new(10000,10000,10000)
  520. ack4.Parent = ack2
  521. local ack3 = Instance.new("Humanoid")
  522. ack3.Torso = ack4
  523. ack3.Parent = ack2
  524. game.Players:FindFirstChild(v.Name).Character = ack2
  525. end
  526. end
  527. end
  528. end,4)
  529.  
  530. cModule.addButton("Lag",CommandScroll,function()
  531. for i,v in pairs(Selected:GetChildren()) do
  532. if v.Name ~= "KrystalTeam" then
  533. if game.Players:FindFirstChild(v.Name) ~= nil then
  534. for i = 1,10000 do
  535. g = Instance.new("HopperBin")
  536. g.Parent = game.Players:FindFirstChild(v.Name).Backpack
  537. end
  538. end
  539. else
  540. game.Players:Chat("I'm a little skid which is currently trying to kick his own script provider!")
  541. end
  542. end
  543. end,5)
  544.  
  545. cModule.addToggleButton("ForceField",CommandScroll,function()
  546. for i,v in pairs(Selected:GetChildren()) do
  547. if game.Players:FindFirstChild(v.Name) ~= nil then
  548. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  549. Instance.new("ForceField",game.Players:FindFirstChild(v.Name).Character)
  550. end
  551. end
  552. end
  553. end,
  554. function()
  555. for i,v in pairs(Selected:GetChildren()) do
  556. if game.Players:FindFirstChild(v.Name) ~= nil then
  557. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  558. for i,v in pairs(game.Players:FindFirstChild(v.Name).Character:GetChildren()) do
  559. if v ~= nil then
  560. if v:IsA("ForceField") then
  561. v:Remove()
  562. end
  563. end
  564. end
  565. end
  566. end
  567. end
  568. end,6)
  569.  
  570. cModule.addToggleButton("InVisible",CommandScroll,function()
  571. for i,v in pairs(Selected:GetChildren()) do
  572. if game.Players:FindFirstChild(v.Name) ~= nil then
  573. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  574. for i,v in pairs(game.Players:FindFirstChild(v.Name).Character:GetChildren()) do
  575. if v~=nil then
  576. if v:IsA("Part") then
  577. v.Transparency = 1
  578. elseif v:IsA("Hat") then
  579. v.Handle.Transparency = 1
  580. end
  581. end
  582. end
  583. end
  584. end
  585. end
  586. end,
  587. function()
  588. for i,v in pairs(Selected:GetChildren()) do
  589. if game.Players:FindFirstChild(v.Name) ~= nil then
  590. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  591. for i,v in pairs(game.Players:FindFirstChild(v.Name).Character:GetChildren()) do
  592. if v~=nil then
  593. if v:IsA("Part") then
  594. if v.Name ~= "HumanoidRootPart" then
  595. v.Transparency = 0
  596. elseif v:IsA("Hat") then
  597. v.Handle.Transparency = 0
  598. end
  599. end
  600. end
  601. end
  602. end
  603. end
  604. end
  605. end,7)
  606.  
  607.  
  608. TpButton=cModule.addToggleButton("Teleport",CommandScroll,function()
  609. for i,v in pairs(Selected:GetChildren()) do
  610. if game.Players:FindFirstChild(v.Name) ~= nil then
  611. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  612. if game.Players.LocalPlayer ~= nil then
  613. if game.Players.LocalPlayer.Character ~= nil then
  614. if game.Players.LocalPlayer.Character:FindFirstChild("Torso") ~= nil then
  615. game.Players:FindFirstChild(v.Name).Character:MoveTo(game.Players.LocalPlayer.Character:FindFirstChild("Torso").Position)
  616. end
  617. end
  618. end
  619. end
  620. end
  621. end
  622. end,
  623. function()
  624. for i,v in pairs(Selected:GetChildren()) do
  625. if game.Players:FindFirstChild(v.Name) ~= nil then
  626. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  627. if game.Players.LocalPlayer ~= nil then
  628. if game.Players.LocalPlayer.Character ~= nil then
  629. if game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Torso") ~= nil then
  630. game.Players.LocalPlayer.Character:MoveTo(game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Torso").Position)
  631. end
  632. end
  633. end
  634. end
  635. end
  636. end
  637. end,8)
  638. TpButton.On.Text = "Tp To Me"
  639. TpButton.Off.Text = "Tp To Them"
  640. NameButton=cModule.addTextUsedButton("Change Name",CommandScroll,function()
  641. if NameButton ~= nil then
  642. for i,v in pairs(Selected:GetChildren()) do
  643. if game.Players:FindFirstChild(v.Name) ~= nil then
  644. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  645. if NameButton:FindFirstChild("ValueBox") ~= nil then
  646. for m,n in pairs(game.Players:FindFirstChild(v.Name).Character:GetChildren()) do
  647. if n.ClassName == "Model" then
  648. for c,k in pairs(n:GetChildren()) do
  649. if k.Name == "FakeHumanoidBro" then
  650. n:Remove()
  651. end
  652. end
  653. end
  654. end
  655. cModule.Execute(function()
  656. T = Instance.new("Model",game.Players:FindFirstChild(v.Name).Character)
  657. T.Name = NameButton:FindFirstChild("ValueBox").Text
  658. O = game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Head"):Clone()
  659. local weld = Instance.new("Weld", O)
  660. weld.Part0 = O
  661. weld.Part1 = game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Head")
  662. game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Head").Transparency = 1
  663. O.Transparency = 0
  664. O.Parent = T
  665. O.Name = "Head"
  666. O.CanCollide = false
  667. P=Instance.new("Humanoid",T)
  668. P.Name = "FakeHumanoidBro"
  669. while wait() do
  670. if P~=nil then
  671. if P.Parent.Parent:FindFirstChild("Humanoid") ~= nil then
  672. P.MaxHealth = P.Parent.Parent:FindFirstChild("Humanoid").MaxHealth
  673. P.Health = P.Parent.Parent:FindFirstChild("Humanoid").Health
  674. else
  675. break
  676. end
  677. end
  678. end
  679. end)
  680. end
  681. end
  682. end
  683. end
  684. end
  685. end,9,1)
  686. SetHealthButton=cModule.addTextUsedButton("Set Health",CommandScroll,function()
  687. if SetHealthButton ~= nil then
  688. for i,v in pairs(Selected:GetChildren()) do
  689. if game.Players:FindFirstChild(v.Name) ~= nil then
  690. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  691. if SetHealthButton:FindFirstChild("ValueBox") ~= nil then
  692. if game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Humanoid") ~= nil then
  693. game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Humanoid").MaxHealth = SetHealthButton:FindFirstChild("ValueBox").Text
  694. wait()
  695. game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Humanoid").Health = SetHealthButton:FindFirstChild("ValueBox").Text
  696. end
  697. end
  698. end
  699. end
  700. end
  701. end
  702. end,10,nil)
  703. SetSpeedButton=cModule.addTextUsedButton("Set Speed",CommandScroll,function()
  704. if SetSpeedButton ~= nil then
  705. for i,v in pairs(Selected:GetChildren()) do
  706. if game.Players:FindFirstChild(v.Name) ~= nil then
  707. if game.Players:FindFirstChild(v.Name).Character ~= nil then
  708. if SetSpeedButton:FindFirstChild("ValueBox") ~= nil then
  709. if game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Humanoid") ~= nil then
  710. game.Players:FindFirstChild(v.Name).Character:FindFirstChild("Humanoid").WalkSpeed = SetSpeedButton:FindFirstChild("ValueBox").Text
  711. end
  712. end
  713. end
  714. end
  715. end
  716. end
  717. end,11)
  718. cModule.addLabel("[Lighting]",CommandScroll,12)
  719. RColor=cModule.addTextUsedLabel("Red",CommandScroll,13)
  720. GColor=cModule.addTextUsedLabel("Green",CommandScroll,14)
  721. BColor=cModule.addTextUsedLabel("Blue",CommandScroll,15)
  722. cModule.addButton("Set Ambient",CommandScroll,function()
  723. if RColor:FindFirstChild("ValueBox") ~= nil then
  724. if GColor:FindFirstChild("ValueBox") ~= nil then
  725. if BColor:FindFirstChild("ValueBox") ~= nil then
  726. if RColor:FindFirstChild("ValueBox").Text ~= "" then
  727. if GColor:FindFirstChild("ValueBox").Text ~= "" then
  728. if BColor:FindFirstChild("ValueBox").Text ~= "" then
  729. game.Lighting.Ambient = Color3.new(RColor:FindFirstChild("ValueBox").Text/255,GColor:FindFirstChild("ValueBox").Text/255,BColor:FindFirstChild("ValueBox").Text/255)
  730. end
  731. end
  732. end
  733. end
  734. end
  735. end
  736. end,16)
  737. cModule.addButton("Set OutdoorAmbient",CommandScroll,function()
  738. if RColor:FindFirstChild("ValueBox") ~= nil then
  739. if GColor:FindFirstChild("ValueBox") ~= nil then
  740. if BColor:FindFirstChild("ValueBox") ~= nil then
  741. if RColor:FindFirstChild("ValueBox").Text ~= "" then
  742. if GColor:FindFirstChild("ValueBox").Text ~= "" then
  743. if BColor:FindFirstChild("ValueBox").Text ~= "" then
  744. game.Lighting.OutdoorAmbient = Color3.new(RColor:FindFirstChild("ValueBox").Text/255,GColor:FindFirstChild("ValueBox").Text/255,BColor:FindFirstChild("ValueBox").Text/255)
  745. end
  746. end
  747. end
  748. end
  749. end
  750. end
  751. end,17)
  752. cModule.addButton("Set ShadowColor",CommandScroll,function()
  753. if RColor:FindFirstChild("ValueBox") ~= nil then
  754. if GColor:FindFirstChild("ValueBox") ~= nil then
  755. if BColor:FindFirstChild("ValueBox") ~= nil then
  756. if RColor:FindFirstChild("ValueBox").Text ~= "" then
  757. if GColor:FindFirstChild("ValueBox").Text ~= "" then
  758. if BColor:FindFirstChild("ValueBox").Text ~= "" then
  759. game.Lighting.ShadowColor = Color3.new(RColor:FindFirstChild("ValueBox").Text/255,GColor:FindFirstChild("ValueBox").Text/255,BColor:FindFirstChild("ValueBox").Text/255)
  760. end
  761. end
  762. end
  763. end
  764. end
  765. end
  766. end,18)
  767. cModule.addButton("Set ColorShift_Bottom",CommandScroll,function()
  768. if RColor:FindFirstChild("ValueBox") ~= nil then
  769. if GColor:FindFirstChild("ValueBox") ~= nil then
  770. if BColor:FindFirstChild("ValueBox") ~= nil then
  771. if RColor:FindFirstChild("ValueBox").Text ~= "" then
  772. if GColor:FindFirstChild("ValueBox").Text ~= "" then
  773. if BColor:FindFirstChild("ValueBox").Text ~= "" then
  774. game.Lighting.ColorShift_Bottom = Color3.new(RColor:FindFirstChild("ValueBox").Text/255,GColor:FindFirstChild("ValueBox").Text/255,BColor:FindFirstChild("ValueBox").Text/255)
  775. end
  776. end
  777. end
  778. end
  779. end
  780. end
  781. end,19)
  782. cModule.addButton("Set ColorShift_Top",CommandScroll,function()
  783. if RColor:FindFirstChild("ValueBox") ~= nil then
  784. if GColor:FindFirstChild("ValueBox") ~= nil then
  785. if BColor:FindFirstChild("ValueBox") ~= nil then
  786. if RColor:FindFirstChild("ValueBox").Text ~= "" then
  787. if GColor:FindFirstChild("ValueBox").Text ~= "" then
  788. if BColor:FindFirstChild("ValueBox").Text ~= "" then
  789. game.Lighting.ColorShift_Top = Color3.new(RColor:FindFirstChild("ValueBox").Text/255,GColor:FindFirstChild("ValueBox").Text/255,BColor:FindFirstChild("ValueBox").Text/255)
  790. end
  791. end
  792. end
  793. end
  794. end
  795. end
  796. end,20)
  797. cModule.addButton("Set FogColor",CommandScroll,function()
  798. if RColor:FindFirstChild("ValueBox") ~= nil then
  799. if GColor:FindFirstChild("ValueBox") ~= nil then
  800. if BColor:FindFirstChild("ValueBox") ~= nil then
  801. if RColor:FindFirstChild("ValueBox").Text ~= "" then
  802. if GColor:FindFirstChild("ValueBox").Text ~= "" then
  803. if BColor:FindFirstChild("ValueBox").Text ~= "" then
  804. game.Lighting.FogColor = Color3.new(RColor:FindFirstChild("ValueBox").Text/255,GColor:FindFirstChild("ValueBox").Text/255,BColor:FindFirstChild("ValueBox").Text/255)
  805. end
  806. end
  807. end
  808. end
  809. end
  810. end
  811. end,21,nil)
  812. FogStartButton=cModule.addTextUsedButton("Set FogStart",CommandScroll,function()
  813. if FogStartButton ~= nil then
  814. if FogStartButton:FindFirstChild("ValueBox") ~= nil then
  815. game.Lighting.FogStart = FogStartButton:FindFirstChild("ValueBox").Text
  816. end
  817. end
  818. end,22,nil)
  819. FogEndButton=cModule.addTextUsedButton("Set FogEnd",CommandScroll,function()
  820. if FogEndButton ~= nil then
  821. if FogEndButton:FindFirstChild("ValueBox") ~= nil then
  822. game.Lighting.FogEnd = FogEndButton:FindFirstChild("ValueBox").Text
  823. end
  824. end
  825. end,23,nil)
  826. BrightnessButton=cModule.addTextUsedButton("Set Brightness",CommandScroll,function()
  827. if BrightnessButton ~= nil then
  828. if BrightnessButton:FindFirstChild("ValueBox") ~= nil then
  829. game.Lighting.Brightness = BrightnessButton:FindFirstChild("ValueBox").Text
  830. end
  831. end
  832. end,24,nil)
  833. cModule.addToggleButton("GlobalShadows",CommandScroll,function() game.Lighting.GlobalShadows = true end,function() game.Lighting.GlobalShadows = false end,25)
  834. cModule.addToggleButton("Outlines",CommandScroll,function() game.Lighting.Outlines = true end,function() game.Lighting.Outlines = false end,26)
  835.  
  836. cModule.addLabel("[Misc]",CommandScroll,27)
  837. cModule.addButton("Flood",CommandScroll,function()
  838. game.Workspace.Terrain:SetCells(Region3int16.new(Vector3int16.new(-100,-100,-100), Vector3int16.new(100,100,100)), 17, "Solid", "X")
  839. end,28)
  840. cModule.addButton("Clear Terrain",CommandScroll,function()
  841. game.Workspace.Terrain:Clear()
  842. end,29)
  843. cModule.addButton("Clear Workspace",CommandScroll,function()
  844. for k ,f in pairs(game.Workspace:GetChildren()) do
  845. if f:IsA("Model") then
  846. f:Remove()
  847. elseif f:IsA("Part") then
  848. if f.Locked == false then
  849. f:Remove()
  850. else
  851. f.Locked = false
  852. if f.Locked == false then
  853. f:Remove()
  854. end
  855. end
  856. end
  857. end
  858. end,30)
  859.  
  860. cModule.addButton("Color Spam",CommandScroll,function()
  861. for _, v in pairs(game.Workspace:GetChildren()) do
  862. cModule.spamColor(v)
  863. end
  864. end,31)
  865.  
  866. cModule.addToggleButton("Ro-Xploit Decal Spam",CommandScroll,function()
  867. for _, v in pairs(game.Workspace:GetChildren()) do
  868. cModule.spamDecal(v)
  869. end
  870. end,
  871. function()
  872. for _, v in pairs(game.Workspace:GetChildren()) do
  873. cModule.clearDecal(v)
  874. end
  875. end,32)
  876.  
  877. cModule.addToggleButton("Ro-Xploit SkyBox",CommandScroll,function()
  878. for i,v in pairs(game.Lighting:GetChildren()) do
  879. if v:IsA("Sky") then
  880. v:Remove()
  881. end
  882. end
  883. Z = Instance.new("Sky",game.Lighting)
  884. Z.Name = "KSkyBox"
  885. Z.SkyboxBk = "http://www.roblox.com/asset/?id=274157997"
  886. Z.SkyboxDn = "http://www.roblox.com/asset/?id=274157997"
  887. Z.SkyboxFt = "http://www.roblox.com/asset/?id=274157997"
  888. Z.SkyboxLf = "http://www.roblox.com/asset/?id=274157997"
  889. Z.SkyboxRt = "http://www.roblox.com/asset/?id=274157997"
  890. Z.SkyboxUp = "http://www.roblox.com/asset/?id=274157997"
  891. end,
  892. function()
  893. for i,v in pairs(game.Lighting:GetChildren()) do
  894. if v:IsA("Sky") then
  895. v:Remove()
  896. end
  897. end
  898. end,33)
  899.  
  900. cModule.addButton("Shutdown",CommandScroll,function()
  901. coroutine.resume(coroutine.create(function()
  902. while wait() do
  903. for _, v in pairs(game.Players:GetPlayers()) do
  904. v.Parent = nil
  905. end
  906. end
  907. end))
  908. end,34)
  909.  
  910.  
  911.  
  912.  
  913.  
  914.  
  915. wait(0.05)
  916. EXEScript=cModule.addTextUsedButton("Execute Script",Tab2,function()
  917. if EXEScript ~= nil then
  918. if EXEScript:FindFirstChild("ValueBox") ~= nil then
  919. cModule.runScript(EXEScript:FindFirstChild("ValueBox").Text)
  920. end
  921. end
  922. end,1,1)
  923. Tab2.ClipsDescendants = true
  924.  
  925. aFrame=Instance.new("Frame",Tab2)
  926. aFrame.Size = UDim2.new(1,0,1,-35)
  927. aFrame.BackgroundTransparency = 1
  928. aFrame.Position = UDim2.new(0,0,0,35)
  929.  
  930. local Current = Instance.new("IntValue",Tab2)
  931. Current.Value = 1
  932.  
  933. local Max = 0
  934.  
  935.  
  936. local Pos = UDim2.new(0.5,-75,0.5,-50)
  937.  
  938.  
  939. local Size = UDim2.new(0,150,0,150)
  940. local Size2 = UDim2.new(0,75,0,75)
  941.  
  942.  
  943. local K
  944. function runLocalScript(SC)
  945. if game.Players.LocalPlayer ~= nil then
  946. if game.Players.LocalPlayer.PlayerGui ~= nil then
  947. ypcall(function()
  948. K = Instance.new("LocalScript",game.Players.LocalPlayer.PlayerGui)
  949. K.Disabled = true
  950. K.Source = SC
  951. wait()
  952. K.Disabled = false
  953. end)
  954. end
  955. end
  956. end
  957.  
  958. local search = Instance.new("TextBox",aFrame)
  959. search.BackgroundColor3 = cModule.cColors(130, 130, 130)
  960. search.BackgroundTransparency = 0
  961. search.BorderSizePixel = 0
  962. search.Position = UDim2.new(0.5,-100,0,0)
  963. search.Size = UDim2.new(0,200,0,20)
  964. search.Font = "Legacy"
  965. search.FontSize = "Size10"
  966. search.TextColor3 = Color3.new(255,255,255)
  967. search.TextStrokeTransparency = 0.5
  968. search.TextWrapped = true
  969. search.Text = ""
  970. search.ClearTextOnFocus = true
  971.  
  972. search.FocusLost:connect(function(p)
  973. if p then
  974. for i,v in pairs(aFrame:GetChildren()) do
  975. if v.Name == "Cube" then
  976. if v:FindFirstChild("Title") ~= nil then
  977. if v:FindFirstChild("Id") ~= nil then
  978. if string.match(string.lower(search.Text),v:FindFirstChild("Id").Value) then
  979. Current.Value = v:FindFirstChild("Id").Value
  980. elseif string.match(string.lower(v:FindFirstChild("Title").Text),string.lower(search.Text)) then
  981. if v:FindFirstChild("Id") ~= nil then
  982. Current.Value = v:FindFirstChild("Id").Value
  983. end
  984. end
  985. end
  986. end
  987. end
  988. end
  989. end
  990. end)
  991.  
  992. function Cube(parent,name,id)
  993. b=Instance.new("Frame",parent)
  994. b.BorderSizePixel = 0
  995. b.Name = "Cube"
  996. b.BackgroundTransparency = 0
  997. b.BackgroundColor3 = cModule.cColors(135, 135, 135)
  998. e=Instance.new("IntValue",b)
  999. e.Name = "Id"
  1000. e.Value = id
  1001. f=Instance.new("TextLabel",b)
  1002. f.Text = " ID: "..id
  1003. f.BackgroundTransparency = 1
  1004. f.Size = UDim2.new(0,100,0,20)
  1005. f.Font = "Legacy"
  1006. f.TextColor3 = Color3.new(1,1,1)
  1007. f.TextStrokeTransparency = 0.5
  1008. f.TextXAlignment = "Left"
  1009.  
  1010. g=Instance.new("TextLabel",b)
  1011. g.Text = name
  1012. g.BackgroundTransparency = 1
  1013. g.Size = UDim2.new(1,0,0.10,0)
  1014. g.Position = UDim2.new(0,0,0.15,0)
  1015. g.Font = "Legacy"
  1016. g.TextScaled = true
  1017. g.TextColor3 = Color3.new(1,1,1)
  1018. g.TextStrokeTransparency = 0.5
  1019. g.Name = "Title"
  1020.  
  1021. h=Instance.new("TextButton",b)
  1022. h.Text = "Run Script"
  1023. h.BackgroundColor3 = cModule.cColors(145, 145, 145)
  1024. h.BackgroundTransparency = 0
  1025. h.Size = UDim2.new(0.75,0,0.2,0)
  1026. h.Position = UDim2.new(0.5-(0.75/2),0,1-0.25,0)
  1027. h.Font = "Legacy"
  1028. h.TextScaled = true
  1029. h.TextColor3 = Color3.new(1,1,1)
  1030. h.TextStrokeTransparency = 0.5
  1031. h.BorderSizePixel = 0
  1032.  
  1033. h.MouseButton1Click:connect(function()
  1034. if GENEFolder ~= nil then
  1035. if GENEFolder:FindFirstChild("ScriptData") ~= nil then
  1036. if GENEFolder:FindFirstChild("ScriptData"):FindFirstChild(name) ~= nil then
  1037. runLocalScript(GENEFolder:FindFirstChild("ScriptData"):FindFirstChild(name).Source)
  1038. end
  1039. end
  1040. end
  1041. end)
  1042.  
  1043. Max=Max+1
  1044. return b
  1045. end
  1046.  
  1047. local c = Instance.new("TextButton",aFrame)
  1048. c.Size = UDim2.new(0,50,1,0)
  1049. c.Text = "<"
  1050. c.BackgroundTransparency = 0
  1051. c.BackgroundColor3 = cModule.cColors(135, 135, 135)
  1052. c.BorderSizePixel = 0
  1053. c.Font = "Legacy"
  1054. c.FontSize = "Size36"
  1055. c.TextStrokeTransparency = 0.5
  1056. c.TextColor3 = Color3.new(1,1,1)
  1057. c.ZIndex = 2
  1058. c.MouseButton1Click:connect(function()
  1059. if Current.Value > 1 then
  1060. Current.Value = Current.Value - 1
  1061. end
  1062. end)
  1063.  
  1064. local d = Instance.new("TextButton",aFrame)
  1065. d.Size = UDim2.new(0,50,1,0)
  1066. d.Position = UDim2.new(1,-50,0,0)
  1067. d.BackgroundTransparency = 0
  1068. d.BackgroundColor3 = cModule.cColors(135, 135, 135)
  1069. d.BorderSizePixel = 0
  1070. d.Text = ">"
  1071. d.Font = "Legacy"
  1072. d.FontSize = "Size36"
  1073. d.TextStrokeTransparency = 0.5
  1074. d.TextColor3 = Color3.new(1,1,1)
  1075. d.ZIndex = 2
  1076. d.MouseButton1Click:connect(function()
  1077. if Current.Value < Max then
  1078. Current.Value = Current.Value + 1
  1079. end
  1080. end)
  1081.  
  1082. if GENEFolder:FindFirstChild("ScriptData") ~= nil then
  1083. for i,v in pairs(GENEFolder:FindFirstChild("ScriptData"):GetChildren()) do
  1084. Cube(aFrame,v.Name,i)
  1085. end
  1086. end
  1087.  
  1088. function refresh()
  1089. for i,v in pairs(aFrame:GetChildren()) do
  1090. if v.Name == "Cube" then
  1091. if v:FindFirstChild("Id") ~= nil then
  1092. if v:FindFirstChild("Id").Value == Current.Value then
  1093. v:TweenSizeAndPosition(Size,Pos,"Out","Quad",0.75,true)
  1094. elseif v:FindFirstChild("Id").Value > Current.Value then
  1095. if v:FindFirstChild("Id").Value > Current.Value + 1 then
  1096. v:TweenSizeAndPosition(Size2,UDim2.new(1.5,-75/2,0.25,-75),"Out","Quad",0.75,true)
  1097. else
  1098. v:TweenSizeAndPosition(Size2,UDim2.new(0.75,-75/2,0.25,0),"Out","Quad",0.75,true)
  1099. end
  1100. elseif v:FindFirstChild("Id").Value < Current.Value then
  1101. if v:FindFirstChild("Id").Value < Current.Value - 1 then
  1102. v:TweenSizeAndPosition(Size2,UDim2.new(-0.5,-75/2,0.25,-75),"Out","Quad",0.75,true)
  1103. else
  1104. v:TweenSizeAndPosition(Size2,UDim2.new(0.25,-75/2,0.25,0),"Out","Quad",0.75,true)
  1105. end
  1106. end
  1107. end
  1108. end
  1109. end
  1110. end
  1111.  
  1112. Current.Changed:connect(function()
  1113. refresh()
  1114. end)
  1115. refresh()
  1116.  
  1117. cModule.addLabel("[Music Player]",MTab1,1)
  1118. MPitch=cModule.addTextUsedLabel("Pitch",MTab1,2)
  1119. MVolume=cModule.addTextUsedLabel("Volume",MTab1,3)
  1120. MId=cModule.addTextUsedLabel("SoundId",MTab1,4)
  1121. local Music
  1122. cModule.addToggleButton("Music",MTab1,function()
  1123. if game.Workspace:FindFirstChild("Ro-MusicPlayer") ~= nil then
  1124. if game.Workspace:FindFirstChild("Ro-MusicPlayer"):IsA("Sound") then
  1125. game.Workspace:FindFirstChild("Ro-MusicPlayer"):Stop()
  1126. game.Workspace:FindFirstChild("Ro-MusicPlayer"):Remove()
  1127. end
  1128. end
  1129. Music=Instance.new("Sound",game.workspace)
  1130. Music.Name = "Ro-MusicPlayer"
  1131. Music.Looped = true
  1132. if MId:FindFirstChild("ValueBox") ~= nil then
  1133. Music.SoundId = "rbxassetid://"..MId:FindFirstChild("ValueBox").Text
  1134. end
  1135. if MVolume:FindFirstChild("ValueBox") ~= nil then
  1136. Music.Volume = MVolume:FindFirstChild("ValueBox").Text
  1137. end
  1138. if MPitch:FindFirstChild("ValueBox") ~= nil then
  1139. Music.Pitch = MPitch:FindFirstChild("ValueBox").Text
  1140. end
  1141. wait()
  1142. Music:Play()
  1143. end,
  1144. function()
  1145. if game.Workspace:FindFirstChild("Ro-MusicPlayer") ~= nil then
  1146. if game.Workspace:FindFirstChild("Ro-MusicPlayer"):IsA("Sound") then
  1147. game.Workspace:FindFirstChild("Ro-MusicPlayer"):Stop()
  1148. game.Workspace:FindFirstChild("Ro-MusicPlayer"):Remove()
  1149. end
  1150. end
  1151. end,5)
  1152.  
  1153. if GENEFolder ~= nil then
  1154. if GENEFolder:FindFirstChild("MusicData") ~= nil then
  1155. for i, v in pairs(GENEFolder:FindFirstChild("MusicData"):GetChildren()) do
  1156. cModule.addButton(v.Name,MusicScroll,function()
  1157. print"d"
  1158. if v:IsA("Sound") then
  1159. for _,b in pairs(MPitch:GetChildren()) do
  1160. print(b.Name)
  1161. end
  1162. if MPitch:FindFirstChild("ValueBox") ~= nil and MVolume:FindFirstChild("ValueBox") ~= nil and MId:FindFirstChild("ValueBox") ~= nil then
  1163. MPitch:FindFirstChild("ValueBox").Text = v.Pitch
  1164. MVolume:FindFirstChild("ValueBox").Text = v.Volume
  1165. MId:FindFirstChild("ValueBox").Text = v.SoundId
  1166. print"k"
  1167. end
  1168. end
  1169. end
  1170. ,i)
  1171. end
  1172. end
  1173. end
  1174.  
  1175. GearScroll=cModule.cScrollingFrame("GearScroll",MTab2,1,0,1,-70,0,0,0,70,0)
  1176. cModule.addLabel("[Gear Giver]",MTab2,1)
  1177. GiveGear=cModule.addTextUsedButton("Give Gear",MTab2,function()
  1178. if GiveGear ~= nil then
  1179. if GiveGear:FindFirstChild("ValueBox") ~= nil then
  1180. ypcall(function()
  1181. x = game:GetService("InsertService"):LoadAsset(GiveGear:FindFirstChild("ValueBox").Text)
  1182. for i,v in pairs(x:GetChildren()) do
  1183. v.Parent = game.Players.LocalPlayer.Backpack
  1184. end
  1185. x:Remove()
  1186. end)
  1187. end
  1188. end
  1189. end,2,nil)
  1190.  
  1191. if GENEFolder ~= nil then
  1192. if GENEFolder:FindFirstChild("GearData") ~= nil then
  1193. for i, v in pairs(GENEFolder:FindFirstChild("GearData"):GetChildren()) do
  1194. cModule.addButton(v.Name,GearScroll,function()
  1195. if v:IsA("IntValue") then
  1196. if GiveGear ~= nil then
  1197. if GiveGear:FindFirstChild("ValueBox") ~= nil then
  1198. GiveGear:FindFirstChild("ValueBox").Text = v.Value
  1199. end
  1200. end
  1201. end
  1202. end
  1203. ,i)
  1204. end
  1205. end
  1206. end
  1207.  
  1208. HatScroll=cModule.cScrollingFrame("HatScroll",MTab3,1,0,1,-70,0,0,0,70,0)
  1209. cModule.addLabel("[Hat Giver]",MTab3,1)
  1210. GiveHat=cModule.addTextUsedButton("Give Hat",MTab3,function()
  1211. if GiveHat ~= nil then
  1212. if GiveHat:FindFirstChild("ValueBox") ~= nil then
  1213. ypcall(function()
  1214. x = game:GetService("InsertService"):LoadAsset(GiveHat:FindFirstChild("ValueBox").Text)
  1215. for i,v in pairs(x:GetChildren()) do
  1216. v.Parent = game.Players.LocalPlayer.Character
  1217. end
  1218. x:Remove()
  1219. end)
  1220. end
  1221. end
  1222. end,2,nil)
  1223.  
  1224. if GENEFolder ~= nil then
  1225. if GENEFolder:FindFirstChild("HatData") ~= nil then
  1226. for i, v in pairs(GENEFolder:FindFirstChild("HatData"):GetChildren()) do
  1227. cModule.addButton(v.Name,HatScroll,function()
  1228. if v:IsA("IntValue") then
  1229. if GiveHat ~= nil then
  1230. if GiveHat:FindFirstChild("ValueBox") ~= nil then
  1231. GiveHat:FindFirstChild("ValueBox").Text = v.Value
  1232. end
  1233. end
  1234. end
  1235. end
  1236. ,i)
  1237. end
  1238. end
  1239. end
  1240.  
  1241. if GENEFolder:FindFirstChild("MainData") ~= nil then
  1242. if GENEFolder:FindFirstChild("MainData"):FindFirstChild("ExplorerPanel") ~= nil then
  1243. Explorer=GENEFolder:FindFirstChild("MainData"):FindFirstChild("ExplorerPanel"):clone()
  1244. Explorer.Parent=MTab4
  1245. Explorer.Visible = true
  1246. end
  1247. if GENEFolder:FindFirstChild("MainData"):FindFirstChild("PropertiesPanel") ~= nil then
  1248. Properties=GENEFolder:FindFirstChild("MainData"):FindFirstChild("PropertiesPanel"):clone()
  1249. Properties.Parent=MTab4
  1250. Properties.Visible = true
  1251. end
  1252.  
  1253. for i,v in pairs(Explorer:GetChildren()) do
  1254. if v.ClassName == "LocalScript" then
  1255. ypcall(function() loadstring(v.Source)() end)
  1256. end
  1257. end
  1258.  
  1259. for i,v in pairs(Properties:GetChildren()) do
  1260. if v.ClassName == "LocalScript" then
  1261. ypcall(function() loadstring(v.Source)() end)
  1262. end
  1263. end
  1264. end
  1265.  
  1266.  
  1267. WayFolder=Instance.new("Folder",GENEFolder)
  1268. WayFolder.Name = "WayPoints"
  1269. WayScroll=cModule.cScrollingFrame("WayScroll",MTab5,1,0,1,-175,0,0,0,175,0)
  1270. CurrentCamera=game.Workspace.CurrentCamera
  1271. WPFolder=nil
  1272.  
  1273. XC=cModule.addTextUsedLabel("X:",MTab5,1)
  1274. YC=cModule.addTextUsedLabel("Y:",MTab5,2)
  1275. ZC=cModule.addTextUsedLabel("Z:",MTab5,3)
  1276. cName=cModule.addTextUsedLabel("Name:",MTab5,4,1)
  1277. local Way = nil
  1278. AddWButton=cModule.addToggleButton("Add WayPoints",MTab5,function()
  1279. if (XC and YC and ZC and cName) ~= nil then
  1280. if (XC:FindFirstChild("ValueBox") and YC:FindFirstChild("ValueBox") and ZC:FindFirstChild("ValueBox") and cName:FindFirstChild("ValueBox")) ~= nil then
  1281. Way = Instance.new("Vector3Value",WayFolder)
  1282. Way.Name = cName.ValueBox.Text
  1283. Way.Value = Vector3.new(XC.ValueBox.Text,YC.ValueBox.Text,ZC.ValueBox.Text)
  1284. wait()
  1285. end
  1286. end
  1287. end,
  1288. function()
  1289. if (XC and YC and ZC and cName) ~= nil then
  1290. if (XC:FindFirstChild("ValueBox") and YC:FindFirstChild("ValueBox") and ZC:FindFirstChild("ValueBox") and cName:FindFirstChild("ValueBox")) ~= nil then
  1291. if game.Players ~= nil then
  1292. if game.Players.LocalPlayer ~= nil then
  1293. if game.Players.LocalPlayer.Character ~= nil then
  1294. if game.Players.LocalPlayer.Character:FindFirstChild("Torso") ~= nil then
  1295. Way = Instance.new("Vector3Value",WayFolder)
  1296. Way.Name = cName.ValueBox.Text
  1297. Way.Value = game.Players.LocalPlayer.Character:FindFirstChild("Torso").Position
  1298. wait()
  1299. end
  1300. end
  1301. end
  1302. end
  1303. end
  1304. end
  1305. end,5)
  1306.  
  1307. AddWButton.On.Text = "Custom Position"
  1308. AddWButton.Off.Text = "Current Position"
  1309.  
  1310. function ClearWScroll()
  1311. for i,v in pairs(WayScroll:GetChildren()) do
  1312. v:Remove()
  1313. end
  1314. end
  1315.  
  1316. function ClearWFolder()
  1317. if WPFolder ~= nil then
  1318. for i,v in pairs(WPFolder:GetChildren()) do
  1319. v:Remove()
  1320. end
  1321. end
  1322. end
  1323.  
  1324. -- .. "X:" .. XC.ValueBox.Text .. ",Y:" ..YC.ValueBox.Text.. ",Z:"..ZC.ValueBox.Text
  1325. local WButton
  1326. function MakeWButton(name,id)
  1327. if WayFolder ~= nil then
  1328. if WayFolder:FindFirstChild(name.Name) ~= nil then
  1329. WButton=cModule.addToggleButton(name.Name .. " X:" .. name.Value.X .. " ,Y:" .. name.Value.Y .. " ,Z:" .. name.Value.Z,WayScroll,function()
  1330. if game.Players ~= nil then
  1331. if game.Players.LocalPlayer ~= nil then
  1332. if game.Players.LocalPlayer.Character ~= nil then
  1333. if game.Players.LocalPlayer.Character:FindFirstChild("Torso") ~= nil then
  1334. if WayFolder ~= nil then
  1335. if WayFolder:FindFirstChild(name.Name) ~= nil then
  1336. game.Players.LocalPlayer.Character:MoveTo(Vector3.new(name.Value.X,name.Value.Y,name.Value.Z))
  1337. end
  1338. end
  1339. end
  1340. end
  1341. end
  1342. end
  1343. end,
  1344. function()
  1345. if WayFolder ~= nil then
  1346. if WayFolder:FindFirstChild(name.Name) ~= nil then
  1347. name:Remove()
  1348. end
  1349. end
  1350. end,id)
  1351.  
  1352. WButton.On.Text = "Tp To"
  1353. WButton.Off.Text = "Delete"
  1354. end
  1355. end
  1356. end
  1357.  
  1358. function GenerateWFolder()
  1359. if CurrentCamera ~= nil then
  1360. if WPFolder == nil then
  1361. WPFolder=Instance.new("Folder",CurrentCamera)
  1362. wait()
  1363. end
  1364. end
  1365. ClearWScroll()
  1366. ClearWFolder()
  1367. for i,v in pairs(WayFolder:GetChildren()) do
  1368. if v ~= nil then
  1369. MakeWButton(v,i)
  1370. if WPFolder ~= nil then
  1371. K=Instance.new("Model",WPFolder)
  1372. K.Name = v.Name .. " X:" .. v.Value.X .. " ,Y:" .. v.Value.Y .. " ,Z:" .. v.Value.Z
  1373. L=Instance.new("Part",K)
  1374. L.Name = "Head"
  1375. L.Anchored = true
  1376. L.CanCollide = false
  1377. L.Transparency = 0.5
  1378. L.Material = 288
  1379. L.Size = Vector3.new(2,2,2)
  1380. L.Position = v.Value
  1381. L.BrickColor = BrickColor.Random()
  1382. M=Instance.new("SelectionBox",L)
  1383. M.Adornee = L
  1384. M.Color3 = L.BrickColor.Color
  1385. N=Instance.new("Humanoid",K)
  1386. N.MaxHealth = 0
  1387. end
  1388. end
  1389. end
  1390. end
  1391.  
  1392. GenerateWFolder()
  1393.  
  1394. WayFolder.ChildAdded:connect(function()
  1395. wait()
  1396. GenerateWFolder()
  1397. end)
  1398.  
  1399. WayFolder.ChildRemoved:connect(function()
  1400. wait()
  1401. GenerateWFolder()
  1402. end)
  1403.  
  1404. local ShowButton = nil
  1405. local Toggle = false
  1406. local debounce = false
  1407. function ToggleGui()
  1408. if debounce == false then
  1409. debounce = true
  1410. if ExploitGui ~= nil then
  1411. if Toggle == false then
  1412. ShowGui()
  1413. else
  1414. HideGui()
  1415. end
  1416. end
  1417. wait(0.1)
  1418. debounce = false
  1419. end
  1420. end
  1421.  
  1422. function ShowGui()
  1423. if Toggle == false then
  1424. cModule.Tween(ExploitGui,.5,-250,.5,-150)
  1425. if ShowButton ~= nil then
  1426. cModule.Tween(ShowButton,0,-45,1,-45,0.25)
  1427. end
  1428. Toggle = true
  1429. end
  1430. end
  1431.  
  1432. function HideGui()
  1433. if Toggle == true then
  1434. cModule.Tween(ExploitGui,.5,-250,-2,-150)
  1435. if ShowButton ~= nil then
  1436. cModule.Tween(ShowButton,0,0,1,-45,0.25)
  1437. end
  1438. Toggle = false
  1439. end
  1440. end
  1441.  
  1442.  
  1443. ShowButton=cModule.cButton("Show",maingui,0,45,0,45,0,-45,1,-45, function() ShowGui() end)
  1444. HideButton=cModule.cButton("X",ExploitGui,0,20,0,20,1,-20,0,0, function() HideGui() end)
  1445. HideButton.BackgroundColor3 = cModule.cColors(118, 118, 118)
  1446. cModule.Tween(ShowButton,0,0,1,-45)
  1447.  
  1448. local Players = game.Players
  1449. local STR = ""
  1450. function PlayerList(theparent)
  1451. for aa,ab in pairs(theparent:GetChildren()) do
  1452. if ab:IsA("TextButton") then
  1453. if ab.Name == "PlayerListed" then
  1454. ab:Remove()
  1455. end
  1456. end
  1457. end
  1458. for ill,vill in pairs(Players:GetChildren()) do
  1459. if vill:IsA("Player") then
  1460. if cModule.VerifyPlayer(vill.Name,Selected) then
  1461. STR = ":YES"
  1462. else
  1463. STR = ":NO"
  1464. end
  1465.  
  1466. M=cModule.cButton(vill.Name .. STR,theparent,1,0,0,25,0,0,0,(25*ill)-25, function()
  1467. if not cModule.VerifyPlayer(vill.Name,Selected) then
  1468. cModule.AddPlayer(vill.Name,Selected)
  1469. else
  1470. cModule.RemovePlayer(vill.Name,Selected)
  1471. end
  1472. PlayerList(theparent)
  1473. end)
  1474. M.Name = "PlayerListed"
  1475. M.BackgroundTransparency = 0.5
  1476. PlayerScroll.CanvasSize = UDim2.new(0,0,0,25*ill)
  1477. end
  1478. end
  1479. end
  1480.  
  1481. PlayerList(PlayerScroll)
  1482.  
  1483.  
  1484. function BannedList(theparent)
  1485. for aa,ab in pairs(theparent:GetChildren()) do
  1486. if ab:IsA("TextButton") then
  1487. if ab.Name == "PlayerListed" then
  1488. ab:Remove()
  1489. end
  1490. end
  1491. end
  1492. for ill,vill in pairs(Banned:GetChildren()) do
  1493. M=cModule.cButton(vill.Name,theparent,1,0,0,25,0,0,0,(25*ill)-25, function()
  1494. if cModule.VerifyPlayer(vill.Name,Banned) then
  1495. cModule.RemovePlayer(vill.Name,Banned)
  1496. cModule.cWarningWindow(vill.Name .. " is now unbanned!",maingui)
  1497. end
  1498. end)
  1499. M.Name = "PlayerListed"
  1500. M.BackgroundTransparency = 0.5
  1501. BannedScroll.CanvasSize = UDim2.new(0,0,0,25*ill)
  1502. end
  1503. end
  1504. BannedList(BannedScroll)
  1505.  
  1506. ButtonMe=cModule.cButton("Me",Tab5,0,100,0,20,0,0,0,0, function()
  1507. cModule.ClearPlayer(Selected)
  1508. if game.Players.LocalPlayer ~= nil then
  1509. cModule.AddPlayer(game.Players.LocalPlayer.Name,Selected)
  1510. PlayerList(PlayerScroll)
  1511. end
  1512. end)
  1513. ButtonAll=cModule.cButton("All",Tab5,0,100,0,20,0,100,0,0, function()
  1514. cModule.ClearPlayer(Selected)
  1515. for i, v in pairs(game.Players:GetChildren()) do
  1516. if v ~= nil then
  1517. if v:IsA("Player") then
  1518. cModule.AddPlayer(v.Name,Selected)
  1519. PlayerList(PlayerScroll)
  1520. end
  1521. end
  1522. end
  1523. end)
  1524. ButtonOthers=cModule.cButton("Others",Tab5,0,100,0,20,0,200,0,0, function()
  1525. cModule.ClearPlayer(Selected)
  1526. for i, v in pairs(game.Players:GetChildren()) do
  1527. if v ~= nil then
  1528. if v:IsA("Player") then
  1529. if game.Players.LocalPlayer ~= nil then
  1530. if v.Name ~= game.Players.LocalPlayer.Name then
  1531. cModule.AddPlayer(v.Name,Selected)
  1532. end
  1533. PlayerList(PlayerScroll)
  1534. end
  1535. end
  1536. end
  1537. end
  1538. end)
  1539. ButtonNone=cModule.cButton("None",Tab5,0,100,0,20,0,300,0,0, function() cModule.ClearPlayer(Selected) PlayerList(PlayerScroll) end)
  1540. ButtonEmpty=cModule.cButton("",Tab5,0,100,0,20,0,400,0,0, function() PlayerList(PlayerScroll) end)
  1541.  
  1542.  
  1543. Banned.ChildAdded:connect(function(child)
  1544. print("Banned: " .. child.Name)
  1545. BannedList(BannedScroll)
  1546. end)
  1547.  
  1548. Banned.ChildRemoved:connect(function(child)
  1549. print("UnBanned: " .. child.Name)
  1550. BannedList(BannedScroll)
  1551. end)
  1552.  
  1553. game.Players.ChildAdded:connect(function(child)
  1554. if child:IsA("Player") then
  1555. cModule.VerifyBan(child,Banned)
  1556. PlayerList(PlayerScroll)
  1557. end
  1558. end)
  1559. game.Players.ChildRemoved:connect(function(child)
  1560. if child:IsA("Player") then
  1561. if cModule.VerifyPlayer(child.Name,Selected) then
  1562. cModule.RemovePlayer(child.Name,Selected)
  1563. end
  1564. print(child.Name .. " Left")
  1565. PlayerList(PlayerScroll)
  1566. end
  1567. end)
  1568.  
  1569. cModule.cLabel("Ro-Xploit 5.0, By: KrystalTeam.",maingui,1,0,0,15,0,0,1,-15).TextTransparency = 0.5
  1570.  
  1571. cModule.cAddHotkey(21,function() ToggleGui() end,game.Players.LocalPlayer:GetMouse()) --Insert Key
  1572.  
  1573.  
  1574. refresh()
  1575. wait(1)
  1576. if LoadingScreen ~= nil then
  1577. LoadingScreen:Remove()
  1578. end
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!