# items that match the hash go to Output 1,
# unless Output 1 is blocked

alias target r15
alias inputhash r14
alias inputoccupied r13
alias polarity r12

start:
alias sortersilver d0
alias sortercoal d1
alias sortercopper d2
alias sorterlead d3

yield

move target -916518678 # silver ore
move polarity 0
alias sorter d0
jal dosort

move target 1724793494 # coal ore
move polarity 0
alias sorter d1
jal dosort

move target -707307845 # copper ore
move polarity 0
alias sorter d2
jal dosort

move target -190236170 # lead ore
move polarity 0
alias sorter d3
jal dosort

j start

dosort:

bdns sorter ra

s sorter Mode 2

ls inputhash sorter 0 PrefabHash
ls inputoccupied sorter 0 Occupied

blez inputoccupied ra #no input, do nothing

sne r0 target inputhash
seq r0 r0 polarity
s sorter Output r0
j ra