NetLogo如何让turtle移动到唯一patch目标床位 避免分配冲突

• 核心冲突来自NetLogo的ask语句执行规则：同批次ask patients执行时，所有患者的读取操作会先统一完成，再统一执行写入操作。多名距离同一床位最近的患者会同时读取到该床位assigned = false的状态，同步设置自身target为该床位，后续执行写入床位assigned属性时，只有最后执行写入的患者会成功覆盖值，其余患者的target与床位实际assigned归属不匹配。
• 你当前仅添加了归属不一致的日志输出逻辑，没有补充清空target重新选择的分支，自然不会自动修正分配错误。

直接修改go-to-bed过程，补充归属校验失败后的重置逻辑，同时筛选床位时优先过滤已分配床位：

to go-to-bed
  ; 筛选未分配、不是当前所在位置的床位
  let _p box with [ assigned = false and self != [ patch-here ] of myself ]

  if target = nobody [
    if any? _p [
      set target min-one-of _p [ distance myself ]
      ask target [ set assigned myself ]
    ]
  ] 
  
  ; 归属校验失败时清空target，下次tick重新选择
  if target != nobody and ([ assigned ] of target) != self [
    set target nobody
    show "床位已被分配，重新选床"
  ]

  if target != nobody [
    face target
    fd 1 
    ; 到达床位后停住，可选：如果需要出院逻辑，后续释放assigned即可
    if patch-here = target [
      set target nobody
    ]
  ]
end

避免让患者个体自主抢床，改为全局串行分配逻辑，完全消除冲突，同时天然支持床位释放后自动分配给等候患者：

1. 调整go过程，先执行全局床位分配，再执行患者移动：

to go
  ; 全局统一分配：先找空闲床位，再找无目标的等候患者
  let free-beds box with [ assigned = false ]
  let waiting-patients patients with [ target = nobody and pcolor = green ]
  ; 有空闲床位且有等候患者时逐一分配
  while [ any? free-beds and any? waiting-patients ] [
    ; 每次取距离最近的一对患者和床位
    let current-patient min-one-of waiting-patients [ distance min-one-of free-beds [ distance myself ] ]
    let best-bed min-one-of free-beds [ distance current-patient ]
    ask current-patient [ set target best-bed ]
    ask best-bed [ set assigned current-patient ]
    ; 从待分配池移除已匹配的患者和床位
    set free-beds remove best-bed free-beds
    set waiting-patients remove current-patient waiting-patients
  ]
  ask patients [ go-to-bed ]
  tick
end

2. 简化go-to-bed过程，仅保留移动逻辑：

to go-to-bed
  if target != nobody [
    face target
    fd 1 
    if patch-here = target [
      set target nobody
      ; 此处可添加出院逻辑，出院时执行：ask patch-here [ set assigned false ]
    ]
  ]
end

该方案的优势：

• 完全避免多患者抢同一张床的冲突，分配逻辑全局可控
• 患者数量超过床位时，无空闲床位的情况下等候患者不会分配target，原地等待即可
• 床位释放（assigned设为false）后下一个tick会自动分配给等候的患者，无需额外监听逻辑

内容的提问来源于stack exchange，提问作者Pablo Olmos de Aguilera C.