求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

1 r8 i  A  z1 F: R7 P2 s几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.
( [  l5 @+ B5 C! d
' u9 x1 q# K; D6 w# z6 D& V* @主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

【见三楼，呵呵】
3 d6 u/ G6 l/ p  C. w
8 k" t) i) q9 W[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了

问题找到了,
5 A7 |# M- Q- W

在 To clear 中遗失了一句
2 J6 k6 L# L% U7 O& }  b$ c: i
! i# u" U: \8 m% u    [ ask neighbors with [any? grass-squares-here]
1 b# W- s8 }6 ?! c  D7 T9 R$ P5 C
2 f: e$ g: Q  y% H

* x2 l; k8 Y  [( F  |! F4 r
to clear
; J9 u6 p" Y$ W6 Q9 T
ask grass-squares-here [die]
, k3 O& M$ q' v' y' H
# A7 H& J- W/ d; a/ h* d* p& ~5 Bask markers-here [die]

% f. E6 y$ S3 S/ Q  K+ I* [7 g4 R( ^let total count neighbors with [any? mines-here]
" T# T3 n& ?' ]; P# d( c
5 C: {2 q% e, T, eifelse total > 0
1 u5 b0 j0 Y' i6 r2 w6 H
4 k2 D. w6 j: h4 ]- Y6 G" h  K[set plabel total]
; f$ |1 U1 M8 z0 t5 ~) n: O
( l8 w2 ?! T' E) K [ ask neighbors with [any? grass-squares-here]


[clear]
8 Y  R3 S9 m4 M4 y9 x
end