Arc Furnace Automation x6

Program to automatically control up to 6 Arc Furnace​. ``` #Program for controlling up to 6 arc furnace. #All devices must be connected. #If controlling less than 6 funace you can connect a # furnace multiple times. alias rActive r0 alias rOccupied r1 main: #turn all furnace on s d0 On 1 s d1 On 1 s d2 On 1 s d3 On 1 s d4 On 1 s d5 On 1 furnace0: #update register storing active l rActive d0 Activate #update register storing occupied ls rOccupied d0 0 Occupied #if furnace is already active go to end beq rActive 1 furnace1 #if furnace is empty go to end beq rOccupied 0 furnace1 #if content is found activate s d0 Activate 1 furnace1: l rActive d1 Activate ls rOccupied d1 0 Occupied beq rActive 1 furnace2 beq rOccupied 0 furnace2 s d1 Activate 1 furnace2: l rActive d2 Activate ls rOccupied d2 0 Occupied beq rActive 1 furnace3 beq rOccupied 0 furnace3 s d2 Activate 1 furnace3: l rActive d3 Activate ls rOccupied d3 0 Occupied beq rActive 1 furnace4 beq rOccupied 0 furnace4 s d3 Activate 1 furnace4: l rActive d4 Activate ls rOccupied d4 0 Occupied beq rActive 1 furnace5 beq rOccupied 0 furnace5 s d4 Activate 1 furnace5: l rActive d5 Activate ls rOccupied d5 0 Occupied beq rActive 1 end beq rOccupied 0 end s d5 Activate 1 end: sleep 1 j main ```