alias ic d0

define RICESS 3
define RICEDEP 4
define CORNSS 11
define CORNDEP 4

move sp 0

push 0 # real count of hydroponics devices poke-d later.

move r1 0
#push HASH("hydro c1")
push r1 # hydro station
push RICESS # seed station
push RICEDEP

add r1 r1 1
#push HASH("hydro c2")
push r1 # hydro station
push RICESS # seed station
push RICEDEP

add r1 r1 1
#push HASH("hydro c3")
push r1 # hydro station
push RICESS # seed station
push RICEDEP

move r1 RICEDEP
add r1 r1 1
#push HASH("hydro c4")
push r1 # hydro station
push RICESS # seed station
push RICEDEP

add r1 r1 1
#push HASH("hydro c5")
push r1 # hydro station
push RICESS # seed station
push RICEDEP

add r1 r1 1
#push HASH("hydro c6")
push r1 # hydro station
push RICESS # seed station
push RICEDEP

add r1 r1 1
#push HASH("hydro c7")
push r1 # hydro station
push CORNSS # seed station
push CORNDEP

add r1 r1 1
#push HASH("hydro c8")
push r1 # hydro station
push CORNSS # seed station
push CORNDEP

add r1 r1 1
#push HASH("hydro c9")
push r1 # hydro station
push CORNSS # seed station
push CORNDEP

s db Setting sp
div r0 sp 3
floor r0 r0
poke 0 r0 # set the number of stations based on how much we pushed to the SP
# number of hydroponics configurations
s db Setting r0

start:

# copy stack from this IC to the target
move r1 0
loop:
get r0 db r1
put ic r1 r0

add r1 r1 1
blt r1 sp loop


sleep 2
j start