/***************************************************************************
	ad3.c

   Z-World, 2001
	This sample program is used the BL2100 series controllers.

	This program demonstrates how to access the A/D channels with the low 
	level A/D driver. The program will continuously display the voltage
	thats being monitored on all the A/D channels with using the low level
	A/D driver.

	!!!This program must be compiled to Flash.
	
	Instructions:
	-------------
	1. Connect a voltmeter to the output of the power supply that
	your 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 to the A/D channel, the voltage displayed in the
	STDIO window and voltmeter should track each other.

***************************************************************************/
#class auto

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


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


nodebug 	// Read all the A/D channels using the low level driver 	
void sample_ad(float *ptr)
{
	auto unsigned char len, adc_cmd, numbits, bitorder,  mode;
	auto unsigned int channel, rawdata;
	auto float volts;

	// setup the A/D command 
	numbits  = OUTPUTBITS;		//initialize output data length
	bitorder = MSB_FIRST;		//set data output format
	mode     = UNIPOLAR;			//set data out mode
	channel 	= 0;					//set initial channel to be accessed
	adc_cmd 	= (channel<<4) + (numbits<<2) + (bitorder<<1) + mode;

	//initialize A/D driver for the number of output bits
	len = OUTPUTBITS;

	// start A/D sequence,  channel zero conversion will be valid on
	// the next A/D access 
	anaInDriver((adc_cmd & 0x0f), len); // execute low level A/D driver
	for(channel = 0; channel < NUM_CHANNELS; channel++)
	{
		// clear the channel 4 bit field
		adc_cmd = adc_cmd & 0x0f;	

		// bump channel x1 
		adc_cmd = adc_cmd | ((channel + 1) << 4);
			
		// get the A/D rawdata which is now valid from the previous A/D access 
		rawdata = anaInDriver(adc_cmd, len); // execute low level A/D driver

		// use calibration constants to generate a adjusted voltage
		volts = (_adcCalib[channel][0] * (_adcCalib[channel][1] - rawdata));

		// store results in buffer so it can be displayed later
		ptr[channel] = volts;
	}
}

// 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);
}

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

void main ()
{
	auto int channel;
	auto int skip;
	auto char s[80];
	auto float voltage;
	auto float buffer[NUM_CHANNELS];
	
	brdInit();		// Required for BL2100 series boards

	sprintf(s, "A/D input voltages for channels 0 - %d", NUM_CHANNELS - 1 );
	DispStr(2, 2, s);
	DispStr(2, 3, "--------------------------------------");

	for(;;)
	{
		// sample all A/D channels
		sample_ad(buffer);
		
		// display the voltage that was read on the A/D channels
		skip = 4;
		for(channel = 0; channel < NUM_CHANNELS; channel++)
		{
			/*  Put some space where the DAC channels are on J1: */
			if( 5 == channel ) { skip = 5; }

			if((voltage = buffer[channel]) < -10.99 || voltage > 10.99)
			{
				sprintf(s, "Channel = %2d Voltage = out of range (voltage range -10 to +10)", channel);
				DispStr(2,channel + skip, s);
			}
			else
			{
				sprintf(s, "Channel = %2d Voltage = %.4f (voltage range -10 to +10)         ", channel, voltage);
				DispStr(2,channel + skip, s);
			}
		}
	}
}
///////////////////////////////////////////////////////////////////////////


