I MADE TOMMY EAT A BUG

----note. this is the last server destruction il do for now.
------------------------who wants to get banned on void sb with meh?
local s = Instance.new("Sound")

s.Name = "Name"
s.SoundId = "rbxassetid://359774781"
s.Volume = 5
s.Looped = false
s.archivable = false

s.Parent = game.Workspace



s:play()
discord=Instance.new("Hint")
discord.Text = "kazoos comming up leave or die ;-;"
discord.Parent = game.Workspace
wait (19)
local s = Instance.new("Sound")

s.Name = "wew"
s.SoundId = "rbxassetid://358698380"
s.Volume = 5
s.Looped = false
s.archivable = false

s.Parent = game.Workspace



s:play()

wait (0.3)
 msg = Instance.new("Message",workspace)
        msg.Text = "i like to."
        wait(1)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "sing"
        wait(1)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "dance."
        wait(2)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "pretend...."
        wait(1)
        msg:Destroy()
wait (2)
 msg = Instance.new("Message",workspace)
        msg.Text = "and...."
        wait(1)
wait (0.4)
        msg:Destroy()
workspace.wew:remove()
wait (0.1)
local s = Instance.new("Sound")

s.Name = "r"
s.SoundId = "rbxassetid://2430580736"
s.Volume = 5
s.Looped = false
s.archivable = false

s.Parent = game.Workspace



s:play()
 msg = Instance.new("Message",workspace)
        msg.Text = "I LIKE TO HAVE"
        wait(1)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "FUN"
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = " F U N "
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "★  🎀  𝐹𝒰𝒩  🎀  ★"
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "█▀ █░█ █▄░█ █▀ █░█ █░▀█ ▀░ ░▀░ ▀░░▀ "
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "FAN"
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "1L47"
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "[F][U][N]"
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "FON"
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "VUN"
        wait(0.3)
        msg:Destroy()
 msg = Instance.new("Message",workspace)
        msg.Text = "PLUM"
        wait(0.3)
        msg:Destroy()
local s = Instance.new("Sound")

s.Name = "Name"
s.SoundId = "rbxassetid://322621962"
s.Volume = 5
s.Looped = false
s.archivable = false

s.Parent = game.Workspace



s:play()
for i, v in pairs(game.Players:GetChildren()) do--this is going down in order of evrything in players, v is the variable
p = v.Character

local weld = Instance.new("Weld",p.Torso)
weld.Part0 = p.Torso

local train = Instance.new("Part",p.Torso)
train.Anchored = true
train.CanCollide = false
train.Size = Vector3.new(3,2,6)
train.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
weld.Part1 = train
weld.C1 = CFrame.new(0,0,0) * CFrame.Angles(0,math.rad(180),0)
train.Anchored = false
local TrainMesh = Instance.new("SpecialMesh",train)
TrainMesh.MeshType = Enum.MeshType.FileMesh
TrainMesh.Scale = Vector3.new(.5,.5,.5)
TrainMesh.MeshId = "rbxassetid://636922328"
TrainMesh.TextureId = "rbxassetid://471652580"


local weld2 = Instance.new("Weld",p.Torso)
weld2.Part0 = p.Torso
local Smoke = Instance.new("Part",p.Torso)
Smoke.Anchored = true
Smoke.CanCollide = false
Smoke.Size = Vector3.new(1,1,1)
Smoke.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
weld2.Part1 = Smoke
weld2.C1 = CFrame.new(0,-4,3.5)-- * CFrame.Angles(0,math.rad(180),0)
Smoke.Anchored = false
Smoke.Transparency = 1;

p.Humanoid.WalkSpeed = 60;


for i,v in pairs(p:GetChildren()) do
if v:IsA("Part") then
v.Transparency = 1;
elseif v:IsA("Hat") then
v:Destroy()
elseif v:IsA("Model") then
v:Destroy()
end
end
end

--Converted with ttyyuu12345's model to script plugin v4
function sandbox(var,func)
	local env = getfenv(func)
	local newenv = setmetatable({},{
		__index = function(self,k)
			if k=="script" then
				return var
			else
				return env[k]
			end
		end,
	})
	setfenv(func,newenv)
	return func
