|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了
) i& H* ~1 d+ b+ c: } N o. z4 v, I# H; u
问题找到了,
& Z3 h8 _- Z# i1 h% |) h6 }7 o6 m& H# C: Z) ~0 d$ o
# b9 w; x' `/ c* e0 l在 To clear 中遗失了一句
% X' A A7 b6 E4 J* }' L
; f% v8 y9 e2 ]; f! n: H* Q* f* D [ ask neighbors with [any? grass-squares-here]
* J3 s/ R) K! w2 _
5 u; L6 c' p+ d) K+ l- B" J( ^6 _7 M2 W) y* _
1 `$ g# I4 e6 X, A3 C) B
+ V5 C1 g. ]8 x; n1 f9 s8 J7 w
to clear
# `7 m3 {* L6 |3 L1 r. v$ _7 J
9 A, N2 k j) ~2 f% P) e# f+ task grass-squares-here [die]
1 x0 Y, ]( P! i0 C/ v: r; i
' X6 @/ y) ]) `/ y' O6 Sask markers-here [die]
; p, z9 y1 Z, r6 g' e, g4 i
/ J: b& m) N/ W$ ^* y# B" b9 d9 flet total count neighbors with [any? mines-here]
/ x# b; r, r) g3 \$ e0 {% B! U) f& W% q# C; A+ Z) D
ifelse total > 01 O2 v; L4 ?$ n
( p" g2 e) D! U% R$ S, T6 Z; H[set plabel total]. G. }" ]. g7 O- a" f) b
0 B: U- G* S ^
[ ask neighbors with [any? grass-squares-here]& H5 \7 e# ]/ I% Z$ c
! i: J8 u, _" q7 f% p, a0 U1 {/ r$ n8 h" W; U; K( z0 _
[clear]$ X0 M! D6 W5 j) c
9 d. m( Q- Y/ i6 a/ @* V: n
end |
|