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_52_speed.code
Created September 7, 2018 12:42
7 Billion Humans | Year 52 | Speed
-- 7 Billion Humans (2087) --
-- 52: The Mode Code --
mem4 = nearest datacube
comment 0
pickup mem4
if e == nothing:
mem1 = set 5
else:
a:
@JasonSpine
JasonSpine / 7BH_52_size.code
Created September 7, 2018 12:43
7 Billion Humans | Year 52 | Size
-- 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
@JasonSpine
JasonSpine / 7BH_53_size.code
Created September 7, 2018 12:46
7 Billion Humans | Year 53 | Size
-- 7 Billion Humans (2087) --
-- 53: 100 Cubes on the Floor --
comment 2
if e == wall:
mem3 = set 99
endif
a:
if c != datacube:
step w
@JasonSpine
JasonSpine / 7BH_53_speed.code
Created September 7, 2018 12:46
7 Billion Humans | Year 53 | Speed
-- 7 Billion Humans (2087) --
-- 53: 100 Cubes on the Floor --
if n == wall:
mem1 = set 0
jump a
endif
if n == worker and
se == worker:
mem1 = set 10
@JasonSpine
JasonSpine / 7BH_54_speed.code
Created September 7, 2018 12:48
7 Billion Humans | Year 54 | Speed
-- 7 Billion Humans (2087) --
-- 54: Terrain Leveler --
comment 0
if s == wall:
mem4 = set 99
endif
a:
if n != wall:
step n
@JasonSpine
JasonSpine / 7BH_54_size.code
Created September 7, 2018 12:49
7 Billion Humans | Year 54 | Size
-- 7 Billion Humans (2087) --
-- 54: Terrain Leveler --
a:
if n != wall:
step n
mem1 = calc c + mem1
pickup c
write mem1
drop
@JasonSpine
JasonSpine / 7BH_55_size_and_speed.code
Created September 7, 2018 12:52
7 Billion Humans | Year 55 | Size and Speed
-- 7 Billion Humans (2087) --
-- 55: Data Flowers --
pickup s
a:
if n != datacube or
s != datacube:
step n
jump a
endif
@JasonSpine
JasonSpine / 7BH_60_size_and_speed.code
Created September 8, 2018 00:49
7 Billion Humans | Year 60 | Size and Speed
-- 7 Billion Humans (2087) --
-- 60: Understaffed Sorting --
a:
step w,e
if sw == datacube and
sw > s and
e != worker and
w != worker:
pickup sw
@JasonSpine
JasonSpine / 7BH_56_size_and_speed.code
Created September 8, 2018 00:51
7 Billion Humans | Year 56 | Size and Speed
-- 7 Billion Humans (2087) --
-- 56: Local Maximums --
step w
step w
mem1 = foreachdir nw,w,sw,n,s,ne,e,se:
if mem1 > mem2:
mem2 = set mem1
endif
endfor
@JasonSpine
JasonSpine / 7BH_57_speed.code
Last active September 8, 2018 00:54
7 Billion Humans | Year 57 | Speed
-- 7 Billion Humans (2087) --
-- 57: Neighborly Sweeper --
comment 0
if w == wall:
a:
b:
if c == nothing and
e != wall:
step e