/**********************************************************************/
/*   This program is developed by Turbo C 2.0			       */
/***********************************************************************/
/*  Demo 4: Two PCI-1202 Card demo.				       */
/*	    To repeat sacn the A/D from CH:0 to CH 15, then display    */
/*	    the scanned A/D value.				       */
/***********************************************************************/
#define  MYLIB
#include "P1202.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 P1202 card and detect how many P1202 card in PC */
   wRetVal=P1202_DriverInit(&wBoards);
   printf("Threr are %d P1202 Cards in this PC\n",wBoards);

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

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

   /* The P1202_ActiveBoard() function must be used to active a board, */
   /* then all operation will take effect to the actived board.        */
   printf("----------------------------------------------------------\n");
   printf("The First P1202 Card...\n");
   P1202_ActiveBoard( 0 );
   P1202_Do(0x55aa);	 /* Digital output */
   P1202_Di(&wDIOdata);  /* Digital input  */
   printf("Digital Output -> 55aaH  |  Digital Input -> %04xH\n",wDIOdata);
   printf("----------------------------------------------------------\n");
   printf("The Second P1202 Card...\n");
   P1202_ActiveBoard( 1 );
   P1202_Do(0xaa55);	 /* Digital output */
   P1202_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-1202L user, the settling time is 3us.			     */
   /* For PCI-1202H user, the settling time varying according to	     */
   /*	configuration code, please refer Page 28 of NAPPCI/win user mamual.  */
   /*	for example:  a PCI-1202L/1202H user who want to acquire A/D channel */
   /*	      5 with configuration code 0x11, then the following statements  */
   /*	      must be used.						     */
   /*	  ->  P1202_SetChannelConfig(5,0x11);	// +/- 5V range 	     */
   /*	  ->  P1202_DelayUs(28);       // delay 28 us settling time	     */
   /*	  ->  P1202_AdPolling(&fVal);  // Acquire A/D data		     */
   /**************************************************************************/

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

      /* wRetVal+=P1202_DelayUs(3); */	/*  3 us settling time for PCI-1202L */
	 wRetVal+=P1202_DelayUs(23); /* 23 us settling time for PCI-1202H */
	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) DelayUs Error ***");
	    printf("AD channel %02d -> Delay Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }

	 wRetVal=P1202_AdPolling(&fVal);
	 wADData=(WORD)(fVal/5.0*2048.0+2048);
	 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.3fV | %04xH",i,fVal,wADData);
	 }
      }

      /*--------- To Active Second P1202 Card ---------------------------*/
      gotoxy(60,1); printf("Count=%d",wCount);
      P1202_ActiveBoard( 1 );
      for(i=0; i<16; i++)
      {
      /* wRetVal=P1202_SetChannelConfig(i,0x00); */ /* +/- 5V range for PCI-1202L */
	 wRetVal=P1202_SetChannelConfig(i,0x10); /* +/- 5V range for PCI-1202H */
	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) SetChannelConfig Error ***");
	    printf("AD channel %02d -> SetCh Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }

      /* wRetVal+=P1202_DelayUs(3);  */ /*  3 us settling time for PCI-1202L */
	 wRetVal+=P1202_DelayUs(23); /* 23 us settling time for PCI-1202H */
	 if( wRetVal>0 )
	 {
	    printf("*** (+/- 5.0V Range) DelayUs Error ***");
	    printf("AD channel %02d -> Delay Error %d !!!",i,wRetVal);
	    putch(0x07);  getch();
	    return 0;
	 }

	 wRetVal=P1202_AdPolling(&fVal);
	 wADData=(WORD)(fVal/5.0*2048.0+2048);
	 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.3fV | %04xH",i,fVal,wADData);
	 }
      }
      wCount++;
      if( kbhit() )
	 break;
      delay(100);
   }

   P1202_DriverClose();
   return 0;
}