鲁公网安备 37132102371533号xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 61: 懒惰路径 --
a:
mem1 = calc c + 1
step nw,w,sw,n,s,ne,e,se
if c > mem1 and
mem1 != 1:
pickup c
write mem1
drop
endif
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 61: 懒惰路径 --
mem4 = foreachdir nw,w,sw,n,s,ne,e,se:
step nw,w,sw
endfor
a:
if mem4 == datacube:
step mem4
else:
step nw,w,sw,n,s,ne,e,se
endif
mem1 = set c
mem2 = calc mem1 + 1
mem4 = set nothing
mem3 = foreachdir nw,w,sw,n,s,ne,e,se:
if mem2 < mem3 and
mem2 != 1:
mem4 = set mem3
pickup mem3
write mem2
drop
step mem1
endif
endfor
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 62: 排序楼层 --
step ne
step n
step nw
a:
mem1 = foreachdir w,n,s,e:
step mem1
if e == worker:
if e < c:
pickup e
else:
pickup c
endif
else:
if w > c:
pickup w
else:
pickup c
endif
endif
drop
if e == worker:
if w == hole:
if s == worker:
listenfor ready
else:
listenfor go
if myitem == datacube:
drop
endif
tell e ready
tell n ready
endif
endif
else:
if w == datacube and
e == datacube:
if s == worker:
if sw < e:
pickup sw
step e
drop
step w
endif
listenfor ready
else:
if w < ne:
pickup ne
giveto w
endif
tell w go
listenfor ready
tell n ready
endif
endif
endif
endfor
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 63: 乱序整理 --
a:
if w == hole:
step s
endif
mem1 = nearest datacube
pickup mem1
b:
if n != hole:
step n
jump b
endif
c:
if c == nothing:
drop
mem4 = calc mem4 + 1
if mem4 == 3:
end
endif
else:
if e != hole:
step e
else:
step s
d:
if w != hole:
step w
jump d
endif
endif
jump c
endif
mem2 = foreachdir nw,sw,ne,se:
step s
endfor
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 64: 二进制计数器 --
step s
pickup c
step s
if nw == worker:
a:
tell nw coffeetime
step n
listenfor ugh
step s
jump a
endif
b:
listenfor coffeetime
if myitem == datacube:
tell everyone ugh
drop
else:
tell w coffeetime
pickup c
endif
jump b
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 65: 有序整理 --
if w == nothing and
e == nothing:
a:
if n != hole:
step n
jump a
endif
b:
c:
if w != hole:
step w
jump c
endif
d:
if myitem == datacube and
c == nothing:
drop
endif
if w == nothing and
c == datacube and
myitem == nothing or
ne == nothing and
c == datacube and
myitem == nothing:
pickup c
step mem1
endif
if e != hole:
if e == nothing and
c == datacube:
mem1 = set c
endif
step e
jump d
endif
step sw
jump b
endif
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 65: 有序整理 --
if w == worker or
e == worker:
step w
endif
step nw
mem1 = foreachdir nw,sw,n,s,ne,se:
step n
endfor
if c == nothing:
pickup e
drop
endif
mem2 = set c
a:
mem1 = set c
b:
if c == datacube and
mem1 == nothing:
pickup c
step mem2
else:
mem1 = set c
if e != hole:
step e
else:
step sw
mem3 = foreachdir nw,w,sw,ne,e,se:
step w
endfor
endif
jump b
endif
c:
if c != nothing:
if e != hole:
step e
else:
step sw
mem4 = foreachdir w,sw,n,s,ne,e:
step w
endfor
endif
jump c
endif
drop
mem2 = set c
jump a
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 66: 十进制计数器 --
step s
pickup c
if s == button:
a:
step s
step n
tell everyone ugh
tell w hi
listenfor ready
jump a
endif
step s
mem1 = set myitem
b:
drop
mem1 = calc mem1 + 1
listenfor hi
pickup c
if mem1 == 10:
tell w hi
mem1 = set 0
write mem1
else:
write mem1
tell everyone ready
endif
jump b
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 67: 十进制翻倍器 --
step s
if c == datacube:
pickup c
step s
a:
tell everyone coffeetime
drop
mem1 = calc c x 2
if e >= 5:
mem1 = calc mem1 + 1
else:
mem1 = calc mem1 + 0
endif
if mem1 >= 10:
mem1 = calc mem1 - 10
else:
mem1 = calc mem1 - 0
endif
pickup c
write mem1
jump a
endif
b:
listenfor coffeetime
step s
step n
jump b
xxxxxxxxxx
-- 7 Billion Humans (2235) --
-- 68: 再见，人类！ --
if w == wall:
step se
endif
mem1 = foreachdir nw,n,ne:
step s
endfor
a:
mem1 = nearest worker
if mem1 != worker:
tell everyone goodbye
endif
step sw,s,se
jump a
xxxxxxxxxx
如果您觉得对你有帮助
可以给作者的抖音点个关注
祝大家每天开心
鲁公网安备 37132102371533号