求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.
2 u! Z9 H! P. Z8 P# a0 A! R
/ R6 k9 K( g2 K6 d% w5 g( O5 h! ^主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
3 y( m' p# B) @3 X5 y8 f
6 O( ~3 e) u) I9 c+ g1 b8 `0 |/ c【见三楼，呵呵】

9 u' A. U. f; c6 g[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了

5 L5 Y9 H* W# v问题找到了,
. d; Q0 M& K, N* i

在 To clear 中遗失了一句
5 n3 N' I  W# O3 ^5 D1 ^) q+ ^' ]
    [ ask neighbors with [any? grass-squares-here]

: s$ e% M) H1 b  ?' e
- l% A& {4 N  E8 V. ]; v) F9 H5 z
7 F' u2 G! u, J1 o5 b" {- i1 }: M4 ^
3 v, ^! e% }- S+ M0 t, p: y$ k  S+ kto clear

  P8 |; A$ c) U. t% T' ~- W) C, u0 xask grass-squares-here [die]
0 x" E+ L6 O1 p1 P' K' ]
ask markers-here [die]

let total count neighbors with [any? mines-here]
, I# N$ D2 h" i
8 d4 D+ R+ N7 ^* E3 L- T9 }+ @ifelse total > 0

; [" x9 l% O3 D8 j* C[set plabel total]
5 @9 c+ V$ H- h' g
[ ask neighbors with [any? grass-squares-here]


[clear]

end