7 Billion Humans | Year 54 | Size

7BH_54_size.code

-- 7 Billion Humans (2087) --
-- 54: Terrain Leveler --

a:
if n != wall:
	step n
	mem1 = calc c + mem1
	pickup c
	write mem1
	drop
	jump a
endif
if sw != datacube:
	step s
	b:
	if e == datacube:
		mem1 = calc mem1 + e
		step e
		jump b
	endif
else:
	end
endif
mem1 = calc mem1 / 49
c:
mem2 = set w
if mem2 != nothing or
 se == datacube:
	d:
	pickup c
	write mem1
	drop
	step s
	if c != datacube:
		step mem2
		jump c
	endif
	jump d
endif