|
|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了2 j6 L" E) i. X" h: d
! T3 A; N- C; j2 L, w! c( y问题找到了,
2 }( x& N8 @4 l7 ^* N2 R5 X. Q8 A, ~+ m8 @' K; f
1 x6 v4 M5 \) f2 t4 Y在 To clear 中遗失了一句
" z4 |: W- ]4 P: V% q; N. ]: a7 C9 D3 z) B8 w' |( F
[ ask neighbors with [any? grass-squares-here]
$ M" _2 N$ |" a# N
( i1 \0 ^8 }) d( g# a7 Q
: [' e, N/ r+ V B5 p; k {8 Z/ W. ^& [
" v7 [+ ^$ b& w
to clear
+ _1 C# c2 a O5 w" V
: b7 j8 ^/ n2 i' E% g, ^( Yask grass-squares-here [die]
( ]3 q, n/ Q+ D! P: r' o* n$ P1 @4 O0 L3 |# S+ K% t. a
ask markers-here [die]
R/ p0 ^3 `7 \* M; @% n W# I
5 u4 O) E& \* i5 v6 h) W$ glet total count neighbors with [any? mines-here]9 ]: c4 U1 t0 t8 P* P% z( S
) E9 n& q) K5 ?/ e0 b5 F7 X( xifelse total > 0
5 V) o s: @, W) c( [3 P% `+ S( r5 N, ?* G) Q/ L
[set plabel total]
- \+ H1 R6 u1 Z" I9 c& x: |1 r4 q7 B" I, ~3 l
[ ask neighbors with [any? grass-squares-here]9 i$ @1 l7 Y2 T# a, A& \3 ^
# I& @# q, k- |! \8 P
2 N, R- H& l* F! `* |1 l[clear]: k/ \2 U: l% N& n8 L
7 a0 Z* s% u/ U* N7 r" \! c/ oend |
|