求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
- N8 v7 v/ Q, e& q5 r! a
0 V" b% C3 k$ D/ F几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

- Y" O1 q' r- L2 r& f* _【见三楼，呵呵】

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

marshallcao

好的,谢谢了

. z' t/ f' l4 O% B& W: u$ X问题找到了,

; v8 t" J8 ~" a' c% O
在 To clear 中遗失了一句

9 T" D1 [$ p: }; Y" d0 E1 J( v    [ ask neighbors with [any? grass-squares-here]

# d3 [4 U% R6 A" e) H8 u' b  W
4 P3 k5 Q' t+ ?+ v) }; t# X

* Q. K" Y0 H" e* B" {% Y" I; v- p& Yto clear
! ?- i8 g0 a: I* l# O2 b: `
5 a; n* s# O2 _- w5 x  [2 m7 Sask grass-squares-here [die]
: P3 |( W6 T/ \# R2 o% W$ a/ o& w
ask markers-here [die]

* f# y& v+ q$ W+ alet total count neighbors with [any? mines-here]
% M$ p5 x% C% t5 o3 y
6 i2 w5 d% u( h; V- u3 x: D$ `- kifelse total > 0

( x! B0 {, s' B: p( c[set plabel total]

[ ask neighbors with [any? grass-squares-here]
, M  L. e# Y7 v7 r

" T8 O8 l! a# |[clear]

end