32 lines
690 B
Plaintext
32 lines
690 B
Plaintext
# Automatically evacuates cooling-tower when temp
|
|
# is below 40C (39.85C)
|
|
# needs a volume pump and a gas analyzer
|
|
|
|
alias sensor d0
|
|
alias pump d1
|
|
|
|
alias pipe_temp r0
|
|
alias pipe_press r1
|
|
alias temp_go r2
|
|
alias press_go r3
|
|
alias pump_go r4
|
|
|
|
define TEMP_THRESH 313 # 39.85C
|
|
|
|
# Sets volume pump max capacity
|
|
l pipe_press pump Maximum
|
|
s pump Setting pipe_press
|
|
|
|
start:
|
|
yield
|
|
# Loads cooling-tower pressure and temp
|
|
l pipe_temp sensor Temperature
|
|
l pipe_press sensor Pressure
|
|
# Checks if temp is below threshold
|
|
slt temp_go pipe_temp TEMP_THRESH
|
|
sgtz press_go pipe_press
|
|
# If cooling-tower has pressure, and temp is safe..
|
|
and pump_go temp_go press_go
|
|
# ...activate pump
|
|
s pump On pump_go
|
|
j start |