Advertisement
Guest User

Untitled

a guest
Dec 14th, 2019
118
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 70.25 KB | None | 0 0
  1. --leaked <3 froast
  2.  
  3. --Vain By Vaeb (2014)
  4. local Plrs = game:GetService("Players")
  5. local Light = game:GetService("Lighting")
  6. local DataStore = game:GetService("DataStoreService"):GetDataStore("VainStore8421")
  7. local Http = game:GetService("HttpService")
  8. local Content = game:GetService("ContentProvider")
  9. local Sep = "/"
  10. local OwnerName = "HAMUMUGtss"
  11.  
  12. local BanKey = "Bans8421"
  13. local isScripting = {}
  14. local CreatedScripts = {}
  15. local ChangedChar = {}
  16. local SLogs = {}
  17. local CLogs = {}
  18. local Logs = {}
  19. local Bans = DataStore:GetAsync(BanKey) or {}
  20. local LoopK = {}
  21. local StopCon
  22.  
  23. local SafeParts = {
  24. ["Base"] = true;
  25. ["HumanoidRootPart"] = true;
  26. ["Head"] = true;
  27. ["Torso"] = true;
  28. ["Left Arm"] = true;
  29. ["Right Arm"] = true;
  30. ["Left Leg"] = true;
  31. ["Right Leg"] = true;
  32. }
  33.  
  34. local Images = {
  35. ["Logo"] = "http://www.roblox.com/asset/?id=179762505";
  36. ["LogoS"] = "http://www.roblox.com/asset/?id=179841017";
  37. ["SmallLogo"] = "http://www.roblox.com/asset/?id=179799450";
  38. ["Close1"] = "http://www.roblox.com/asset/?id=179828100";
  39. ["Close2"] = "http://www.roblox.com/asset/?id=179828140";
  40. ["Open"] = "http://www.roblox.com/asset/?id=179832161";
  41. ["Commands"] = "http://www.roblox.com/asset/?id=179903438";
  42. ["Output"] = "http://www.roblox.com/asset/?id=180169547";
  43. ["Options"] = "http://www.roblox.com/asset/?id=179982684";
  44. ["Up"] = "http://www.roblox.com/asset/?id=179982163";
  45. ["Mid"] = "http://www.roblox.com/asset/?id=179982171";
  46. ["Down"] = "http://www.roblox.com/asset/?id=179982178";
  47. ["ExeRound"] = "http://www.roblox.com/asset/?id=180024448";
  48. ["ExeSquare1"] = "http://www.roblox.com/asset/?id=180030137";
  49. ["ExeSquare2"] = "http://www.roblox.com/asset/?id=180037395";
  50. }
  51.  
  52. local GuiColors = {
  53. BrickColor.new("Bright violet").Color;
  54. BrickColor.new("Camo").Color;
  55. BrickColor.new("Deep blue").Color;
  56. BrickColor.new("Brown").Color;
  57. }
  58.  
  59. for i,v in pairs(Images) do
  60. Content:Preload(v)
  61. wait(1/30)
  62. end
  63.  
  64. function Cor(Func)
  65. local Ok, Err = coroutine.resume(coroutine.create(Func))
  66. if not Ok then
  67. print(Err)
  68. end
  69. end
  70.  
  71. function getP()
  72. local AllPlayers = {}
  73. for _,v in pairs(Plrs:GetPlayers()) do
  74. table.insert(AllPlayers, v)
  75. end
  76. return AllPlayers
  77. end
  78.  
  79. function getBanned()
  80. if Bans and #Bans > 0 then
  81. return Bans
  82. else
  83. return {}
  84. end
  85. end
  86.  
  87. function GetTimeDist(OldTick, NewTick)
  88. local TimeType = nil
  89. local Symbol = ""
  90. local Seconds = tonumber(NewTick) - tonumber(OldTick)
  91. local Minutes = Seconds / 60
  92. local Hour = Minutes / 60
  93. local Day = Hour / 24
  94. local Year = Day / 365
  95.  
  96. if Seconds < 60 then
  97. TimeType = math.ceil(Seconds)
  98. Symbol = "s"
  99. elseif Minutes < 60 then
  100. TimeType = math.floor(Minutes)
  101. Symbol = "m"
  102. elseif Hour < 24 then
  103. TimeType = math.floor(Hour)
  104. Symbol = "h"
  105. elseif Day < 365 then
  106. TimeType = math.floor(Day)
  107. Symbol = "d"
  108. else
  109. TimeType = math.floor(Year)
  110. Symbol = "y"
  111. end
  112.  
  113. return tostring(TimeType) .. Symbol
  114. end
  115.  
  116. function GetTime(Tick)
  117. Tick = tonumber(Tick)
  118. local TimeVal = ""
  119. local Hour = math.floor((Tick % 86400) / 60 / 60)
  120. local Minutes = math.floor((((Tick % 86400) / 60 / 60) - Hour) * 60)
  121. if Hour < 10 then
  122. Hour = "0" .. tostring(Hour)
  123. else
  124. Hour = tostring(Hour)
  125. end
  126. if Minutes < 10 then
  127. Minutes = "0" .. tostring(Minutes)
  128. else
  129. Minutes = tostring(Minutes)
  130. end
  131. return (Hour .. ":" .. Minutes)
  132. end
  133.  
  134. function Main(LPName)
  135. Cor(function()
  136. local LP = Plrs[LPName]
  137. local Commands = {}
  138. local LastUpdate = 0
  139. local UpdateFrame
  140.  
  141. local Connections = {
  142. ["ChatCons"] = {};
  143. ["AntiKillCons"] = {};
  144. }
  145.  
  146. local function Error(ErrorMsg)
  147. coroutine.resume(coroutine.create(function()
  148. UpdateFrame({"ERROR: " .. ErrorMsg})
  149. end))
  150. end
  151.  
  152. local function Cor(Func)
  153. local Ok, Err = coroutine.resume(coroutine.create(Func))
  154. if not Ok then
  155. Error(Err)
  156. end
  157. end
  158.  
  159. local Start1
  160.  
  161. local function Start2(Plr, PlrGui)
  162. Cor(function()
  163. for _,v in pairs(PlrGui:GetChildren()) do
  164. if v.Name == "Vain MainGUI" then
  165. v:Destroy()
  166. end
  167. end
  168.  
  169. local SG = Instance.new("ScreenGui")
  170. SG.Name = "Vain MainGUI"
  171. SG.Parent = PlrGui
  172.  
  173. local Bar1 = Instance.new("Frame")
  174. Bar1.Name = "Bar1"
  175. Bar1.Active = false
  176. Bar1.BackgroundColor3 = Color3.new((170/255), (85/255), (255/255))
  177. Bar1.BorderColor3 = Color3.new(0, 0, 0)
  178. Bar1.BorderSizePixel = 0
  179. Bar1.BackgroundTransparency = 1
  180. Bar1.Size = UDim2.new(0, 800, 0, 15)
  181. Bar1.Position = UDim2.new(0.5, -(Bar1.Size.X.Offset / 2), 0.03, 0)
  182. Bar1.Rotation = 0
  183. Bar1.Visible = true
  184. Bar1.Parent = SG
  185.  
  186. local Frame1 = Instance.new("Frame")
  187. Frame1.Name = "Frame1"
  188. Frame1.Active = false
  189. Frame1.BackgroundColor3 = Color3.new(0, 0, 0)
  190. Frame1.BorderColor3 = Color3.new((170/255), (85/255), (255/255))
  191. Frame1.BorderSizePixel = 1
  192. Frame1.BackgroundTransparency = 0.5
  193. Frame1.Size = UDim2.new(0.9, 0, 0, 0)
  194. Frame1.Position = UDim2.new(0.05, 0, 1, 0)
  195. Frame1.Rotation = 0
  196. Frame1.Visible = false
  197. Frame1.Parent = Bar1
  198.  
  199. for i = 1, 0, -0.05 do
  200. Bar1.BackgroundTransparency = i
  201. wait(1/30)
  202. end
  203. Bar1.BackgroundTransparency = 0
  204.  
  205. Frame1.Visible = true
  206. repeat wait(1/30) until Frame1:IsDescendantOf(game)
  207. Frame1:TweenSize(UDim2.new(0.9, 0, 34, 0), "Out", "Quad", 0.4, true)
  208. wait(0.4)
  209. local Num1 = 45 / 34
  210.  
  211. local Logo = Instance.new("ImageLabel")
  212. Logo.Name = "Logo"
  213. Logo.Active = false
  214. Logo.Image = Images["LogoS"]
  215. Logo.ImageTransparency = 1
  216. Logo.ImageColor3 = Color3.new(1, 1, 1)
  217. Logo.BorderColor3 = Color3.new(0, 0, 0)
  218. Logo.BorderSizePixel = 0
  219. Logo.BackgroundTransparency = 1
  220. Logo.Size = UDim2.new(0.75, 0, 0.175, 0)
  221. Logo.Position = UDim2.new(0.125, 0, 0.005, 0)
  222. Logo.Rotation = 0
  223. Logo.Visible = true
  224. Logo.Parent = Frame1
  225.  
  226. local Close = Instance.new("ImageButton")
  227. Close.Name = "Close"
  228. Close.Active = true
  229. Close.AutoButtonColor = false
  230. Close.Modal = false
  231. Close.Image = Images["Close1"]
  232. Close.ImageTransparency = 1
  233. Close.ImageColor3 = Color3.new(1, 1, 1)
  234. Close.BorderColor3 = Color3.new(0, 0, 0)
  235. Close.BorderSizePixel = 0
  236. Close.BackgroundTransparency = 1
  237. Close.Size = UDim2.new(0, 65.625, 0, 37.5)
  238. Close.Position = UDim2.new(0.5, -32.8125, 1, -42)
  239. Close.Rotation = 0
  240. Close.Visible = true
  241. Close.Parent = Frame1
  242.  
  243. local Closed = false
  244.  
  245. Close.MouseEnter:connect(function()
  246. Close.Image = Images["Close2"]
  247. Close.MouseLeave:wait(1/30)
  248. if Closed == false then
  249. Close.Image = Images["Close1"]
  250. end
  251. end)
  252.  
  253. local Bar2 = Instance.new("Frame")
  254. Bar2.Name = "Bar2"
  255. Bar2.Active = false
  256. Bar2.BackgroundColor3 = Color3.new(1, 1, 1)
  257. Bar2.BorderColor3 = Color3.new(0, 0, 0)
  258. Bar2.BorderSizePixel = 0
  259. Bar2.BackgroundTransparency = 1
  260. Bar2.Size = UDim2.new(1, 0, 0, 2)
  261. Bar2.Position = UDim2.new(0, 0, (Logo.Position.Y.Scale + Logo.Size.Y.Scale + 0.01), 0)
  262. Bar2.Rotation = 0
  263. Bar2.Visible = true
  264. Bar2.Parent = Frame1
  265.  
  266. local Bar3 = Instance.new("Frame")
  267. Bar3.Name = "Bar3"
  268. Bar3.Active = false
  269. Bar3.BackgroundColor3 = Color3.new(1, 1, 1)
  270. Bar3.BorderColor3 = Color3.new(0, 0, 0)
  271. Bar3.BorderSizePixel = 0
  272. Bar3.BackgroundTransparency = 1
  273. Bar3.Size = UDim2.new(1, 0, 0, 2)
  274. Bar3.Position = UDim2.new(0, 0, 0.99, -44)
  275. Bar3.Rotation = 0
  276. Bar3.Visible = true
  277. Bar3.Parent = Frame1
  278.  
  279. local ComImage1Frame = Instance.new("Frame")
  280. ComImage1Frame.Name = "ComImage1Frame"
  281. ComImage1Frame.Active = false
  282. ComImage1Frame.BackgroundColor3 = Color3.new(1, 1, 1)
  283. ComImage1Frame.BorderColor3 = Color3.new(0.5, 0.35, 0.275)
  284. ComImage1Frame.BorderSizePixel = 1
  285. ComImage1Frame.BackgroundTransparency = 1
  286. ComImage1Frame.Size = UDim2.new(0.31, 0, 0.05, 0)
  287. ComImage1Frame.Position = UDim2.new(0.02, 0, 0.21, 0)
  288. ComImage1Frame.Rotation = 0
  289. ComImage1Frame.Visible = true
  290. ComImage1Frame.Parent = Frame1
  291.  
  292. local ComImage1 = Instance.new("ImageLabel")
  293. ComImage1.Name = "ComImage1"
  294. ComImage1.Active = false
  295. ComImage1.Image = Images["Commands"]
  296. ComImage1.ImageTransparency = 1
  297. ComImage1.ImageColor3 = Color3.new(1, 1, 1)
  298. ComImage1.BorderColor3 = Color3.new(0, 0, 0)
  299. ComImage1.BorderSizePixel = 0
  300. ComImage1.BackgroundTransparency = 1
  301. ComImage1.Size = UDim2.new(0.2142, 0, 0.05, 0)
  302. ComImage1.Position = UDim2.new(0.0679, 0, 0.21, 0)
  303. ComImage1.Rotation = 0
  304. ComImage1.Visible = true
  305. ComImage1.Parent = Frame1
  306.  
  307. local Scroll1 = Instance.new("ScrollingFrame")
  308. Scroll1.Name = "Scroll1"
  309. Scroll1.Size = UDim2.new(0.31, 0, 0.71, -48)
  310. Scroll1.Position = UDim2.new(0.02, 0, ComImage1.Position.Y.Scale + ComImage1.Size.Y.Scale + 0.01, 0)
  311. Scroll1.CanvasSize = UDim2.new(Scroll1.Size.X.Scale - 0.01, Scroll1.Size.X.Offset, Scroll1.Size.Y.Scale - 0.01, Scroll1.Size.Y.Offset)
  312. Scroll1.BackgroundColor3 = Color3.new(0, 0, 0)
  313. Scroll1.BorderColor3 = Color3.new(1, 1, 1)
  314. Scroll1.BackgroundTransparency = 1
  315. Scroll1.BottomImage = Images["Down"]
  316. Scroll1.MidImage = Images["Mid"]
  317. Scroll1.TopImage = Images["Up"]
  318. Scroll1.BorderSizePixel = 1
  319. Scroll1.Rotation = 0
  320. Scroll1.Visible = true
  321. Scroll1.Parent = Frame1
  322.  
  323. local ComImage2Frame = Instance.new("Frame")
  324. ComImage2Frame.Name = "ComImage2Frame"
  325. ComImage2Frame.Active = false
  326. ComImage2Frame.BackgroundColor3 = Color3.new(1, 1, 1)
  327. ComImage2Frame.BorderColor3 = Color3.new(0.5, 0.35, 0.275)
  328. ComImage2Frame.BorderSizePixel = 1
  329. ComImage2Frame.BackgroundTransparency = 1
  330. ComImage2Frame.Size = UDim2.new(0.31, 0, 0.05, 0)
  331. ComImage2Frame.Position = UDim2.new(0.34, 0, 0.21, 0)
  332. ComImage2Frame.Rotation = 0
  333. ComImage2Frame.Visible = true
  334. ComImage2Frame.Parent = Frame1
  335.  
  336. local ComImage2 = Instance.new("ImageLabel")
  337. ComImage2.Name = "ComImage2"
  338. ComImage2.Active = false
  339. ComImage2.Image = Images["Options"]
  340. ComImage2.ImageTransparency = 1
  341. ComImage2.ImageColor3 = Color3.new(1, 1, 1)
  342. ComImage2.BorderColor3 = Color3.new(0, 0, 0)
  343. ComImage2.BorderSizePixel = 0
  344. ComImage2.BackgroundTransparency = 1
  345. ComImage2.Size = UDim2.new(0.2042, 0, 0.05, 0)
  346. ComImage2.Position = UDim2.new(0.3979, 0, 0.21, 0)
  347. ComImage2.Rotation = 0
  348. ComImage2.Visible = true
  349. ComImage2.Parent = Frame1
  350.  
  351. local Scroll2 = Instance.new("ScrollingFrame")
  352. Scroll2.Name = "Scroll2"
  353. Scroll2.Size = UDim2.new(0.31, 0, 0.71, -48)
  354. Scroll2.Position = UDim2.new(0.34, 0, ComImage1.Position.Y.Scale + ComImage1.Size.Y.Scale + 0.01, 0) --Y = 0.27
  355. Scroll2.CanvasSize = UDim2.new(Scroll2.Size.X.Scale - 0.01, Scroll2.Size.X.Offset, Scroll2.Size.Y.Scale - 0.01, Scroll2.Size.Y.Offset)
  356. Scroll2.BackgroundColor3 = Color3.new(0, 0, 0)
  357. Scroll2.BorderColor3 = Color3.new(1, 1, 1)
  358. Scroll2.BackgroundTransparency = 1
  359. Scroll2.BottomImage = Images["Down"]
  360. Scroll2.MidImage = Images["Mid"]
  361. Scroll2.TopImage = Images["Up"]
  362. Scroll2.BorderSizePixel = 1
  363. Scroll2.Rotation = 0
  364. Scroll2.Visible = true
  365. Scroll2.Parent = Frame1
  366.  
  367. local ComImage3Frame = Instance.new("Frame")
  368. ComImage3Frame.Name = "ComImage3Frame"
  369. ComImage3Frame.Active = false
  370. ComImage3Frame.BackgroundColor3 = Color3.new(1, 1, 1)
  371. ComImage3Frame.BorderColor3 = Color3.new(0.5, 0.35, 0.275)
  372. ComImage3Frame.BorderSizePixel = 1
  373. ComImage3Frame.BackgroundTransparency = 1
  374. ComImage3Frame.Size = UDim2.new(0.32, 0, 0.05, 0) --0.26 X Size
  375. ComImage3Frame.Position = UDim2.new(0.66, 0, 0.21, 0) --Start X 0.72 | End X 0.98
  376. ComImage3Frame.Rotation = 0
  377. ComImage3Frame.Visible = true
  378. ComImage3Frame.Parent = Frame1
  379.  
  380. local ComImage3 = Instance.new("ImageLabel")
  381. ComImage3.Name = "ComImage3"
  382. ComImage3.Active = false
  383. ComImage3.Image = Images["Output"]
  384. ComImage3.ImageTransparency = 1
  385. ComImage3.ImageColor3 = Color3.new(1, 1, 1)
  386. ComImage3.BorderColor3 = Color3.new(0, 0, 0)
  387. ComImage3.BorderSizePixel = 0
  388. ComImage3.BackgroundTransparency = 1
  389. ComImage3.Size = UDim2.new(0.2642, 0, 0.05, 0)
  390. ComImage3.Position = UDim2.new(0.6879, 0, 0.21, 0)
  391. ComImage3.Rotation = 0
  392. ComImage3.Visible = true
  393. ComImage3.Parent = Frame1
  394.  
  395. local Scroll3 = Instance.new("ScrollingFrame")
  396. Scroll3.Name = "Scroll3"
  397. Scroll3.Size = UDim2.new(0.32, 0, 0.561, -48)
  398. Scroll3.Position = UDim2.new(0.66, 0, ComImage3.Position.Y.Scale + ComImage3.Size.Y.Scale + 0.01, 0) --X Starts 0.66 | X Ends 0.98
  399. Scroll3.CanvasSize = UDim2.new(Scroll3.Size.X.Scale - 0.01, Scroll3.Size.X.Offset, Scroll3.Size.Y.Scale - 0.01, Scroll3.Size.Y.Offset)
  400. Scroll3.BackgroundColor3 = Color3.new(0, 0, 0)
  401. Scroll3.BorderColor3 = Color3.new(1, 1, 1)
  402. Scroll3.BackgroundTransparency = 1
  403. Scroll3.BottomImage = Images["Down"]
  404. Scroll3.MidImage = Images["Mid"]
  405. Scroll3.TopImage = Images["Up"]
  406. Scroll3.BorderSizePixel = 1
  407. Scroll3.Rotation = 0
  408. Scroll3.Visible = true
  409. Scroll3.Parent = Frame1
  410.  
  411. local ExeButton = Instance.new("ImageButton")
  412. ExeButton.Name = "ExeButton"
  413. ExeButton.AutoButtonColor = true
  414. ExeButton.Image = Images["ExeSquare1"]
  415. ExeButton.ImageTransparency = 1
  416. ExeButton.ImageColor3 = Color3.new(1, 1, 1)
  417. ExeButton.BorderColor3 = Color3.new(0, 0, 0)
  418. ExeButton.BorderSizePixel = 0
  419. ExeButton.BackgroundTransparency = 1
  420. ExeButton.Size = UDim2.new(0.208, 0, 0.224, -48)
  421. ExeButton.Position = UDim2.new(0.716, 0, 0.756, 0)
  422. ExeButton.Rotation = 0
  423. ExeButton.Visible = true
  424. ExeButton.Parent = Frame1
  425.  
  426. UpdateFrame = function(Tab, isScriptName, Wrapped, Size, Start, End, Iter, Color, InstanceType, SizeDif, FontSize)
  427. LastUpdate = LastUpdate + 1
  428. local CurrentUpdate = LastUpdate
  429. Cor(function()
  430. for _,v in pairs(Scroll3:GetChildren()) do
  431. v:Destroy()
  432. end
  433. if isScriptName == nil then
  434. isScriptName = false
  435. end
  436. if InstanceType == nil then
  437. InstanceType = "TextButton"
  438. end
  439. if FontSize == nil then
  440. FontSize = "Size14"
  441. end
  442. if Wrapped == nil then
  443. Wrapped = false
  444. end
  445. if SizeDif == nil then
  446. SizeDif = 3
  447. end
  448. if Color == nil then
  449. Color = false
  450. end
  451. if Size == nil then
  452. Size = UDim2.new(0.99, 0, 0, 20)
  453. end
  454. if Start == nil then
  455. Start = #Tab
  456. end
  457. if End == nil then
  458. End = 1
  459. end
  460. if Iter == nil then
  461. Iter = -1
  462. end
  463. local DownNum = 0
  464. local IterNum = 1
  465. local LastHit = 1
  466. local DownNum = 3
  467.  
  468. for i = Start, End, Iter do
  469. if CurrentUpdate ~= LastUpdate then
  470. break
  471. end
  472. local NumLines = 1
  473.  
  474. local CText
  475. if type(Tab[i]) == "table" then
  476. CText = Tab[i].Message
  477. else
  478. CText = Tab[i]
  479. end
  480.  
  481. for i2 = 1, #CText - 1 do
  482. if CText:sub(i2, i2) == [[\]] and CText:sub(i2 + 1, i2 + 1) ==[[n]] then
  483. CText = CText:sub(1, i2 - 1) .. "\n" .. CText:sub(i2 + 2)
  484. end
  485. end
  486.  
  487. for i2 = 1, #CText do
  488. if CText:sub(i2, i2) == "\n" then
  489. NumLines = NumLines + 1
  490. end
  491. end
  492. local NewSize = UDim2.new(Size.X.Scale, Size.X.Offset, Size.Y.Scale, Size.Y.Offset * NumLines)
  493.  
  494. CText = CText:gsub([[/e,"]], "/e ")
  495. local CText2 = CText
  496. local isSilent = false
  497.  
  498. if CText:sub(1, 3) == "/e " then
  499. CText2 = CText:sub(4)
  500. isSilent = true
  501. end
  502.  
  503. if CText2:sub(1, 40) == "setfenv(assert(loadstring(table.concat({" then
  504. if isSilent then
  505. CText = "[ SILENT ]\n" .. CText2:sub(44)
  506. else
  507. CText = CText:sub(44)
  508. end
  509. end
  510.  
  511. if CText:sub(#CText - 16, #CText) == "}))),getfenv())()" then
  512. CText = CText:sub(1, #CText - 20)
  513. end
  514.  
  515. local ChatButton = Instance.new(InstanceType)
  516. ChatButton.Name = "ChatButton"
  517. ChatButton.Text = " " .. CText
  518. ChatButton.TextColor3 = Color3.new(1, 1, 1)
  519. ChatButton.TextStrokeColor3 = Color3.new(0, 0, 0)
  520. ChatButton.TextTransparency = 0
  521. ChatButton.TextStrokeTransparency = 1
  522. ChatButton.TextWrapped = Wrapped
  523. ChatButton.TextXAlignment = "Left"
  524. ChatButton.TextYAlignment = "Top"
  525. ChatButton.Font = "ArialBold"
  526. ChatButton.FontSize = FontSize
  527. ChatButton.BorderColor3 = Color3.new(1, 1, 1)
  528. ChatButton.BorderSizePixel = 0
  529. ChatButton.BackgroundColor3 = Color and BrickColor.new("Deep blue").Color or GuiColors[IterNum]
  530. ChatButton.BackgroundTransparency = 1
  531. ChatButton.Size = NewSize
  532. ChatButton.Position = UDim2.new(0, 3, 0, DownNum)
  533. ChatButton.Rotation = 0
  534. ChatButton.Visible = true
  535. ChatButton.Parent = Scroll3
  536. DownNum = DownNum + NewSize.Y.Offset + SizeDif
  537. if IterNum == #GuiColors then
  538. IterNum = 1
  539. else
  540. IterNum = IterNum + 1
  541. end
  542. local LowestGUIXSize = 0
  543. local LowestGUIXNum = 0
  544. local LowestGUIYSize = 0
  545. local LowestGUIYNum = 0
  546. local XOffsetNum
  547. local YOffsetNum
  548. for _,v in pairs(Scroll3:GetChildren()) do
  549. if (v:IsA("TextButton") or v:IsA("TextLabel") or v:IsA("TextBox")) and v.Visible == true then
  550. if v.AbsolutePosition.X > LowestGUIXNum then
  551. LowestGUIXNum = v.AbsolutePosition.X
  552. LowestGUIXSize = v.AbsoluteSize.X
  553. end
  554. if v.AbsolutePosition.Y > LowestGUIYNum then
  555. LowestGUIYNum = v.AbsolutePosition.Y
  556. LowestGUIYSize = v.AbsoluteSize.Y
  557. end
  558. end
  559. end
  560. XOffsetNum = LowestGUIXNum + LowestGUIXSize
  561. YOffsetNum = LowestGUIYNum + LowestGUIYSize
  562. Scroll3.CanvasSize = UDim2.new(0, XOffsetNum - 1, 0, YOffsetNum - 1)
  563. if ChatButton:IsA("TextButton") then
  564. ChatButton.MouseButton1Click:connect(function()
  565. if isScriptName == true then
  566. local Pattern = "] %w[%a%d%p]+$"
  567. local newText = CText:match(Pattern):sub(3)
  568. if SLogs[newText] then
  569. UpdateFrame(SLogs[newText], false, true, UDim2.new(0.99, 0, 0, 14), 1, #SLogs[newText], 1, true, "TextLabel", 0, "Size12")
  570. end
  571. end
  572. end)
  573. end
  574. end
  575. end)
  576. end
  577.  
  578. wait(1/30)
  579.  
  580. for i = 1, 0, -0.1 do
  581. Logo.ImageTransparency = i
  582. ExeButton.ImageTransparency = i
  583. ComImage1.ImageTransparency = i
  584. ComImage2.ImageTransparency = i
  585. ComImage3.ImageTransparency = i
  586. Close.ImageTransparency = i
  587. Scroll1.BackgroundTransparency = math.max(i, 0.25)
  588. Scroll2.BackgroundTransparency = math.max(i, 0.25)
  589. Scroll3.BackgroundTransparency = math.max(i, 0.25)
  590. ComImage1Frame.BackgroundTransparency = math.max(i, 0)
  591. ComImage2Frame.BackgroundTransparency = math.max(i, 0)
  592. ComImage3Frame.BackgroundTransparency = math.max(i, 0)
  593. Bar2.BackgroundTransparency = i
  594. Bar3.BackgroundTransparency = i
  595. wait(.05)
  596. end
  597. Logo.ImageTransparency = 0
  598. ExeButton.ImageTransparency = 0
  599. ComImage1.ImageTransparency = 0
  600. ComImage2.ImageTransparency = 0
  601. ComImage3.ImageTransparency = 0
  602. Close.ImageTransparency = 0
  603. Scroll1.BackgroundTransparency = 0.25
  604. Scroll2.BackgroundTransparency = 0.25
  605. Scroll3.BackgroundTransparency = 0.25
  606. ComImage1Frame.BackgroundTransparency = 0
  607. ComImage2Frame.BackgroundTransparency = 0
  608. ComImage3Frame.BackgroundTransparency = 0
  609. Bar2.BackgroundTransparency = 0
  610. Bar3.BackgroundTransparency = 0
  611.  
  612. Cor(function()
  613. local LastNum = 0
  614. local IterNum = 1
  615. local CurrentCom = nil
  616. local CurrentOptTab = {}
  617. local CurrentTextBox = nil
  618. local LastHit = 1
  619.  
  620. ExeButton.MouseButton1Click:connect(function()
  621. Cor(function()
  622. LastHit = LastHit + 1
  623. local CurrentHit = LastHit
  624. ExeButton.Image = Images["ExeSquare2"]
  625. wait(0.5)
  626. if CurrentHit == LastHit then
  627. ExeButton.Image = Images["ExeSquare1"]
  628. end
  629. end)
  630. if CurrentCom and CurrentCom.Text:sub(2) == "Exe" or CurrentCom.Text:sub(2) == "Run Script" or CurrentCom.Text:sub(2) == "Run Local" then
  631. for i,v in pairs(Commands) do
  632. if CurrentCom.Text:sub(2) == v["NameTab"][1] then
  633. if CurrentTextBox ~= nil then
  634. Cor(function()
  635. local MType = "Cmd"
  636. local ComName = "[" .. v["NameTab"][1] .. "] " .. CurrentTextBox.Text
  637. table.insert(CLogs, {Type = MType, Message = ComName, Plr = Plr.Name, Time = tostring(tick())})
  638. end)
  639. local Ok, Err = coroutine.resume(coroutine.create(function()
  640. v.Func(Plr, {CurrentTextBox.Text}, v["NameTab"][1])
  641. end))
  642. if not Ok then
  643. Error("[" .. v["NameTab"][1] .. "] " .. Err)
  644. end
  645. else
  646. Cor(function()
  647. local MType = "Cmd"
  648. local ComName = "[" .. v["NameTab"][1] .. "]"
  649. table.insert(CLogs, {Type = MType, Message = ComName, Plr = Plr.Name, Time = tostring(tick())})
  650. end)
  651. v.Func(Plr, {}, v["NameTab"][1])
  652. end
  653. break
  654. end
  655. end
  656. else
  657. if CurrentCom ~= nil then
  658. for i,v in pairs(Commands) do
  659. if CurrentCom.Text:sub(2) == v["NameTab"][1] then
  660. local Params = {}
  661. for v2,_ in pairs(CurrentOptTab) do
  662. table.insert(Params, v2.Text:sub(2))
  663. end
  664. Cor(function()
  665. local MType = "Cmd"
  666. local ComName = "[" .. v["NameTab"][1] .. "] " .. table.concat(Params, ", ")
  667. table.insert(CLogs, {Type = MType, Message = ComName, Plr = Plr.Name, Time = tostring(tick())})
  668. end)
  669. local Ok, Err = coroutine.resume(coroutine.create(function()
  670. v.Func(Plr, Params, v["NameTab"][1])
  671. end))
  672. if not Ok then
  673. Error("[" .. v["NameTab"][1] .. "] " .. Err)
  674. end
  675. break
  676. end
  677. end
  678. end
  679. end
  680. end)
  681.  
  682. for i,v in pairs(Commands) do
  683. local DownNum
  684. if LastNum == 0 then
  685. DownNum = 3
  686. else
  687. DownNum = LastNum + 23
  688. end
  689. local Command = v
  690. LastNum = DownNum
  691. local ComButton = Instance.new("TextButton")
  692. ComButton.Name = "ComButton"
  693. ComButton.Text = " " .. v["NameTab"][1]
  694. ComButton.TextColor3 = Color3.new(1, 1, 1)
  695. ComButton.TextStrokeColor3 = Color3.new(0, 0, 0)
  696. ComButton.TextTransparency = 1
  697. ComButton.TextStrokeTransparency = 1
  698. ComButton.TextWrapped = false
  699. ComButton.TextXAlignment = "Left"
  700. ComButton.TextYAlignment = "Center"
  701. ComButton.Font = "SourceSans"
  702. ComButton.FontSize = "Size24"
  703. ComButton.BorderColor3 = Color3.new(1, 1, 1)
  704. ComButton.BorderSizePixel = 0
  705. ComButton.BackgroundColor3 = GuiColors[IterNum]
  706. ComButton.BackgroundTransparency = 1
  707. ComButton.Size = UDim2.new(0.99, 0, 0, 20)
  708. ComButton.Position = UDim2.new(0, 3, 0, DownNum)
  709. ComButton.Rotation = 0
  710. ComButton.Visible = true
  711. ComButton.Parent = Scroll1
  712. for i = 1, 0, -0.25 do
  713. ComButton.TextTransparency = i
  714. ComButton.BackgroundTransparency = i
  715. wait(1/30)
  716. end
  717. ComButton.TextTransparency = 0
  718. ComButton.BackgroundTransparency = 0
  719. if IterNum == #GuiColors then
  720. IterNum = 1
  721. else
  722. IterNum = IterNum + 1
  723. end
  724. local EndGUIXSize = 0
  725. local EndGUIXNum = 0
  726. local EndGUIYSize = 0
  727. local EndGUIYNum = 0
  728. local StartGUIXNum = Scroll1.AbsolutePosition.X
  729. local StartGUIYNum = Scroll1.AbsolutePosition.Y
  730. local XOffsetNum
  731. local YOffsetNum
  732. for _,v in pairs(Scroll1:GetChildren()) do
  733. if (v:IsA("TextButton") or v:IsA("TextLabel") or v:IsA("TextBox")) and v.Visible == true then
  734. if v.AbsolutePosition.X > EndGUIXNum then
  735. EndGUIXNum = v.AbsolutePosition.X
  736. EndGUIXSize = v.AbsoluteSize.X
  737. end
  738. if v.AbsolutePosition.Y > EndGUIYNum then
  739. EndGUIYNum = v.AbsolutePosition.Y
  740. EndGUIYSize = v.AbsoluteSize.Y
  741. end
  742. end
  743. end
  744. XOffsetNum = (EndGUIXNum - StartGUIXNum) + EndGUIXSize
  745. YOffsetNum = (EndGUIYNum - StartGUIYNum) + EndGUIYSize
  746. Scroll1.CanvasSize = UDim2.new(0, XOffsetNum, 0, YOffsetNum)
  747. ComButton.MouseButton1Click:connect(function()
  748. if CurrentCom ~= nil and CurrentCom:IsA("TextButton") then
  749. CurrentCom.TextStrokeTransparency = 1
  750. end
  751. ComButton.TextStrokeTransparency = 0
  752. CurrentCom = ComButton
  753. for i = #Scroll2:GetChildren(), 1, -1 do
  754. local OldButton = Scroll2:GetChildren()[i]
  755. if OldButton and OldButton:IsA("TextButton") then
  756. for i = 0, 1, 0.2 do
  757. OldButton.TextStrokeTransparency = math.max(OldButton.TextStrokeTransparency, i)
  758. OldButton.TextTransparency = i
  759. OldButton.BackgroundTransparency = i
  760. wait(1/30)
  761. end
  762. OldButton.TextStrokeTransparency = 1
  763. OldButton.TextTransparency = 1
  764. OldButton.BackgroundTransparency = 1
  765. end
  766. OldButton:Destroy()
  767. end
  768. if v["NameTab"][1] == "Exe" or v["NameTab"][1] == "Run Script" or v["NameTab"][1] == "Run Local" then
  769. local OptButton = Instance.new("TextBox")
  770. OptButton.Name = "OptButton"
  771. OptButton.Text = "Script Here"
  772. OptButton.ClearTextOnFocus = false
  773. OptButton.MultiLine = false
  774. OptButton.TextColor3 = Color3.new(1, 1, 1)
  775. OptButton.TextStrokeColor3 = Color3.new(0, 0, 0)
  776. OptButton.TextTransparency = 1
  777. OptButton.TextStrokeTransparency = 1
  778. OptButton.TextWrapped = false
  779. OptButton.TextXAlignment = "Left"
  780. OptButton.TextYAlignment = "Center"
  781. OptButton.Font = "SourceSans"
  782. OptButton.FontSize = "Size14"
  783. OptButton.BorderColor3 = Color3.new(1, 1, 1)
  784. OptButton.BorderSizePixel = 0
  785. OptButton.BackgroundColor3 = GuiColors[1]
  786. OptButton.BackgroundTransparency = 1
  787. OptButton.Size = UDim2.new(0.99, 0, 0, 20)
  788. OptButton.Position = UDim2.new(0, 3, 0, 3)
  789. OptButton.Rotation = 0
  790. OptButton.Visible = true
  791. OptButton.Parent = Scroll2
  792. CurrentTextBox = OptButton
  793. for i = 1, 0, -(1/3) do
  794. OptButton.TextTransparency = i
  795. OptButton.BackgroundTransparency = i
  796. wait(1/30)
  797. end
  798. OptButton.TextTransparency = 0
  799. OptButton.BackgroundTransparency = 0
  800. local LowestGUIXSize = 0
  801. local LowestGUIXNum = 0
  802. local LowestGUIYSize = 0
  803. local LowestGUIYNum = 0
  804. local XOffsetNum
  805. local YOffsetNum
  806. for _,v in pairs(Scroll2:GetChildren()) do
  807. if (v:IsA("TextButton") or v:IsA("TextLabel") or v:IsA("TextBox")) and v.Visible == true then
  808. if v.AbsolutePosition.X > LowestGUIXNum then
  809. LowestGUIXNum = v.AbsolutePosition.X
  810. LowestGUIXSize = v.AbsoluteSize.X
  811. end
  812. if v.AbsolutePosition.Y > LowestGUIYNum then
  813. LowestGUIYNum = v.AbsolutePosition.Y
  814. LowestGUIYSize = v.AbsoluteSize.Y
  815. end
  816. end
  817. end
  818. XOffsetNum = LowestGUIXNum + LowestGUIXSize
  819. YOffsetNum = LowestGUIYNum + LowestGUIYSize
  820. Scroll2.CanvasSize = UDim2.new(0, XOffsetNum - 1, 0, YOffsetNum - 1)
  821. else
  822. CurrentOptTab = {}
  823. local ParamTab = Command.GetParams()
  824. if #ParamTab > 0 then
  825. local LastNum2 = 0
  826. local IterNum2 = 1
  827. for _,v in pairs(ParamTab) do
  828. local DownNum2
  829. if LastNum2 == 0 then
  830. DownNum = 3
  831. else
  832. DownNum = LastNum2 + 23
  833. end
  834. LastNum2 = DownNum
  835. local OptButton = Instance.new("TextButton")
  836. OptButton.Name = "OptButton"
  837. if type(v) == "userdata" then
  838. OptButton.Text = " " .. v.Name
  839. else
  840. OptButton.Text = " " .. tostring(v)
  841. end
  842. OptButton.TextColor3 = Color3.new(1, 1, 1)
  843. OptButton.TextStrokeColor3 = Color3.new(0, 0, 0)
  844. OptButton.TextTransparency = 1
  845. OptButton.TextStrokeTransparency = 1
  846. OptButton.TextWrapped = false
  847. OptButton.TextXAlignment = "Left"
  848. OptButton.TextYAlignment = "Center"
  849. OptButton.Font = "SourceSans"
  850. OptButton.FontSize = "Size24"
  851. OptButton.BorderColor3 = Color3.new(1, 1, 1)
  852. OptButton.BorderSizePixel = 0
  853. OptButton.BackgroundColor3 = GuiColors[IterNum2]
  854. OptButton.BackgroundTransparency = 1
  855. OptButton.Size = UDim2.new(0.99, 0, 0, 20)
  856. OptButton.Position = UDim2.new(0, 3, 0, DownNum)
  857. OptButton.Rotation = 0
  858. OptButton.Visible = true
  859. OptButton.Parent = Scroll2
  860. for i = 1, 0, -(1/3) do
  861. OptButton.TextTransparency = i
  862. OptButton.BackgroundTransparency = i
  863. wait(1/30)
  864. end
  865. OptButton.TextTransparency = 0
  866. OptButton.BackgroundTransparency = 0
  867. if IterNum2 == #GuiColors then
  868. IterNum2 = 1
  869. else
  870. IterNum2 = IterNum2 + 1
  871. end
  872. local EndGUIXSize = 0
  873. local EndGUIXNum = 0
  874. local EndGUIYSize = 0
  875. local EndGUIYNum = 0
  876. local StartGUIXNum = Scroll2.AbsolutePosition.X
  877. local StartGUIYNum = Scroll2.AbsolutePosition.Y
  878. local XOffsetNum
  879. local YOffsetNum
  880. for _,v in pairs(Scroll2:GetChildren()) do
  881. if (v:IsA("TextButton") or v:IsA("TextLabel") or v:IsA("TextBox")) and v.Visible == true then
  882. if v.AbsolutePosition.X > EndGUIXNum then
  883. EndGUIXNum = v.AbsolutePosition.X
  884. EndGUIXSize = v.AbsoluteSize.X
  885. end
  886. if v.AbsolutePosition.Y > EndGUIYNum then
  887. EndGUIYNum = v.AbsolutePosition.Y
  888. EndGUIYSize = v.AbsoluteSize.Y
  889. end
  890. end
  891. end
  892. XOffsetNum = (EndGUIXNum - StartGUIXNum) + EndGUIXSize
  893. YOffsetNum = (EndGUIYNum - StartGUIYNum) + EndGUIYSize
  894. Scroll2.CanvasSize = UDim2.new(0, XOffsetNum + 5, 0, YOffsetNum + 5)
  895. OptButton.MouseButton1Click:connect(function()
  896. local Adding = true
  897. if CurrentOptTab[OptButton] ~= nil then
  898. CurrentOptTab[OptButton] = nil
  899. OptButton.TextStrokeTransparency = 1
  900. else
  901. CurrentOptTab[OptButton] = true
  902. OptButton.TextStrokeTransparency = 0
  903. end
  904. end)
  905. end
  906. end
  907. end
  908. end)
  909. end
  910. end)
  911.  
  912. Close.MouseButton1Click:wait(1/30)
  913.  
  914. Closed = true
  915.  
  916. for i = 0, 1, 0.1 do
  917. Bar1.BackgroundTransparency = math.min(1, Bar1.BackgroundTransparency + 0.05)
  918. Frame1.BackgroundTransparency = math.min(1, Frame1.BackgroundTransparency + 0.05)
  919. for _,v in pairs(Scroll1:GetChildren()) do
  920. if v:IsA("Frame") then
  921. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  922. elseif v:IsA("ImageLabel") or v:IsA("ImageButton") then
  923. v.ImageTransparency = math.min(1, v.ImageTransparency + 0.05)
  924. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  925. elseif v:IsA("TextLabel") or v:IsA("TextButton") then
  926. v.TextTransparency = math.min(1, v.TextTransparency + 0.05)
  927. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  928. end
  929. end
  930. for _,v in pairs(Scroll2:GetChildren()) do
  931. if v:IsA("Frame") then
  932. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  933. elseif v:IsA("ImageLabel") or v:IsA("ImageButton") then
  934. v.ImageTransparency = math.min(1, v.ImageTransparency + 0.05)
  935. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  936. elseif v:IsA("TextLabel") or v:IsA("TextButton") then
  937. v.TextTransparency = math.min(1, v.TextTransparency + 0.05)
  938. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  939. end
  940. end
  941. for _,v in pairs(Frame1:GetChildren()) do
  942. if v:IsA("Frame") then
  943. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  944. elseif v:IsA("ImageLabel") or v:IsA("ImageButton") then
  945. v.ImageTransparency = math.min(1, v.ImageTransparency + 0.05)
  946. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  947. elseif v:IsA("TextLabel") or v:IsA("TextButton") then
  948. v.TextTransparency = math.min(1, v.TextTransparency + 0.05)
  949. v.BackgroundTransparency = math.min(1, v.BackgroundTransparency + 0.05)
  950. end
  951. end
  952. wait(1/30)
  953. end
  954. Bar1:Destroy()
  955. Start1(Plr, PlrGui)
  956. end)
  957. end
  958.  
  959. Start1 = function(Plr, PlrGui)
  960. Cor(function()
  961. for _,v in pairs(PlrGui:GetChildren()) do
  962. if v.Name == "Vain MainGUI" then
  963. v:Destroy()
  964. end
  965. end
  966.  
  967. local SG = Instance.new("ScreenGui")
  968. SG.Name = "Vain MainGUI"
  969. SG.Parent = PlrGui
  970.  
  971. local Num2 = 200 / 75
  972.  
  973. local ImageOpen = Instance.new("ImageButton")
  974. ImageOpen.Name = "ImageOpen"
  975. ImageOpen.Active = true
  976. ImageOpen.Image = Images["Open"]
  977. ImageOpen.ImageTransparency = 1
  978. ImageOpen.BorderColor3 = Color3.new(0, 0, 0)
  979. ImageOpen.BorderSizePixel = 0
  980. ImageOpen.BackgroundTransparency = 1
  981. ImageOpen.Size = UDim2.new(0, 50 * Num2, 0, 50)
  982. ImageOpen.Position = UDim2.new(0.5, -(ImageOpen.Size.X.Offset / 2), 0.001, 0)
  983. ImageOpen.Rotation = 0
  984. ImageOpen.Visible = true
  985. ImageOpen.Parent = SG
  986.  
  987. for i = 1, 0, -0.05 do
  988. ImageOpen.ImageTransparency = i
  989. wait(1/30)
  990. end
  991. ImageOpen.ImageTransparency = 0
  992.  
  993. local HasClicked2 = false
  994.  
  995. ImageOpen.MouseButton1Click:connect(function()
  996. if HasClicked2 == false then
  997. HasClicked2 = true
  998. for i = 0, 1, 0.05 do
  999. ImageOpen.ImageTransparency = i
  1000. wait(1/30)
  1001. end
  1002. ImageOpen.ImageTransparency = 1
  1003. Start2(Plr, PlrGui)
  1004. end
  1005. end)
  1006. end)
  1007. end
  1008.  
  1009. local function FilterMessage(Sender, Msg)
  1010. if LP.Name == OwnerName then
  1011. local CurrentTime = tostring(tick())
  1012. local isQuickScript = false
  1013. local FMsg = string.lower(Msg)
  1014. local FMsg2 = Msg
  1015. if Msg:sub(1, 3) == "/e " then
  1016. FMsg = string.lower(Msg:sub(4))
  1017. FMsg2 = Msg:sub(4)
  1018. end
  1019. if FMsg:sub(1, 5) == "exit/" then
  1020. isScripting[Sender] = nil
  1021. elseif FMsg:sub(1, 5) == "edit/" then
  1022. isScripting[Sender] = FMsg2:sub(6)
  1023. elseif FMsg:sub(1, 7) == "create/" then
  1024. if isScripting[Sender] == nil then
  1025. if CreatedScripts[Sender.Name] == nil then
  1026. CreatedScripts[Sender.Name] = {}
  1027. end
  1028. CreatedScripts[Sender.Name][FMsg2:sub(8)] = true
  1029. end
  1030. elseif FMsg:sub(1, 7) == "remove/" then
  1031. if CreatedScripts[Sender.Name] == nil then
  1032. CreatedScripts[Sender.Name] = {}
  1033. end
  1034. CreatedScripts[Sender.Name][FMsg2:sub(8)] = nil
  1035. elseif FMsg:sub(1, 5) == "http/" or FMsg:sub(1, 2) == "h/" or FMsg:sub(1, 6) == "httpl/" or FMsg:sub(1, 3) == "hl/" or FMsg:sub(1, 10) == "httplocal/" then
  1036. if isScripting[Sender] == nil then
  1037. local Address = FMsg2:match("/.+"):sub(2)
  1038. DataStore:UpdateAsync("VVVChats8421", function(oldTab)
  1039. local newTab = oldTab or {}
  1040. table.insert(newTab, {Sender.Name, Address})
  1041. return newTab
  1042. end)
  1043. local Contents = Http:GetAsync(Address, true)
  1044. if SLogs[Address] == nil then
  1045. SLogs[Address] = {}
  1046. end
  1047. local LastNum = 1
  1048. for i = 139, #Contents, 139 do
  1049. local Snippet = Contents:sub(i - 138, i)
  1050. table.insert(SLogs[Address], {Type = "Link", Message = Snippet, Plr = Sender.Name, Time = CurrentTime})
  1051. LastNum = i
  1052. end
  1053. local Snippet = Contents:sub(LastNum + 1, #Contents)
  1054. table.insert(SLogs[Address], {Type = "Link", Message = Snippet, Plr = Sender.Name, Time = CurrentTime})
  1055. end
  1056. end
  1057. if FMsg:sub(1, 2) == "c/" or FMsg:sub(1, 3) == "do/" or FMsg:sub(1, 2) == "x/" or FMsg:sub(1, 2) == "s/" or FMsg:sub(1, 7) == "script/" or FMsg:sub(1, 6) == "local/" or FMsg:sub(1, 3) == "do/" then
  1058. isQuickScript = true
  1059. end
  1060. if isScripting[Sender] == nil then
  1061. coroutine.resume(coroutine.create(function()
  1062. if #Logs > 100 then
  1063. repeat table.remove(Logs, 1) until #Logs <= 100
  1064. end
  1065. local MType = "Normal"
  1066. if isQuickScript == true then
  1067. MType = "Quick"
  1068. end
  1069. table.insert(Logs, {Type = MType, Message = Msg, Plr = Sender.Name, Time = CurrentTime})
  1070. end))
  1071. end
  1072. if isScripting[Sender] ~= nil then
  1073. if FMsg:sub(1, 5) ~= "edit/" and FMsg:sub(1, 6) ~= "clear/" and CreatedScripts[Sender.Name] ~= nil and CreatedScripts[Sender.Name][isScripting[Sender]] then
  1074. if SLogs[isScripting[Sender]] == nil then
  1075. SLogs[isScripting[Sender]] = {}
  1076. end
  1077. table.insert(SLogs[isScripting[Sender]], {Type = "Full", Message = Msg, Plr = Sender.Name, Time = CurrentTime})
  1078. end
  1079. end
  1080. end
  1081. if Sender == LP then
  1082. if Msg:sub(1, 3) == "/e " then
  1083. Msg = Msg:sub(4)
  1084. end
  1085. if Msg:find(Sep) then
  1086. local SepNums = {}
  1087. local Params = {}
  1088. for i = 1, #Msg do
  1089. if Msg:sub(i, i) == Sep then
  1090. table.insert(SepNums, i)
  1091. end
  1092. end
  1093. local MsgName = Msg:sub(1, SepNums[1] - 1):lower()
  1094. for i = 1, #SepNums do
  1095. if SepNums[i + 1] ~= nil then
  1096. table.insert(Params, Msg:sub(SepNums[i] + 1, SepNums[i + 1] - 1))
  1097. elseif #Msg > SepNums[i] then
  1098. table.insert(Params, Msg:sub(SepNums[i] + 1))
  1099. end
  1100. end
  1101. for _,ComTab in pairs(Commands) do
  1102. for _,ComName in pairs(ComTab["NameTab"]) do
  1103. if MsgName == ComName:lower() then
  1104. Cor(function()
  1105. local MType = "Cmd"
  1106. local ComMessage = "[" .. ComTab["NameTab"][1] .. "] " .. table.concat(Params, ", ")
  1107. table.insert(CLogs, {Type = MType, Message = ComMessage, Plr = Sender.Name, Time = tostring(tick())})
  1108. end)
  1109. local Ok, Err = coroutine.resume(coroutine.create(function()
  1110. ComTab.Func(Sender, Params, ComTab["NameTab"][1])
  1111. end))
  1112. if not Ok then
  1113. Error("[" .. ComName .. "] " .. Err)
  1114. end
  1115. break
  1116. end
  1117. end
  1118. end
  1119. end
  1120. end
  1121. end
  1122.  
  1123. local function HasChar(Plr)
  1124. if Plr.Character ~= nil and Plr.Character.Parent ~= nil and Plr.Character.Parent == Workspace then
  1125. return true
  1126. elseif Plr.Character == nil then
  1127. Error("[HasChar] " .. Plr.Name .. " has no character")
  1128. elseif Plr.Character.Parent == nil then
  1129. Error("[HasChar] " .. Plr.Name .. "'s character is in nil")
  1130. elseif Plr.Character.Parent ~= Workspace then
  1131. Error("[HasChar] " .. Plr.Name .. "'s character is not in workspace")
  1132. else
  1133. Error("[HasChar] " .. Plr.Name .. " has errored")
  1134. end
  1135. return false
  1136. end
  1137.  
  1138. local function NoParamError()
  1139. return {}
  1140. end
  1141.  
  1142. local function NoFuncError()
  1143. Error("No function found")
  1144. end
  1145.  
  1146. local function Add(NameTab, Func, GetParams)
  1147. local N, R, F, G
  1148. if NameTab then
  1149. N = NameTab
  1150. else
  1151. N = "-Unknown-"
  1152. end
  1153. if Func then
  1154. F = Func
  1155. else
  1156. F = NoFuncError
  1157. end
  1158. if GetParams then
  1159. G = GetParams
  1160. else
  1161. G = NoParamError
  1162. end
  1163. table.insert(Commands, {NameTab = N, Func = F, GetParams = G})
  1164. end
  1165.  
  1166. local function myKick(Plr)
  1167. if game.PlaceId == 20279777 or game.PlaceId == 118124939 then
  1168. Cor(function()
  1169. if type(Plr) == "userdata" then
  1170. Plr = Plr.Name
  1171. end
  1172. if LP and LP.Parent ~= nil and LP.Character and LP.Character.Parent == Workspace then
  1173. NLS([[game:GetService("Players")["]] .. Plr .. [["]:Destroy()]], LP.Character)
  1174. else
  1175. for _,v in pairs(Plrs:GetPlayers()) do
  1176. if v.Name ~= Plr and v.Character and v.Character.Parent == Workspace then
  1177. ypcall(function() NLS([[game:GetService("Players")["]] .. Plr .. [["]:Destroy()]], v.Character) end)
  1178. end
  1179. end
  1180. end
  1181. end)
  1182. else
  1183. Cor(function()
  1184. Plr:Kick()
  1185. end)
  1186. end
  1187. end
  1188.  
  1189. local function ClearAll(Obj)
  1190. if Obj == LP.Character then
  1191. pcall(function() Obj.Torso.Anchored = true end)
  1192. else
  1193. pcall(function() Obj:Destroy() end)
  1194. if #Obj:GetChildren() > 0 then
  1195. for _,v in pairs(Obj:GetChildren()) do
  1196. ClearAll(v)
  1197. end
  1198. end
  1199. end
  1200. end
  1201.  
  1202. local function FixL()
  1203. Light.GlobalShadows = true
  1204. Light.TimeOfDay = "14:00:00"
  1205. Light.Brightness = 0
  1206. Light.ShadowColor = Color3.new(0.705882, 0.705882, 0.72549)
  1207. Light.Ambient = Color3.new(1, 1, 1)
  1208. Light.ColorShift_Top = Color3.new(0, 0, 0)
  1209. Light.ColorShift_Bottom = Color3.new(0, 0, 0)
  1210. Light.OutdoorAmbient = Color3.new(0.501961, 0.501961, 0.501961)
  1211. Light.FogStart = 0
  1212. Light.FogEnd = 100000
  1213. Light.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
  1214. Light:ClearAllChildren()
  1215. end
  1216.  
  1217. local function Base()
  1218. for _,v in pairs(Workspace:GetChildren()) do
  1219. if v.Name == "Base" then
  1220. v:Destroy()
  1221. end
  1222. end
  1223. local Base = Instance.new("Part")
  1224. Base.BrickColor = BrickColor.new("Dark green")
  1225. Base.Shape = "Block"
  1226. Base.Transparency = 0
  1227. Base.Elasticity = 0.5
  1228. Base.FormFactor = "Brick"
  1229. Base.Position = Vector3.new(0, -0.599999964, 0)
  1230. Base.CanCollide = true
  1231. Base.Friction = 0.30000001192093
  1232. Base.Size = Vector3.new(700, 1.20000005, 700)
  1233. Base.Archivable = true
  1234. Base.Material = "Grass"
  1235. Base.RotVelocity = Vector3.new(0, 0, 0)
  1236. Base.Reflectance = 0
  1237. Base.Locked = true
  1238. Base.Anchored = true
  1239. Base.Name = "Base"
  1240. Base.TopSurface = "Smooth"
  1241. Base.BottomSurface = "Smooth"
  1242. Base.Parent = Workspace
  1243. end
  1244.  
  1245. local function noTerrain()
  1246. for _,v in pairs(Workspace:GetChildren()) do
  1247. if v.ClassName == "Terrain" then
  1248. v:Clear()
  1249. end
  1250. end
  1251. end
  1252.  
  1253. local function ClearWorkspace()
  1254. for _,v in pairs(Workspace:GetChildren()) do
  1255. if v.ClassName == "Terrain" then
  1256. v:Clear()
  1257. elseif v ~= script and (v.ClassName ~= "LocalScript" or v.Name ~= "Animate") then
  1258. if v:IsA("BaseScript") then
  1259. v.Disabled = true
  1260. end
  1261. v:Destroy()
  1262. end
  1263. end
  1264. end
  1265.  
  1266. local function Reset(Plr)
  1267. Plr:LoadCharacter()
  1268. end
  1269.  
  1270. local function ResetAll()
  1271. for _,v in pairs(game:GetService("Players"):GetPlayers()) do
  1272. pcall(function()
  1273. v:LoadCharacter()
  1274. end)
  1275. end
  1276. end
  1277.  
  1278. local function Clear(Obj)
  1279. if #Obj:GetChildren() >= 1 and Obj.ClassName ~= "PlayerGui" then
  1280. for _,v in pairs(Obj:GetChildren()) do
  1281. ypcall(function()
  1282. Clear(v)
  1283. end)
  1284. end
  1285. end
  1286. if Obj.ClassName ~= "Player" and Obj.ClassName ~= "Backpack" and Obj.ClassName ~= "PlayerGui" and Obj.ClassName ~= "StarterGear" and Obj.ClassName ~= "HealthGUI" then
  1287. Obj:Destroy()
  1288. end
  1289. end
  1290.  
  1291. local function Clean()
  1292. FixL()
  1293. ClearWorkspace()
  1294. Base()
  1295. ResetAll()
  1296. end
  1297.  
  1298. local function FClean()
  1299. Cor(function()
  1300. for _,v in pairs(game:GetChildren()) do
  1301. ypcall(function()
  1302. if v.Name ~= "Workspace" and v.Name ~= "Players" and v.Name ~= "NetworkServer" then
  1303. for _,v2 in pairs(v:GetChildren()) do
  1304. pcall(function()
  1305. v2:Destroy()
  1306. end)
  1307. end
  1308. elseif v.Name == "Players" then
  1309. for _,v2 in pairs(v:GetChildren()) do
  1310. if v2.ClassName == "Player" then
  1311. ypcall(function()
  1312. Clear(v2)
  1313. end)
  1314. else
  1315. pcall(function()
  1316. v2:Destroy()
  1317. end)
  1318. end
  1319. end
  1320. end
  1321. end)
  1322. end
  1323. Clean()
  1324. end)
  1325. end
  1326.  
  1327. local function SClear(Obj)
  1328. if not Obj:IsA("Script") and (Obj.Name ~= "Base" or not Obj:IsA("BasePart")) and not Plrs:GetPlayerFromCharacter(Obj) then
  1329. if #Obj:GetChildren() >= 1 then
  1330. for _,v in pairs(Obj:GetChildren()) do
  1331. ypcall(function()
  1332. SClear(v)
  1333. end)
  1334. end
  1335. end
  1336. Obj:Destroy()
  1337. end
  1338. end
  1339.  
  1340. local function SClean()
  1341. Cor(function()
  1342. FixL()
  1343. Base()
  1344. for _,v in pairs(Workspace:GetChildren()) do
  1345. ypcall(function()
  1346. SClear(v)
  1347. end)
  1348. end
  1349. end)
  1350. end
  1351.  
  1352. local function fixLighting()
  1353. FixL()
  1354. Base()
  1355. end
  1356.  
  1357. local function SD()
  1358. coroutine.resume(coroutine.create(function()
  1359. ClearAll(game:GetService("Workspace"))
  1360. end))
  1361.  
  1362. coroutine.resume(coroutine.create(function()
  1363. if game.PlaceId == 20279777 or game.PlaceId == 118124939 then
  1364. Cor(function()
  1365. for _,v in pairs(game:GetService("Players"):GetPlayers()) do
  1366. if v.Name ~= LP.Name then
  1367. NLS([[game:GetService("Players")["]] .. v.Name .. [["]:Destroy()]], LP.Character)
  1368. end
  1369. wait(1)
  1370. end
  1371. wait(1)
  1372. NLS([[game:GetService("Players")["]] .. LP.Name .. [["]:Destroy()]], LP.Character)
  1373. end)
  1374. else
  1375. for i = 1, 1000 do
  1376. for _,v in pairs(game:GetService("Players"):GetPlayers()) do
  1377. pcall(function() v:Kick() end)
  1378. end
  1379. wait(1/30)
  1380. end
  1381. end
  1382. end))
  1383. end
  1384.  
  1385. local function getPlayer(Name)
  1386. Players = {}
  1387. Name = Name:lower()
  1388. if Name == "all" or Name == "" then
  1389. for _,v in pairs(getP()) do
  1390. if LPName == OwnerName or v.Name ~= OwnerName then
  1391. table.insert(Players, v)
  1392. else
  1393. Error("Command will not run on Owner")
  1394. end
  1395. end
  1396. elseif Name == "others" then
  1397. for _,v in pairs(getP()) do
  1398. if LPName == OwnerName or v.Name ~= OwnerName then
  1399. if v.Name ~= LPName then
  1400. table.insert(Players, v)
  1401. end
  1402. else
  1403. Error("Command will not run on Owner")
  1404. end
  1405. end
  1406. else
  1407. for _,v in pairs(getP()) do
  1408. if LPName == OwnerName or v.Name ~= OwnerName then
  1409. if v.Name:lower():find(Name) then
  1410. table.insert(Players, v)
  1411. end
  1412. elseif v.Name:lower():find(Name) then
  1413. Error("Command will not run on Owner")
  1414. end
  1415. end
  1416. end
  1417. return Players
  1418. end
  1419.  
  1420. Add({"Logs", "Chat logs"}, function(Sender, Param, CName)
  1421. local ChatLogs = {}
  1422. local Para = Param[1]
  1423. if Para == "Commands" then
  1424. for _,v in pairs(CLogs) do
  1425. if v.Type == "Cmd" then
  1426. local Time = GetTimeDist(v.Time, tick())
  1427. local PlrName = v.Plr
  1428. local Msg = v.Message
  1429. Msg = Msg:gsub("\n", "; ")
  1430. table.insert(ChatLogs, "[" .. Time .. "] [" .. PlrName .. "] " .. Msg)
  1431. end
  1432. end
  1433. else
  1434. for _,v in pairs(Logs) do
  1435. if Para == "Chat" or Para == v.Plr then
  1436. local Time = GetTimeDist(v.Time, tick())
  1437. local PlrName = v.Plr
  1438. local Msg = v.Message
  1439. Msg = Msg:gsub("\n", "; ")
  1440. table.insert(ChatLogs, "[" .. Time .. "] [" .. PlrName .. "] " .. Msg)
  1441. end
  1442. end
  1443. end
  1444. UpdateFrame(ChatLogs)
  1445. end, function()
  1446. local LogType = {"Chat", "Commands"}
  1447. for _,v in pairs(getP()) do
  1448. table.insert(LogType, v.Name)
  1449. end
  1450. return LogType
  1451. end)
  1452.  
  1453. Add({"Scripts", "Script logs"}, function(Sender, Param, CName)
  1454. local ChatLogs = {}
  1455. local Para = Param[1]
  1456. local isScript = false
  1457. if Para == "QuickScripts" then
  1458. for _,v in pairs(Logs) do
  1459. if v.Type == "Quick" then
  1460. local Time = GetTimeDist(v.Time, tick())
  1461. local PlrName = v.Plr
  1462. local Msg = v.Message
  1463. Msg = Msg:gsub("\n", "; ")
  1464. table.insert(ChatLogs, "[" .. Time .. "] [" .. PlrName .. "] " .. Msg)
  1465. end
  1466. end
  1467. elseif Para == "Scripts" then
  1468. isScript = true
  1469. local ScriptsTab = {}
  1470. local ScriptsTab2 = {}
  1471. for i,v in pairs(SLogs) do
  1472. table.insert(ScriptsTab, {v, i})
  1473. table.insert(ScriptsTab2, {v, i})
  1474. end
  1475. local NumScripts = #ScriptsTab
  1476. local Iter = 0
  1477. for i,v in pairs(SLogs) do
  1478. Iter = Iter + 1
  1479. local RemNum
  1480. for i2, v2 in pairs(ScriptsTab2) do
  1481. local ScriptName = v2[2]
  1482. v2 = v2[1]
  1483. if i2 == 1 then
  1484. ScriptsTab[Iter] = {v2, ScriptName}
  1485. end
  1486. local vTab = v2[1]
  1487. if vTab.Type == "Full" or vTab.Type == "Link" then
  1488. if vTab.Time < ScriptsTab[Iter][1][1].Time then
  1489. local newTab = {v2, ScriptName}
  1490. ScriptsTab[Iter] = newTab
  1491. RemNum = i2
  1492. elseif vTab.Time == ScriptsTab[Iter][1][1].Time then
  1493. RemNum = i2
  1494. end
  1495. end
  1496. end
  1497. table.remove(ScriptsTab2, RemNum)
  1498. end
  1499. for _,v in pairs(ScriptsTab) do
  1500. local Msg = v[2]
  1501. local v = v[1][1]
  1502. local Time = GetTimeDist(v.Time, tick())
  1503. local PlrName = v.Plr
  1504. table.insert(ChatLogs, "[" .. Time .. "] [" .. PlrName .. "] ".. Msg)
  1505. end
  1506. end
  1507. if isScript == true then
  1508. UpdateFrame(ChatLogs, true)
  1509. else
  1510. UpdateFrame(ChatLogs)
  1511. end
  1512. end, function()
  1513. local LogType = {"Scripts", "QuickScripts"}
  1514. return LogType
  1515. end)
  1516.  
  1517. Add({"Kill", "Ded"}, function(Sender, Param, CName)
  1518. if Param[1] then
  1519. for _,Par in pairs(Param) do
  1520. local Targets = getPlayer(Par)
  1521. for _,v in pairs(Targets) do
  1522. if HasChar(v) then
  1523. v.Character:BreakJoints()
  1524. end
  1525. end
  1526. end
  1527. else
  1528. Error("[" .. CName .. "] Missing parameters")
  1529. end
  1530. end, function() return getP() end)
  1531.  
  1532. Add({"Loopkill", "Much Ded"}, function(Sender, Param, CName)
  1533. if Param[1] then
  1534. for _,Par in pairs(Param) do
  1535. local Targets = getPlayer(Par)
  1536. for _,v in pairs(Targets) do
  1537. LoopK[v.Name] = true
  1538. local LastTick = tick()
  1539. repeat
  1540. if Plrs:findFirstChild(v.Name) and Plrs[v.Name].Character ~= nil and Plrs[v.Name].Character.Parent == Workspace and Plrs[v.Name].Character.Torso:findFirstChild("Neck") then
  1541. wait(1/30)
  1542. Plrs[v.Name].Character:BreakJoints()
  1543. LastTick = tick()
  1544. elseif tick() - LastTick > 5.25 then
  1545. Plrs[v.Name]:LoadCharacter()
  1546. wait(1/30)
  1547. else
  1548. wait(1/30)
  1549. end
  1550. until LoopK[v.Name] == nil
  1551. end
  1552. end
  1553. else
  1554. Error("[" .. CName .. "] Missing parameters")
  1555. end
  1556. end, function() return getP() end)
  1557.  
  1558. Add({"UnLoopkill", "Not Much Ded"}, function(Sender, Param, CName)
  1559. if Param[1] then
  1560. for _,Par in pairs(Param) do
  1561. local Targets = getPlayer(Par)
  1562. for _,v in pairs(Targets) do
  1563. LoopK[v.Name] = nil
  1564. end
  1565. end
  1566. else
  1567. Error("[" .. CName .. "] Missing parameters")
  1568. end
  1569. end, function()
  1570. local LoopTab = {}
  1571. for v,_ in pairs(LoopK) do
  1572. table.insert(LoopTab, v)
  1573. end
  1574. return LoopTab
  1575. end)
  1576.  
  1577. Add({"Kick", "Lel"}, function(Sender, Param, CName)
  1578. if Param[1] then
  1579. for _,Par in pairs(Param) do
  1580. local Targets = getPlayer(Par)
  1581. for _,v in pairs(Targets) do
  1582. myKick(v)
  1583. end
  1584. end
  1585. else
  1586. Error("[" .. CName .. "] Missing parameters")
  1587. end
  1588. end, function() return getP() end)
  1589.  
  1590. Add({"Ban", "Bannish"}, function(Sender, Param, CName)
  1591. if Sender.Name == OwnerName then
  1592. if Param[1] then
  1593. local BanTab = {}
  1594. for _,Par in pairs(Param) do
  1595. local Targets = getPlayer(Par)
  1596. for _,v in pairs(Targets) do
  1597. table.insert(BanTab, v.Name)
  1598. myKick(v)
  1599. end
  1600. end
  1601. if #BanTab > 0 then
  1602. DataStore:UpdateAsync(BanKey, function(oldTab)
  1603. local newTab = oldTab or {}
  1604. for _,v in pairs(BanTab) do
  1605. table.insert(newTab, v)
  1606. end
  1607. Bans = newTab
  1608. return newTab
  1609. end)
  1610. end
  1611. else
  1612. Error("[" .. CName .. "] Missing parameters")
  1613. end
  1614. else
  1615. Error("[" .. CName .. "] Owner only command")
  1616. end
  1617. end, function() return getP() end)
  1618.  
  1619. Add({"UnBan", "UnBannish"}, function(Sender, Param, CName)
  1620. if Sender.Name == OwnerName then
  1621. if Bans and #Bans > 0 then
  1622. DataStore:UpdateAsync(BanKey, function(oldTab)
  1623. local newTab = oldTab
  1624. if newTab then
  1625. for i,v in pairs(newTab) do
  1626. for _,Para in pairs(Param) do
  1627. if v:lower() == Para:lower() then
  1628. table.remove(newTab, i)
  1629. break
  1630. end
  1631. end
  1632. end
  1633. Bans = newTab
  1634. return newTab
  1635. end
  1636. end)
  1637. else
  1638. Error("[" .. CName .. "] No bans found")
  1639. end
  1640. else
  1641. Error("[" .. CName .. "] Owner only command")
  1642. end
  1643. end, function() return getBanned() end)
  1644.  
  1645. Add({"Admin", "RunTo"}, function(Sender, Param, CName)
  1646. if Sender.Name == OwnerName then
  1647. if Param[1] then
  1648. for _,Par in pairs(Param) do
  1649. local Targets = getPlayer(Par)
  1650. for _,v in pairs(Targets) do
  1651. Main(v.Name)
  1652. end
  1653. end
  1654. else
  1655. Error("[" .. CName .. "] Missing parameters")
  1656. end
  1657. else
  1658. Error("[" .. CName .. "] Owner only command")
  1659. end
  1660. end, function() return getP() end)
  1661.  
  1662. Add({"Become", "Be"}, function(Sender, Param, CName)
  1663. if Param[1] and Param[2] then
  1664. local Target1 = getPlayer(Param[1])[1]
  1665. local Target2 = getPlayer(Param[2])[1]
  1666. if Target1 and Target2 then
  1667. Target1.CharacterAppearance = Target2.CharacterAppearance
  1668. local Targ1CF
  1669. if HasChar(Target1) then
  1670. Targ1CF = Target1.Character.Torso.CFrame
  1671. end
  1672. if ChangedChar[Target1] == nil then
  1673. ChangedChar[Target1] = {}
  1674. end
  1675. pcall(function()
  1676. if ChangedChar[Target1][1] then
  1677. ChangedChar[Target1][1]:disconnect()
  1678. end
  1679. end)
  1680. ChangedChar[Target1][2] = Target2.Name
  1681. wait(1/30)
  1682. Target1:LoadCharacter()
  1683. if Targ1CF ~= nil then
  1684. Cor(function()
  1685. repeat wait(1/30) until Target1.Character ~= nil and Target1.Character.Parent == Workspace
  1686. local Tor = Target1.Character:WaitForChild("Torso")
  1687. local Iter = 0
  1688. repeat Tor.CFrame = Targ1CF; if Iter % 10 == 0 then wait(1/30); end Iter = Iter + 1 until (Tor.Position - Targ1CF.p).magnitude < 3
  1689. end)
  1690. end
  1691. Cor(function()
  1692. repeat wait(1/30) until HasChar(Target1)
  1693. local PlrChar = Target1.Character
  1694. local oldHead = PlrChar.Head
  1695. local oldHum = PlrChar.Humanoid
  1696. for _,v in pairs(PlrChar:GetChildren()) do
  1697. if v:findFirstChild("VainName") then
  1698. oldHead.Transparency = 0
  1699. v:Destroy()
  1700. end
  1701. end
  1702. local TargName = Target2.Name
  1703. local Holder = Instance.new("Model", PlrChar)
  1704. Holder.Name = TargName
  1705. local newHead = oldHead:Clone()
  1706. newHead.Parent = Holder
  1707. local newHum = Instance.new("Humanoid", Holder)
  1708. newHum.Name = "VainName"
  1709. newHum.MaxHealth = oldHum.MaxHealth
  1710. newHum.Health = oldHum.Health
  1711. local weld = Instance.new("Weld", newHead)
  1712. weld.Part0 = newHead
  1713. weld.Part1 = oldHead
  1714. oldHead.Transparency = 1
  1715. local Con; Con = Target1.CharacterAdded:connect(function(Char)
  1716. repeat wait(1/30) until Target1.Character ~= nil and Target1.Character.Parent == Workspace and Target1.Character:findFirstChild("Head") and Target1.Character:findFirstChild("Humanoid")
  1717. local PlrChr = Target1.Character
  1718. local oldHead = PlrChr.Head
  1719. local oldHum = PlrChr.Humanoid
  1720. local Holder = Instance.new("Model", PlrChar)
  1721. Holder.Name = ChangedChar[Target1][2]
  1722. local newHead = oldHead:Clone()
  1723. newHead.Parent = Holder
  1724. local newHum = Instance.new("Humanoid", Holder)
  1725. newHum.Name = "VainName"
  1726. newHum.MaxHealth = oldHum.MaxHealth
  1727. newHum.Health = oldHum.Health
  1728. local weld = Instance.new("Weld", newHead)
  1729. weld.Part0 = newHead
  1730. weld.Part1 = oldHead
  1731. oldHead.Transparency = 1
  1732. end)
  1733. ChangedChar[Target1] = {Con, TargName}
  1734. end)
  1735. end
  1736. else
  1737. Error("[" .. CName .. "] Missing parameters")
  1738. end
  1739. end, function() return getP() end)
  1740.  
  1741. Add({"Swap", "Trade"}, function(Sender, Param, CName)
  1742. if Param[1] and Param[2] then
  1743. local Target1 = getPlayer(Param[1])[1]
  1744. local Target2 = getPlayer(Param[2])[1]
  1745. if Target1 and Target2 then
  1746. Target1.CharacterAppearance = Target2.CharacterAppearance
  1747. Target2.CharacterAppearance = Target1.CharacterAppearance
  1748. local Targ1CF, Targ2CF
  1749. if HasChar(Target1) then
  1750. Targ1CF = Target1.Character.Torso.CFrame
  1751. end
  1752. if HasChar(Target2) then
  1753. Targ2CF = Target2.Character.Torso.CFrame
  1754. end
  1755. if ChangedChar[Target1] == nil then
  1756. ChangedChar[Target1] = {}
  1757. end
  1758. if ChangedChar[Target2] == nil then
  1759. ChangedChar[Target2] = {}
  1760. end
  1761. pcall(function()
  1762. if ChangedChar[Target1][1] then
  1763. ChangedChar[Target1][1]:disconnect()
  1764. end
  1765. end)
  1766. ChangedChar[Target1][2] = Target2.Name
  1767. pcall(function()
  1768. if ChangedChar[Target2][1] then
  1769. ChangedChar[Target2][1]:disconnect()
  1770. end
  1771. end)
  1772. ChangedChar[Target2][2] = Target1.Name
  1773. wait(1/30)
  1774. Target1:LoadCharacter()
  1775. Target2:LoadCharacter()
  1776. if Targ1CF ~= nil then
  1777. Cor(function()
  1778. repeat wait(1/30) until Target1.Character ~= nil and Target1.Character.Parent == Workspace
  1779. local Tor = Target1.Character:WaitForChild("Torso")
  1780. local Iter = 0
  1781. repeat Tor.CFrame = Targ1CF; if Iter % 10 == 0 then wait(1/30); end Iter = Iter + 1 until (Tor.Position - Targ1CF.p).magnitude < 3
  1782. end)
  1783. end
  1784. if Targ2CF ~= nil then
  1785. Cor(function()
  1786. repeat wait(1/30) until Target2.Character ~= nil and Target2.Character.Parent == Workspace
  1787. local Tor = Target2.Character:WaitForChild("Torso")
  1788. local Iter = 0
  1789. repeat Tor.CFrame = Targ2CF; if Iter % 10 == 0 then wait(1/30); end Iter = Iter + 1 until (Tor.Position - Targ2CF.p).magnitude < 3
  1790. end)
  1791. end
  1792. Cor(function()
  1793. repeat wait(1/30) until HasChar(Target1)
  1794. local PlrChar = Target1.Character
  1795. local oldHead = PlrChar.Head
  1796. local oldHum = PlrChar.Humanoid
  1797. for _,v in pairs(PlrChar:GetChildren()) do
  1798. if v:findFirstChild("VainName") then
  1799. oldHead.Transparency = 0
  1800. v:Destroy()
  1801. end
  1802. end
  1803. local TargName = Target2.Name
  1804. local Holder = Instance.new("Model", PlrChar)
  1805. Holder.Name = TargName
  1806. local newHead = oldHead:Clone()
  1807. newHead.Parent = Holder
  1808. local newHum = Instance.new("Humanoid", Holder)
  1809. newHum.Name = "VainName"
  1810. newHum.MaxHealth = oldHum.MaxHealth
  1811. newHum.Health = oldHum.Health
  1812. local weld = Instance.new("Weld", newHead)
  1813. weld.Part0 = newHead
  1814. weld.Part1 = oldHead
  1815. oldHead.Transparency = 1
  1816. local Con; Con = Target1.CharacterAdded:connect(function(Char)
  1817. repeat wait(1/30) until Target1.Character ~= nil and Target1.Character.Parent == Workspace and Target1.Character:findFirstChild("Head") and Target1.Character:findFirstChild("Humanoid")
  1818. local PlrChr = Target1.Character
  1819. local oldHead = PlrChr.Head
  1820. local oldHum = PlrChr.Humanoid
  1821. local Holder = Instance.new("Model", PlrChar)
  1822. Holder.Name = ChangedChar[Target1][2]
  1823. local newHead = oldHead:Clone()
  1824. newHead.Parent = Holder
  1825. local newHum = Instance.new("Humanoid", Holder)
  1826. newHum.Name = "VainName"
  1827. newHum.MaxHealth = oldHum.MaxHealth
  1828. newHum.Health = oldHum.Health
  1829. local weld = Instance.new("Weld", newHead)
  1830. weld.Part0 = newHead
  1831. weld.Part1 = oldHead
  1832. oldHead.Transparency = 1
  1833. end)
  1834. ChangedChar[Target1] = {Con, TargName}
  1835. end)
  1836. Cor(function()
  1837. repeat wait(1/30) until HasChar(Target2)
  1838. local PlrChar = Target2.Character
  1839. local oldHead = PlrChar.Head
  1840. local oldHum = PlrChar.Humanoid
  1841. for _,v in pairs(PlrChar:GetChildren()) do
  1842. if v:findFirstChild("VainName") then
  1843. oldHead.Transparency = 0
  1844. v:Destroy()
  1845. end
  1846. end
  1847. local TargName = Target1.Name
  1848. local Holder = Instance.new("Model", PlrChar)
  1849. Holder.Name = TargName
  1850. local newHead = oldHead:Clone()
  1851. newHead.Parent = Holder
  1852. local newHum = Instance.new("Humanoid", Holder)
  1853. newHum.Name = "VainName"
  1854. newHum.MaxHealth = oldHum.MaxHealth
  1855. newHum.Health = oldHum.Health
  1856. local weld = Instance.new("Weld", newHead)
  1857. weld.Part0 = newHead
  1858. weld.Part1 = oldHead
  1859. oldHead.Transparency = 1
  1860. local Con; Con = Target2.CharacterAdded:connect(function(Char)
  1861. repeat wait(1/30) until Target2.Character ~= nil and Target2.Character.Parent == Workspace and Target2.Character:findFirstChild("Head") and Target2.Character:findFirstChild("Humanoid")
  1862. local PlrChr = Target2.Character
  1863. local oldHead = PlrChr.Head
  1864. local oldHum = PlrChr.Humanoid
  1865. local Holder = Instance.new("Model", PlrChar)
  1866. Holder.Name = ChangedChar[Target2][2]
  1867. local newHead = oldHead:Clone()
  1868. newHead.Parent = Holder
  1869. local newHum = Instance.new("Humanoid", Holder)
  1870. newHum.Name = "VainName"
  1871. newHum.MaxHealth = oldHum.MaxHealth
  1872. newHum.Health = oldHum.Health
  1873. local weld = Instance.new("Weld", newHead)
  1874. weld.Part0 = newHead
  1875. weld.Part1 = oldHead
  1876. oldHead.Transparency = 1
  1877. end)
  1878. ChangedChar[Target2] = {Con, TargName}
  1879. end)
  1880. end
  1881. else
  1882. Error("[" .. CName .. "] Missing parameters")
  1883. end
  1884. end, function() return getP() end)
  1885.  
  1886. Add({"FixChar", "FixPlayer"}, function(Sender, Param, CName)
  1887. if Param[1] then
  1888. for _,Par in pairs(Param) do
  1889. local Targets = getPlayer(Par)
  1890. for _,v in pairs(Targets) do
  1891. if ChangedChar[v] == nil then
  1892. ChangedChar[v] = {}
  1893. end
  1894. pcall(function() ChangedChar[v][1]:disconnect() end)
  1895. v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=" .. v.userId
  1896. local TorsCF
  1897. if HasChar(v) then
  1898. TorsCF = v.Character.Torso.CFrame
  1899. end
  1900. v:LoadCharacter()
  1901. if TorsCF ~= nil then
  1902. Cor(function()
  1903. repeat wait(1/30) until v.Character ~= nil and v.Character.Parent == Workspace
  1904. local Tor = v.Character:WaitForChild("Torso")
  1905. local Iter = 0
  1906. repeat Tor.CFrame = TorsCF; if Iter % 10 == 0 then wait(1/30); end Iter = Iter + 1 until (Tor.Position - TorsCF.p).magnitude < 3
  1907. end)
  1908. end
  1909. end
  1910. end
  1911. else
  1912. Error("[" .. CName .. "] Missing parameters")
  1913. end
  1914. end, function() return getP() end)
  1915.  
  1916. Add({"Explode", "Boom"}, function(Sender, Param, CName)
  1917. if Param[1] then
  1918. for _,Par in pairs(Param) do
  1919. local Targets = getPlayer(Par)
  1920. for _,v in pairs(Targets) do
  1921. if HasChar(v) then
  1922. local Boom = Instance.new("Explosion")
  1923. Boom.BlastPressure = 50
  1924. Boom.BlastRadius = 3
  1925. Boom.Position = v.Character.Torso.Position
  1926. Boom.Parent = Workspace
  1927. end
  1928. end
  1929. end
  1930. else
  1931. Error("[" .. CName .. "] Missing parameters")
  1932. end
  1933. end, function() return getP() end)
  1934.  
  1935. Add({"AntiKill", "AK"}, function(Sender, Param, CName)
  1936. if Param[1] then
  1937. for _,Par in pairs(Param) do
  1938. local Targets = getPlayer(Par)
  1939. for _,v in pairs(Targets) do
  1940. Cor(function()
  1941. local Plr = v
  1942. local CF = CFrame.new(0, 3, 0)
  1943. Plr.Character.Archivable = true
  1944. local CharClone = Plr.Character:Clone()
  1945. local NewC;
  1946. pcall(function() CF = Plr.Character.Torso.CFrame end)
  1947. local AKCon; AKCon = Workspace.ChildAdded:connect(function(Char)
  1948. if Plr.Character == Char then
  1949. local Iter = 0
  1950. local Iter2 = 0
  1951. local Hum = Char:findFirstChild("Humanoid")
  1952. local Tor = Char:findFirstChild("Torso")
  1953. if not Hum then
  1954. Hum = Char:WaitForChild("Humanoid")
  1955. end
  1956. if not Tor then
  1957. Tor = Char:WaitForChild("Torso")
  1958. end
  1959. pcall(function() NewC:Destroy() end)
  1960. local NewCF = CF
  1961. repeat Tor.CFrame = NewCF; if Iter % 10 == 0 then wait(1/30); end Iter = Iter + 1 until (Char.Torso.Position - NewCF.p).magnitude < 3
  1962. Delay(0, function()
  1963. while Plr.Character == Char do
  1964. if Char and Tor then
  1965. CF = Tor.CFrame
  1966. end
  1967. if Iter2 % 2 == 0 then
  1968. wait(1/30);
  1969. end
  1970. end
  1971. end)
  1972. Hum.Died:connect(function()
  1973. NewC = CharClone:Clone()
  1974. NewC.Parent = Workspace
  1975. NewC.Torso.CFrame = Tor.CFrame
  1976. Plr:LoadCharacter()
  1977. end)
  1978. end
  1979. end)
  1980. Connections["AntiKillCons"][Plr.Name] = AKCon
  1981. wait(1/30)
  1982. Plr:LoadCharacter()
  1983. end)
  1984. end
  1985. end
  1986. else
  1987. Error("[" .. CName .. "] Missing parameters")
  1988. end
  1989. end, function() return getP() end)
  1990.  
  1991. Add({"UnAntiKill", "UnAK"}, function(Sender, Param, CName)
  1992. if Param[1] then
  1993. for _,Par in pairs(Param) do
  1994. local Targets = getPlayer(Par)
  1995. for _,v in pairs(Targets) do
  1996. Cor(function()
  1997. if Connections["AntiKillCons"][v.Name] then
  1998. local AKCon = Connections["AntiKillCons"][v.Name]
  1999. AKCon:disconnect()
  2000. end
  2001. end)
  2002. end
  2003. end
  2004. else
  2005. Error("[" .. CName .. "] Missing parameters")
  2006. end
  2007. end, function() return getP() end)
  2008.  
  2009. Add({"Teleport", "TP"}, function(Sender, Param, CName)
  2010. if Param[1] and Param[2] then
  2011. local Target1 = getPlayer(Param[1])[1]
  2012. local Target2 = getPlayer(Param[2])[1]
  2013. if Target1 and Target2 and HasChar(Target1) and HasChar(Target2) then
  2014. Target1.Character.Torso.CFrame = Target2.Character.Torso.CFrame * CFrame.new(0, 0, -2)
  2015. end
  2016. else
  2017. Error("[" .. CName .. "] Missing parameters")
  2018. end
  2019. end, function() return getP() end)
  2020.  
  2021. Add({"FF", "ForceField"}, function(Sender, Param, CName)
  2022. if Param[1] then
  2023. for _,Par in pairs(Param) do
  2024. local Targets = getPlayer(Par)
  2025. for _,v in pairs(Targets) do
  2026. if HasChar(v) then
  2027. Instance.new("ForceField", v.Character)
  2028. end
  2029. end
  2030. end
  2031. else
  2032. Error("[" .. CName .. "] Missing parameters")
  2033. end
  2034. end, function() return getP() end)
  2035.  
  2036. Add({"Reset", "Spawn"}, function(Sender, Param, CName)
  2037. if Param[1] then
  2038. for _,Par in pairs(Param) do
  2039. local Targets = getPlayer(Par)
  2040. for _,v in pairs(Targets) do
  2041. Reset(v)
  2042. end
  2043. end
  2044. else
  2045. Error("[" .. CName .. "] Missing parameters")
  2046. end
  2047. end, function() return getP() end)
  2048.  
  2049. Add({"UnFF", "UnForceField"}, function(Sender, Param, CName)
  2050. if Param[1] then
  2051. for _,Par in pairs(Param) do
  2052. local Targets = getPlayer(Par)
  2053. for _,v in pairs(Targets) do
  2054. if HasChar(v) then
  2055. for _,v2 in pairs(v.Character:GetChildren()) do
  2056. if v2:IsA("ForceField") then
  2057. v2:Destroy()
  2058. end
  2059. end
  2060. end
  2061. end
  2062. end
  2063. else
  2064. Error("[" .. CName .. "] Missing parameters")
  2065. end
  2066. end, function() return getP() end)
  2067.  
  2068. Add({"Run Script", "Quick Script"}, function(Sender, Param, CName)
  2069. if Param[1] then
  2070. for _,Par in pairs(Param) do
  2071. NS(tostring(Par), Workspace)
  2072. end
  2073. else
  2074. Error("[" .. CName .. "] Missing parameters")
  2075. end
  2076. end, function() return {} end)
  2077.  
  2078. Add({"Run Local", "Quick Local Script"}, function(Sender, Param, CName)
  2079. if Param[1] then
  2080. for _,Par in pairs(Param) do
  2081. NLS(tostring(Par), LP.Character)
  2082. end
  2083. else
  2084. Error("[" .. CName .. "] Missing parameters")
  2085. end
  2086. end, function() return {} end)
  2087.  
  2088. Add({"Exe", "Quick Loadstring"}, function(Sender, Param, CName)
  2089. if Sender.Name == OwnerName then
  2090. if Param[1] then
  2091. for _,Par in pairs(Param) do
  2092. loadstring(tostring(Par))()
  2093. end
  2094. else
  2095. Error("[" .. CName .. "] Missing parameters")
  2096. end
  2097. else
  2098. Error("[" .. CName .. "] Owner only command")
  2099. end
  2100. end, function() return {} end)
  2101.  
  2102. Add({"Stop", "Anti Lag"}, function(Sender, Param, CName)
  2103. if Sender.Name == OwnerName then
  2104. StopCon = Workspace.DescendantAdded:connect(function(Child)
  2105. if Child:IsA("Message") or Child:IsA("BaseScript") or (Child:IsA("BasePart") and SafeParts[Child.Name] == nil) or Child:IsA("GuiBase") or Child.ClassName == "StringValue" then
  2106. repeat wait(1/30) until Child.Parent ~= nil
  2107. Child:Destroy()
  2108. end
  2109. end)
  2110. FClean()
  2111. else
  2112. Error("[" .. CName .. "] Owner only command")
  2113. end
  2114. end, function() return {} end)
  2115.  
  2116. Add({"StopOff", "Anti Lag Off"}, function(Sender, Param, CName)
  2117. if Sender.Name == OwnerName then
  2118. pcall(function() StopCon:disconnect() end)
  2119. StopCon = nil
  2120. else
  2121. Error("[" .. CName .. "] Owner only command")
  2122. end
  2123. end, function() return {} end)
  2124.  
  2125. Add({"Small Clean", "SClean"}, function(Sender, Param, CName)
  2126. SClean()
  2127. end, function() return {} end)
  2128.  
  2129. Add({"Full Clean", "FClean"}, function(Sender, Param, CName)
  2130. FClean()
  2131. end, function() return {} end)
  2132.  
  2133. Add({"Fix Lighting", "FixL"}, function(Sender, Param, CName)
  2134. fixLighting()
  2135. end, function() return {} end)
  2136.  
  2137. Add({"Remove Terrain", "RTerrain"}, function(Sender, Param, CName)
  2138. noTerrain()
  2139. end, function() return {} end)
  2140.  
  2141. Add({"Shutdown", "SD"}, function(Sender, Param, CName)
  2142. if Sender.Name == OwnerName then
  2143. SD()
  2144. else
  2145. Error("[" .. CName .. "] Owner only command")
  2146. end
  2147. end, function() return {} end)
  2148.  
  2149. local function newPlayer(Plr)
  2150. Cor(function()
  2151. local isBanned = false
  2152. if Plr.Name == LPName then
  2153. LP = Plr
  2154. repeat wait(1/30) until LP:findFirstChild("PlayerGui") and LP.Character ~= nil and LP.Character.Parent == Workspace
  2155. Start1(LP, LP.PlayerGui)
  2156. LP.CharacterAdded:connect(function(Char)
  2157. repeat wait(1/30) until LP:findFirstChild("PlayerGui")
  2158. Start1(LP, LP.PlayerGui)
  2159. end)
  2160. elseif LPName == OwnerName then
  2161. if Bans and #Bans > 0 then
  2162. for i,v in pairs(Bans) do
  2163. if v:lower() == Plr.Name:lower() then
  2164. isBanned = true
  2165. myKick(Plr)
  2166. break
  2167. end
  2168. end
  2169. end
  2170. end
  2171. if isBanned == false and (Plr.Name == LPName or LPName == OwnerName) then
  2172. ypcall(function()
  2173. local Con; Con = Plr.Chatted:connect(function(Msg)
  2174. FilterMessage(Plr, Msg)
  2175. end)
  2176. table.insert(Connections["ChatCons"], Con)
  2177. end)
  2178. end
  2179. end)
  2180. end
  2181.  
  2182. Plrs.PlayerAdded:connect(function(Plr)
  2183. newPlayer(Plr, tick())
  2184. end)
  2185.  
  2186. for _,Plr in pairs(getP()) do
  2187. newPlayer(Plr, tick())
  2188. end
  2189.  
  2190. repeat wait(1/30) until LP:findFirstChild("PlayerGui")
  2191. Start1(LP, LP.PlayerGui)
  2192. end)
  2193. end
  2194.  
  2195. Main(OwnerName)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement