xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 31: 星罗棋布 --
mem1 = nearest printer
a:
if myitem == nothing:
takefrom mem1
step e
endif
step nw,sw,ne,se
drop
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 31: 星罗棋布 --
mem1 = nearest printer
a:
if myitem == nothing:
takefrom mem1
step w,n,s,e
endif
step nw,sw,ne,se
if c == nothing:
drop
endif
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 32: 创造性扭动 --
a:
step nw,w,sw,n,s,ne,e,se
if c == datacube and
c != 99:
pickup c
write 99
drop
endif
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 32: 创造性扭动 --
a:
if s == datacube:
step s
else:
if w == datacube:
step w
else:
step e
endif
endif
pickup c
write 99
drop
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 33: 资料备份日 --
mem1 = set w
mem2 = set e
if mem1 < mem2:
mem1 = set e
mem2 = set w
endif
pickup mem1
write mem2
drop
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 34: 查找并摧毁 1 --
mem1 = nearest datacube
mem2 = nearest shredder
a:
step n
if n != wall:
if c < mem1:
mem1 = set c
endif
jump a
endif
pickup mem1
giveto mem2
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 35: 面向艺术生的计算器入门 --
pickup s
mem1 = calc myitem + 1
write mem1
drop
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 36: 查找并摧毁 2 --
mem2 = nearest shredder
a:
mem1 = set nothing
b:
step n
if n != wall:
if c == datacube and
c < mem1 or
mem1 == nothing:
mem1 = set c
endif
jump b
endif
pickup mem1
giveto mem2
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 36: 查找并摧毁 2 --
mem2 = nearest shredder
a:
step n
if c == datacube:
if mem1 != datacube or
c < mem1:
mem3 = set mem1
mem1 = set c
else:
if c < mem3 or
mem3 != datacube:
mem3 = set c
endif
endif
endif
if n == wall and
mem1 == datacube:
pickup mem1
giveto mem2
if mem3 == datacube:
pickup mem3
giveto mem2
endif
endif
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 37: 危险的电子表格 --
a:
if e == hole:
step se
if ne == hole:
step e
endif
step ne
else:
step e
endif
if e == wall and
c == 0:
pickup c
write mem1
drop
endif
mem1 = calc mem1 + c
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 38: 查找并摧毁 3 --
mem2 = nearest shredder
mem4 = nearest hole
if s == shredder:
step mem4
endif
a:
if n != wall:
step n
else:
pickup mem1
b:
c:
mem3 = nearest worker
if mem3 != worker:
giveto mem2
endif
if mem3 < mem1:
step mem4
endif
if mem3 == mem1:
comment 0
step s
if s == wall:
step e
endif
jump c
endif
jump b
endif
if c < mem1 or
mem1 != datacube:
mem1 = set c
endif
jump a
DEFINE COMMENT 0
eJzNk91LlFEQh5+L6CIIS0pEQqRCIrwIMTFztxDxogsRsZDc/GKJkogINRORYYtFNwuzpYulTERxszKJ
iOrChIjI0grsri+KMKlIzaDIoN97dv+IDjzseefMmTPzm9l3gK1gt63Eb+kUWgYFeLZU0kklWzTZWszW
0GkpREihF+/XW6s4zmqOsJ4GS6PB2Taxjs2kkUeabSfdisgwHxvwkyVy8FHk4ueQa9lExEV3L58aKxA7
CLDLEdS9Fsunx53ncky0WB5hxQ0ry3O2U7n4dN+fjFHNRquS117VUkmxs+0n3wLigDI6Kry369hjNZRZ
LeVWLxoo47C+Gyl3d6pUU7UI6Eaj8FaQCvk2Uavaa7hEPTHZolIg5M6blNEJCmkXHRTZGXFW+6jw3mwj
W/jtZPKNLrZaRD4RSrWvcD7NHDQveo90OE+dXaDO+TbrjRb63b6VkGKftm66Rcy6uOvsbQzYKQbcvp07
1sFtF/MmmWILo9LgGqUWp9KGFHeARrucrG1YKsWpsluOoN1QX67TY8OKOcSgqh10sfo0B1cwrtKrWFHF
jHGPEXukHCa573wmVNOEZuaB+jSuHo0nezOhCh5Kmcfq3RM6nW2KbcyIV+pZ4rucaWkxk9CDlxTbC+Xz
nFbRbdPKxFvP9PIkIzwlblPKfEZ5vqHf3tJnH8THhJ99kt6z6u+sOuqtz5rMOc3IV/GNLFsUP6TPTzL5
o7NlzeeydPqd7Mec9JoXC5TYEiXO9kW9+a7JWGKf+54nR+eHRJiFxP9CPiH7lZgLe61c3zOqvMbsL2Mu
j0VpM5+s5T9Y/wDOFeTE;
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 39: 打印守则 1 --
mem3 = nearest printer
a:
mem1 = calc mem1 + 1
if mem1 <= 5:
takefrom mem3
b:
step nw,w,sw,n,s,ne,e,se
if c != nothing:
jump b
endif
drop
jump a
endif
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 40: 打印守则 2 --
mem3 = nearest printer
a:
mem1 = calc mem1 + 1
if mem1 <= 5:
takefrom mem3
write mem1
b:
step nw,w,sw,n,s,ne,e,se
if c != nothing:
jump b
endif
drop
jump a
endif
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 40: 打印守则 2 --
mem3 = nearest printer
a:
takefrom mem3
b:
step nw,w,sw,n,s,ne,e,se
if c == nothing:
mem1 = calc mem1 + 1
write mem1
drop
if mem1 == 5:
end
endif
jump a
endif
jump b