求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
: M" N; U" F" P3 \5 C2 `0 O
几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

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

【见三楼，呵呵】
/ e' p. n% N* K, T. m) L4 P5 g
[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
% J& g& L; V7 \. A+ h
% i! `/ g! \: d. C问题找到了,


在 To clear 中遗失了一句

" j3 }0 v4 _) ^5 `8 j3 h    [ ask neighbors with [any? grass-squares-here]
  u9 n& `% I2 j* u5 C
4 K; ]9 R# ]4 C


6 M* D8 ?# }; @' f# }to clear

ask grass-squares-here [die]
4 [5 j5 a, E- C& w; _/ G& P7 T
ask markers-here [die]
, T$ Q& d; [' t- L6 r# S& I( p' v
) n. [- y" H' v2 R7 T8 xlet total count neighbors with [any? mines-here]

ifelse total > 0

2 i' x* H1 J9 L  ^- f/ n* u3 j[set plabel total]
; E8 @& j+ k% C9 A" w4 E% w# m
[ ask neighbors with [any? grass-squares-here]
: B% I6 C* |; `, k( p5 X( F6 m) D
, F( Y4 r0 ?1 ^" X1 C; l. D/ Y
- j- J) ?; C- X1 v/ N5 l) O[clear]

end