求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
" [# B! v- S$ s3 U4 ^" ?1 R
几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.
: A3 v/ G+ [+ [+ C: M
主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

* w+ P+ b4 C: m【见三楼，呵呵】
8 U6 Z, i  y1 T4 ]" t- p' r' a
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
4 [" A: i, u4 L
' _0 n) |% U8 X, u4 w4 A+ {, c问题找到了,
! h( F* k: |5 r2 `4 g) w, s
) F4 {+ ~; O! ^* c/ ~$ N8 g
在 To clear 中遗失了一句
3 w+ v5 l9 j3 S( i7 K4 x
    [ ask neighbors with [any? grass-squares-here]


7 A% V7 ^9 A$ q) [$ |

to clear

ask grass-squares-here [die]

# [5 t3 Y; \+ e6 P6 C1 C' a# Lask markers-here [die]
3 g) z# }  ^4 K$ t- [
let total count neighbors with [any? mines-here]

ifelse total > 0
8 I: [* E7 }9 }$ T9 \! z6 d& v( ^
[set plabel total]
+ n1 v* w6 H  [/ }
1 ]9 T8 t# }1 ~9 s1 o! T/ T7 r [ ask neighbors with [any? grass-squares-here]
9 q9 F6 a# y: f) ?

[clear]

end