求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

$ d( ~- k) B) Y7 @1 H) t- F0 ~" G几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

3 p( M+ h; K1 v8 d主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

; ]+ a# h& U' J+ Y; }% L% L$ G【见三楼，呵呵】
' T8 x0 X! B; f
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了

问题找到了,
+ P- N% H  E! i6 W# e0 A" X
  V, R& a3 s; g
在 To clear 中遗失了一句

    [ ask neighbors with [any? grass-squares-here]

5 O5 W2 a7 ~2 ]& T1 D% ^8 E
) e  T0 [1 a9 g* d$ D. h9 r0 `2 y# y

to clear
. C; C; L7 Z# ^- k! ^7 e
; u" B; m& Z$ N" ^) Rask grass-squares-here [die]

ask markers-here [die]

let total count neighbors with [any? mines-here]

0 N" A, v7 U) i- G% oifelse total > 0
' N7 Q% `$ R; _8 H1 u  b" {4 e
7 t# r( i+ S5 S9 x* z3 a$ ^[set plabel total]

[ ask neighbors with [any? grass-squares-here]
0 A8 |+ k+ K5 h

+ l+ ]* N( v. z/ Y[clear]
7 h# {& t, [$ g& d& O0 Y4 M9 V) |
! Q1 v0 V1 L: Z( nend