|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了
7 L& B8 v) O1 I8 j- v5 L" c. o6 s4 j- b5 q7 o) o \2 k" H
问题找到了, 3 g' _: X+ N! y3 z* S& F
$ n: x( I: x0 W/ k$ _ p
8 b9 z6 I3 U; q' W$ @! n+ ?
在 To clear 中遗失了一句 ; f" V) o- k' L
8 b* I! J5 f4 y0 F [ ask neighbors with [any? grass-squares-here]
( T9 D4 X# f, M9 i0 j \* C5 R7 ?! h' y% G. ?' v" }9 n) h
! O( g+ e- Y1 ?/ b- _( Y' z( C, {
8 h7 \2 _. C! A* s9 a; v# Q
6 n2 W/ a) g4 B- X0 Z' l9 \5 q; ~1 gto clear
0 Z3 {/ t+ P# e9 O* f3 I6 }
. H0 M4 I/ F6 C( mask grass-squares-here [die]7 Z" j( t3 B" z" X
4 @2 w3 G; ?' q, I$ ]9 Sask markers-here [die]/ W d# _7 X8 e6 V+ j4 l/ y/ e/ f
. g3 H! v' [2 y: r$ A- L: u4 M7 |& W1 m, o6 ?let total count neighbors with [any? mines-here]" K9 c# N# M# I. I
" K) b; G$ E' x2 m6 |
ifelse total > 04 V+ _' D% Z# y4 G2 a5 G6 e& T8 t: X
4 z2 S; Q- K+ A, @" @' y( M
[set plabel total]
2 j j% Q9 t* K# c7 E9 _7 k- ^3 H6 I4 r% h
[ ask neighbors with [any? grass-squares-here]( f7 @0 z: {, F+ l$ J, B g
4 ^9 O; |' M7 M- q; Q1 c
- t/ X& ]9 }) c2 Y; W# f[clear]
3 B* m x/ f; N4 |& u" B* N9 I, S: O0 I9 h9 Q6 I% c( Y
end |
|