alias ic d0

define POTATOSS 9
define POTATODEP 11
define FERNSS 10
define FERNDEP 11

move sp 0

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

move r0 1
push HASH("hydro a1")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

add r0 r0 1
push HASH("hydro a2")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

add r0 r0 1
push HASH("hydro a3")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

add r0 r0 1
push HASH("hydro a4")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

add r0 r0 1
push HASH("hydro a5")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

add r0 r0 1
push HASH("hydro a6")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

add r0 r0 1
push HASH("hydro a7")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

add r0 r0 1
push HASH("hydro a8")
push r0 # hydro station
push POTATOSS # seed station
push POTATODEP

move r1 12
push HASH("hydro a9")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

add r1 r1 1
push HASH("hydro a10")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

add r1 r1 1
push HASH("hydro a11")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

add r1 r1 1
push HASH("hydro a12")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

add r1 r1 1
push HASH("hydro a13")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

add r1 r1 1
push HASH("hydro a14")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

add r1 r1 1
push HASH("hydro a15")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

add r1 r1 1
push HASH("hydro a16")
push r1 # hydro station
push FERNSS # seed station
push FERNDEP

s db Setting sp
div r0 sp 4
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