-- 7 Billion Humans (2144) --
-- Level 57: Neighborly Sweeper --
-- Shortest Program: 16 Commands --
-- Fastest Program: 97 Seconds --
if w == wall:
mem3 = set 1
endif
if e != wall or
w != wall:
a:
if mem3 == 1:
step e
else:
step w
endif
if c == datacube:
mem1 = set 0
mem2 = foreachdir nw,w,sw,n,s,ne,e,se:
if mem2 != nothing:
mem1 = calc mem1 + 1
endif
endfor
pickup c
write mem1
drop
endif
jump a
endif
Back