|
|
楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了; e5 P, h8 o2 [
) i8 W0 z: ~4 \问题找到了,
1 g' [' {- o3 w( L1 M
0 x' Z+ R; b4 p4 x2 r7 e/ k6 q1 q! W" C- K! K) y: q
在 To clear 中遗失了一句 : O+ X( d, t+ r$ F) ~9 B5 t( A
+ Q- A4 n$ p/ k. U7 o6 i% a [ ask neighbors with [any? grass-squares-here]
' I- l0 {6 l, s! K- W
" c6 u0 B# z$ ~& O& @" I }
/ Y ~3 z6 `4 a; t5 T! ~/ a, t: P6 {) c) V' {1 V" g- R( z, z; C
3 w, _4 [/ J* L' L1 A
to clear
6 C( Z a8 \9 K3 Y. |1 C2 L' E0 E) I$ V7 Q! ?
ask grass-squares-here [die]
; Q+ p% v7 C' ^( a- B! Y3 j9 k) ]3 v& f
ask markers-here [die]6 | N9 S% z7 g; }+ D* l- v$ \! Y3 U
2 P, o1 |1 i; R y2 P4 ^
let total count neighbors with [any? mines-here]
1 r' y9 ~" H: x" p/ {) b) S! M9 B/ j# y
ifelse total > 0) j7 K$ g: }. @
4 q+ j$ B5 P' }. g& s+ B[set plabel total]( Z1 P0 o$ S) U0 u" q- C x3 k9 J
0 X! o/ T4 ~8 q0 c+ j' F# L [ ask neighbors with [any? grass-squares-here]
6 {, |5 `6 w' t. Q% m6 ]
4 s( c9 e2 R: r$ W* N
) o0 K0 u3 v) q$ h- m: P( N! d3 j4 n2 l[clear]8 G8 Y! N4 f) g) O8 u6 J
1 x" {8 n7 D5 J* v4 h' e" a" p
end |
|
发表于 2008-5-25 18:48:57
