求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

* P) h2 P9 K$ u: U+ m主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

; n  ]1 H  K+ c( w, X' U, Z【见三楼，呵呵】
4 p, U1 i+ {8 |7 @! z) B# F' C
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
, ^4 g! i3 z8 L% V; j8 O* I
% D' E  X$ i) Q, n4 ]问题找到了,


在 To clear 中遗失了一句

; A# W! b2 s6 x; s, P( S8 r! o1 D6 Y% \3 o' m    [ ask neighbors with [any? grass-squares-here]
: |" O) L. O  m6 u1 B2 Y  V
% ~" C9 P0 P$ N, R6 R  k5 B
6 r. ]! A. v* l9 H( t0 U

9 N$ m! \  ?$ H' S0 P! y" J9 q5 ato clear

ask grass-squares-here [die]
3 }5 n. C2 c7 B, K/ p
ask markers-here [die]
, V. U. B  D6 y# j- k0 R/ I
* y" y( N/ e8 w- l5 rlet total count neighbors with [any? mines-here]
2 m* K" \8 c& g4 v; ?4 L
ifelse total > 0

" D# M; P( X1 J1 t[set plabel total]

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

& i& ]! ?2 [4 g( F0 p
+ b$ \" r, O* L[clear]
  Z  e9 u; ~) t5 f& _- Y
% T$ x' b4 p: _4 @' _: B2 Oend