A4 broken — Roblox Script

Lua Script•217 lines (6923 chars)

-- Gui to Lua
-- Version: 3.2

-- Instances:

local ScreenGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local TextLabel = Instance.new("TextLabel")
local UICorner = Instance.new("UICorner")
local TextButton = Instance.new("TextButton")
local TextButton_2 = Instance.new("TextButton")
local TextButton_3 = Instance.new("TextButton")
local TextButton_4 = Instance.new("TextButton")

--Properties:

ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
ScreenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling

Frame.Parent = ScreenGui
Frame.BackgroundColor3 = Color3.fromRGB(167, 184, 81)
Frame.BorderColor3 = Color3.fromRGB(0, 0, 0)
Frame.BorderSizePixel = 0
Frame.Position = UDim2.new(0.648137331, 0, 0.334553659, 0)
Frame.Size = UDim2.new(0, 378, 0, 315)

TextLabel.Parent = Frame
TextLabel.BackgroundColor3 = Color3.fromRGB(213, 255, 76)
TextLabel.BorderColor3 = Color3.fromRGB(95, 0, 2)
TextLabel.BorderSizePixel = 0
TextLabel.Size = UDim2.new(0, 378, 0, 28)
TextLabel.Font = Enum.Font.SourceSans
TextLabel.Text = "A-4"
TextLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
TextLabel.TextSize = 14.000
TextLabel.TextStrokeColor3 = Color3.fromRGB(121, 0, 0)

UICorner.Parent = Frame

TextButton.Parent = Frame
TextButton.BackgroundColor3 = Color3.fromRGB(196, 255, 58)
TextButton.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextButton.BorderSizePixel = 0
TextButton.Position = UDim2.new(0.145660892, 0, 0.155555561, 0)
TextButton.Size = UDim2.new(0, 267, 0, 41)
TextButton.Font = Enum.Font.SourceSans
TextButton.Text = "Decale Spam"
TextButton.TextColor3 = Color3.fromRGB(0, 0, 0)
TextButton.TextSize = 14.000

TextButton_2.Parent = Frame
TextButton_2.BackgroundColor3 = Color3.fromRGB(196, 255, 58)
TextButton_2.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextButton_2.BorderSizePixel = 0
TextButton_2.Position = UDim2.new(0.143782675, 0, 0.350645989, 0)
TextButton_2.Size = UDim2.new(0, 267, 0, 41)
TextButton_2.Font = Enum.Font.SourceSans
TextButton_2.Text = "Skybox"
TextButton_2.TextColor3 = Color3.fromRGB(0, 0, 0)
TextButton_2.TextSize = 14.000

TextButton_3.Parent = Frame
TextButton_3.BackgroundColor3 = Color3.fromRGB(196, 255, 58)
TextButton_3.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextButton_3.BorderSizePixel = 0
TextButton_3.Position = UDim2.new(0.143782675, 0, 0.564575016, 0)
TextButton_3.Size = UDim2.new(0, 267, 0, 41)
TextButton_3.Font = Enum.Font.SourceSans
TextButton_3.Text = "Disco"
TextButton_3.TextColor3 = Color3.fromRGB(0, 0, 0)
TextButton_3.TextSize = 14.000

TextButton_4.Parent = Frame
TextButton_4.BackgroundColor3 = Color3.fromRGB(196, 255, 58)
TextButton_4.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextButton_4.BorderSizePixel = 0
TextButton_4.Position = UDim2.new(0.143782675, 0, 0.77151072, 0)
TextButton_4.Size = UDim2.new(0, 267, 0, 41)
TextButton_4.Font = Enum.Font.SourceSans
TextButton_4.Text = "666"
TextButton_4.TextColor3 = Color3.fromRGB(0, 0, 0)
TextButton_4.TextSize = 14.000

-- Scripts:

local function XONZ_fake_script() -- Frame.LocalScript 
	local script = Instance.new('LocalScript', Frame)

	script.Parent.Active = true
	script.Parent.Draggable = true
