|
|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了: o2 F _8 ^# p5 j) ~
$ x& I; K4 F2 o8 }) E问题找到了,
4 u$ z3 T8 F$ X( Z; M
, y7 J. L" n* j' p' g( C8 v7 W- n8 I. S2 }5 K4 R, e5 d
在 To clear 中遗失了一句
3 R M8 [ O2 ]. J1 {" B; B, q9 D/ l& |) N, q' ~! d6 l
[ ask neighbors with [any? grass-squares-here]
1 B! ~; Z' Y- U6 D" E
/ ~% N0 b; c5 w& m* W, J2 t) u& \: g6 g
7 N( G6 |1 ]# e+ ?
& l+ v/ f# Q& xto clear
# K3 m6 P; G9 f0 ~9 a
) W5 \% _- l4 H; }% aask grass-squares-here [die]7 A* C3 q3 B" ?' V2 F
, P+ r O: q+ t+ |0 Y
ask markers-here [die]
2 F% ~9 H1 i$ h# B5 y: T7 O( y: a4 P/ T
let total count neighbors with [any? mines-here]
2 P, ^( U' ?% {0 _) g: U
5 o! X& }4 K9 b8 y" Yifelse total > 0) g% U7 j6 O* u7 E& U
* g; x- Y! x1 q0 P- l
[set plabel total]/ g) [! a( x' ?% b* E1 i
8 `/ K3 I& s, @. r9 K; o+ r, [. B
[ ask neighbors with [any? grass-squares-here]
) p& z7 b8 E4 k5 i3 j4 q3 y# d
6 D7 `8 R9 V j9 {' K$ |5 z U& A
[clear]* w( Z% x* k. X; \4 {. `4 y
h$ A* n4 B, Z. T' D( l$ cend |
|