|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了
. e* X! ]8 ]) H7 q) e$ _( t1 {) u/ m) a. y4 `+ o& T
问题找到了, ( P' h% q9 m& f% c- |* g5 |
6 g2 ] T0 G y |! O+ M( L% |! H7 w/ Q1 U
在 To clear 中遗失了一句 8 T) V! W n+ L, m! E( T* ^0 M
8 |; i/ A8 c( m2 a( d/ {/ r+ s! ^" x [ ask neighbors with [any? grass-squares-here]6 V5 X2 C6 [3 |# L
3 _0 O4 J. t U" t- l" w
" T5 h9 \0 c9 P, c/ s4 P1 s; i" W& c) \
]; m$ ^/ `, U2 G" a, `
to clear
0 K% N& g( ^# K1 x, }/ p
- Z1 J; ~" N# j$ Y% Y& U5 s3 Iask grass-squares-here [die]$ E' Z# M' N/ V/ Y
' [' \& U# ]4 Z) o5 nask markers-here [die]
8 s6 f+ I% p' L3 a! q8 Z$ k+ I- I& B( b# d
let total count neighbors with [any? mines-here]4 s# l5 h- o. P, y
4 q& U I: U m4 t6 s6 \ifelse total > 0
" u+ W5 _; b( A* V! e8 g0 \* }& @0 {7 l8 y$ F: O( e4 V* u
[set plabel total]1 o( m5 I! ], O+ b2 |
t* r3 u3 p* \% x0 t& o' {! |
[ ask neighbors with [any? grass-squares-here]
% T" c6 _2 P5 }5 g- K5 T
2 ^8 [; B! [$ z; ]$ N- g8 j( N! G2 m8 A& d+ Z3 `/ s Q
[clear]
0 o: O6 n; P' _0 \& v
* }; ^. O; }* A7 eend |
|