NetLogo, accessing color of a patch

I am trying to apply the following condition:

if ( the color of patch -2 -1 is red )
[
   some commands
]

Could someone please tell me how to开发者_运维知识库 write this in NetLogo?

if ([pcolor] of patch -2 -1 = red) 
[

]

Pretty much how you put it but in code, read the tutorials and what not and this should be simple. Note that you use pcolor for patches and color for turtles.