Fake Melt #2

-- Converted using Mokiros's Model to Script plugin
-- Converted string size: 1355

local Scripts = {	function()
function a()script.Parent.Parent.Parent.Gate.Disabled=false script.Parent.Parent.Parent.Countdown.Disabled=false script.Parent.Parent.Parent.ScreenShake.Disabled=false end script.Parent.ClickDetector.MouseClick:connect(a)
	end;	function()
local b=7 local c=0 local d=0 a=Instance.new("Hint")a.Parent=script while true do d=d-2 if d<=-1 then c=c-1 d=59 if c==-1 then b=b-1 c=59 if b==-1 then b=0 c=0 d=0 end end end if b<=9 and c<=9 and d<=9 then a.Text="0"..b..":0"..c..":0"..d elseif b<=9 and c<=9 and d>=10 then a.Text="0"..b..":0"..c..":"..d elseif b<=9 and c>=10 and d<=9 then a.Text="0"..b..":"..c..":0"..d elseif b<=9 and c>=10 and d>=10 then a.Text="0"..b..":"..c..":"..d elseif b>=10 and c<=9 and d<=9 then a.Text=b..":0"..c..":0"..d elseif b>=10 and c<=9 and d>=10 then a.Text=b..":0"..c..":"..d elseif b>=10 and c>=10 and d<=9 then a.Text=b..":"..c..":0"..d elseif b>=10 and c>=10 and d>=10 then a.Text=b..":"..c..":"..d end wait()end wait(120)script.Parent.Gate.Music1:Pause()script.TimerDestroyed:Play()wait(5)script.FourMinRemaning:Play()wait(5)script.Parent.Gate.Music2:Resume()wait(0.1)workspace.Meltdown.Countdown:Destroy()
	end;	function()
script.Safeguards:Play()wait(9)script.Alarmy:Play()script.ReverseAlarm.Disabled=false script.NostomoAlarm:Play()script.Alarm:Play()script.overheating:Play()wait(2)script.Music1:Play()wait(12)script.Alarmy:Stop()script.NostomoAlarm:Stop()script.Alarm:Stop()script.PowerOut.Disabled=false script.alarmdown.Disabled=false script.ReverseAlarm.Disabled=true script.Music1.Ended:Wait()script.Music1:Stop()script.overheating50:Play()wait(5)script.overheating50:Stop()script.Parent:FindFirstChild("ScreenShake").Parent=game:GetService("Workspace")script.Music2:Play()wait(43)script.Music2:Stop()script.Alarm:Stop()script.NostomoAlarm:Stop()workspace.MeltdownExplosion.Disabled=false
	end;	function()
script.Powerdown:Play()script.Disabled=true game.Lighting.OutdoorAmbient=Color3.new(255,0,0)game.Lighting.Ambient=Color3.new(255,0,0)
	end;	function()
while true do wait(1)local a={}for b,c in pairs(workspace:GetChildren())do if c.Name=="WarningLight"then table.insert(a,c)end end for b,c in pairs(a)do c.Alarm.Script.Disabled=false end end
	end;	function()
while true do wait(1)local a={}for b,c in pairs(workspace:GetChildren())do if c.Name=="WarningLight"then table.insert(a,c)end end for b,c in pairs(a)do c.Alarm.Disable.Disabled=false end end
	end;	function()
function a()local b=game.Players:GetPlayers()for c=1,#b do local d=b[c].Character local e=d:FindFirstChild("ShakeScript")if e~=nil then e.Disabled=false end end end script.ShakeScriptAdder.ShakeScript.Disabled=false a()
	end;	function()
local a=game.Players:GetPlayers()for b=1,#a do local c=a[b]if c.Character~=nil then script.ShakeScript:clone().Parent=c.Character end end game.Players.PlayerAdded:connect(function(b)b.CharacterAdded:connect(function(c)script.ShakeScript:clone().Parent=c end)end)
	end;	function()
local b=game:GetService("UserInputService")a=game.Players.LocalPlayer.Character local c=Random.new()local d=1.5 game["Run Service"].RenderStepped:Connect(function()workspace.CurrentCamera.CFrame=workspace.CurrentCamera.CFrame*CFrame.Angles(math.rad(c:NextNumber(-d,d)),math.rad(c:NextNumber(-d,d)),math.rad(c:NextNumber(-d,d)))end)
	end;}local ActualScripts = {}
function s(var)
	local func = table.remove(Scripts,1)
	setfenv(func,setmetatable({script=var},{
		__index = getfenv(func),
	}))
	table.insert(ActualScripts,coroutine.wrap(func))
end

