Device 9 Example

inc        C:\CXPL\Codes;                \intrinsic declarations

inc        C:\CXPL\CodesExt.xpl;

begin

ClearImage(-1,128,200,128);                        \Clear background to specified color

SetFontFace(-1,"MS Sans Serif");                \Chose a specific font

SetFill(-1,0,100,100,0);                        \Set font background color

SetFontColor(-1,0,255,255);                        \Set font color                

Move(0,20);

SetFontStyle(-1,20,false,true,false,false);        \Set Italic font

Text(9,"Now is the time for all good men.");        \Output text and start new line

CRLF(9);

SetFontStyle(-1,20,false,false,false,false);        \Change to non-Italic font

Text(9,"See the quick brown fox jump.");                \Output text and start new line

CRLF(9);

end;