end
coroutine.wrap(XONZ_fake_script)()
local function ZJUCO_fake_script() -- TextButton.LocalScript 
	local script = Instance.new('LocalScript', TextButton)

	script.Parent.MouseButton1Click:Connect(function()
		for i,v in pairs(workspace:GetDescendants()) do
			if v:IsA("BasePart") then
				v.Transparency = 0
				local O = Instance.new("Decal", v)
				local T = Instance.new("Decal", v)
				local Th = Instance.new("Decal", v)
				local F = Instance.new("Decal", v)
				local Fi = Instance.new("Decal", v)
				local S = Instance.new("Decal", v)
				O.Texture = "http://www.roblox.com/asset/?id=133033307591661"
				T.Texture = "http://www.roblox.com/asset/?id=133033307591661"
				Th.Texture = "http://www.roblox.com/asset/?id=133033307591661"
				F.Texture = "http://www.roblox.com/asset/?id=133033307591661"
				Fi.Texture = "http://www.roblox.com/asset/?id=133033307591661"
				S.Texture = "http://www.roblox.com/asset/?id=133033307591661"
				O.Face = "Front"
				T.Face = "Back"
				Th.Face = "Right"
				F.Face = "Left"
				Fi.Face = "Top"
				S.Face = "Bottom"
			end
		end
	end)
end
coroutine.wrap(ZJUCO_fake_script)()
local function MABWD_fake_script() -- TextButton_2.LocalScript 
	local script = Instance.new('LocalScript', TextButton_2)

	script.Parent.MouseButton1Click:Connect(function()
		local ok = Instance.new("Sky",game.Lighting)	
		ok.SkyboxBk = "http://www.roblox.com/asset/?id=133033307591661"
		ok.SkyboxFt = "http://www.roblox.com/asset/?id=133033307591661"
		ok.SkyboxDn = "http://www.roblox.com/asset/?id=133033307591661"
		ok.SkyboxLf = "http://www.roblox.com/asset/?id=133033307591661"
		ok.SkyboxRt = "http://www.roblox.com/asset/?id=133033307591661"
		ok.SkyboxUp = "http://www.roblox.com/asset/?id=133033307591661"
		ok.MoonTextureId = "http://www.roblox.com/asset/?id=133033307591661"
		ok.Starcount = 0
	end)
end
coroutine.wrap(MABWD_fake_script)()
local function DNRBCT_fake_script() -- TextButton_3.LocalScript 
	local script = Instance.new('LocalScript', TextButton_3)

	script.Parent.MouseButton1Click:Connect(function()
		local Lighting = game:GetService("Lighting")
		local ColorCorrection = Instance.new("ColorCorrectionEffect", Lighting)
	
		function zigzag(X) 
			return math.acos(math.cos(X*math.pi))/math.pi
		end
	
		Counter = 0
	
		Lighting.TimeOfDay = "12:00"
	
		while wait(0.1) do 
			ColorCorrection.TintColor = Color3.fromHSV(zigzag(Counter),1,1)
			Lighting.Ambient = Color3.fromHSV(zigzag(Counter),1,1)
			Counter += 0.01
		end
	end)
	
end
coroutine.wrap(DNRBCT_fake_script)()
local function MRTLI_fake_script() -- TextButton_4.LocalScript 
	local script = Instance.new('LocalScript', TextButton_4)

	local button = script.Parent
	local Players = game:GetService("Players")
	local Lighting = game:GetService("Lighting")
	local RunService = game:GetService("RunService")
	
	local function setEverythingOnFire()
	
		Lighting.Ambient = Color3.fromRGB(10, 10, 10) 
		Lighting.OutdoorAmbient = Color3.fromRGB(10, 10, 10) 
		Lighting.ShadowSoftness = 1 
	
	
		Lighting.ClockTime = 0 
	
		Lighting.FogColor = Color3.fromRGB(20, 20, 20)
		Lighting.FogStart = 0
	
		for _, obj in pairs(workspace:GetDescendants()) do
			if obj:IsA("BasePart") then  
	
				local outline = Instance.new("SelectionBox")
				outline.Adornee = obj
				outline.Color3 = Color3.new(1, 0, 0)
				outline.Parent = obj
	
	
				local fire = Instance.new("Fire")
				fire.Size = 10
				fire.Heat = 25
				fire.Color = Color3.fromRGB(255, 115, 0) 
				fire.Parent = obj
			end
		end
	end
	
	if RunService:IsClient() then
	
		local function onButtonClick()
			setEverythingOnFire() 
		end
	
	
		button.MouseButton1Click:Connect(onButtonClick)
	else
	
		button.MouseButton1Click:Connect(function(player)
			setEverythingOnFire()
		end)
	end
	
end
coroutine.wrap(MRTLI_fake_script)()