-- 7 Billion Humans (2144) --
-- Level 65: Defrag Ordered --
-- Shortest Program: 25 Commands --
-- Fastest Program: 395 Seconds --
a:
if n != hole:
step n
if w != hole:
step w
endif
jump a
endif
mem1 = set c
b:
if myitem == nothing:
if c == datacube and
mem2 != 0:
pickup c
step mem1
mem1 = set e
mem2 = set 0
endif
if c == nothing:
mem2 = set 1
endif
else:
if c == nothing:
drop
endif
endif
if e != hole:
step e
else:
c:
step sw
if w != hole:
step nw
jump c
endif
endif
jump b