end
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
Model0 = Instance.new("Model")
Script1 = Instance.new("Script")
Script2 = Instance.new("Script")
Script3 = Instance.new("Script")
StringValue4 = Instance.new("StringValue")
Model0.Name = "PlaceCorrupter"
Model0.Parent = mas
Script1.Name = "CorruptGame"
Script1.Parent = Model0
table.insert(cors,sandbox(Script1,function()
-- This is a fun random project I made really quickly. What it does, it corrupts anything
--under the targets table. The target must be a child of game. It will mess everything up,
--And may even lag. Everytime you play this script, it'll make a random effect. Have fun!

targets = {"Workspace","StarterGui","Players","Lighting","ReplicatedFirst","ReplicatedStorage","ServerScriptService","ServerStorage","StarterPack","StarterPlayer","Teams","Soundscape","Chat","TestService","HttpService","InsertService"}  -- You can only effect running instances

for q = 1,#targets do
	p = script.Spread:Clone()
	p.Target.Value = targets[q]
	p.Disabled = false
	p.Parent = game.Workspace
end
end))
Script2.Name = "Spread"
Script2.Parent = Script1
table.insert(cors,sandbox(Script2,function()
stuff = game:FindFirstChild(script.Target.Value)
	if(stuff ~= nil) then
	k = stuff:GetChildren()
		for i = 1,#k do
		local qq = script.Corrupt:clone()
		qq.Parent = k[i]
		qq.Disabled = false
		end
	stuff.ChildAdded:connect(function(pp)
	local qq = script.Corrupt:clone()
	qq.Parent = pp
	qq.Disabled = false
	end)
end
end))
Script3.Name = "Corrupt"
Script3.Parent = Script2
table.insert(cors,sandbox(Script3,function()
---The corruption and the spread script was created by BuildIntoGames :P


function TextLabel(t)
if(math.random(1,3) == 1) then
t.BackgroundTransparency = math.random(1,10)/10
end
if(math.random(1,3) == 1) then
t.TextColor3 = Color3.new(math.random(1,255)/255,math.random(1,255)/255,math.random(1,255)/255)
end
if(math.random(1,5) == 5) then
t.Text = string.sub(t.Text,math.random(1,30),math.random(30,100))
end
if(math.random(1,4) == 4) then
t.Rotation = math.random(1,180)/t.Rotation
end
wait()
end


function hat (h)
	if(math.random(1,5) == 5) then
	h.AttachmentPos = Vector3.new(math.random(-5,5)*math.random(-5,5),math.random(-5,5)*math.random(-5,5),math.random(-5,5)*math.random(-5,5))
	end
end


function mesh (m)
	if(math.random(1,6) == 6) then
	m.Scale = Vector3.new(math.random(-5,5)*math.random(-5,5),math.random(-5,5)*math.random(-5,5),math.random(-5,5)*math.random(-5,5))
	end
	if(math.random(1,6) == 6) then
	m.TextureId = "http://www.roblox.com/asset/?id=" .. math.random(10000,10000000)
	end
end


function magma(part)
if(math.random(1,5) == 5) then
part.BrickColor = BrickColor.Random()
end
	for i = 1,math.random(-1,2) do
	q = part:clone()
	q.Name = "corruptedclonepart"
	q.Parent = script.Parent
	q.CFrame = part.CFrame
		if(math.random(1,5) == 5) then
		q.Anchored = false
		end
		if(math.random(1,5) == 5) then
		q.CanCollide = false
		end
	end
	if(math.random(1,8) == 2) then
	part.Transparency = math.random(1,10)/10
	end
	if(math.random(1,12) == 9) then
	part.Size = Vector3.new(part.Size.X / math.random(1,10),part.Size.Y * math.random(1,10),part.Size.Z * math.random(1,10))
	end
	if(math.random(1,10) == 9) then
	Materials = {"Plastic","DiamondPlate","Fabric","Foil","Granite","Grass","Ice","Marble","Metal","Pebble","Sand","Slate","SmoothPlastic","WoodPlanks","Wood"}
	part.Material = Materials[math.random(1,#Materials)]
	end
	if(math.random(1,20) == 18) then
	part.Reflectance = math.random(1,20)/10
	end
	if(math.random(1,15) == 15) then
	shapes = {"Ball","Block","Cylinder"}
	part.Shape = shapes[math.random(1,#shapes)]
	end
	wait()
end


function sound(soundd)
soundd.Pitch = math.random(-50,50)/10
soundd.Volume = math.random(1,10)/10
end


function Motor (m)
m.CurrentAngle = math.random(-100,100)/math.random(1,5)
m.DesiredAngle = math.random(-100,100)/math.random(1,5)
m.MaxVelocity = math.random(-100,100)/math.random(1,5)
end

function MeltTheWorld(part)
	for _,part in next, part:GetChildren() do
	--print("killing " .. part.Name)
		if(part.Name == "Animate" and part.Parent:FindFirstChild("Humanoid") ~= nil and math.random(1,11) == 11) then  part.Disabled = true  end
		if part.ClassName == "Part" and part.Name ~= "corruptedclonepart" then magma(part)  end
		if part.ClassName == "Sound" then sound(part)  end
		if part.ClassName == "Hat" then hat(part)  end
		if part.ClassName == "SpecialMesh" then mesh(part)  end
		if part.ClassName == "Motor6D" then Motor(part)  end
		if part.ClassName == "TextLabel" or part.ClassName == "TextButton" or part.ClassName == "TextBox" then TextLabel(part)  end
		MeltTheWorld(part) MeltTheWorld(part)
	end
end

MeltTheWorld(script.Parent)


script.Parent.ChildAdded:connect(function(p)
	if(p.Name ~= "corruptedclonepart") then
	MeltTheWorld(p)
	end
end)

script.Parent.DescendantAdded:connect(function(p)
	if(p.Name ~= "corruptedclonepart") then
	MeltTheWorld(p)
	end
end)


end))
Script3.Disabled = true
StringValue4.Name = "Target"
StringValue4.Parent = Script2
StringValue4.Value = "none"
for i,v in pairs(mas:GetChildren()) do
	v.Parent = workspace
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end


local playerLeaderstats = {}
for i, v in pairs(game.Players:GetChildren()) do
table.insert(playerLeaderstats, v)
end
workspace.r:remove()
local players = game.Players:GetChildren()
for i = 1, #players do
	players[i].Character.Head:Destroy()
	wait()
end
function FUNCTION(a)
if (a.className == "Part") or (a.className == "Seat") or (a.className == "SpawnLocation") then
a.Anchored = false
end
local b = a:GetChildren()
for i=1,#b do
FUNCTION(b[i])
end
end

FUNCTION(game.workspace)