求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

& R- O  C/ X. i3 L& g+ s几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

' r1 w$ s/ p( _! Y( M【见三楼，呵呵】

" q. K) p' o3 n3 R% o' e[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
1 e9 ^( v1 I' ~) E* x
8 g3 Z% h2 F- N问题找到了,
7 e/ T4 |% X: g, P3 K- L! }
1 `8 N( @% O: o! @' m
0 ^0 R/ ^& Q- ~0 P在 To clear 中遗失了一句

' m, M2 }" H% ?    [ ask neighbors with [any? grass-squares-here]



( p6 v: _5 L- X5 S; p
to clear

) a: f5 q) i+ G4 C& A% d0 hask grass-squares-here [die]
: _$ X0 C7 A3 N- e5 b, ]- N
- D! M6 [) q8 N! S' N* Fask markers-here [die]

let total count neighbors with [any? mines-here]
1 e6 f! W/ }6 z) R9 n
ifelse total > 0

2 M$ ^2 r- p2 C# Q& z9 r' _[set plabel total]

[ ask neighbors with [any? grass-squares-here]
  @1 H2 ^/ A1 e9 c5 R, B9 `/ n( u* L
: r8 [! n( N% Y  K5 i
9 K7 o6 @/ n! l" m[clear]

* ]+ z+ M4 t& \' @# Wend