求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

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

/ F! H8 H5 n! m主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
& e' A$ d7 r9 v
& N/ F! e4 f& e, o% @; u/ _5 u【见三楼，呵呵】

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

marshallcao

好的,谢谢了

问题找到了,
1 _* d+ P9 i1 x3 u# E

4 g5 o2 e+ S4 l: \. ]在 To clear 中遗失了一句
' u/ e# n9 G+ ]6 o( R1 q
$ P+ _& ]4 c/ N  ?- n% L$ u" G    [ ask neighbors with [any? grass-squares-here]

. n- O/ k3 ^, ]3 q& }8 m
* m1 P" ]: Z* a$ z" t$ V

to clear
- _) s7 f* e; o% R
. B3 ?( G% i  Y9 S5 q/ X5 |ask grass-squares-here [die]
* q% Q( [+ ]% J) c8 R
ask markers-here [die]

let total count neighbors with [any? mines-here]
6 k1 I- K9 e* l% P
ifelse total > 0
( o0 x9 G5 c+ [9 Q$ }, g
+ @+ J" K/ ]9 w0 ~9 h) g+ W[set plabel total]

[ ask neighbors with [any? grass-squares-here]
% ^. }& @! E% H" J- U

" W' q% F1 T8 j' z. E% v- X2 A3 G[clear]

end