|
|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了
$ g3 E) u+ ~6 i8 U: S$ M N3 \% s' e. g6 d, @6 M; J
问题找到了,
- g* K5 n1 [* r! E- h: D
( \1 B* j! W5 C- K [( x% E. w! o$ [! X/ \! z# r
在 To clear 中遗失了一句 2 `* c% w6 ~/ K# p- ]
1 Z# ?$ Y. D, X$ w9 l3 ^
[ ask neighbors with [any? grass-squares-here]
4 _& }0 G' Y( z W: c; H" S+ C/ E- W. L; C' k6 R
# m, Z$ u, ~! l/ x& i$ Q$ `- F4 c. G2 _- w& O
" k) R% |# Y" o8 ]; s
to clear
4 o) s B v* }# X
8 C% {7 y$ U1 w- B4 vask grass-squares-here [die]
) F( h% z r! z* T- f! L r! Z e+ N/ B8 P; g( ]- T: l
ask markers-here [die]+ b* n3 g# v0 d# E2 r
1 a4 _5 z) l+ C
let total count neighbors with [any? mines-here]5 N( ?+ i1 B& S4 }; ^ G; S
O1 M' O T, c7 D
ifelse total > 05 y, n1 d9 a7 o0 C0 Z
1 S, e* B( f6 X0 Y' R
[set plabel total]7 j4 U( _2 ^& I! r4 Y6 n
% I6 v# N/ N$ D* t/ l! u/ w [ ask neighbors with [any? grass-squares-here]
# @/ l7 s% {! E4 ^, s, b3 J( F+ g; s! y5 Y- N
2 P' _6 f0 }* j0 T5 [
[clear]
8 v! F. b' t/ l% P9 [1 u
) j+ g- r( A" t' [end |
|