求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
' f, Z) e) `& q" _) c1 @) r
几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

( _( Q# c# x+ G主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
3 \4 A# \' B! k+ r- y; r
【见三楼，呵呵】
2 \& l  x' |2 @& d7 G) }
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
& p# I/ }/ G; [7 R# y/ f  L4 K
" n% [( q8 ~% ^, X3 Y) X$ N+ s1 ]问题找到了,
  R+ _) _$ n7 I
1 ?3 h, r1 r0 F
在 To clear 中遗失了一句
- G" J0 B. P0 y' j- f4 G2 W; e
6 I3 X8 N+ @. W! h% s    [ ask neighbors with [any? grass-squares-here]




to clear
& k& S! c4 f( _9 c8 a! q$ b
/ e( e5 R' L1 s5 @% |: D+ zask grass-squares-here [die]

2 Z& Z( H' @: ~2 r& lask markers-here [die]

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

ifelse total > 0
, x% b* \6 q! Z
" J8 [# k# z( k% ^6 x[set plabel total]

' D( W% A# A. h! A  F [ ask neighbors with [any? grass-squares-here]

9 ^5 R" F9 N1 y+ b  @
) [# k( f+ c7 ~9 }1 e[clear]

9 p) z* ~7 a9 @: Send