xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 41: 图片解密 --

pickup w

mem1 = calc myitem + 1

a:

if mem1 <= 0:

	drop

	step ne

endif

step w

mem1 = calc mem1 - 1

jump a

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 41: 图片解密 --

pickup w

step w

mem1 = set myitem

a:

if mem1 > 4:

	step w

	step w

	step w

	step w

	step w

	mem1 = calc mem1 - 5

endif

if mem1 > 3:

	step w

	step w

	step w

	step w

	mem1 = calc mem1 - 4

endif

if mem1 > 2:

	step w

	step w

	step w

	mem1 = calc mem1 - 3

endif

if mem1 > 0:

	step w

	mem1 = calc mem1 - 1

	jump a

endif

drop

mem1 = nearest hole

step mem1

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 42: 整理邮件 --

a:

mem1 = nearest datacube

step mem1

if s == shredder:

	b:

	if n != wall and

	 nw != wall and

	 ne != wall:

		c:

		step nw,w,n,ne,e

		jump b

	endif

	jump a

endif

pickup c

mem1 = calc myitem / 10

d:

step w,sw,n,s,e,se

if mem1 == c and

 s == shredder:

	giveto s

	jump c

endif

jump d

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 42: 整理邮件 --

if n == wall and

 sw == worker:

	step s

endif

if nw == worker and

 s == datacube:

	step w

endif

a:

if w != wall:

	step sw

	jump a

endif

step ne

b:

c:

if s != shredder:

	pickup c

else:

	jump d

endif

mem1 = calc myitem / 10

mem2 = set e

mem3 = nearest shredder

step mem3

e:

if c > mem1:

	step w

	jump e

endif

f:

if c < mem1:

	step e

	jump f

endif

if myitem == datacube:

	giveto s

	step mem2

	jump b

endif

d:

step nw,n,ne

step nw,n,ne

mem2 = nearest datacube

step mem2

jump c

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 43: 九九乘法表 --

a:

step n

if n != datacube or

 c != nothing or

 s != datacube:

	jump a

endif

mem1 = set n

b:

step s

mem2 = calc mem2 + mem1

pickup c

write mem2

drop

jump b

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 44: 独特时髦派对 --

mem1 = nearest hole

pickup s

a:

step nw,w,n,ne,e,se

if myitem == nw or

 myitem == n or

 myitem == w or

 myitem == ne:

	step mem1

endif

jump a

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 46: 强制办公室恋情 --

a:

if e == worker:

	tell e hi

	listenfor hi

	jump a

endif

b:

listenfor hi

tell w hi

jump b

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 47: 全自动寒暄 --

if w == worker:

	listenfor hi

endif

tell e hi

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 48: 社群培训日 --

if n != wall:

	listenfor go

endif

takefrom s

mem1 = nearest shredder

giveto mem1

tell everyone go

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 49: 双向销毁 --

pickup s

mem1 = nearest shredder

a:

if w != nothing and

 e != nothing:

	jump a

endif

giveto mem1

step sw

xxxxxxxxxx

-- 7 Billion Humans (2235) --

-- 50: 无声交流 --

mem1 = set sw

a:

if mem1 == 1:

	takefrom s

	giveto se

	step w

	mem1 = set 4

endif

mem1 = calc mem1 - 1

jump a