|
|
楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了, m7 k5 S4 g) l: e' ^- D* e4 ]4 @
- U( n! A* l8 d2 V问题找到了,
9 B3 E: S# j* h" t: r
* f' Y; U% C% F! c* f
" H0 L" z" B1 K0 x在 To clear 中遗失了一句
" Q% C/ n7 S* [
$ |3 V; ]3 t. t/ i [ ask neighbors with [any? grass-squares-here]0 z; a* A2 _( e, v+ P
% }, G. I) a. v
0 @* v+ O! Q0 ?6 ~! @3 ~" n7 b" `" n+ j6 y* V
6 f2 T: P4 R7 {0 \) P" eto clear
& g- ?. N0 M d9 G2 f
- r) Y% ^9 A' E7 }ask grass-squares-here [die]
1 b, ~( u( X, R/ b4 x/ D$ b ^, W- S' x8 ? A* Z* N) l! R+ L0 H
ask markers-here [die]! x* n& _, a! h8 }
8 |( q8 ^4 o; [' q/ J2 |" _; c
let total count neighbors with [any? mines-here]
% v# f- f( g) _
. N4 T( l# b2 T: t. hifelse total > 0
4 K; J7 x" u: F9 ^
8 v, b- G+ U6 Q6 Y+ m% `[set plabel total]
; P! _2 k4 a+ \6 O
. @# h5 t" b' V/ a3 P- k [ ask neighbors with [any? grass-squares-here]6 Q+ \. ]; v1 u5 ~
2 u* p a7 C% d1 n) }
; @& ? t% W; M: Y3 C
[clear]$ V/ ], O: Y0 _( T. \6 x& L+ b
3 I7 L4 k& N$ t: c: B( l; z! V9 @( Y
end |
|
发表于 2008-5-25 18:48:57
