-- True ...... Synchronized
-- False ..... Free Run


val2 = script.Parent.Parent.Parent.Parent.VisualCircuit
strobe = script.Parent.Parent.Strobe
salarm = false

if candela == 0 then
	strobe.Flasher.Size = UDim2.new(2,0,3,0)
elseif candela == 1 then
	strobe.Flasher.Size = UDim2.new(3,0,4,0)
elseif candela == 2 then
	strobe.Flasher.Size = UDim2.new(4,0,5,0)
elseif candela == 3 then
	strobe.Flasher.Size = UDim2.new(5.5,0,6.5,0)
end

function Flash()
strobe.BrickColor = BrickColor.new(1001)
strobe.Flasher.Strobe.Visible = true
strobe.Light.Enabled = true
wait(0.06)
strobe.BrickColor = BrickColor.new(194)
strobe.Flasher.Strobe.Visible = false
strobe.Light.Enabled = false
end

sval = math.random(85,95)/100

function PowerStrobe()
	if salarm then return end
	salarm = true
	wait(sval)
	while val2.Value == 1 do
	Flash()
	wait(sval)
	end
	salarm = false
end

if strobesync then
val2.Changed:connect(function() if val2.Value == 1 then Flash() end end)
else
val2.Changed:connect(function() if val2.Value == 1 then PowerStrobe() end end)	
end
