|
|
楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了2 z" t) q7 s. A7 P
3 R- x5 Z0 w- {6 W. t( ^* I问题找到了,
6 R3 c, g- x/ M+ X6 q" Q# J: R) L( y8 t% U
6 K6 f! O4 s2 c' E- O0 j% p在 To clear 中遗失了一句 5 ?' V; @, a9 h2 k* ~& e
' K' g; P5 O- o8 C7 p0 Y/ S, e+ p [ ask neighbors with [any? grass-squares-here]
6 l4 q+ L, O* x: K# Y! H6 v
2 Z2 C& P# D/ S6 v7 n% O! Z* d
( M1 ^8 I8 I4 h) p( r$ G" g7 @, L8 Z
" L# d6 m7 W7 b+ Q, D8 _to clear
4 N/ x0 ~# M, \8 F$ l' [8 g, V& o/ {6 c, _
ask grass-squares-here [die]
/ A, s6 U. L5 E" r. N# O
5 w; K( w+ G9 I* W* Mask markers-here [die]+ l" ], Y$ a$ x5 y+ L& a
7 u7 Q$ n" G+ z# z b- m, E
let total count neighbors with [any? mines-here]7 r5 w% y, B0 |9 V5 l3 ]
* U8 }$ r0 `2 a% b& z" k. I5 C% mifelse total > 0. ?8 R; C4 O) c: n, F3 @$ M
5 a. S2 ?) A9 S* _8 _8 f
[set plabel total]# Y0 ^& ~7 `: |( r0 Y
$ E+ ~+ j: d: f% _1 |9 {
[ ask neighbors with [any? grass-squares-here]
5 y" n& d$ P! T) a' U; C
- ]/ A7 Q- }1 k& W' S0 a# z9 |, Z5 d) k( Z; L: v
[clear]- F9 Y1 z- y- w0 j, h2 L
1 }5 Z4 E m) t1 g: g* q2 m7 Pend |
|
发表于 2008-5-25 18:48:57
