InTesting

SK4 except you go away

Jul 11th, 2019
329
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 11.68 KB | None | 0 0
  1. print'https://pastebin.com/mjCKJi2N'local function a(b)local c=game:GetService("Players")local d=game:GetService("RunService")local e=game:GetService("ReplicatedStorage")local f=game:GetService("ServerStorage")local g=game:GetService("ServerScriptService")local h={}local i=b:FindFirstChildWhichIsA'PlayerGui'if i and d:IsServer()then local j=Instance.new("ScreenGui",i)j.ResetOnSpawn=false;j.Name='8FaT_Admin'local k=Instance.new("Frame",j)k.Position=UDim2.new(.5,0,0,0)k.Size=UDim2.new(.5,0,1,0)k.ClipsDescendants=true;local l=Instance.new("ScrollingFrame",k)l.Position=UDim2.new(0,0,.125,0)l.Size=UDim2.new(1,0,.875,0)local m=Instance.new("TextButton",k)m.Size=UDim2.new(1,0,.125,0)m.Text="SK4: The Overused Admin Killer"local n=Instance.new("ScrollingFrame",k)n.Position=UDim2.new(1,0,.125,0)n.Size=UDim2.new(1,0,.875,0)local o=Instance.new("TextButton",l)o.Text='Start searching for admin goodies'local p=true;local q=1;local r=false;local function s(t)if t~=nil then if typeof(t)~='userdata'then if t.Parent~=nil then return t end end end end;local function u(v,w)for x,y in pairs(w)do if y==v then return y end end end;local function z(A,B)for x,y in pairs(B:GetChildren())do if y~=A then y.Position=y.Position+UDim2.new(0,0,0,50)end end;B.CanvasSize=B.CanvasSize+UDim2.new(0,0,0,0)A.Size=UDim2.new(1,0,0,50)end;local function C()p=not p;if p==false then k:TweenPosition(UDim2.new(.5,0,1-.125,0))else k:TweenPosition(UDim2.new(.5,0,0,0))end end;local function D(t)t.BackgroundColor3=Color3.new(0,0,0)t.BorderColor3=Color3.new(255,255,255)if u(t.ClassName,{'TextLabel','TextBox','TextButton'})then t.TextColor3=Color3.new(255,255,255)t.TextScaled=true;t.Font=Enum.Font.Code elseif t:IsA'ScrollingFrame'then t.ScrollingDirection=Enum.ScrollingDirection.Y;t.ScrollBarThickness=0 end end;local function E(b,F,G)local H={b.UserId,F,G}table.insert(h,H)local function I(J)wait(2)local K=J:FindFirstChild'Head'local L=c:GetPlayerFromCharacter(J)if K then if K:FindFirstChild'8Tainted_From_Function'==nil then local M=Instance.new("BillboardGui",K)M.ExtentsOffsetWorldSpace=Vector3.new(0,10,0)M.Name='8Tainted_From_Function'if G then M.PlayerToHideFrom=b end;M.Size=UDim2.new(10,0,5,0)local N=Instance.new("TextLabel",M)N.BackgroundTransparency=1;N.Size=UDim2.new(1,0,1,0)N.Font=Enum.Font.Code;N.Text=F;N.TextColor3=Color3.new(255,255,255)N.TextScaled=true;N.TextStrokeTransparency=0 end end end;I(b.Character)b.CharacterAdded:Connect(I)end;local function O(P)for x,y in pairs(k:GetChildren())do if y:IsA'ScrollingFrame'then y:TweenPosition(y.Position+UDim2.new(q-P,0,0,0))end end;q=P end;local function Q()local R=Instance.new("TextButton",l)R.Text='Literally the same admin youre using rn'z(R,l)end;local function S()local T=true;local R=Instance.new("TextButton",l)R.Text='HD Admin'z(R,l)wait(1)R.MouseButton1Click:Connect(function()if T and r then local U=Instance.new("TextButton",n)U.Text='Back'z(U,n)local V=Instance.new("TextButton",n)V.Text='Destroy HD Guis'z(V,n)local W=Instance.new("TextButton",n)W.Text='Destroy HD Morphs'z(W,n)local X=Instance.new("TextButton",n)X.Text='Destroy HD Remotes/Close Communication between Client and Server'z(X,n)T=false;O(2)wait(1)T=true;U.MouseButton1Click:Connect(function()if T then T=false;O(1)wait(1)n:ClearAllChildren()T=true end end)V.MouseButton1Click:Connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then if y.Name=='HDAdminGUIs'then y:Destroy()end end end;wait(1)T=true end end)W.MouseButton1Click:connect(function()if T then for x,y in pairs(f:GetDescendants())do if y.Name=='Morphs'and y:IsA'Folder'then y:ClearAllChildren()end end end end)X.MouseButton1Click:Connect(function()if T then for x,y in pairs(e:GetDescendants())do if y:IsA'Folder'and y.Name=='Signals'and y.Parent~=nil then if y.Parent:IsA'Folder'and y.Parent.Name=='HDAdminClient'then y:ClearAllChildren()end end end end end)end end)end;local function Y()local T=true;local R=Instance.new("TextButton",l)R.Text='Kohls Admin'z(R,l)wait(1)R.MouseButton1Click:Connect(function()if T and r then local U=Instance.new("TextButton",n)U.Text='Back'z(U,n)local V=Instance.new("TextButton",n)V.Text='Destroy Khols Admin Script'z(V,n)local Z=Instance.new("TextButton",n)Z.Text='Destroy Remotes/Destroy Communication between Client and server'z(Z,n)T=false;O(2)wait(1)T=true;U.MouseButton1Click:Connect(function()if T then T=false;O(1)wait(1)n:ClearAllChildren()T=true end end)V.MouseButton1Click:Connect(function()if T then T=false;for x,y in pairs(g:GetDescendants())do if s(y)then if y.Name=="Kohl's Admin Infinite"and y:IsA'Script'then y.Disabled=true;wait(.1)y:Destroy()end end end;wait(1)T=true end end)Z.MouseButton1Click:Connect(function()if T then T=false;for x,y in pairs(e:GetDescendants())do if s(y)then if u(y.Name,{'b','b',[[b
  2. 
  3.                                     ]]})then y:Destroy()end end end;wait(1)T=true end end)end end)end;local function _()local T=true;local R=Instance.new("TextButton",l)R.Text='Kuros Admin'z(R,l)wait(1)R.MouseButton1Click:Connect(function()if T and r then local U=Instance.new("TextButton",n)U.Text='Back'z(U,n)local Z=Instance.new("TextButton",n)Z.Text='Destroy Remotes/Destroy Communication between Client and server'z(Z,n)T=false;O(2)wait(1)T=true;U.MouseButton1Click:Connect(function()if T then T=false;O(1)wait(1)n:ClearAllChildren()T=true end end)Z.MouseButton1Click:Connect(function()if T then T=false;for x,y in pairs(e:GetDescendants())do if s(y)then if u(y.Name,{"Kurokku's Admin Events"})then y:ClearAllChildren()end end end;wait(1)T=true end end)end end)end;local function a0()local T=true;local R=Instance.new("TextButton",l)R.Text='Core Admin (not working rn)'z(R,l)wait(1)R.MouseButton1Click:Connect(function()if T and r then local U=Instance.new("TextButton",n)U.Text='Back'z(U,n)local Z=Instance.new("TextButton",n)Z.Text='Destroy Remotes/Destroy Communication between Client and server'z(Z,n)T=false;O(2)wait(1)T=true;U.MouseButton1Click:Connect(function()if T then T=false;O(1)wait(1)n:ClearAllChildren()T=true end end)Z.MouseButton1Click:Connect(function()if T then T=false;for x,y in pairs(e:GetDescendants())do if s(y)then if u(y.Name,{"Kurokku's Admin Events"})then y:ClearAllChildren()end end end;wait(1)T=true end end)end end)end;local function a1()local T=true;local R=Instance.new("TextButton",l)R.Text='Infinite Yield'z(R,l)wait(1)R.MouseButton1Click:Connect(function()if T and r then local U=Instance.new("TextButton",n)U.Text='Back'z(U,n)local Z=Instance.new("TextButton",n)Z.Text='Destroy IY Guis'z(Z,n)local a2=Instance.new("TextButton",n)a2.Text='Taint users with IY Gui(To all)'z(a2,n)local a3=Instance.new("TextButton",n)a3.Text='Taint users with IY Gui(Away from IY user)'z(a3,n)local a4=Instance.new("TextButton",n)a4.Text='Remove the main command bar from IY users.'z(a4,n)T=false;O(2)wait(1)T=true;U.MouseButton1Click:Connect(function()if T then T=false;O(1)wait(1)n:ClearAllChildren()T=true end end)Z.MouseButton1Click:Connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then local a5=y:FindFirstAncestorWhichIsA'Player'if y:IsA'ScreenGui'and y.Name=='IY_GUI'and a5 then if a5.UserId~=110345115 then y:Destroy()end end end end;wait(1)T=true end end)a2.MouseButton1Click:connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then local a5=y:FindFirstAncestorWhichIsA'Player'if y:IsA'ScreenGui'and y.Name=='IY_GUI'and a5 then if a5.UserId~=110345115 then E(a5,'This user has Infinite Yield')end end end end;wait(1)T=true end end)a3.MouseButton1Click:connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then local a5=y:FindFirstAncestorWhichIsA'Player'if y:IsA'ScreenGui'and y.Name=='IY_GUI'and a5 then if a5~=110345115 then E(a5,'This user has Infinite Yield',true)end end end end;wait(1)T=true end end)a4.MouseButton1Click:connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then local a5=y:FindFirstAncestorWhichIsA'Player'if y:IsA'ScreenGui'and y.Name=='IY_GUI'and a5 then local a6=y:FindFirstChild'Cmdbar'if a6 and a5.UserId~=110345115 then a6:Destroy()end end end end;wait(1)T=true end end)end end)end;local function a7()local T=true;local R=Instance.new("TextButton",l)R.Text='Quantom Admin'z(R,l)wait(1)R.MouseButton1Click:Connect(function()if T and r then local U=Instance.new("TextButton",n)U.Text='Back'z(U,n)local Z=Instance.new("TextButton",n)Z.Text='Destroy Quantom Guis'z(Z,n)local a2=Instance.new("TextButton",n)a2.Text='Taint users with Quantom LS(To all)'z(a2,n)local a3=Instance.new("TextButton",n)a3.Text='Taint users with Quantom LS(Away from Quantom user)'z(a3,n)local a4=Instance.new("TextButton",n)a4.Text='Remove the main command bar from Quantom users.'z(a4,n)local a8=Instance.new("TextButton",n)a8.Text='Remove remotes/destroy client to server connection.'z(a8,n)T=false;O(2)wait(1)T=true;U.MouseButton1Click:Connect(function()if T then T=false;O(1)wait(1)n:ClearAllChildren()T=true end end)Z.MouseButton1Click:Connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then if y:IsA'ScreenGui'and y.Name=='QuantomUI'then y:Destroy()end end end;wait(1)T=true end end)a2.MouseButton1Click:connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then if y.Parent:IsA'ScreenGui'and y.Parent.Name=='QuantomUI'and y:FindFirstAncestorWhichIsA'Player'and y:IsA'LocalScript'then E(y:FindFirstAncestorWhichIsA'Player','This user has Quantom Admin')end end end;wait(1)T=true end end)a3.MouseButton1Click:connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then if y.Parent:IsA'ScreenGui'and y.Parent.Name=='QuantomUI'and y:FindFirstAncestorWhichIsA'Player'and y:IsA'LocalScript'then E(y:FindFirstAncestorWhichIsA'Player','This user has Quantom Admin',true)end end end;wait(1)T=true end end)a4.MouseButton1Click:connect(function()if T then T=false;for x,y in pairs(c:GetDescendants())do if s(y)then if y.Parent:IsA'ScreenGui'and y.Parent.Name=='QuantomUI'and y:FindFirstAncestorWhichIsA'Player'and y.Name=='CommandBar'then y:Destroy()end end end;wait(1)T=true end end)a8.MouseButton1Click:connect(function()if T then for x,y in pairs(e:GetDescendants())do if s(y)then if y.Name=='CommandActivate'and y:IsA'RemoteEvent'then y:Destroy()end end end end end)end end)end;local function a9()n:ClearAllChildren()for x,y in pairs(l:GetChildren())do if y~=o then y:Destroy()end end;o.Position=UDim2.new(0,0,0,0)local aa=0;local ab={}local ac={}for x,y in pairs(c:GetDescendants())do if s(y)then if y.Name=='8FaT_Admin'and y~=j then aa=aa+1;table.insert(ab,{'Literally the same admin youre using rn',Q})elseif y:IsA'ScreenGui'and y.Name=='IY_GUI'then aa=aa+1;table.insert(ab,{'Infinite Yield',a1})elseif y:IsA'LocalScript'and y.Parent.Name=='QuantomUI'then aa=aa+1;table.insert(ab,{'Quantom',a7})end end end;for x,y in pairs(e:GetDescendants())do if s(y)then if y.Name=='HDAdminClient'and y:IsA'Folder'then aa=aa+1;table.insert(ab,{'HD Admin',S})elseif y.Name=="Kurokku's Admin Events"and y:IsA'Folder'then end end end;for x,y in pairs(g:GetDescendants())do if s(y)then if y:IsA'Script'and y.Name=="Kohl's Admin Infinite"then aa=aa+1;table.insert(ab,{'Kohls Admin',Y})end end end;for x,y in pairs(workspace:GetDescendants())do if s(y)then if y.Name=="Kuro's Admin"and y:IsA'Model'then aa=aa+1;table.insert(ab,{'Kuros Admin',_})end end end;O(0)wait(1)for x,y in pairs(ab)do if u(y[1],ac)==nil then if y[2]then y[2]()end;table.insert(ac,y[1])end end;O(1)r=true;if aa==0 then end end;local function ad(ae)local a5=c:GetPlayerFromCharacter(ae)end;local function af(a5)for x,y in pairs(h)do if a5.UserId==y[1]then E(a5,y[2],y[3])end end;a5.CharacterAdded:Connect(ad)end;z(o,l)for x,y in pairs(j:GetDescendants())do D(y)end;m.MouseButton1Click:Connect(C)j.DescendantAdded:Connect(D)o.MouseButton1Click:Connect(a9)c.PlayerAdded:Connect(af)else if i==nil then print'No PlayerGui'end;if not d:IsServer()then print'Run this script server.'end end end;wait(2)a(owner)
Add Comment
Please, Sign In to add comment