|
|
楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了
# e, {7 E* K/ U8 e6 c9 N
; i* w& i: p h) S+ [问题找到了,
t' K8 |1 {/ b3 O: O( r! G/ _: K+ x# k: R! R
5 p3 c# {. Z) s+ j% L0 `' B6 M# [在 To clear 中遗失了一句
3 W( v/ p& a& b. O9 }% Z
3 E( \# ~7 u. l; V/ R9 s3 b- h& b [ ask neighbors with [any? grass-squares-here]
, l$ w* W3 ?9 Z; l5 G- t4 e6 o) c# x5 F# z: M, x1 ^
$ r" S0 H# \5 f, `4 C0 o+ D( d6 O. {0 E$ l+ L
' J' @) ^% t- n8 Z3 G- ^0 l) Pto clear" @! u' o2 I' i' x2 [1 m: l% B; [. ^
9 I4 b6 ]3 o# B( t2 @ _, a1 Kask grass-squares-here [die]
1 U1 O6 Q4 F9 ~9 C1 A! N6 h5 v3 z$ W6 N2 t2 ~
ask markers-here [die]
# f7 `; M5 {2 N- W& z4 O# z! K n- t4 d1 x2 R/ A
let total count neighbors with [any? mines-here]
' G. f4 A, `- s4 D% m) M: {! l) z2 q- L- S
ifelse total > 0" {# p, k) T" S" P7 S$ n- n
; N* v- F- c6 I6 I5 v5 x) }9 o[set plabel total]
! }- D. r6 l/ o6 j8 X8 W
- Z, j9 }" f8 A9 K( I ~9 J: z [ ask neighbors with [any? grass-squares-here]
( B& a# I" C! ^7 k* T: v5 m
' w. [% I" D2 R8 q/ V) Q9 |) j, q0 x5 T L
[clear] m. B. {% @3 W3 X3 a: v
: k" v, _; o, j5 {# S, Y# W$ \" a
end |
|
发表于 2008-5-25 18:48:57