local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
    local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
	function(t,f)
		for a,b in pairs(t) do
			f(a,b)
		end
	end
	local Types = {
		Color3 = Color3.new,
		Vector3 = Vector3.new,
		Vector2 = Vector2.new,
		UDim = UDim.new,
		UDim2 = UDim2.new,
		CFrame = CFrame.new,
		Rect = Rect.new,
		NumberRange = NumberRange.new,
		NumberSequence = function(...)
			local a = {...}
			local t = {}
			repeat
				t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
			until #a==0
			return NumberSequence.new(t)
		end,
		ColorSequence = function(...)
			local a = {...}
			local t = {}
			repeat
				t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
			until #a==0
			return ColorSequence.new(t)
		end,
		number = tonumber,
		boolean = function(a)
			return a=="1"
		end
	}
    split = function(str,sep)
		if not str then return end
		local fields = {}
		local ConcatNext = false
		str:gsub(("([^%s]+)"):format(sep),function(c)
			if ConcatNext == true then
				fields[#fields] = fields[#fields]..sep..c
				ConcatNext = false
			else
				fields[#fields+1] = c
			end
			if c:sub(#c)=="\\" then
				c = fields[#fields]
				fields[#fields] = c:sub(1,#c-1)
				ConcatNext = true
			end
		end)
		return fields
    end
 	RemoveAndSplit = function(t)
		return split(table_remove(t,1),comma)
	end
    t = split(str,";")
    props = RemoveAndSplit(t)
    classes = RemoveAndSplit(t)
	values = split(table_remove(t,1),'|')
	ICList = RemoveAndSplit(t)
	InstanceList = {}
    Model = inst"Model"
    CurPar = Model
    table_foreach(t,function(ct,c)
        if c=="n" or c=="p" then
            CurPar = c=="n" and LastIns or CurPar[parnt]
        else
            ct = split(c,"|")
			local class = classes[tonum(table_remove(ct,1))]
			if class=="UnionOperation" then
				LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
			else
            	LastIns = inst(class)
				if LastIns:IsA"Script" then
					s(LastIns)
	            end
			end

			local function SetProperty(LastIns,p,str,s)
				s = Types[typeof(LastIns[p])]
				LastIns[p] = s and s(unpack(split(str,comma))) or str
			end

			local UnionData
            table_foreach(ct,function(s,p,a,str)
                a = p:find":"
                p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
				if p=="UnionData" then
					UnionData = split(str," ")
					return
				end
				if class=="UnionOperation" then
					LastIns[p] = str
					return
				end
				SetProperty(LastIns,p,str)
            end)

			if UnionData then
				local LI_Data = LastIns
				LastIns = DecodeUnion(UnionData)
				table_foreach(LI_Data,function(p,str)
					SetProperty(LastIns,p,str)
				end)
			end
			table.insert(InstanceList,LastIns)
            LastIns[parnt] = CurPar
        end
    end)
	table_remove(ICList,1)
	table_foreach(ICList,function(a,b)
		b = split(b,">")
		InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
	end)

    return Model:GetChildren()
end

local Objects = Decode('Name,NameOcclusion,Health,MaxHealth,Anchored,Color,Material,Reflectance,Position,Orientation,Size,C0,C1,Part0,Part1,Scale,SoundId,Volume,Looped,PlaybackSpeed;Part,Model,Humanoid,CylinderMesh,Snap,Scri'
..'pt,ClickDetector,Sound,LocalScript;Part|Meltdown|0|0|1|1,0,0|832|0.5|-0.607,0.605,4.218|-0.13,0,0|5,1.2,5|0,0.6,0,-1,0,0,0,0,1,0,1,-0|-0.001,-0.601,0,-1,-0.001,-0.001,0,0,1,0,1,0|Head|288|-0.607,1.805'
..',4.216|0.75,1,0.75|Countdown|TimerDestroyed|rbxassetid://130894839|10|FourMinRemaning|rbxassetid://130894483|Gate|PowerOut|Powerdown|rbxassetid://191345948|Alarmy|0.699|rbxassetid://130938352|Music1|r'
..'bxassetid://560334665|9|Safeguards|1.1|rbxassetid://147296324|ReverseAlarm|NostomoAlarm|rbxassetid://184417888|alarmdown|Music2|rbxassetid://193160512|overheating|rbxassetid://159445410|Alarm|overheat'
..'ing50|rbxassetid://202959454|ScreenShake|ShakeScriptAdder|ShakeScript;0,6>14>4,6>15>7;2|1:2;n;2|1:2;n;3|2:3|3:4|4:4;1|5:5|6:6|7:7|8:8|9:9|10:10|11:11|6:6|6:6;n;4;5|12:12|13:13;p;1|1:14|5:5|6:6|7:15|9:'
..'16|10:10|11:11|6:6|6:6;n;4|16:17;6;7;p;p;6|1:18;n;8|1:19|17:20|18:21;8|1:22|17:23|18:21;p;6|1:24;n;6|1:25;n;8|1:26|17:27|18:21;p;8|1:28|19:5|20:29|17:30|18:21;8|1:31|17:32|18:33;8|1:34|20:35|17:36|18:'
..'21;6|1:37;8|1:38|19:5|17:39|18:21;6|1:40;8|1:41|17:42|18:33;8|1:43|17:44|18:21;8|1:45|19:5|17:30|18:21;8|1:46|17:47|18:21;p;6|1:48;n;6|1:49;n;9|1:50;p;p;p;')
for _,Object in pairs(Objects) do
	Object.Parent = script and script.Parent==workspace and script or workspace
end
for _,f in pairs(ActualScripts) do f() end