求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

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

【见三楼，呵呵】
3 c1 r' m: F- d# _- m( m( r0 W
5 _( q. G, [2 e. }% S( E4 t[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
  B( y0 t2 E# S3 i# z
+ `  _! t, t1 i问题找到了,

; b  E9 y5 K- t4 I+ x
  Z/ @3 P' H% J/ G在 To clear 中遗失了一句

( G3 D9 O( I+ Z7 S9 Q9 r    [ ask neighbors with [any? grass-squares-here]
- ?. i* E/ Q. d% b8 T

$ U; D1 r: O; B* z! I+ ?
9 c3 I' S* r% U4 O0 i
to clear

ask grass-squares-here [die]
) q* A( U' R9 k: c  e8 C% Y
6 Q1 Z" R8 p# x# s& d+ W7 Dask markers-here [die]
* B3 u8 o* D6 c, }+ Y
; |( I5 Y" _' t2 alet total count neighbors with [any? mines-here]
; T: `' f" w. o8 ?5 B3 D
ifelse total > 0
$ R; }" c2 H! Q$ ]7 S7 C
, b4 F2 Q& ~" i7 j% h- r3 m[set plabel total]
% ?0 l7 S; U/ i
[ ask neighbors with [any? grass-squares-here]
/ L& X+ \( V* H; t# p: E1 b
/ K3 P! L( z! O7 N
$ u8 o1 \' {+ r; G8 v* e[clear]
- K) Y3 c; B  S) u* h
% a; ^% k4 p+ Vend