求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

, }. x/ T  R" G( r7 m几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

( y  O# {9 g7 V. `( R+ S主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
% H% ?* r0 {9 C4 o  K
【见三楼，呵呵】
8 V6 U; P8 M7 }$ _: ?7 s
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
# H9 P& ]. i' P& B0 I8 _
% c. e3 X! U- Q. f- q, u1 ~问题找到了,

6 E3 B" H3 U0 K" T8 S8 ~$ ?9 s
在 To clear 中遗失了一句
# M% R# e, e3 t% v; V/ S
% c  ^9 g9 Q# ~4 d; `; ^    [ ask neighbors with [any? grass-squares-here]


9 a& }. e1 ]2 ?8 r7 @- P
7 [7 s3 f' Z2 o/ O
$ @; K$ l5 s7 Sto clear
) K5 m5 ~( l2 T" h7 G3 F( z
3 s) h2 ]2 d1 |: C% b5 vask grass-squares-here [die]

! |8 n; r7 w4 uask markers-here [die]
8 }' m/ ?: ^6 ~8 a! Q1 U6 G# a
5 S  @% F) d* W# plet total count neighbors with [any? mines-here]

ifelse total > 0

' X4 h, M6 c* }" Q7 c1 {[set plabel total]
" K4 J; w" u9 d
# e8 E) \$ @; x: x1 y3 z [ ask neighbors with [any? grass-squares-here]
6 B* }! Y! y( N8 [! J

6 M4 x% k/ J1 q8 g; R9 ~[clear]
$ q8 F3 [( l0 U/ W: M! M
- o% }6 d' z. M/ p7 i$ Lend