|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了
" {8 J5 J V8 t* [7 B3 M" S& O, U) o& n0 k9 T) M8 t
问题找到了, % u9 ^# P3 @( h2 }: [$ A X
" ?7 ~$ a' @; W' W7 q, x4 }/ `; Q3 B; v7 [
在 To clear 中遗失了一句 . P6 U! K; f' e
$ c2 e* {+ Q2 Q1 o b! u
[ ask neighbors with [any? grass-squares-here]! Z+ X% `, C: V+ u0 E
* u. K# {) @ A" e4 s
0 _# i$ ^4 {9 _- j! {8 S8 d$ e1 N( C. r
) h* _* A; c+ A, _/ L; ^
to clear
, p$ F( R0 T {" |" [* a8 V1 d# |* D/ g+ Y9 B7 C9 ?2 U+ O
ask grass-squares-here [die]" c8 j# B- U9 p) i
+ F! [9 [3 \6 x" A8 p% g1 K7 Nask markers-here [die]
% s- G6 ]; k1 P" v/ v3 @
& G+ c$ k( {0 [; e; v! E; @' llet total count neighbors with [any? mines-here]
" t- U* z! y5 j$ ]9 V, k1 d0 X5 M) T, n
; w# w$ K& `- ]7 \3 ]7 C3 |/ {ifelse total > 0
* ?! P4 \ Z# Z4 d# k, Z$ x8 Q9 l# W/ A
[set plabel total]# z' C1 z# d6 |' x
1 u- `; @9 x8 v6 K
[ ask neighbors with [any? grass-squares-here]# n, B& K3 ]+ q2 S1 X- F
8 j3 Z% \( R, U8 H& K5 ]9 C8 O) r* e, }0 U
[clear]" O. `1 m! ^ J0 b
$ p( \& f3 D( ]% o# t& c! }
end |
|