NetLogo疏散仿真中turtle偏离出口偏向墙壁的代码优化求助

原代码核心问题 #

• 移动逻辑嵌套层级错误：全局触发ask turtles [walk] 后，walk过程内部又嵌套全局ask turtles-on room1 做群体筛选，而非针对单个turtle的位置做独立判断。凡是跳出pycor < 45 这个room1判定边界的turtle，完全丢失朝出口的朝向控制，无目标漂移时会就近碰到墙壁，形成离散群体。
• 出口目标坐标选取错位：代码中turtle朝向的目标patch集合设置为pycor = 47，但实际出口绘制在pycor = 45 的墙线位置，pycor=47 属于墙体外侧的无效区域。turtle朝向该无效点移动时会被前方蓝色墙体遮挡，无法径直抵达出口。
• 缺少墙体碰撞判定：turtle移动过程没有校验前方patch的可通行性，碰到墙体后不调整朝向，会顺着墙的方向持续滑动，造成“部分turtle走向最近墙壁”的观测现象。
• 硬编码坐标逻辑冗余：出口位置在代码中被重复写了两次，没有和已绘制的绿色出口patch做绑定，后续调整出口位置时极易出现坐标不匹配的问题。

具体代码修改方案 #

1. 全局变量优化，去掉冗余定义，新增出口patch集合存储：

globals [
  exit-patches
  goal-x goal-y
]

; 未使用的turtle属性可临时删除，减少冗余
turtles-own []

2. 优化出口绘制逻辑，将生成的出口patch存入全局变量，避免重复筛选：

to draw-exit
  ; 所有满足出口条件的patch存入全局变量，后续直接调用
  set exit-patches patches with [pxcor <= 43 and pxcor >= 39 and pycor = 45]
  ask exit-patches [set pcolor green]
end

3. 重写walk移动逻辑，去掉嵌套ask的错误写法，让每个turtle独立计算朝向、校验碰撞：

to walk
  ; 校验当前所在patch不是墙体
  if [pcolor != blue] of patch-here [
    ; 朝向距离自己最近的出口patch，因为只有单一出口，等价于统一朝向出口门
    face min-one-of exit-patches [distance myself]
    ; 移动前校验前方是可通行区域，避免穿墙、卡墙
    if [pcolor != blue] of patch-ahead 0.1 [
      fd 0.1
    ]
  ]
end

修改后效果 #

所有turtle每一步都会实时修正朝向，始终对准出口门的方向移动，碰到墙体时会停下而不是沿墙滑动，不会再出现群体分裂、部分turtle就近走向墙壁的问题。

内容的提问来源于stack exchange，提问作者Aly