Updated constants to upper-case
This commit is contained in:
parent
2ff9c7a70d
commit
367714cb4f
@ -16,8 +16,8 @@ alias gas_to_move r3
|
|||||||
alias fill_pressure r4
|
alias fill_pressure r4
|
||||||
alias pump_active r5
|
alias pump_active r5
|
||||||
|
|
||||||
define canister 42280099
|
define CANISTER 42280099
|
||||||
define smart_canister -668314371
|
define SMART_CANISTER -668314371
|
||||||
|
|
||||||
start:
|
start:
|
||||||
yield
|
yield
|
||||||
@ -26,8 +26,8 @@ ls canister_present canister_storage 0 Occupied
|
|||||||
# identify canister
|
# identify canister
|
||||||
ls canister_hash canister_storage 0 OccupantHash
|
ls canister_hash canister_storage 0 OccupantHash
|
||||||
# set safe fill-pressure
|
# set safe fill-pressure
|
||||||
beq canister_hash canister regular
|
beq canister_hash CANISTER regular
|
||||||
beq canister_hash smart_canister smart
|
beq canister_hash SMART_CANISTER smart
|
||||||
|
|
||||||
regular:
|
regular:
|
||||||
move fill_pressure 8000000 # regular can safe max
|
move fill_pressure 8000000 # regular can safe max
|
||||||
|
@ -11,7 +11,7 @@ alias temp_go r2
|
|||||||
alias press_go r3
|
alias press_go r3
|
||||||
alias pump_go r4
|
alias pump_go r4
|
||||||
|
|
||||||
define temp_thresh 313 # 39.85C
|
define TEMP_THRESH 313 # 39.85C
|
||||||
|
|
||||||
# Sets volume pump max capacity
|
# Sets volume pump max capacity
|
||||||
l pipe_press pump Maximum
|
l pipe_press pump Maximum
|
||||||
@ -23,7 +23,7 @@ yield
|
|||||||
l pipe_temp sensor Temperature
|
l pipe_temp sensor Temperature
|
||||||
l pipe_press sensor Pressure
|
l pipe_press sensor Pressure
|
||||||
# Checks if temp is below threshold
|
# Checks if temp is below threshold
|
||||||
slt temp_go pipe_temp temp_thresh
|
slt temp_go pipe_temp TEMP_THRESH
|
||||||
sgtz press_go pipe_press
|
sgtz press_go pipe_press
|
||||||
# If cooling-tower has pressure, and temp is safe..
|
# If cooling-tower has pressure, and temp is safe..
|
||||||
and pump_go temp_go press_go
|
and pump_go temp_go press_go
|
||||||
|
@ -23,8 +23,8 @@ alias press_run r6
|
|||||||
alias filter_run r7
|
alias filter_run r7
|
||||||
alias purge_run r8
|
alias purge_run r8
|
||||||
|
|
||||||
define max_press 58000 # 58MPa
|
define MAX_PRESS 58000 # 58MPa
|
||||||
define max_temp 313 # 40C
|
define MAX_TEMP 313 # 40C
|
||||||
|
|
||||||
l filter1 purge_pump Maximum # borrow filter1
|
l filter1 purge_pump Maximum # borrow filter1
|
||||||
s purge_pump Setting filter1 # set max throughput
|
s purge_pump Setting filter1 # set max throughput
|
||||||
@ -55,8 +55,8 @@ j filter # then start filtering
|
|||||||
filter:
|
filter:
|
||||||
l mud_temp mud_sensor Temperature # get input temp
|
l mud_temp mud_sensor Temperature # get input temp
|
||||||
l tank_press tank Pressure # get output pressure
|
l tank_press tank Pressure # get output pressure
|
||||||
slt temp_run mud_temp max_temp # is temp safe
|
slt temp_run mud_temp MAX_TEMP # is temp safe
|
||||||
slt press_run tank_press max_press # is press safe
|
slt press_run tank_press MAX_PRESS # is press safe
|
||||||
and filter_run temp_run press_run # temp and press?
|
and filter_run temp_run press_run # temp and press?
|
||||||
s filter_unit On filter_run # run filter
|
s filter_unit On filter_run # run filter
|
||||||
j start # loop
|
j start # loop
|
||||||
|
@ -20,9 +20,9 @@ alias mixer_run r6
|
|||||||
alias purge_activate r7
|
alias purge_activate r7
|
||||||
|
|
||||||
# Stops mixing if either input-gas is below 500kPa
|
# Stops mixing if either input-gas is below 500kPa
|
||||||
define press_in_min 500
|
define PRESS_IN_MIN 500
|
||||||
# Stops mixing if output-tank is "full"
|
# Stops mixing if output-tank is "full"
|
||||||
define press_out_max 58000
|
define PRESS_OUT_MAX 58000
|
||||||
|
|
||||||
# Sets purge pump to max output
|
# Sets purge pump to max output
|
||||||
l tank_a_press pump Maximum
|
l tank_a_press pump Maximum
|
||||||
@ -41,9 +41,9 @@ l tank_b_press tank_b Pressure
|
|||||||
l tank_out_press tank_out Pressure
|
l tank_out_press tank_out Pressure
|
||||||
|
|
||||||
# Checks if pressures are within tolerances
|
# Checks if pressures are within tolerances
|
||||||
sgt tank_a_ok tank_a_press press_in_min
|
sgt tank_a_ok tank_a_press PRESS_IN_MIN
|
||||||
sgt tank_b_ok tank_b_press press_in_min
|
sgt tank_b_ok tank_b_press PRESS_IN_MIN
|
||||||
slt tank_out_ok tank_out_press press_out_max
|
slt tank_out_ok tank_out_press PRESS_OUT_MAX
|
||||||
|
|
||||||
and mixer_run tank_a_ok tank_b_ok
|
and mixer_run tank_a_ok tank_b_ok
|
||||||
and mixer_run tank_out_ok mixer_run
|
and mixer_run tank_out_ok mixer_run
|
||||||
|
@ -14,10 +14,10 @@ alias max_temp r4
|
|||||||
alias cooling_active r5
|
alias cooling_active r5
|
||||||
alias heating_active r6
|
alias heating_active r6
|
||||||
|
|
||||||
define wall_heaters 24258244
|
define WALL_HEATERS 24258244
|
||||||
define wall_coolers -739292323
|
define WALL_COOLERS -739292323
|
||||||
define liquid_wall_coolers -1369060582
|
define LIQUID_WALL_COOLERS -1369060582
|
||||||
define temp_convert 273.15
|
define TEMP_CONVERT 273.15
|
||||||
|
|
||||||
move cooling_active 0
|
move cooling_active 0
|
||||||
move heating_active 0
|
move heating_active 0
|
||||||
@ -31,9 +31,9 @@ sub min_temp min_temp variance
|
|||||||
l max_temp thermostat Setting
|
l max_temp thermostat Setting
|
||||||
add max_temp max_temp variance
|
add max_temp max_temp variance
|
||||||
|
|
||||||
# initiate target temperature
|
|
||||||
l target_temp thermostat Setting
|
l target_temp thermostat Setting
|
||||||
|
|
||||||
|
# get current temperature
|
||||||
jal temp_read
|
jal temp_read
|
||||||
|
|
||||||
# update display
|
# update display
|
||||||
@ -45,21 +45,19 @@ jal display
|
|||||||
bgt curr_temp max_temp cooling
|
bgt curr_temp max_temp cooling
|
||||||
blt curr_temp min_temp heating
|
blt curr_temp min_temp heating
|
||||||
|
|
||||||
sb wall_coolers On cooling_active
|
sb WALL_COOLERS On cooling_active
|
||||||
sb liquid_wall_coolers On cooling_active
|
sb LIQUID_WALL_COOLERS On cooling_active
|
||||||
sb wall_heaters On heating_active
|
sb WALL_HEATERS On heating_active
|
||||||
|
|
||||||
j start
|
j start
|
||||||
|
|
||||||
temp_read:
|
temp_read:
|
||||||
l curr_temp gas_sensor Temperature
|
l curr_temp gas_sensor Temperature
|
||||||
sub curr_temp curr_temp temp_convert
|
sub curr_temp curr_temp TEMP_CONVERT
|
||||||
|
|
||||||
j ra
|
j ra
|
||||||
|
|
||||||
display:
|
display:
|
||||||
s temp_disp Setting curr_temp
|
s temp_disp Setting curr_temp
|
||||||
|
|
||||||
j ra
|
j ra
|
||||||
|
|
||||||
cooling:
|
cooling:
|
||||||
@ -69,16 +67,14 @@ jal temp_read
|
|||||||
# test if coolers need to be on or not
|
# test if coolers need to be on or not
|
||||||
sgt cooling_active curr_temp target_temp
|
sgt cooling_active curr_temp target_temp
|
||||||
|
|
||||||
# update display
|
|
||||||
brdns temp_disp 2
|
brdns temp_disp 2
|
||||||
jal display
|
jal display
|
||||||
|
|
||||||
# send state to coolers
|
# send state to coolers
|
||||||
sb wall_coolers On cooling_active
|
sb WALL_COOLERS On cooling_active
|
||||||
sb liquid_wall_coolers On cooling_active
|
sb LIQUID_WALL_COOLERS On cooling_active
|
||||||
|
|
||||||
bgtz cooling_active cooling
|
bgtz cooling_active cooling
|
||||||
|
|
||||||
j start
|
j start
|
||||||
|
|
||||||
heating:
|
heating:
|
||||||
@ -88,13 +84,11 @@ jal temp_read
|
|||||||
# test if heaters need to be on or not
|
# test if heaters need to be on or not
|
||||||
slt heating_active curr_temp target_temp
|
slt heating_active curr_temp target_temp
|
||||||
|
|
||||||
# update display
|
|
||||||
brdns temp_disp 2
|
brdns temp_disp 2
|
||||||
jal display
|
jal display
|
||||||
|
|
||||||
# send state to heaters
|
# send state to heaters
|
||||||
sb wall_heaters On heating_active
|
sb WALL_HEATERS On heating_active
|
||||||
|
|
||||||
bgtz heating_active heating
|
bgtz heating_active heating
|
||||||
|
|
||||||
j start
|
j start
|
Loading…
Reference in New Issue
Block a user