Trouble with GrayScale Filter

WritePixelFast(XOffset,YOffset,MaxColor,BackBuffer())

Red = (PixelColor And $FF0000) Shr 16
Green = (PixelColor And $00FF00) Shr 8

If Red > (Green And blue) 
Return red 
ElseIf Green > (Red And Blue)