unfortunately i am not familar with making fll.
can you help me?

>I am thinking can you create an fll instead? Remove printf functions and try to create it as fll.
>
>>My problem is that i think this code read data in hex and so convert it to dec.
>>Is it right?
>>BiosCom is notuser-defined function. i find it in C++ help. it is a function for work with com port.
>>
>>
>>>I don't think I can convert the entire code, but here are a few tips.
>>>
>>>Lines that start with "//" are comments.
>>>
>>>gotoxy() goes to a specific screen position (the screen is assumed to be in text mode, 80 columns x 25 lines, or something similar); printf() will show a text.
>>>
>>>if (ch) should be translated in VFP as if ch # 0, since it seems to be numeric, and that is the way equality is interpreted in C. Similar for while.
>>>
>>>I suspect that bioscom() is a user-defined function, not a built-in C command.
>>>
>>>
>>>>Dear all,
>>>>I have a C source code for reading data from com port.
>>>>I want to change it to VFP code.
>>>>Can anyone help me?
>>>>I dont want to enter number for choose type of instrument. my instrument is Baskool and port is COM1 and Buad is 2400
>>>>
>>>>i need only section between if( scale_type==1) // Bascool
>>>> and else // Scale
>>>>
>>>>thanks for your help
>>>>
>>>>
>>>>
>>>>
>>>>

>>>>
>>>>#define PP 0x320
>>>>#define NO1 14
>>>>#define NO2 350
>>>>
>>>>#include <stdio.h>
>>>>#include <conio.h>
>>>>#include <dos.h>
>>>>#include <io.h>
>>>>#include <stdlib.h>
>>>>#include <bios.h>
>>>>
>>>>void main()
>>>>{
>>>>  FILE *fop;
>>>>  int t;
>>>>  int i,j,k,l,i1,j1,l1,k1,zero,j2,l2,k2,last;
>>>>  unsigned char ch ,comno,scale_type,baud;
>>>>
>>>>  textbackground(BLUE);
>>>>  window(1,1,80,25);
>>>>  clrscr();
>>>>  gotoxy(30,2);
>>>>  printf("P A N D  Industries Co.");
>>>>
>>>>  gotoxy(20,5);
>>>>  printf("Enter COM Port No.:< 1:com1  , 2:com2 >");
>>>>   do
>>>>   {
>>>>   comno = getch()-'1';
>>>>   } while((comno != 0)&&(comno != 1));
>>>>  putch(comno+'1');
>>>>
>>>>  gotoxy(20,10);
>>>>  printf("Enter Scale Type :< 1:Bascool  , 2:Scale >");
>>>>   do
>>>>   {
>>>>   scale_type= getch()-'0';
>>>>   } while((scale_type!= 1)&&(scale_type!= 2));
>>>>  putch(scale_type+'0');
>>>>
>>>>  gotoxy(20,15);
>>>>  printf("Enter Baud Rate :< 1:2400, 2:4800 bps >");
>>>>   do
>>>>   {
>>>>   baud= getch()-'0';
>>>>   } while((baud!= 1)&&(baud!= 2));
>>>>  putch(baud+'0');
>>>>//....................................................................
>>>>  if( baud==2) bioscom(0,0xc3,comno);
>>>>    else       bioscom(0,0xa3,comno);
>>>>
>>>>  clrscr();
>>>>
>>>>  gotoxy(30,5);
>>>>  printf("P A N D  Industries Co.");
>>>>  gotoxy(20,8);
>>>>  printf("Test Program For Reading Weight From Serial Port");
>>>>  gotoxy(20,10);
>>>>  if( scale_type==1)  printf(" COM %d: %d bps   Bascool",comno+1,baud*2400);
>>>>	  else        printf(" COM %d: %d bps   Scale",comno+1,baud*2400);
>>>>
>>>>  if( scale_type==1)      // Bascool
>>>>	while(!kbhit())
>>>>	{
>>>>	 while ( ( bioscom(2,0,comno) & 0xff ) !=0xbb && !kbhit()) ;
>>>>	 if(!kbhit())
>>>>	 {
>>>>	 gotoxy(20,15);
>>>>	 ch = bioscom(2,0,comno) & 0xff ;
>>>>	 if (ch==0xe0 || ch==0xf0 )
>>>>	  ch = bioscom(2,0,comno) & 0xff ;
>>>>	 if(ch)  printf("total weight = %x",ch);
>>>>	 else  printf("total weight = ");
>>>>	 ch = bioscom(2,0,comno) & 0xff ;
>>>>	 printf("%x",ch>>4);
>>>>	 printf(".");
>>>>	 printf("%x",ch%16);
>>>>	 ch = bioscom(2,0,comno) & 0xff ;
>>>>//     ch=ch>>4;
>>>>	 printf("%02x    ",ch );
>>>>	 }
>>>>	}
>>>>	else                    // Scale
>>>>  while(!kbhit())
>>>>	{
>>>>	 while ( (( bioscom(2,0,comno) & 0xff ) !=0xbb )&&!kbhit()) ;
>>>>	 gotoxy(20,15);
>>>>
>>>>	 ch = bioscom(2,0,comno) & 0xff ;
>>>>	 if (ch==0xe0 || ch==0xf0 )
>>>>	  ch = bioscom(2,0,comno) & 0xff ;
>>>>	 if(ch)  printf("total weight = %x",ch);
>>>>	 else  printf("total weight = ");
>>>>	 //printf("total weight = %x.",ch);
>>>>	 ch = bioscom(2,0,comno) & 0xff ;
>>>>	 printf("%x",ch>>4);
>>>>	 printf(".");
>>>>	 printf("%x",ch%16);
>>>>	 //printf("%02x",ch );
>>>>	 ch = bioscom(2,0,comno) & 0xff ;
>>>>	 //ch=ch>>4;
>>>>	 printf("%02x",ch );
>>>>	 printf("  ");
>>>>	}
>>>>  textbackground(BLACK);
>>>>  window(1,1,80,25);
>>>>  clrscr();
>>>>
>>>>}
>>>>
>>>>