求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

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

, D- e+ W" w, U7 F( _$ j" g7 J- U主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
( g* \4 [$ m2 d
; v4 c$ l9 m* g9 @& A5 _8 t【见三楼，呵呵】

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

marshallcao

好的,谢谢了
; Z5 D: i$ p; u: g- i
9 g7 }* Y* j2 H( ]问题找到了,


在 To clear 中遗失了一句

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

( d9 @7 E# o$ f3 _, C
$ g9 Q2 f" t2 E$ T6 L! j) j5 E
% y3 m, ]) L- m' Y  _
& h9 A' B% I% i0 Lto clear

$ P! X* |% _: _7 \$ u# ~ask grass-squares-here [die]
' @( a0 p% A5 Y- e; I
' c$ W- j2 |9 N8 ^ask markers-here [die]
3 F1 y! {4 y$ \$ y( i) z
let total count neighbors with [any? mines-here]

, C" o& k9 ^. \% kifelse total > 0
6 ^) v" Z- a2 V( z9 T, U
0 _" F- z# G- p, b4 d: R[set plabel total]

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

( W, s8 X/ n2 @4 }5 t( ^5 I/ z* R
[clear]
2 @- m0 i2 L* E/ @1 n( S# \
! q) J& E1 G! s3 oend