diff --git a/auto_arc_furnace.ic10 b/auto_arc_furnace.ic10 new file mode 100644 index 0000000..5222484 --- /dev/null +++ b/auto_arc_furnace.ic10 @@ -0,0 +1,18 @@ +alias furnace d0 + +alias import_occupied r0 +alias active r1 +alias run_furnace r2 + +start: +yield +ls import_occupied furnace 0 Occupied +l active furnace Activate +xor run_furnace import_occupied active +bgtz run_furnace run +j start + +run: +bgtz active start # already running = go to start +s furnace Activate 1 +j start \ No newline at end of file diff --git a/auto_class_sorter.ic10 b/auto_class_sorter.ic10 new file mode 100644 index 0000000..562fdcf --- /dev/null +++ b/auto_class_sorter.ic10 @@ -0,0 +1,33 @@ +# Runs up to six sorters that filter throughput by ItemClass +# When looking at the outputs, left = ITEMCLASS, right = everything else + +alias occupied r0 +alias input_class r1 +alias is_class r2 +alias sorter_counter r3 + +move sorter_counter 0 + +define ITEMCLASS 19 # 10=ores, 19=ingots, 33=wrekage +define INPUTSLOT 0 # sorter input-slot + +start: +jal sort +add sorter_counter sorter_counter 1 +bgt sorter_counter 5 reset +j start + +sort: +bdns dr3 ra +s dr3 Mode 2 # set sorter to IC mode +ls occupied dr3 INPUTSLOT Occupied # check if anything to sort +beqz occupied ra +ls input_class dr3 INPUTSLOT Class +seq is_class input_class ITEMCLASS # change seq to sne to swap output ports +s dr3 Output is_class +j ra + +reset: +yield +move sorter_counter 0 +j start \ No newline at end of file diff --git a/automated_canister_filling.ic10 b/automated_canister_filling.ic10 index ad13356..690713b 100644 --- a/automated_canister_filling.ic10 +++ b/automated_canister_filling.ic10 @@ -16,8 +16,8 @@ alias gas_to_move r3 alias fill_pressure r4 alias pump_active r5 -define canister 42280099 -define smart_canister -668314371 +define CANISTER 42280099 +define SMART_CANISTER -668314371 start: yield @@ -26,8 +26,8 @@ ls canister_present canister_storage 0 Occupied # identify canister ls canister_hash canister_storage 0 OccupantHash # set safe fill-pressure -beq canister_hash canister regular -beq canister_hash smart_canister smart +beq canister_hash CANISTER regular +beq canister_hash SMART_CANISTER smart regular: move fill_pressure 8000000 # regular can safe max diff --git a/cooling_tower_drain.ic10 b/cooling_tower_drain.ic10 index dcbf496..e8f8ea6 100644 --- a/cooling_tower_drain.ic10 +++ b/cooling_tower_drain.ic10 @@ -11,7 +11,7 @@ alias temp_go r2 alias press_go r3 alias pump_go r4 -define temp_thresh 313 # 39.85C +define TEMP_THRESH 313 # 39.85C # Sets volume pump max capacity l pipe_press pump Maximum @@ -23,7 +23,7 @@ yield l pipe_temp sensor Temperature l pipe_press sensor Pressure # 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 # If cooling-tower has pressure, and temp is safe.. and pump_go temp_go press_go diff --git a/filtration.ic10 b/filtration.ic10 index b22d324..dc29c57 100644 --- a/filtration.ic10 +++ b/filtration.ic10 @@ -18,53 +18,57 @@ alias filter1 r1 alias filter2 r2 alias tank_press r3 alias button r4 -alias temp_run r5 -alias press_run r6 -alias filter_run r7 -alias purge_run r8 +alias filter_run r5 +alias filter_test r6 +alias purge_run r7 +alias has_gas r8 -define max_press 58000 # 58MPa -define max_temp 313 # 40C +define MAX_PRESS 58000 # 58MPa +define MAX_TEMP 313 # 40C + +l r9 purge_pump Maximum +s purge_pump Setting r9 -l filter1 purge_pump Maximum # borrow filter1 -s purge_pump Setting filter1 # set max throughput s filter_display Color 4 # red start: yield -s purge_pump On 0 # ensure pump is off -ls filter1 filter_unit 0 Quantity # check r-filter -ls filter2 filter_unit 1 Quantity # check l-filter -beqz filter1 swap_filter_1 # right filter spent -beqz filter2 swap_filter_2 # left filter spent -s filter_display On 0 # turn off filter display -l purge_run purge_button Setting # check purge -bgtz purge_run purge # run purge if triggered -j filter # or start filtering +s purge_pump On 0 +ls filter1 filter_unit 0 Quantity +ls filter2 filter_unit 1 Quantity +beqz filter1 swap_filter_1 +beqz filter2 swap_filter_2 +s filter_display On 0 +l purge_run purge_button Setting +bgtz purge_run purge +j filter swap_filter_1: # if right filter needs swapping s filter_display Setting 1 s filter_display On 1 -j filter # then start filtering +j filter # then continue filtering swap_filter_2: # if left filter needs swapping s filter_display Setting 2 s filter_display On 1 -j filter # then start filtering +j filter # then continue filtering filter: -l mud_temp mud_sensor Temperature # get input temp -l tank_press tank Pressure # get output pressure -slt temp_run mud_temp max_temp # is temp safe -slt press_run tank_press max_press # is press safe -and filter_run temp_run press_run # temp and press? -s filter_unit On filter_run # run filter -j start # loop +l mud_temp mud_sensor Temperature +l tank_press tank Pressure +l has_gas mud_sensor RatioCarbonDioxide +sgtz has_gas has_gas +slt filter_run mud_temp MAX_TEMP +slt filter_test tank_press MAX_PRESS +and filter_run filter_run filter_test +and filter_run filter_run has_gas +s filter_unit On filter_run +j start -purge: # purge button pressed +purge: yield -s filter_unit On 0 # stop filtering -l tank_press tank Pressure # check pressure -s purge_pump On 1 # run evac-pump -bgtz tank_press purge # keep sucking until tank dry -j start # begin filtering \ No newline at end of file +s filter_unit On 0 +l tank_press tank Pressure +s purge_pump On 1 +bgtz tank_press purge +j start \ No newline at end of file diff --git a/gas_mixer.ic10 b/gas_mixer.ic10 index fdce57c..e0c33df 100644 --- a/gas_mixer.ic10 +++ b/gas_mixer.ic10 @@ -20,9 +20,9 @@ alias mixer_run r6 alias purge_activate r7 # 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" -define press_out_max 58000 +define PRESS_OUT_MAX 58000 # Sets purge pump to max output l tank_a_press pump Maximum @@ -41,9 +41,9 @@ l tank_b_press tank_b Pressure l tank_out_press tank_out Pressure # Checks if pressures are within tolerances -sgt tank_a_ok tank_a_press press_in_min -sgt tank_b_ok tank_b_press press_in_min -slt tank_out_ok tank_out_press press_out_max +sgt tank_a_ok tank_a_press PRESS_IN_MIN +sgt tank_b_ok tank_b_press PRESS_IN_MIN +slt tank_out_ok tank_out_press PRESS_OUT_MAX and mixer_run tank_a_ok tank_b_ok and mixer_run tank_out_ok mixer_run diff --git a/heating_cooling.ic10 b/heating_cooling.ic10 index d6b8787..1709d47 100644 --- a/heating_cooling.ic10 +++ b/heating_cooling.ic10 @@ -1,6 +1,11 @@ alias gas_sensor d0 -alias thermostat d1 # Logic Switch, Dial variant (Max=30) -alias temp_variance d2 # Logic Memory, must be more than 0 (2 is a good value) +# d1= Logic Switch, Dial variant (Max=30) +alias thermostat d1 +# d2 = Logic Memory, must be more than 0 +alias temp_variance d2 +# d3 = Console, LED Display variant, optional +alias temp_disp d3 + alias curr_temp r0 alias target_temp r1 alias variance r2 @@ -9,10 +14,13 @@ alias max_temp r4 alias cooling_active r5 alias heating_active r6 -define wall_heaters 24258244 # Wall Heaters -define wall_coolers -739292323 # Wall Coolers (Gas) -define liquid_wall_coolers -1369060582 # Wall Coolers (Liquid) -define temp_convert 273 +define WALL_HEATERS 24258244 +define WALL_COOLERS -739292323 +define LIQUID_WALL_COOLERS -1369060582 +define TEMP_CONVERT 273.15 + +move cooling_active 0 +move heating_active 0 start: yield @@ -23,54 +31,64 @@ sub min_temp min_temp variance l max_temp thermostat Setting add max_temp max_temp variance -# initiate target temperature l target_temp thermostat Setting -# read ambient temp from sensor and convert to C -l curr_temp gas_sensor Temperature -sub curr_temp curr_temp temp_convert +# get current temperature +jal temp_read + +# update display +brdns temp_disp 2 +jal display # compare current temp to max/min temp and # initiate cooling or heating if needed bgt curr_temp max_temp cooling blt curr_temp min_temp heating -# Go to start again +sb WALL_COOLERS On cooling_active +sb LIQUID_WALL_COOLERS On cooling_active +sb WALL_HEATERS On heating_active + j start +temp_read: +l curr_temp gas_sensor Temperature +sub curr_temp curr_temp TEMP_CONVERT +j ra + +display: +s temp_disp Setting curr_temp +j ra + cooling: yield -# read ambient temp from sensor and convert to C -l curr_temp gas_sensor Temperature -sub curr_temp curr_temp temp_convert +jal temp_read # test if coolers need to be on or not sgt cooling_active curr_temp target_temp +brdns temp_disp 2 +jal display + # send state to coolers -sb wall_coolers On cooling_active -sb liquid_wall_coolers On cooling_active +sb WALL_COOLERS On cooling_active +sb LIQUID_WALL_COOLERS On cooling_active -# if curr_temp is higher than target, keep cooling -bgt curr_temp target_temp cooling - -# ...if not, go to start again +bgtz cooling_active cooling j start heating: yield -# read ambient temp from sensor and convert to C -l curr_temp gas_sensor Temperature -sub curr_temp curr_temp temp_convert +jal temp_read # test if heaters need to be on or not slt heating_active curr_temp target_temp +brdns temp_disp 2 +jal display + # send state to heaters -sb wall_heaters On heating_active +sb WALL_HEATERS On heating_active -# if curr_temp is lower than target, keep heating -blt curr_temp target_temp heating - -# ...if not, go to start again +bgtz heating_active heating j start \ No newline at end of file diff --git a/printer_countdown.ic10 b/printer_countdown.ic10 new file mode 100644 index 0000000..773d702 --- /dev/null +++ b/printer_countdown.ic10 @@ -0,0 +1,23 @@ +alias dial d0 +alias order_display d1 +alias remaining_display d2 +alias printer d3 + +alias order_count r0 +alias export_count r1 +alias remaining_count r2 + +move remaining_count 0 + +start: +yield +l order_count dial Setting +s order_display Setting order_count +l export_count printer ExportCount +sub remaining_count order_count export_count +s remaining_display Setting remaining_count +bgtz remaining_count start +s printer ClearMemory 1 +s dial Setting 0 +s printer Activate 0 +j start \ No newline at end of file