求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

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

主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
' J' x# u" u1 o& |4 Z
8 O" P+ d# V; o8 h【见三楼，呵呵】

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

marshallcao

好的,谢谢了
" |  C( @$ o7 u1 i
3 Y( [8 ]4 b$ ?# l& r, h问题找到了,
* v$ y+ \( A- v

在 To clear 中遗失了一句

6 A% a" r! {4 I* g* c/ m6 V) `    [ ask neighbors with [any? grass-squares-here]

$ |; T  q3 A8 o2 |- \
- ?6 l' ?* {1 c5 L  S- `
8 B5 ]4 a# `# K
to clear
* h" b" s' ^! j* V0 n
ask grass-squares-here [die]
/ J7 A; `0 b6 j* _7 h: t! e" X
ask markers-here [die]
1 A9 ?7 B. V/ V+ [  h
let total count neighbors with [any? mines-here]

ifelse total > 0

[set plabel total]

[ ask neighbors with [any? grass-squares-here]
" Q$ e# C; E, w4 j+ R
/ L, U( H% v! b  Q$ V
0 N4 K- e$ q4 G  [% h9 [8 {% e[clear]

end