XBase - CAMBIAR COLOR

Hola a todos:
Tengo esta funcion que pasandole un numero, y teniendo A=coordenadas y B=coordenadas te escribe un numero en un formato grande, pero no encuentro la manera de cambiarle el color.
FUNCTION NUMEROSB
LOCAL oFont, aSettings, i, imax, NUMERO
PARAMETERS NENTRA
aSettings := {FONT_TIMES_XLARGE + FONT_STYLE_BOLD}
SETCOLOR( "N/R" )
imax := LEN(aSettings)
oFont := XbpFont():new() // Create font object
oFont:create() // and font
oFont:configure(FONT_TIMES_XLARGE + FONT_STYLE_BOLD)
GraSetFont ( , oFont ) // Set current font
graStringAt( , {A, B } , STR(NENTRA,2))
SETPOS( MAXROW()-1, 0 )
RETURN ""
en set color lo he intentado todo y no cambia.
Alguna solucion
Gracias

CORRIJO ESTA FUNCION, necesito que el numero salga en blanco.
Ayuda
Gracias.

Ya lo he resuelto gracias a todos