Advertisement
Guest User

Untitled

a guest
Jul 21st, 2017
67
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 19.44 KB | None | 0 0
  1. ThePlayersNameHere="Peritious"--YOUR NAME HERE
  2.  
  3. local function PLRMSG()
  4. if
  5. ValidationCode == "ELT007"
  6. then
  7. plrmsg = Instance.new("Message",Workspace)
  8. plrmsg.Text = " Explorer V2 BETA 1 Has Been Loaded !"
  9. Wait(3)
  10. plrmsg.Text = "Nom"--add whatever you want here
  11. Wait(3)
  12. plrmsg.Parent = nil
  13. end
  14. end
  15. PLRMSG()
  16.  
  17. local name = "Peritious"--YOUR NAME HERE
  18.  
  19. repeat wait() until #Game.Players:GetChildren(
  20. ) > 0
  21.  
  22. local char = Game.Players:FindFirstChild(name) or (Game.Players:GetChildren(
  23. )[1].Name:sub(1,6) == "Player" and Game.Players:GetChildren(
  24. )[1]
  25. )
  26. if not char then return end
  27. local current = Workspace
  28. local cp = 0
  29. local fontcolor = Color3.new(1,1,1)
  30. local bordercolor = Color3.new(1,0,0)
  31. local backgroundcolor = Color3.new(0,0,0)
  32. local backgroundtrans = .35
  33. local copy = nil
  34. local sP = {
  35. "Name";
  36. "ClassName";
  37. "BrickColor";
  38. "Position"
  39. }
  40.  
  41. local sg = Instance.new("ScreenGui")
  42. sg.Parent = char.PlayerGui
  43.  
  44. local ok = Instance.new("TextButton", sg)
  45. ok.Size = UDim2.new(.6,0,.05,0)
  46. ok.Position = UDim2.new(.2,0,.6,0)
  47. ok.FontSize = "Size18"
  48. ok.Text = "Accept"
  49. ok.TextColor3 = Color3.new(1,1,1)
  50. ok.Style = "RobloxButton"
  51.  
  52. local fontS1 = Instance.new("Frame", sg)
  53. fontS1.Size = UDim2.new(.2,0,.2,0)
  54. fontS1.Style = "RobloxRound"
  55. fontS1.Position = UDim2.new(.2,0,.4,0)
  56. local tb1 = Instance.new("TextLabel", fontS1)
  57. tb1.Text = "Font Color"
  58. tb1.FontSize = "Size12"
  59. tb1.BackgroundTransparency = 1
  60. tb1.TextColor3 = Color3.new(1,1,1)
  61. tb1.Size = UDim2.new(1,0,.25,0)
  62. local r1 = Instance.new("TextBox", fontS1)
  63. r1.Position = UDim2.new(0,0,.25,0)
  64. r1.TextColor3 = Color3.new(1,1,1)
  65. r1.BackgroundTransparency = 1
  66. r1.Size = UDim2.new(.3,0,.25,0)
  67. r1.Text = "0"
  68. local g1 = Instance.new("TextBox", fontS1)
  69. g1.Position = UDim2.new(.3,0,.25,0)
  70. g1.TextColor3 = Color3.new(1,1,1)
  71. g1.BackgroundTransparency = 1
  72. g1.Size = UDim2.new(.3,0,.25,0)
  73. g1.Text = "0"
  74. local b1 = Instance.new("TextBox", fontS1)
  75. b1.Position = UDim2.new(.6,0,.25,0)
  76. b1.TextColor3 = Color3.new(1,1,1)
  77. b1.BackgroundTransparency = 1
  78. b1.Size = UDim2.new(.3,0,.25,0)
  79. b1.Text = "0"
  80. local prev1 = Instance.new("Frame", fontS1)
  81. prev1.Size = UDim2.new(1,0,.5,0)
  82. prev1.Position = UDim2.new(0,0,.5,0)
  83. prev1.BackgroundColor3 = Color3.new(0,0,0)
  84. prev1.BorderColor3 = Color3.new(0,0,0)
  85. r1.Changed:connect(function()
  86. local color = tonumber(r1.Text) or 0
  87. prev1.BackgroundColor3 = Color3.new(color, tonumber(g1.Text) or 0, tonumber(b1.Text) or 0)
  88. end)
  89. g1.Changed:connect(function()
  90. local color = tonumber(g1.Text) or 0
  91. prev1.BackgroundColor3 = Color3.new(tonumber(r1.Text) or 0, color, tonumber(b1.Text) or 0)
  92. end)
  93. b1.Changed:connect(function()
  94. local color = tonumber(b1.Text) or 0
  95. prev1.BackgroundColor3 = Color3.new(tonumber(r1.Text) or 0, tonumber(g1.Text) or 0, color)
  96. end)
  97. ValidationCode="ELT007"--don't change this or the script wont work
  98. local FontS2 = Instance.new("Frame", sg)
  99. FontS2.Size = UDim2.new(.2,0,.2,0)
  100. FontS2.Style = "RobloxRound"
  101. FontS2.Position = UDim2.new(.4,0,.4,0)
  102. local tb2 = Instance.new("TextLabel", FontS2)
  103. tb2.Text = "Background Color"
  104. tb2.FontSize = "Size12"
  105. tb2.BackgroundTransparency = 1
  106. tb2.TextColor3 = Color3.new(1,1,1)
  107. tb2.Size = UDim2.new(1,0,.25,0)
  108. local r2 = Instance.new("TextBox", FontS2)
  109. r2.Position = UDim2.new(0,0,.25,0)
  110. r2.TextColor3 = Color3.new(1,1,1)
  111. r2.BackgroundTransparency = 1
  112. r2.Size = UDim2.new(.3,0,.25,0)
  113. r2.Text = "0"
  114. local g2 = Instance.new("TextBox", FontS2)
  115. g2.Position = UDim2.new(.3,0,.25,0)
  116. g2.TextColor3 = Color3.new(1,1,1)
  117. g2.BackgroundTransparency = 1
  118. g2.Size = UDim2.new(.3,0,.25,0)
  119. g2.Text = "0"
  120. local b2 = Instance.new("TextBox", FontS2)
  121. b2.Position = UDim2.new(.6,0,.25,0)
  122. b2.TextColor3 = Color3.new(1,1,1)
  123. b2.BackgroundTransparency = 1
  124. b2.Size = UDim2.new(.3,0,.25,0)
  125. b2.Text = "0"
  126. local prev2 = Instance.new("Frame", FontS2)
  127. prev2.Size = UDim2.new(1,0,.5,0)
  128. prev2.Position = UDim2.new(0,0,.5,0)
  129. prev2.BackgroundColor3 = Color3.new(0,0,0)
  130. prev2.BorderColor3 = Color3.new(0,0,0)
  131. r2.Changed:connect(function()
  132. local color = tonumber(r2.Text) or 0
  133. prev2.BackgroundColor3 = Color3.new(color, tonumber(g2.Text) or 0, tonumber(b2.Text) or 0)
  134. end)
  135. g2.Changed:connect(function()
  136. local color = tonumber(g2.Text) or 0
  137. prev2.BackgroundColor3 = Color3.new(tonumber(r2.Text) or 0, color, tonumber(b2.Text) or 0)
  138. end)
  139. b2.Changed:connect(function()
  140. local color = tonumber(b2.Text) or 0
  141. prev2.BackgroundColor3 = Color3.new(tonumber(r2.Text) or 0, tonumber(g2.Text) or 0, color)
  142. end)
  143.  
  144. local fontS3 = Instance.new("Frame", sg)
  145. fontS3.Size = UDim2.new(.2,0,.2,0)
  146. fontS3.Style = "RobloxRound"
  147. fontS3.Position = UDim2.new(.6,0,.4,0)
  148. local tb3 = Instance.new("TextLabel", fontS3)
  149. tb3.Text = "Border Color"
  150. tb3.FontSize = "Size12"
  151. tb3.BackgroundTransparency = 1
  152. tb3.TextColor3 = Color3.new(1,1,1)
  153. tb3.Size = UDim2.new(1,0,.25,0)
  154. local r3 = Instance.new("TextBox", fontS3)
  155. r3.Position = UDim2.new(0,0,.25,0)
  156. r3.TextColor3 = Color3.new(1,1,1)
  157. r3.BackgroundTransparency = 1
  158. r3.Size = UDim2.new(.3,0,.25,0)
  159. r3.Text = "0"
  160. local g3 = Instance.new("TextBox", fontS3)
  161. g3.Position = UDim2.new(.3,0,.25,0)
  162. g3.TextColor3 = Color3.new(1,1,1)
  163. g3.BackgroundTransparency = 1
  164. g3.Size = UDim2.new(.3,0,.25,0)
  165. g3.Text = "0"
  166. local b3 = Instance.new("TextBox", fontS3)
  167. b3.Position = UDim2.new(.6,0,.25,0)
  168. b3.TextColor3 = Color3.new(1,1,1)
  169. b3.BackgroundTransparency = 1
  170. b3.Size = UDim2.new(.3,0,.25,0)
  171. b3.Text = "0"
  172. local prev3 = Instance.new("Frame", fontS3)
  173. prev3.Size = UDim2.new(1,0,.5,0)
  174. prev3.Position = UDim2.new(0,0,.5,0)
  175. prev3.BackgroundColor3 = Color3.new(0,0,0)
  176. prev3.BorderColor3 = Color3.new(0,0,0)
  177. r3.Changed:connect(function()
  178. local color = tonumber(r3.Text) or 0
  179. prev3.BackgroundColor3 = Color3.new(color, tonumber(g3.Text) or 0, tonumber(b3.Text) or 0)
  180. end)
  181. g3.Changed:connect(function()
  182. local color = tonumber(g3.Text) or 0
  183. prev3.BackgroundColor3 = Color3.new(tonumber(r3.Text) or 0, color, tonumber(b3.Text) or 0)
  184. end)
  185. b3.Changed:connect(function()
  186. local color = tonumber(b3.Text) or 0
  187. prev3.BackgroundColor3 = Color3.new(tonumber(r3.Text) or 0, tonumber(g3.Text) or 0, color)
  188. end)
  189.  
  190. ok.MouseButton1Click:wait()
  191.  
  192. local fontcolor = prev1.BackgroundColor3
  193. local backgroundcolor = prev2.BackgroundColor3
  194. local bordercolor = prev3.BackgroundColor3
  195. fontS1:Destroy()
  196. FontS2:Destroy()
  197. fontS3:Destroy()
  198. ok:Destroy()
  199.  
  200. local fr = Instance.new("Frame", sg)
  201. fr.Style = "RobloxRound"
  202. fr.Size = UDim2.new(.35,0,.5,0)
  203. fr.Position = UDim2.new(0,0,.25,0)
  204.  
  205. local sb = Instance.new("TextButton", sg) -- Scrollbar
  206. local issbDown = false
  207. local sblasty = nil
  208. sb.Size = UDim2.new(.035,0,.5,0)
  209. sb.Position = UDim2.new(.35,0,.25,0)
  210. sb.BackgroundTransparency = backgroundtrans
  211. sb.TextColor3 = fontcolor
  212. sb.BorderColor3 = bordercolor
  213. sb.BackgroundColor3 = backgroundcolor
  214. sb.Text = "="
  215. sb.MouseButton1Down:connect(function()
  216. issbDown = true
  217. end)
  218. sb.MouseButton1Up:connect(function()
  219. issbDown = false
  220. end)
  221. sb.MouseLeave:connect(function()
  222. issbDown = false
  223. end)
  224. sb.MouseEnter:connect(function()
  225. issbDown = false
  226. end)
  227. sb.MouseMoved:connect(function(x,y)
  228. if issbDown then
  229. if not sblasty then sblasty = y end
  230. if sblasty - y < 0 then
  231. -- moving up
  232. for i,v in pairs(fr:GetChildren()) do
  233. v.Position = v.Position + UDim2.new(0,0,-.05,0)
  234. if v.Position.Y.Scale < .08 then
  235. v.BackgroundTransparency = 1
  236. v.TextButton.BackgroundTransparency = 1
  237. v.TextTransparency = 1
  238. v.TextButton.TextTransparency = 1
  239. elseif v.Position.Y.Scale >= .95 then
  240. else
  241. v.BackgroundTransparency = backgroundtrans
  242. v.TextButton.BackgroundTransparency = backgroundtrans
  243. v.TextTransparency = 0
  244. v.TextButton.TextTransparency = 0
  245. end
  246. end
  247. else
  248. -- moving down
  249. for i,v in pairs(fr:GetChildren()) do
  250. v.Position = v.Position + UDim2.new(0,0,.05,0)
  251. if v.Position.Y.Scale >= .95 then
  252. v.BackgroundTransparency = 1
  253. v.TextButton.BackgroundTransparency = 1
  254. v.TextTransparency = 1
  255. v.TextButton.TextTransparency = 1
  256. elseif v.Position.Y.Scale < .08 then
  257. else
  258. v.BackgroundTransparency = backgroundtrans
  259. v.TextButton.BackgroundTransparency = backgroundtrans
  260. v.TextTransparency = 0
  261. v.TextButton.TextTransparency = 0
  262. end
  263. end
  264. end
  265. end
  266. sblasty = y
  267. end)
  268.  
  269. local work = Instance.new("TextButton", sg)
  270. work.Position = UDim2.new(0,0,.2,0)
  271. work.Size = UDim2.new(.05,0,.05,0)
  272. work.BackgroundTransparency = backgroundtrans
  273. work.TextColor3 = fontcolor
  274. work.BorderColor3 = bordercolor
  275. work.BackgroundColor3 = backgroundcolor
  276. work.Text = "Workspace"
  277. work.MouseButton1Click:connect(function()
  278. current = Workspace
  279. Clear()
  280. GetList()
  281. end)
  282. work.MouseButton2Up:connect(function(x,y)
  283. local pos = UDim2.new(0,x,0,y)
  284. CreatePasteMenu(pos, Workspace)
  285. end)
  286.  
  287. local light = Instance.new("TextButton", sg)
  288. light.Position = UDim2.new(0.06,0,.2,0)
  289. light.Size = UDim2.new(.05,0,.05,0)
  290. light.BackgroundTransparency = backgroundtrans
  291. light.TextColor3 = fontcolor
  292. light.BorderColor3 = bordercolor
  293. light.BackgroundColor3 = backgroundcolor
  294. light.Text = "Lighting"
  295. light.MouseButton1Click:connect(function()
  296. current = game.Lighting
  297. Clear()
  298. GetList()
  299. end)
  300. light.MouseButton2Up:connect(function(x,y)
  301. local pos = UDim2.new(0,x,0,y)
  302. CreatePasteMenu(pos, game.Lighting)
  303. end)
  304.  
  305. local players = Instance.new("TextButton", sg)
  306. players.Position = UDim2.new(0.12,0,.2,0)
  307. players.Size = UDim2.new(.05,0,.05,0)
  308. players.BackgroundTransparency = backgroundtrans
  309. players.TextColor3 = fontcolor
  310. players.BorderColor3 = bordercolor
  311. players.BackgroundColor3 = backgroundcolor
  312. players.Text = "Players"
  313. players.MouseButton1Click:connect(function()
  314. current = game.Players
  315. Clear()
  316. GetList()
  317. end)
  318. players.MouseButton2Up:connect(function(x,y)
  319. local pos = UDim2.new(0,x,0,y)
  320. CreatePasteMenu(pos, game.Players)
  321. end)
  322.  
  323. local starterp = Instance.new("TextButton", sg)
  324. starterp.Position = UDim2.new(0.18,0,.2,0)
  325. starterp.Size = UDim2.new(.05,0,.05,0)
  326. starterp.BackgroundTransparency = backgroundtrans
  327. starterp.TextColor3 = fontcolor
  328. starterp.BorderColor3 = bordercolor
  329. starterp.BackgroundColor3 = backgroundcolor
  330. starterp.Text = "StarterPack"
  331. starterp.MouseButton1Click:connect(function()
  332. current = game.StarterPack
  333. Clear()
  334. GetList()
  335. end)
  336. starterp.MouseButton2Up:connect(function(x,y)
  337. local pos = UDim2.new(0,x,0,y)
  338. CreatePasteMenu(pos, game.StarterPack)
  339. end)
  340.  
  341.  
  342. local starterg = Instance.new("TextButton", sg)
  343. starterg.Position = UDim2.new(0.24,0,.2,0)
  344. starterg.Size = UDim2.new(.05,0,.05,0)
  345. starterg.BackgroundTransparency = backgroundtrans
  346. starterg.TextColor3 = fontcolor
  347. starterg.BorderColor3 = bordercolor
  348. starterg.BackgroundColor3 = backgroundcolor
  349. starterg.Text = "StarterGui"
  350. starterg.MouseButton1Click:connect(function()
  351. current = game.StarterGui
  352. Clear()
  353. GetList()
  354. end)
  355. starterg.MouseButton2Up:connect(function(x,y)
  356. local pos = UDim2.new(0,x,0,y)
  357. CreatePasteMenu(pos, game.StarterGui)
  358. end)
  359.  
  360. function CreateButtons(object, otr)
  361. local tb = Instance.new("TextButton", fr)
  362. tb.Size = UDim2.new(.9,0,.05,0)
  363. tb.Text = object.Name
  364. tb.Position = UDim2.new(0,0,cp + .05,0)
  365. tb.BackgroundTransparency = otr or backgroundtrans
  366. tb.TextColor3 = fontcolor
  367. tb.BorderColor3 = bordercolor
  368. tb.BackgroundColor3 = backgroundcolor
  369. tb.TextTransparency = otr or 0
  370. cp = cp + .05
  371. local ov = Instance.new("ObjectValue", tb)
  372. ov.Value = object
  373. local x = Instance.new("TextButton", tb)
  374. x.BackgroundTransparency = otr or backgroundtrans
  375. x.TextColor3 = fontcolor
  376. x.BorderColor3 = bordercolor
  377. x.BackgroundColor3 = backgroundcolor
  378. x.TextTransparency = otr or 0
  379. x.Size = UDim2.new(.1,0,1,0)
  380. x.Position = UDim2.new(1,0,0,0)
  381. x.FontSize = "Size12"
  382. x.Text = "+"
  383. tb.MouseButton1Click:connect(function()-- properties window open
  384. CreatePropertiesWindow(ov.Value)
  385. end)
  386. tb.MouseButton2Up:connect(function(x,y)
  387. CreateDropDownMenu(UDim2.new(0,x,0,y), ov.Value)
  388. end)
  389. x.MouseButton1Click:connect(function()
  390. current = ov.Value
  391. Clear()
  392. GetList()
  393. end)
  394. end
  395.  
  396. function CreatePropertiesWindow(obj)
  397. if not obj then return end
  398. pcall(function() sg.P:Destroy() end)
  399. local push = 0
  400. local f = Instance.new("Frame", sg)
  401. f.Name = "P"
  402. f.Style = "RobloxRound"
  403. f.Size = UDim2.new(.4,0,.7,0)
  404. f.Position = UDim2.new(.6,0,.15,0)
  405. if pcall(function() _ = obj["Name"] end) then
  406. local pN = Instance.new("TextLabel", f)
  407. pN.Size = UDim2.new(.5,0,.05,0)
  408. pN.Position = UDim2.new(0,0, push,0)
  409. pN.Text = "Name"
  410. pN.BackgroundColor3 = backgroundcolor
  411. pN.BorderColor3 = bordercolor
  412. pN.TextColor3 = bordercolor
  413. pN.FontSize = "Size10"
  414. local pV = Instance.new("TextBox", f)
  415. pV.ClearTextOnFocus = false
  416. pV.Size = UDim2.new(.5,0,.05,0)
  417. pV.Position = UDim2.new(.5,0,push,0)
  418. push = push + .05
  419. pV.Text = obj.Name
  420. pV.BackgroundColor3 = backgroundcolor
  421. pV.BorderColor3 = bordercolor
  422. pV.TextColor3 = fontcolor
  423. pV.FontSize = "Size10"
  424. pV.Changed:connect(function()
  425. pcall(function()
  426. obj.Name = pV.Text
  427. end)
  428. end)
  429. end
  430. if pcall(function() _ = obj["ClassName"] end) then
  431. local pN = Instance.new("TextLabel", f)
  432. pN.Size = UDim2.new(.5,0,.05,0)
  433. pN.Position = UDim2.new(0,0, push,0)
  434. pN.Text = "ClassName"
  435. pN.BackgroundColor3 = backgroundcolor
  436. pN.BorderColor3 = bordercolor
  437. pN.TextColor3 = bordercolor
  438. pN.FontSize = "Size10"
  439. local pV = Instance.new("TextLabel", f)
  440. pV.Size = UDim2.new(.5,0,.05,0)
  441. pV.Position = UDim2.new(.5,0,push,0)
  442. push = push + .05
  443. pV.Text = obj.ClassName
  444. pV.BackgroundColor3 = backgroundcolor
  445. pV.BorderColor3 = bordercolor
  446. pV.TextColor3 = bordercolor
  447. pV.FontSize = "Size10"
  448. end
  449.  
  450.  
  451. if pcall(function() _ = obj["Transparency"] end) then
  452. local pN = Instance.new("TextLabel", f)
  453. pN.Size = UDim2.new(.5,0,.05,0)
  454. pN.Position = UDim2.new(0,0, push,0)
  455. pN.Text = "Transparency"
  456. pN.BackgroundColor3 = backgroundcolor
  457. pN.BorderColor3 = bordercolor
  458. pN.TextColor3 = bordercolor
  459. pN.FontSize = "Size10"
  460. local pV = Instance.new("TextBox", f)
  461. pV.Size = UDim2.new(.5,0,.05,0)
  462. pV.Position = UDim2.new(.5,0,push,0)
  463. push = push + .05
  464. pV.Text = tostring(obj.Transparency)
  465. pV.BackgroundColor3 = backgroundcolor
  466. pV.BorderColor3 = bordercolor
  467. pV.TextColor3 = fontcolor
  468. pV.FontSize = "Size10"
  469. pV.Changed:connect(function()
  470. pcall(function()
  471. obj.Transparency = pV.Text
  472. end)
  473. end)
  474. end
  475. if pcall(function() _ = obj["Parent"] end) then
  476. local pN = Instance.new("TextLabel", f)
  477. pN.Size = UDim2.new(.5,0,.05,0)
  478. pN.Position = UDim2.new(0,0, push,0)
  479. pN.Text = "Parent"
  480. pN.BackgroundColor3 = backgroundcolor
  481. pN.BorderColor3 = bordercolor
  482. pN.TextColor3 = bordercolor
  483. pN.FontSize = "Size10"
  484. local pV = Instance.new("TextBox", f)
  485. pV.Size = UDim2.new(.5,0,.05,0)
  486. pV.Position = UDim2.new(.5,0,push,0)
  487. push = push + .05
  488. pV.Text = tostring(obj.Parent)
  489. pV.BackgroundColor3 = backgroundcolor
  490. pV.BorderColor3 = bordercolor
  491. pV.TextColor3 = fontcolor
  492. pV.FontSize = "Size10"
  493. pV.Changed:connect(function()
  494. pcall(function()
  495. obj.Parent = pV.Text
  496. end)
  497. end)
  498. end
  499.  
  500. if pcall(function() _ = obj["BrickColor"] end) then
  501. local pN = Instance.new("TextLabel", f)
  502. pN.Size = UDim2.new(.5,0,.05,0)
  503. pN.Position = UDim2.new(0,0, push,0)
  504. pN.Text = "BrickColor"
  505. pN.BackgroundColor3 = backgroundcolor
  506. pN.BorderColor3 = bordercolor
  507. pN.TextColor3 = bordercolor
  508. pN.FontSize = "Size10"
  509. local pV = Instance.new("TextBox", f)
  510. pV.Size = UDim2.new(.5,0,.05,0)
  511. pV.Position = UDim2.new(.5,0,push,0)
  512. push = push + .05
  513. pV.Text = tostring(obj.BrickColor)
  514. pV.BackgroundColor3 = backgroundcolor
  515. pV.BorderColor3 = bordercolor
  516. pV.TextColor3 = fontcolor
  517. pV.FontSize = "Size10"
  518. pV.Changed:connect(function()
  519. pcall(function()
  520. obj.BrickColor = BrickColor.new(pV.Text)
  521. end)
  522. end)
  523. end
  524. if pcall(function() _ = obj["Text"] end) then
  525. local pN = Instance.new("TextLabel", f)
  526. pN.Size = UDim2.new(.5,0,.05,0)
  527. pN.Position = UDim2.new(0,0, push,0)
  528. pN.Text = "Text"
  529. pN.BackgroundColor3 = backgroundcolor
  530. pN.BorderColor3 = bordercolor
  531. pN.TextColor3 = bordercolor
  532. pN.FontSize = "Size10"
  533. local pV = Instance.new("TextBox", f)
  534. pV.Size = UDim2.new(.5,0,.05,0)
  535. pV.Position = UDim2.new(.5,0,push,0)
  536. push = push + .05
  537. pV.Text = obj.Text
  538. pV.BackgroundColor3 = backgroundcolor
  539. pV.BorderColor3 = bordercolor
  540. pV.TextColor3 = fontcolor
  541. pV.FontSize = "Size10"
  542. pV.Changed:connect(function()
  543. pcall(function()
  544. obj.Text = pV.Text
  545. end)
  546. end)
  547. end
  548. if pcall(function() _ = obj["Value"] end) and (obj.ClassName == "StringValue" or obj.ClassName == "IntValue" or obj.ClassName == "NumberValue") then
  549. local pN = Instance.new("TextLabel", f)
  550. pN.Size = UDim2.new(.5,0,.05,0)
  551. pN.Position = UDim2.new(0,0, push,0)
  552. pN.Text = "Value"
  553. pN.BackgroundColor3 = backgroundcolor
  554. pN.BorderColor3 = bordercolor
  555. pN.TextColor3 = bordercolor
  556. pN.FontSize = "Size10"
  557. local pV = Instance.new("TextBox", f)
  558. pV.Size = UDim2.new(.5,0,.05,0)
  559. pV.Position = UDim2.new(.5,0,push,0)
  560. push = push + .05
  561. pV.Text = obj.Value
  562. pV.BackgroundColor3 = backgroundcolor
  563. pV.BorderColor3 = bordercolor
  564. pV.TextColor3 = fontcolor
  565. pV.FontSize = "Size10"
  566. pV.Changed:connect(function()
  567. pcall(function()
  568. if type(obj.Value) == "number" then
  569. obj.Value = tonumber(pV.Text) or 0
  570. else
  571. obj.Value = pV.Text
  572. end
  573. end)
  574. end)
  575. end
  576. end
  577.  
  578. function CreateDropDownMenu(pos, obj)
  579. local f = Instance.new("Frame", sg)
  580. f.BackgroundColor3 = backgroundcolor
  581. f.BorderColor3 = bordercolor
  582. f.Size = UDim2.new(.1,0,.2,0)
  583. f.BackgroundTransparency = .3
  584. f.Position = pos
  585. local d = Instance.new("TextButton", f)
  586. d.BackgroundTransparency = 1
  587. d.Text = "Delete"
  588. d.FontSize = "Size10"
  589. d.TextColor3 = fontcolor
  590. d.Size = UDim2.new(1,0,.15,0)
  591. d.MouseButton1Click:connect(function()
  592. pcall(function()
  593. obj:Destroy()
  594. end)
  595. Clear()
  596. GetList()
  597. f:Destroy()
  598. end)
  599. local c = Instance.new("TextButton", f)
  600. c.BackgroundTransparency = 1
  601. c.Text = "Copy"
  602. c.FontSize = "Size10"
  603. c.TextColor3 = fontcolor
  604. c.Size = UDim2.new(1,0,.15,0)
  605. c.Position = UDim2.new(0,0,.15,0)
  606. c.MouseButton1Click:connect(function()
  607. pcall(function()
  608. copy = obj:Clone()
  609. end)
  610. f:Destroy()
  611. end)
  612.  
  613. local p = Instance.new("TextButton", f)
  614. p.BackgroundTransparency = 1
  615. p.Text = "Paste into"
  616. p.FontSize = "Size10"
  617. p.TextColor3 = fontcolor
  618. p.Size = UDim2.new(1,0,.15,0)
  619. p.Position = UDim2.new(0,0,.3,0)
  620. p.MouseButton1Click:connect(function()
  621. pcall(function()
  622. copy.Parent = obj
  623. end)
  624. f:Destroy()
  625. end)
  626.  
  627. local ka = Instance.new("TextButton", f)
  628. ka.BackgroundTransparency = 1
  629. ka.Text = "Kill"
  630. ka.FontSize = "Size10"
  631. ka.TextColor3 = fontcolor
  632. ka.Size = UDim2.new(1,0,.15,0)
  633. ka.Position = UDim2.new(0,0,.65,0)
  634. ka.MouseButton1Click:connect(function()
  635. pcall(function()
  636. obj:BreakJoints()
  637. end)
  638. Clear()
  639. GetList()
  640. f:Destroy()
  641. end)
  642. local x = Instance.new("TextButton", f)
  643. x.BackgroundTransparency = 1
  644. x.Text = "Close"
  645. x.FontSize = "Size10"
  646. x.TextColor3 = fontcolor
  647. x.Size = UDim2.new(1,0,.15,0)
  648. x.Position = UDim2.new(0,0,.45,0)
  649. x.MouseButton1Click:connect(function()
  650. f:Destroy()
  651. end)
  652. end
  653.  
  654. function CreatePasteMenu(pos, obj)
  655. local f = Instance.new("Frame", sg)
  656. f.BackgroundColor3 = backgroundcolor
  657. f.BorderColor3 = bordercolor
  658. f.Size = UDim2.new(.1,0,.2,0)
  659. f.BackgroundTransparency = .3
  660. f.Position = pos
  661. local p = Instance.new("TextButton", f)
  662. p.BackgroundTransparency = 1
  663. p.Text = "Paste into"
  664. p.FontSize = "Size10"
  665. p.TextColor3 = fontcolor
  666. p.Size = UDim2.new(1,0,.15,0)
  667. p.Position = UDim2.new(0,0,0,0)
  668. p.MouseButton1Click:connect(function()
  669. pcall(function()
  670. copy.Parent = obj
  671. end)
  672. f:Destroy()
  673. end)
  674. local x = Instance.new("TextButton", f)
  675. x.BackgroundTransparency = 1
  676. x.Text = "Close"
  677. x.FontSize = "Size10"
  678. x.TextColor3 = fontcolor
  679. x.Size = UDim2.new(1,0,.15,0)
  680. x.Position = UDim2.new(0,0,.45,0)
  681. x.MouseButton1Click:connect(function()
  682. f:Destroy()
  683. end)
  684. end
  685.  
  686. function Clear()
  687. for i,v in pairs(fr:GetChildren()) do
  688. v:Destroy()
  689. cp = 0
  690. end
  691. end
  692.  
  693. function GetList()
  694. local max = 100
  695. local it = 0
  696. for i,v in pairs(current:GetChildren()) do
  697. if cp < .9 then
  698. CreateButtons(v)
  699. else
  700. CreateButtons(v, 1)
  701. end
  702. it = it + 1
  703. if it == max then break end
  704. end
  705. end
  706. GetList()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement