Stationeers Filtration unit, test and build.

A quick testing session to see what has changed with the updated filtration unit and then a build to code a new controller to work in the IC slot on the machine.

Workshop link: https://steamcommunity.com/sharedfile...

#Automated Filtration Control CowsAreEvil
#Designed for use in filtrationi IC slot only
#Designed for parallel filtration setups only
#Will cool storage to MINTEMP (set below)
#Will fill storage tank to MAXPRESSUE (set below)
#Will detect filter cartridge and activate when
#INPUTAMOUNT moles of gas is detected (set below)

alias filtration db
alias diode d0 #optional
alias cooler d1 #optional

alias filteron r10

define MINTEMP 293 #Cool to this temperature Kelvin
define MAXPRESSURE 20000 #Storage pressure kPa
define INPUTAMOUNT 2 #Moles to activate

start:
yield
#Check filters and set diodes
ls r0 filtration 0 Quantity
ls r1 filtration 1 Quantity
or filteron r0 r1
min r2 r0 r1
seqz r3 r2
brdns diode 2
s diode On r3
max r3 r0 r1
select r2 r2 r2 r3
div r2 r2 100
brdns diode 2
s diode Setting r2
#Check cooler
l r0 filtration TemperatureOutput
sgt r0 r0 MINTEMP
brdns cooler 2
s cooler On r0
#Check storage pressure
l r0 filtration PressureOutput
slt r0 r0 MAXPRESSURE
and filteron filteron r0
#Check filters and available gas
l r0 filtration TotalMolesInput
ls r1 filtration 0 PrefabHash
jal checkfilter
move r3 r2
ls r1 filtration 1 PrefabHash
jal checkfilter
max r2 r2 r3
mul r0 r0 r2
sgt r0 r0 INPUTAMOUNT
and filteron filteron r0
#Activate filtration if required
s filtration Mode filteron
seqz r0 filteron
s filtration Open r0
j start

checkfilter:
l r2 filtration RatioOxygenInput
beq r1 -1067319543 ra
beq r1 -1217998945 ra
beq r1 -721824748 ra
l r2 filtration RatioNitrogenInput
beq r1 -632657357 ra
beq r1 -1387439451 ra
beq r1 632853248 ra
l r2 filtration RatioCarbonDioxideInput
beq r1 416897318 ra
beq r1 1876847024 ra
beq r1 1635000764 ra
l r2 filtration RatioVolatilesInput
beq r1 1037507240 ra
beq r1 1255156286 ra
beq r1 15011598 ra
l r2 filtration RatioPollutantInput
beq r1 63677771 ra
beq r1 1959564765 ra
beq r1 1915566057 ra
l r2 filtration RatioNitrousOxideInput
beq r1 1824284061 ra
beq r1 465267979 ra
beq r1 -1247674305 ra
move r2 0
beqz r1 ra

#if you are still here then it is an error so end
s filtration On 0
j start