|
|

楼主 |
发表于 2008-5-28 11:44:37
|
显示全部楼层
好的,谢谢了6 r( U* U# [2 o+ B5 g& O* k0 A
% ?; f/ Q, ^" j" Q6 f1 i: g
问题找到了, . \- V5 o. \. m/ ?1 t
9 ], w- ~* `9 d; j6 M2 s4 y
8 F- @, i4 q/ l' N, w, i
在 To clear 中遗失了一句 ( ^, F& Z- [/ [& M/ B
# d. ~4 m0 Y+ r) ^0 B [ ask neighbors with [any? grass-squares-here]
. Z2 [4 J m& L. g3 G E+ ]5 f# Y0 [5 q: L' c$ X# N/ K2 y2 H1 e1 z
* b" Y" T9 g- i V' ?: T: W0 U* W7 ^! M
& ^% P& \. H+ k# y' w5 O, o+ k# i& D
to clear
, m& X, O) I! i7 I, h3 P+ p- c/ p6 ^8 E0 Z) [, o, N
ask grass-squares-here [die]
' }2 w! t8 A7 Q
% W, G' _, X0 B" Zask markers-here [die]
) D& g. V2 J! P" l/ ]# M
! ~+ Y" z x: B1 ulet total count neighbors with [any? mines-here]
3 h) v' ?7 E, q5 U# k; \* ]# q* S2 P* j, `1 ~
ifelse total > 0
5 m# M+ p! K) d1 j3 l, ]" ?4 B. P$ Q# J7 T3 f* b3 D8 N4 Q l
[set plabel total]
( g% u5 U* N3 b. [; e8 N
9 L+ I$ q8 {2 b$ _) z3 V [ ask neighbors with [any? grass-squares-here]6 k. Z. {3 j: v" H4 a
) ^7 J7 \. @! c2 O$ s4 p T
- M7 e/ a# X, H, ?' y
[clear]1 P1 B+ D6 p# W3 m
/ m4 p2 V" ~. _9 v6 aend |
|