7 Billion Humans | Year 52 | Size

7BH_52_size.code

-- 7 Billion Humans (2087) --
-- 52: The Mode Code --

mem2 = set s
if w != nothing:
	a:
	mem4 = calc 1 + mem4
	if w == worker:
		jump a
	endif
endif
step n
b:
if n == datacube:
	step w
	jump b
endif
mem3 = set ne
c:
step mem3
mem3 = set e
if mem3 != nothing or
 nw == datacube:
	d:
	if c == mem4:
		mem1 = calc mem1 + 1
	endif
	if n == nothing:
		jump c
	endif
	step n
	jump d
endif
pickup mem2
write mem1
drop