Netlogo 如何绘制位于十字路口的面片？

我如何用红色绘制位于十字路口的斑块（道路用白色绘制），如下图所示

以下是我的代码开头：

ask patches with [ (pcolor = white) and (pxcor mod (nb-patch-length + 1) = 0 ) and (pycor mod (nb-patch-width + 1) = 0 ) ] [set pcolor red] 

提前感谢你的帮助

这个怎么样？（假设道路的宽度为一个面片，且始终为水平或垂直。）

---

您可以使用带有[pcolor=red]的补丁来获得红色补丁。。。但是你想从中“吸引”什么呢？谢谢尼古拉斯的回答。事实上，我想检索位于每条白色道路交叉点和其他彩色斑块附近的白色斑块（如图中的绿色）。然后，这些补丁被涂成红色（如图所示）。非常感谢你的帮助。非常感谢艾伦的回答。此代码可以找到位于每个白色道路交叉点处的修补程序，但找不到位于其他彩色修补程序边缘处的修补程序。非常感谢您的帮助。您可能希望分别执行这些操作。例如，

使用[（pcolor=白色）和[pcolor=绿色][set pcolor red]询问修补程序。
ask patches with [all? neighbors4 [pcolor = white]] [set pcolor red]