/***************************************************************************
   ad4.c
	
   Z-World, 2001
	This sample program is used the BL2100 series controllers.

	This program demonstrates how to use the A/D low level driver. The
	program will continuously display the voltage (average of 10 samples)
	that is present on the A/D channels.

	!!!This program must be compiled to Flash.
	
	Instructions:
	-------------
	1. Connect a voltmeter to the output of the power supply that your
	going to be using.

	2. Preset the voltage on the power supply to be within the voltage
	range of the A/D converter channel that your going to test. For the
	BL2100 A/D Channels 0 - 10, input voltage range is	-10 to +10V or
	0 to 10V	depending on your controller.

	3. Power-on the controller.
	
	4. Connect the output of power supply to one of the A/D channels.

	5. Compile and run this program.

	6. Vary the voltage on a A/D channel, the voltage displayed in the STDIO
	window and voltmeter should track each other.

==================================================================================
	Here's additional information on the AD driver:
	----------------------------------------------- 
	For faster conversion times (approx. 100us) use the low level function
	anaInDriver(). See sample program AD3.C for channel to channel conversions
	or use this sample program (AD4.C) which is setup to do multiple samples
	on a given channel. 
		
	The trick to obtaining the faster conversion speeds is to either do the
	channel to channel conversions continually or by sampling a given channel
	multiple times (min. of 10 times), by doing this you're basically NULL'ing
	out the one throw away cycle that the ADC chip requires to sync-up to your
	conversion request. 

	This is why anaIn takes approx. 200us, as it has to do the throw away cycle
	and do the cycle that actually gets your data! 
   	
***************************************************************************/
#class auto

#ifndef _FLASH_
#error "This program must be compiled to Flash."
#endif


#define NUM_CHANNELS 11 			//number of A/D channels
#define OUTPUTBITS AD12BITS	//initialize for 12 bit operation


// set the STDIO cursor location and display a string
void DispStr(int x, int y, char *s)
{
   x += 0x20;
   y += 0x20;
   printf ("\x1B=%c%c%s", x, y, s);
}

// read the A/D with using the low level driver
nodebug
unsigned int sample_ad(int channel, int num_samples)
{
	auto unsigned long rawdata;
	auto unsigned int samples;
	auto unsigned char adc_cmd;

	samples  = num_samples;
	rawdata  = 0;
	adc_cmd  = OUTPUTBITS;	// ADC resolution
	adc_cmd 	= (channel<<4) + (adc_cmd<<2);
	
	// Do conversion of channel X which will be valid on the next A/D cycle
	anaInDriver(adc_cmd, OUTPUTBITS);

	// Sample AD channel per the number of samples requested
	while(samples-- > 0)
	{	//data is for the A/D channel that was in sent in the previous adc_cmd 
		rawdata += (long) anaInDriver(adc_cmd,  OUTPUTBITS); 	// execute low level A/D driver
	}
	return((unsigned int) (rawdata/num_samples));
}

///////////////////////////////////////////////////////////////////////////

void main ()
{
	auto float voltage;
	auto int channel;
	auto int skip;
	auto unsigned int avg_sample;
	auto float ad_inputs[NUM_CHANNELS];
	auto char s[80];
	float start_time, end_time, total_time;
		
	brdInit();		// Required for BL2100 series boards
	
	sprintf(s, "A/D input voltage for channels 0 - %d", NUM_CHANNELS - 1 );
	DispStr(2, 2, s);
	DispStr(2, 3, "--------------------------------------");

	for(;;)
	{
		for(channel = 0; channel < NUM_CHANNELS; channel++)
		{
			// sample each channel 10 times...
			avg_sample = sample_ad(channel, 10);
			 		
			// convert the averaged 10 samples to a voltage
			ad_inputs[channel] = _adcCalib[channel][0] * (_adcCalib[channel][1] - avg_sample);
		}

		skip = 4;	
		for(channel = 0; channel < NUM_CHANNELS; channel++)
		{
			/*  Put some space where the DAC channels are on J1: */
			if( 5 == channel ) { skip = 5; }

			voltage = ad_inputs[channel]; 
			sprintf(s, "Channel = %2d Voltage = %.4f (voltage range -10 to +10v)    ", channel, voltage);
			DispStr(2,channel + skip, s);
		}
	}
}	
///////////////////////////////////////////////////////////////////////////

