NetLogo comprobación de color de la muestra

Question

en palabras sencillas lo que estoy luchando para hacer es:

si (color de cualquier parche = rojo) a continuación, ejecutar algún código

Answer 1

if any? patches with [pcolor = red] [
  print "yes, there is at least one red patch"
]

Answer 2

Sólo una tortuga puede comprobar la pcolor. Así funciona esto:

ask turtles [show pcolor]

Pero esto no funciona (escrito en el Observador> prompt):

show pcolor