求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
) b  I& H) }9 ^( ?- o" Q3 ^
几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

' q- x- [$ q- k; f2 {主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
  S# Y7 s6 ^% G
【见三楼，呵呵】
& W. O$ }6 m4 U# `$ g) d
5 T  U* Y/ ]" R  h8 a! Q[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了

3 H- V! X1 {0 M问题找到了,
( u% V" V% B; C4 e
# v) c2 c  G! G( A* |% m
在 To clear 中遗失了一句

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



* s; M& H3 \1 `
- z  Q; K5 u  c8 O% Zto clear
$ a  l& {; f3 H3 h$ w
3 k* E" T" g+ @, b% sask grass-squares-here [die]

! Z' O, ]% U( D( ^8 V. Vask markers-here [die]
( v2 j1 F' ?- x9 Q
" ]' i2 V& _+ s/ Nlet total count neighbors with [any? mines-here]
) ~- F2 M, e2 ~' v3 ~" v! T9 E
" o3 Z' U, [7 ?/ z! U2 l) \# mifelse total > 0

[set plabel total]

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


0 M. q! |0 s6 W% M! s' U6 P[clear]
9 ~% z& C6 t) Q' ^  {
end