求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

3 q" h' Q! }9 y" H6 F& z: D: B几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

+ n6 b% |, o; l2 h3 t% s主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

【见三楼，呵呵】
( G1 M) c" l, F" P, }! |
& M$ R: x) ~/ l& M1 L0 B[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
' V2 M7 P5 Q0 T5 @6 n
问题找到了,

) r$ U' Q+ R2 P' s  H/ T9 w" z
" s8 C4 y# b) T  S在 To clear 中遗失了一句

. w! {: y0 H8 P2 c' t. J# m' p    [ ask neighbors with [any? grass-squares-here]
( z0 \+ ?3 {0 `" ?0 a1 @


: u% i' Z/ u* [
to clear
& c: f, T9 ^1 b4 g- [
7 R5 _* J2 b( S: Eask grass-squares-here [die]
+ _5 @7 }- f1 C; J: H( {1 u) d. W2 G
ask markers-here [die]
* h' A5 u/ F  z# f
let total count neighbors with [any? mines-here]
4 i0 O* o7 X0 g
ifelse total > 0

4 r5 a6 I; ~, n) v, Z" y[set plabel total]
+ _/ k$ R( _- z- P8 L: h5 q
5 n6 M& ?0 O9 {$ A2 b" S' w* m [ ask neighbors with [any? grass-squares-here]
7 f: ~. @: B0 i( F" O5 A
& u& n! h" w" v- }7 V
( _( a; w! m$ s1 z; }! \$ L# x[clear]
/ v- s3 ^4 e" N
; Z; G6 g0 _5 J( u/ Vend