If statement Netlogo：我如何才能要求特定的补丁更改颜色（黑色），仅针对具有泊松分布时间的特定滴答？

我如何才能要求特定的面片仅根据泊松分布的时间改变特定记号的颜色（黑色）？我是Netlogo的初学者。下面是一个示例程序。但是在这个程序中，补丁一直是白色的。多谢各位

ask patch max-pxcor 0 [
set poisson poisson - 1
if poisson < 0 [ ;I have no idea of the good condition setting.
  set poisson random-poisson (stop-ticks)
  set pcolor black 
]
  set pcolor white
]

询问修补程序max pxcor 0[
集泊松-1
如果泊松小于0[；我不知道良好的条件设置。
设置泊松随机泊松（停止刻度）
设置彩色黑色
]
将颜色设置为白色
]

试试这个。它创建一个计数器（方便地称为计数器），减少每个刻度，当它达到1（您可能需要0）时，将补丁变为黑色，然后使用新的计数器将补丁重置为白色，然后单击下一个刻度。这里的泊松分布的平均值为5，但这是可以改变的

globals [counter]

to setup
  clear-all
  ask patches [set pcolor white]
  set counter random-poisson 5
  reset-ticks
end

to go
  print counter
  if-else counter = 1
  [ ask patch max-pxcor 0 [set pcolor black]
    set counter random-poisson 5
  ]
  [ ask patch max-pxcor 0 [set pcolor white]
    set counter counter - 1
  ]
  tick
end