求助

marshallcao

用NETLOGO 模仿MINESWEEPER 做了个游戏,

, h5 D1 Z" A/ k$ O  J/ ^6 K0 |# U几乎是抄过去的, 可运行的时候总是死机, 运行原程序没有问题,说明不是我的电脑有问题.
" X7 K- Y2 y* k" ?+ O: n
4 T$ g, p0 g! D主要问题出在, 用鼠标点下的时候, 如果下面没有MINE 的时候, 无法的出GLABEL的数值,

& p) n# O. Y* X* V8 W: t1 p# n【见三楼，呵呵】

3 d+ O" g/ R9 o. B9 s1 x0 \$ n: j[ 本帖最后由 chuchj 于 2008-5-28 17:31 编辑 ]

marshallcao

好的,谢谢了

0 U3 q0 \9 k9 _8 G0 g7 G$ z0 h: `问题找到了,

7 k" h. p' z9 E. }4 E  k! L
8 x+ l: y0 J6 R+ E. E在 To clear 中遗失了一句
/ k; V; t+ \8 h. G
    [ ask neighbors with [any? grass-squares-here]

( ~/ [3 W  O% y3 l
' q5 R* @1 W% X1 H( ^" B
5 U' r# x" G6 v, s4 Q0 j
/ i3 [8 F; X$ _  Y6 B+ w" N- Pto clear

ask grass-squares-here [die]

ask markers-here [die]

let total count neighbors with [any? mines-here]
0 I1 z0 T4 u& C$ H' R
0 d/ X; d& f- V% m- y( R- [# nifelse total > 0

[set plabel total]

+ c- ~3 o1 w/ z [ ask neighbors with [any? grass-squares-here]


" j8 ^' Q! T- }6 o) o. s[clear]

; l3 E, Y; W+ ^7 `: k- ^# Lend