/*----------------------------------------------------------------------------*/
/**
 * Demo program for gtuc51 (with io board)
**/
/*----------------------------------------------------------------------------*/
#include "adc0831.h"
#include "keypad_922.h"
#include "textlcd.h"
#include "utils_float.h"
/*----------------------------------------------------------------------------*/
/**
 * Switch & LED Interface for gtuc51 i/o board
 *   - multiplexed (dual/purpose)
 *   - require jumper link settings!
**/
/** SW0, SW1 => P3.3, P3.2 - LAYOUT ERROR */
__sbit __at (0xB3) SW0;
__sbit __at (0xB2) SW1;
/** LED{0-3} => P3.4-P3.7 */
__sbit __at (0xB4) LED0;
__sbit __at (0xB5) LED1;
__sbit __at (0xB6) LED2;
__sbit __at (0xB7) LED3;
/** LED{RX,TX} => P3.1, P3.0 - LAYOUT ERROR */
__sbit __at (0xB1) LEDRX;
__sbit __at (0xB0) LEDTX;
/** alias LEDX=-2 and LEDY=-1 (LEFT OF LED0) **/
__sbit __at (0xB1) LEDX;
__sbit __at (0xB0) LEDY;
/*----------------------------------------------------------------------------*/
char display[LCD_MAX_CHAR];
unsigned char lcdi, loop;
float value;
keybyte_t keyin;
adcbyte_t check;
__bit adc, adcgo, left, demo;
/*----------------------------------------------------------------------------*/
#define DEMO_IO 1
#define DEMO_ADC 0
/*----------------------------------------------------------------------------*/
#define LOOP_COUNT 20
/*----------------------------------------------------------------------------*/
/* interrupt service routine for timer0 */
void timer_blink(void) __interrupt TF0_VECTOR {
	TR0 = 0; loop--;
	P1 = ~P1;
	if (loop==0) {
		if (!left) {
			loop = LED0; LED0 = LED1; LED1 = LED2; LED2 = LED3;
			LED3 = LEDX; LEDX = LEDY; LEDY = loop;
		}
		else {
			loop = LED3; LED3 = LED2; LED2 = LED1; LED1 = LED0;
			LED0 = LEDY; LEDY = LEDX; LEDX = loop;
		}
		loop = LOOP_COUNT;
	}
	TH0 = 0x4B; TL0 = 0xFD; TR0 = 1; /** 50ms */
}
/*----------------------------------------------------------------------------*/
/* interrupt service routine for timer1 */
void timer_goadc(void) __interrupt TF1_VECTOR {
	TR1 = 0; TH1 = 0x4B; TL1 = 0xFD;
	if (loop>0) {
		TR1 = 1; /** 50ms */
		loop--;
	}
	else {
		loop = LOOP_COUNT;
		adcgo = adc;
	}
}
/*----------------------------------------------------------------------------*/
/* interrupt service routine for int1 */
void check_switch0(void) __interrupt IE1_VECTOR {
	left = 0;
	if (lcdi<LCD_MAX_CHAR) {
		lcd_data(0x30);
		lcdi++;
	}
}
/*----------------------------------------------------------------------------*/
/* interrupt service routine for int0 */
void check_switch1(void) __interrupt IE0_VECTOR {
	left = 1;
	if (lcdi<LCD_MAX_CHAR) {
		lcd_data(0x31);
		lcdi++;
	}
}
/*----------------------------------------------------------------------------*/
/* main function */
void main(void) {
	/** initalize stuffs */
	demo = DEMO_IO; /* default... just in case */
	TMOD = 0x11; P1 = 0xFF; P3 = 0xFF;
	lcd_init();
	lcd_goto_line1();
	lcd_puts("8051 Select Demo");
	lcd_goto_line2();
	lcd_puts("[SW0]IO [SW1]ADC");
	/* wait for user key press */
	while (1) {
		if (!SW0) {
			demo = DEMO_IO; /* demo switch, led, keypad and P1 */
			while(!SW0); /** wait until the user press & let go */
			break;
		}
		else if (!SW1) {
			demo = DEMO_ADC; /* demo adc */
			while(!SW1);
			break;
		}
	}
	/* select! */
	if (demo==DEMO_IO) {
		lcd_goto_line1();
		lcd_puts("MY18051 I/O DEMO");
		lcd_goto_line2();
		lcd_puts("                ");
		lcd_goto_line2();
		/** set timer 0 overflow every 50ms - with interrupt handler */
		loop = LOOP_COUNT; lcdi = 0; left = 0;
		P1 = 0xAA; LED0 = 0; IT0 = 1; IT1 = 1;
		EA = 1; ET0 = 1; EX0 = 1; EX1 = 1;
		TH0 = 0x4B; TL0 = 0xFD; TR0 = 1;
		/** main loop */
		while (1) {
			keyin = key_wait_922();
			if (keyin<10&&lcdi<LCD_MAX_CHAR) { /** numeric key! */
				lcd_data(keyin+0x30);
				lcdi++;
			}
			else if(keyin==0x0F) { /** '#' key! */
				lcd_goto_line2();
				lcd_puts("HASHED!         ");
				lcd_goto_line2();
				lcdi = LCD_MAX_CHAR;
			}
			else if(keyin==0x0E) { /** '*' key! */
				lcd_goto_line2();
				lcd_puts("                ");
				lcd_goto_line2();
				lcdi = 0;
			}
		}
	}
	else {
		lcd_goto_line1();
		lcd_puts("MY18051 ADC DEMO");
		lcd_goto_line2();
		lcd_puts("SW0:ADC, SW1:CLR");
		/* initialize adc */
		adc_init();
		adc = 0; adcgo = 0; EA = 1;
		/** adc status indicator */
		LEDRX = adc; LEDTX = !adc;
		/** main loop */
		while (1) {
			if (!SW0) {
				while (!SW0); /** wait until the user lets go */
				adc = !adc;
				adcgo = adc;
				if (!adcgo) {
					ET1 = 0; TR1 = 0;
					lcd_puts("*");
				}
				LEDRX = adc; LEDTX = !adc;
			}
			else if(!SW1) {
				while (!SW1); /** wait until the user lets go */
				lcd_goto_line2();
				lcd_puts("SW0:ADC, SW1:CLR");
			}
			if (adcgo) {
				adcgo = 0;
				lcd_goto_line2();
				lcd_puts("                ");
				/** read adc */
				check = adc_get_data();
				value = ((float) check / 255.0) * VREF;
				lcd_goto_line2();
				lcd_puts("ADC: ");
				float2str(display,value);
				lcd_puts(display);
				lcd_puts(" (");
				int2str(display,check);
				lcd_puts(display);
				lcd_puts(")");
				/** set timer 1 overflow every 50ms - with interrupt handler */
				ET1 = 1; TH1 = 0x4B; TL1 = 0xFD; TR1 = 1;
			}
		}
	}
}
/*----------------------------------------------------------------------------*/