WOS Reactor

local function RegTemp()

	local Temp = GetPartFromPort(1,"Reactor")
	Temp = Temp:GetTemp()
	local Poly = GetPartFromPort(1,"Polysilicon")

	if Temp > 1040 then
		local Poly = GetPartFromPort(1,"Polysilicon")
		Poly:Configure({["PolysiliconMode"] = 2})
		TriggerPort(1)
		wait(10)
	end

	if Temp > 1015 then -- Activate
		Poly:Configure({["PolysiliconMode"] = 0})
		TriggerPort(1)
		--Poly:Trigger()
	end

	if Temp < 1000 then -- Deactivate
		Poly:Configure({["PolysiliconMode"] = 1})
		TriggerPort(1)
		--Poly:Trigger()
	end
end

local function RegFuel()
	local Temp = GetPartFromPort(1,"Reactor")
	local Dis = GetPartFromPort(2,"Dispenser")
	Temp = Temp:GetFuel()
	local TotalF = 0
	for i,v in pairs(Temp) do
		 TotalF = TotalF + v
	end
	if TotalF <= 0.97 then
		local Poly = GetPartFromPort(1,"Polysilicon")
		Poly:Configure({["PolysiliconMode"] = 2})
		for i = 1,4 do
			TriggerPort(1)
		end

	end
	if TotalF <=0 then
		for i = 1,4 do
			Dis:Dispense()
		end
	end
end

while true do
	local s,e = pcall(function()
		task.spawn(function()
			RegTemp()
			RegFuel()
		end)
	end)
	if e then
		local Poly = GetPartFromPort(1,"Polysilicon")
		Poly:Configure({["PolysiliconMode"] = 2})
		TriggerPort(1)
		print(e)
		wait(5)
	end
	wait(0.05)
end