求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
4 f9 W7 ?9 \. S9 @% K$ X0 S) m
几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

! k; o8 t- s, S. k【见三楼，呵呵】
- T: [4 }/ a9 J: t- c9 k7 i
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
% {5 C. Q  \2 `% y6 T2 i7 B
问题找到了,
3 H: i( k6 W# n' C4 J
. z% Q3 r3 T. T) \2 P8 B2 ?9 Y) o
2 q& J) M* z/ `2 [' C4 U5 p+ C6 W5 o在 To clear 中遗失了一句
5 `3 B  d3 ]4 _! y4 {% u
* u7 ]' y9 T& F( ^$ O' \    [ ask neighbors with [any? grass-squares-here]
# J8 u7 |8 ]  k3 Z
. j" O. B3 E0 x2 j
% \. J. q3 G9 l7 p& G: h+ e) n' w6 {& O
0 H+ F3 W& \" b  _! `3 s$ ?& `' T4 D
to clear
# q( a3 X0 n" Q( {/ U$ A, p. P5 @
ask grass-squares-here [die]
. `' p; u2 G/ d+ V2 b$ _
8 N9 B: c9 ^+ s  z0 l$ J) uask markers-here [die]

let total count neighbors with [any? mines-here]
2 G' p* L" U/ r2 Z+ c9 P* Z
ifelse total > 0

[set plabel total]

8 i+ ]; }& K9 I# k1 J  o4 E [ ask neighbors with [any? grass-squares-here]

2 d5 Q2 c9 @3 s: E/ G
[clear]
9 L& D; J% j& s) ?+ x+ w  E/ B
/ p2 g: h5 f7 Cend