txt=&TEXTE[0];
UART1_Init(19200); // RS232
UART_Set_Active(&UART1_Read, &UART1_Write, &UART1_Data_Ready, &UART1_Tx_Idle); // set UART1 active
UART1_Write(CLS);
UART1_Write_CText(mesg0);
strConstRamCpy(txt,mesg1); UART1_Write_Text(txt);
// inclue Maths.lib
UART1_Write_CText("Test calcul cosinus Angle\r\n ");
for (i=0;i<90;i++)
{
df1=(double)i ;
df1=df1 * PI /180.0;
df2=cos(df1);
UART1_Write_CText("Cos ");
WordToStr(i, txt);
UART1_Write_Text(txt);
UART1_Write(TAB);
Float2Ascii (df2,CRam1,5);
UART1_Write_Text(CRam1);
CRLF();
}
while(1);