求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,
5 `7 o$ u- {  b; A& Q8 ~9 e
& {8 k1 g- {& Q2 N  u& u4 ]! o. C几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.

3 q. U- T7 t; o' X3 ?主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,
) o+ B0 P9 Z4 D" ~+ G
【见三楼，呵呵】

& y9 V! C" }8 k6 D[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了
: f# O3 z" c% t
问题找到了,

! f8 j/ v+ X( D
4 N: W& A' c+ J$ c. E" T4 f9 V) r在 To clear 中遗失了一句
0 F/ P; i# D: n& a8 l
0 j+ ~; k! l( y$ g2 d1 V( z( l    [ ask neighbors with [any? grass-squares-here]
2 d3 j% n( J! q2 ~* D3 y$ j1 @



) ?( |7 X) `  b: b0 V3 M& t- x4 z6 D4 mto clear

/ F$ W* X2 u$ W. H! H8 P( Uask grass-squares-here [die]

" E; N0 Y$ `3 X4 Z- [- C1 wask markers-here [die]
4 `( {* e/ p+ P/ n+ k
let total count neighbors with [any? mines-here]

3 r' ?/ Q1 ^& \# n8 q5 O) sifelse total > 0

[set plabel total]
. f7 R% S# d" z+ Z% t
[ ask neighbors with [any? grass-squares-here]


[clear]
! a) C4 b1 X: D" X' d
end