El comando WR SET FONT permite modificar la fuente de la selección actual en el área 4D Write referenciada por area.
Pase en fuente el nombre de la fuente a aplicar. Si fuente no existe en su sistema, se devuelve el error 1077.
Ver el ejemplo para el comando WR Get font.