/***********************************************************************/
/*   This program is developed by Turbo C 2.0                          */
/***********************************************************************/
/*  Demo 4: Two P1602 Card demo.                                       */
/*          To repeat sacn the A/D from CH:0 to CH 15, then display    */
/*          the scanned A/D value.                                     */
/***********************************************************************/

#include "P1602.H"

int main()
{
   int     i,j;
   WORD    wBoards;
   WORD    wRetVal,wCount,wADData;
   WORD    wDIOdata;
   DWORD   dwExact,dwOKs,dwErrors,dwScanCount,dwP1,dwP2,dwStatus;
   float   fVal,fAdVals[5];
   WORD   wAddrTimer,wAddrCtrl,wAddrDio,wAddrAdda;

   /* initiaing P1602 card and detect how many P1602 card in PC */
   wRetVal=P1602_DriverInit(&wBoards);
   printf("Threr are %d P1602 Cards in this PC\n",wBoards);

   if( wBoards<=1 )
   {
      putch(0x07);  putch(0x07);  putch(0x07);
      printf("Please install two P1602 cards in this PC !!!\n");
      exit(0);
   }

   /* dump every P1602 card's configuration address space */
   printf("The Configuration Space ->   Timer   Control   DIO    AD/DA\n");
   for(i=0; i<wBoards; i++)
   {
      P1602_GetConfigAddressSpace(i,&wAddrTimer,&wAddrCtrl,&wAddrDio,&wAddrAdda);
      printf("Card %02d:  Timer:%04xH  Ctrl:%04xH  Dio:%04xH  Adda:%04xH\n",
                                     i,wAddrTimer,wAddrCtrl,wAddrDio,wAddrAdda);
   }

   /* The P1602_ActiveBoard() function must be used to active a board, */
   /* then all operation will take effect to the actived board.        */
   printf("----------------------------------------------------------\n");
   printf("The First P1602 Card...\n");
   P1602_ActiveBoard( 0 );
   P1602_Do(0x55aa);     /* Digital output */
   P1602_Di(&wDIOdata);  /* Digital input  */
   printf("Digital Output -> 55aaH  |  Digital Input -> %04xH\n",wDIOdata);
   printf("----------------------------------------------------------\n");
   printf("The Second P1602 Card...\n");
   P1602_ActiveBoard( 1 );
   P1602_Do(0xaa55);     /* Digital output */
   P1602_Di(&wDIOdata);  /* Digital input  */
   printf("Digital Output -> aa55H  |  Digital Input -> %04xH\n",wDIOdata);
   printf("\nHit any key to continue...\n");
   putch(0x07);
   getch();
   /**************************************************************************/
   /* For PCI-1602/1602F user, the settling time is 3us.                     */
   /* For PCI-1602/1602F user, the settling time varying according to        */
   /*   configuration code, please refer Page 28 of NAPPCI/win user mamual.  */
   /*   for example:  a PCI-1602/1602F user who want to acquire A/D channel  */
   /*         5 with configuration code 1, then the following statements.    */
   /*         must be used.                                                  */
   /*     ->  P1602_SetChannelConfig(5,1); // +/- 5V range                   */
   /*     ->  P1602_DelayUs(3 );           //  delay 3 us settling time      */
   /*     ->  P1602_AdPolling(&fVal);      // Acquire A/D data               */
   /**************************************************************************/

   clrscr();
   wCount=0;
   gotoxy(1,1);  printf("First P1602 Card:");
   gotoxy(41,1);  printf("Second P1602 Card:");
   for( ;  ; )
   {
      /*--------- To Active First P1602 Card -------------------*/
      gotoxy(20,1); printf("Count=%d",wCount);
      P1602_ActiveBoard( 0 );
      for(i=0; i<16; i++)
      {
      wRetVal=P1602_SetChannelConfig(i,1); /* +/- 5V range for PCI-1602 */
	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) SetChannelConfig Error ***");
	    printf("AD channel %02d -> SetCh Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }

      wRetVal+=P1602_DelayUs(3); /*  3 us settling time for PCI-1602 */

	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) DelayUs Error ***");
	    printf("AD channel %02d -> Delay Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }

	 wRetVal=P1602_AdPolling(&fVal);
	 wADData=(WORD)(fVal/5.0*32768.0);
	 if( wRetVal>0 )
	  {
	    printf("*** (+/- 5.0V Range) AdPolling Error ***");
	    printf("AD channel %02d -> Polling Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }
	 else
	 {
	    gotoxy(2,2+i);
	    printf(" (+/- 5.0V) ch:%02d -> %+5.4fV | %04xH",i,fVal,wADData);
	 }
      }

      /*--------- To Active Second P1602 Card ---------------------------*/
      gotoxy(60,1); printf("Count=%d",wCount);
      P1602_ActiveBoard( 1 );

      for(i=0; i<16; i++)
      {
      wRetVal=P1602_SetChannelConfig(i,1); /* +/- 5V range for PCI-1602 */

	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) SetChannelConfig Error ***");
	    printf("AD channel %02d -> SetCh Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }

     wRetVal+=P1602_DelayUs(3);       /*  3 us settling time for PCI-1602 */

	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) DelayUs Error ***");
	    printf("AD channel %02d -> Delay Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }

	 wRetVal=P1602_AdPolling(&fVal);
	 wADData=(WORD)(fVal/5.0*32768.0);
	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) AdPolling Error ***");
	    printf("AD channel %02d -> Polling Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }
	 else
	 {
	    gotoxy(42,2+i);
	    printf(" (+/- 5.0V) ch:%02d -> %+5.4fV | %04xH",i,fVal,wADData);
	 }
      }
      wCount++;
      if( kbhit() )
	 break;
      delay(100);
   }

   P1602_DriverClose();
   return 0;
}