|
|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了# S+ [) k# C& [2 H7 N! C; L
1 x+ P) q9 N0 I* C# f问题找到了, & V8 o1 @0 ?9 Y) | d
9 y6 p% f# `$ n/ P
9 |+ V9 H, ]# F+ D! U- B) Y/ d在 To clear 中遗失了一句
; F- u a j6 U; [9 Y1 R2 @( H7 A/ T
[ ask neighbors with [any? grass-squares-here]. F! s9 {- K; z( y( [& s
8 q- N/ A# w! C l, a$ m" J0 d
- U2 J$ T: i, E- Q, ]+ p/ j( I
' L$ V/ h* {' `9 wto clear
@$ s, |5 F5 P# |1 q" w$ X1 `9 ^. a
ask grass-squares-here [die]
& F( s5 b- r, [+ e, M" Y; e+ B: l5 {$ I- J/ @
ask markers-here [die]
# q6 Z9 x+ Q! }& P) _$ Y2 @* s& b3 j2 a1 q! N* y8 ^2 U5 V) d
let total count neighbors with [any? mines-here]
- a3 [/ ~% \7 N. }3 ~7 S5 G* V: n( s( a5 `! A; \2 U2 N
ifelse total > 0
! K2 y/ s) u0 R, H, v1 l9 s9 t" S
; U/ m7 ^0 p: O0 c* T[set plabel total]* B; b3 a% A* L
" S( V% `: R! t# M/ U! @! X
[ ask neighbors with [any? grass-squares-here]
, a$ f' K) b' o1 @, r
* S# a0 Z |7 h n
7 h0 d$ u3 u" ~4 Y[clear]
; C% C5 j* R, y6 a5 q4 i% ?& h# T% j& b+ Y K
end |
|