alias switchmax r15
alias switchmin r14
alias doorstate r13
alias hashname r12

define HASHSWITCH HASH("StructureLogicSwitch")

move switchmax 4
move switchmin 3
move doorstate 2
start:
yield

alias door d0
move hashname HASH("Gate 1")
jal managedoor

j start

#

managedoor:

lbn switchmax HASHSWITCH hashname Open Maximum
lbn switchmin HASHSWITCH hashname Open Minimum
l doorstate door Open

s db Setting switchmax

bne switchmax switchmin toggle

seqz r0 switchmax
s door Setting r0
j ra

toggle:

seqz r0 doorstate
s door Open r0
sbn HASHSWITCH hashname Open r0
j ra