|
|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了. I) q+ S/ ]3 Q9 w' }& o) O
: w/ I( y. @" f0 e* p) u
问题找到了, 1 _' J5 [! n0 t, C4 d
2 f" V. G. T+ M- H% N( `* Q
I5 H" s/ ]& }: n5 `4 g; C4 [# n# _8 H! U在 To clear 中遗失了一句
6 l7 \6 g. `! d, ?3 |' |( v/ q* v( P+ r* d3 u8 o! v; d4 o2 z- R
[ ask neighbors with [any? grass-squares-here]
% J5 c9 A* R4 v, }9 I/ V6 U( U/ F |* r" F* w
^: I1 l# x# I9 V, [
8 I6 I6 h, ^7 M& c0 M9 f. D7 k
2 w) D' A. t. E6 ]) H3 R# ^to clear! d9 a9 f! M2 E
$ k6 \( d4 t/ ?7 x% s: r1 m- f' task grass-squares-here [die]
; p" g2 y& h5 b6 Q$ H. G
. l% A4 Y9 @) R" `! task markers-here [die]
4 [' Y$ _2 g* V' i5 M, _0 b
( {+ Y; r S, A3 R5 G5 U" Elet total count neighbors with [any? mines-here]
+ ~& H2 m r0 o( i9 y( Z. \$ A& m% y' P" @$ N( o) c
ifelse total > 0" X# a0 d2 C I0 {. x9 m
+ ]6 j' z) s9 r7 }3 y0 [ j[set plabel total]
0 \! I5 t/ h% M# j9 f/ l: X8 E8 G, i
8 F+ j" @ {) [* p9 [2 F3 K+ w( ~ [ ask neighbors with [any? grass-squares-here]
8 |2 U. P9 _1 X1 G5 g: G J; w0 v& `/ c; L1 E2 H2 R2 h. ^
6 y3 C: d3 i+ P+ y[clear]
$ F* v& V. K0 M4 L7 L5 K- j1 h8 g; ~! {/ X8 U( l/ Z2 o U; Z# U" t
end |
|