求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
9 z0 |! |, u2 _- p- Y. f8 q% f- P- x
) q1 A2 \3 _3 i) Q3 o) [几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.
$ k8 t3 _! ~+ Y! A, G1 e( j" X
$ I" S8 ^: \. f  q0 q主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
' O& a: }9 \6 j, q$ s
" H( r  P5 c8 j+ ~9 }+ t: J! r9 S【见三楼，呵呵】
) f0 X/ p3 q/ M4 Q+ h
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
, b# B3 s0 X7 P! A9 h8 X4 g! S1 f4 r) E
4 I$ L8 O! c! P/ w2 A问题找到了,

9 y) T6 R5 r9 X' U/ `& i1 h$ k# v
  H+ @' _0 n' V0 @  l在 To clear 中遗失了一句
& M4 N% T, {# _) w5 A2 T7 d9 G3 q0 Z
' x. c" y- v( I5 P$ k$ y, L; S# ?+ U    [ ask neighbors with [any? grass-squares-here]
- g7 @+ V3 n6 Q. m$ i+ G( ^
2 U; {+ f, x  h5 Z  o


to clear

# V1 F+ \. s; S6 V% {- oask grass-squares-here [die]

( l! K" i. m% a" a) nask markers-here [die]
+ l5 s# R+ o4 J: G
let total count neighbors with [any? mines-here]
# m/ o7 h/ l; Q1 Q0 c& d& E: z. J, C
ifelse total > 0

[set plabel total]

0 Y& A6 Q/ L/ d% l: y/ u [ ask neighbors with [any? grass-squares-here]


[clear]

& Z0 N" g- c6 E4 send