Skip to content

Instantly share code, notes, and snippets.

View JasonSpine's full-sized avatar
🕹️
GameDev

Marek Adamczyk JasonSpine

🕹️
GameDev
View GitHub Profile
@JasonSpine
JasonSpine / 7BH_64_speed.code
Created September 8, 2018 15:50
7 Billion Humans | Year 64 | Speed
-- 7 Billion Humans (2087) --
-- 64: Binary Counter --
if w == datacube:
comment 0
step s
a:
listenfor go
step s
tell everyone ready
@JasonSpine
JasonSpine / 7BH_64_size.code
Created September 8, 2018 15:50
7 Billion Humans | Year 64 | Size
-- 7 Billion Humans (2087) --
-- 64: Binary Counter --
step s
if s == button:
a:
step s
step n
tell w ok
listenfor ready
@JasonSpine
JasonSpine / 7BH_68_speed.code
Created September 8, 2018 15:47
7 Billion Humans | Year 68 | Speed
-- 7 Billion Humans (2087) --
-- 68: Goodbye, Humans! --
if n == hole:
step ne
a:
if e != wall:
step e
jump a
endif
@JasonSpine
JasonSpine / 7BH_68_size.code
Created September 8, 2018 15:47
7 Billion Humans | Year 68 | Size
-- 7 Billion Humans (2087) --
-- 68: Goodbye, Humans! --
a:
if e != hole:
step se
if sw == wall and
se == wall:
if nw != worker and
n != worker and
@JasonSpine
JasonSpine / 7BH_63_size.code
Created September 8, 2018 15:34
7 Billion Humans | Year 63 | Size
-- 7 Billion Humans (2087) --
-- 63: Defrag Disordered --
if w != hole:
step n
step n
if ne == datacube:
pickup ne
else:
pickup n
@JasonSpine
JasonSpine / 7BH_63_speed.code
Created September 8, 2018 15:34
7 Billion Humans | Year 63 | Speed
-- 7 Billion Humans (2087) --
-- 63: Defrag Disordered --
comment 1
if w == worker:
step ne
step ne
pickup c
mem1 = set ne
step nw
@JasonSpine
JasonSpine / 7BH_59_speed.code
Created September 8, 2018 01:04
7 Billion Humans | Year 59 | Speed
-- 7 Billion Humans (2087) --
-- 59: Glory Hole --
if ne == 6:
step e
endif
if n == 6:
a:
step nw
jump a
@JasonSpine
JasonSpine / 7BH_59_size.code
Last active September 8, 2018 01:10
7 Billion Humans | Year 59 | Size
-- 7 Billion Humans (2087) --
-- 59: Glory Hole --
a:
mem1 = foreachdir nw,w,sw,n,s,ne,e,se:
if c == 1:
mem2 = nearest hole
step mem2
endif
if c == nothing or
@JasonSpine
JasonSpine / 7BH_58_speed.code
Created September 8, 2018 01:02
7 Billion Humans | Year 58 | Speed
-- 7 Billion Humans (2087) --
-- 58: Good Neighbors --
mem1 = nearest wall
mem2 = nearest datacube
a:
b:
c:
d:
pickup mem2
@JasonSpine
JasonSpine / 7BH_58_size.code
Last active September 8, 2018 01:01
7 Billion Humans | Year 58 | Size
-- 7 Billion Humans (2087) --
-- 58: Good Neighbors --
a:
step nw,sw,ne,se
mem2 = set 0
mem1 = foreachdir nw,w,sw,n,s,ne,e,se:
if mem1 == datacube:
mem2 = calc 1 + mem2
endif