|
|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了
% D6 M3 v+ R& a4 P6 _) E- e, w/ k4 r
问题找到了, ; V7 u( b: J; n) ?
" {+ T+ G6 |/ {. E$ N
; z1 z/ b& b3 j* f1 b/ O在 To clear 中遗失了一句
: Z7 y3 `$ R* d. e* b
$ M7 f1 L+ T5 h7 @3 i, h [ ask neighbors with [any? grass-squares-here] ? L. I# S4 p7 s0 d
: g5 q$ B( q+ D9 {
, E0 M; t# r& y7 s/ W
# N3 E# b, }8 ?4 `
- r; p$ ]0 s: E7 D5 \: E4 D/ uto clear: a7 G9 L3 S! z) y
a' Z5 q O4 Q' P
ask grass-squares-here [die]: n0 p0 K5 G/ W+ \; O- E9 U
. c7 k8 e5 `3 y1 Q& z+ ]
ask markers-here [die]
% t5 [6 L9 ^2 P4 f5 f
7 Z N& D. g6 j' olet total count neighbors with [any? mines-here]
4 x" |* M. V: O$ o# k4 u; @, i/ v+ s5 s5 p5 q* _
ifelse total > 0
8 ~/ N, g6 _! y9 t& |3 ?2 m m2 Q9 p' {7 w/ a
[set plabel total]! _! K, X R! i: |/ g) m* e W
7 Z1 h0 i. S9 M, M; R5 q5 D
[ ask neighbors with [any? grass-squares-here]
7 {- m- }2 ~0 H9 o% R$ c) U
. v0 W) p* F |
/ J9 @7 i0 P3 ?! S, t[clear]
/ P5 {0 t, N4 P1 G4 B6 t9 z) Q& @. r: { E& D" U
end |
|