求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

, t- N' Q) @5 V  M$ b  {* i' J几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
+ z9 c* m* S$ W7 [0 @$ `
5 m1 {2 b) o- f5 L6 x  l【见三楼，呵呵】

[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了

4 X. n, m  j( P, |. Z7 V问题找到了,


在 To clear 中遗失了一句

* }: I% i; _2 D) \  |: e+ @    [ ask neighbors with [any? grass-squares-here]



$ C0 e% }, s) e# [8 t
to clear

ask grass-squares-here [die]

( t9 y. `& S+ X# o7 V7 k( Vask markers-here [die]
; C3 k( S7 u/ w& }& M' U! }
0 K5 \4 y, C, k8 Tlet total count neighbors with [any? mines-here]

# q  a) u( a0 q) C3 zifelse total > 0
' L0 r$ n( J+ s9 Z" D/ r
[set plabel total]

) A; V# B$ _5 t( L9 u, ?% g [ ask neighbors with [any? grass-squares-here]

" U+ h+ B! G7 h: @
* E5 p* W2 P0 q6 l: w  e# L3 ?[clear]
- l. g6 Z) k; C8 `+ I4 r4 L
2 r5 y3 ?3 I7 z5 l! G/ fend