-- 7 Billion Humans (2144) --
-- Level 64: Binary Counter --
-- Shortest Program: 17 Commands --
step s
a:
step s
if c == button:
step n
listenfor coffeetime
jump a
endif
pickup n
b:
mem2 = set mem1
mem1 = set e
if mem1 != datacube and
mem2 == datacube or
se == button:
if myitem != nothing:
drop
else:
pickup c
mem1 = calc 0 + 0
endif
tell e coffeetime
endif
jump b
Fastest Program
-- 7 Billion Humans (2144) --
-- Level 64: Binary Counter --
-- Fastest Program: 43 Seconds --
if nw == worker:
step s
a:
step s
step n
listenfor coffeetime
jump a
endif
step s
pickup c
if se != switch:
step s
b:
listenfor coffeetime
drop
listenfor coffeetime
pickup c
jump b
endif
if e != worker:
step s
c:
listenfor coffeetime
listenfor coffeetime
drop
listenfor coffeetime
listenfor coffeetime
pickup c
jump c
endif
if e != worker:
step s
d:
listenfor coffeetime
listenfor coffeetime
listenfor coffeetime
listenfor coffeetime
drop
listenfor coffeetime
listenfor coffeetime
listenfor coffeetime
listenfor coffeetime
pickup c
jump d
endif
if e != worker:
step s
e:
mem1 = calc 0 + 0
tell everyone coffeetime
mem1 = calc 0 + 0
tell everyone coffeetime
mem1 = calc 0 + 0
tell everyone coffeetime
mem1 = calc 0 + 0
tell everyone coffeetime
mem1 = calc 0 + 0
tell everyone coffeetime
mem1 = calc 0 + 0
tell everyone coffeetime
mem1 = calc 0 + 0
tell everyone coffeetime
mem1 = calc 0 + 0
tell everyone coffeetime
drop
pickup n
tell everyone coffeetime
jump e
endif