signal = "foundry_roads_sorting"
if (event.train and atc_arrow) or (event.int and event.message == "check_signal") then
	if can_set_route(signal,"In Road") then
		set_route(signal,"In Road")
	elseif can_set_route(signal,"Out Road") then
		set_route(signal,"Out Road")
	else
		if atc_speed > 0 then
			atc_send("S0")
		else
			atc_send("B0")
		end
		interrupt(5,"check_signal")
		return
	end
	atc_send("S1")
	return
end