求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.
/ i# f. _: F6 m5 G8 B, o
8 }: `$ l# i% x9 f; u2 z9 C主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
1 r# l" N; c$ ^4 X! X8 h' X
【见三楼，呵呵】

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

marshallcao

好的,谢谢了
" S6 T% r% c# f; K# y% B$ T/ y
. x( U( x: `; i2 C问题找到了,
! |1 b; }* y+ u3 R
: q8 Y( E5 @3 M* b
在 To clear 中遗失了一句
0 ^3 m4 I! V- n6 \. O8 a- ^
    [ ask neighbors with [any? grass-squares-here]


$ i. Y- A6 f/ G. _9 U

) O, x& k0 S. E9 E# ~* t' hto clear

% e. D( }5 i7 h7 c/ {# ]1 T6 l+ }ask grass-squares-here [die]
, Q6 c' Q2 y- }8 U1 Z+ Q7 |0 n  U
0 v$ O  l5 @) B' \ask markers-here [die]
4 s. r9 P2 ~$ j! A: g& ^
0 q5 U0 O1 x' D5 {/ z) X. s1 Jlet total count neighbors with [any? mines-here]
0 X, z% |# k- F: H" y
" Q- \% S/ Y. U6 s; Aifelse total > 0

[set plabel total]

% ]; y& W& S& e [ ask neighbors with [any? grass-squares-here]
" g! g: Z/ v- M" S) G
! [3 r! O/ w7 F, ]' W$ S. Y# k
* r7 x, c/ V7 A[clear]

end