Blame | Last modification | View Log | Download
/****************************************************************************Title : C file for the HD44780U LCD library (lcd_io.c)Author: Chris efstathiou hendrix@otenet.grDate: 1/Jul/2002Software: AVR-GCC with AVR-ASTarget: any AVR deviceComments: This software is FREE.*****************************************************************************/#ifndef _IO_REG_MACRO_MODE_#define _IO_REG_MACRO_MODE_ 1 /* In case you have the new assignment mode io headers */#endif#ifndef _SFR_ASM_COMPAT#define _SFR_ASM_COMPAT 1 /* This is for GCC 3.2 */#endif#include <io.h>#include <progmem.h>#include <eeprom.h>#include "lcd_io.h"/* constants/macros */#ifndef CONCAT1#define CONCAT1(a, b) CONCAT2(a, b)#endif#ifndef CONCAT2#define CONCAT2(a, b) a ## b#endif#define LCD_POWER_ON_DELAY ( (20000*(F_CPU/60000))/100 ) /* 20 milliseconds */#define LCD_INIT_DELAY ( (5000*(F_CPU/60000))/100 ) /* 5 milliseconds */#define INIT_MODE 2#define DATA_MODE 1#define CMD_MODE 0/* CONVERSION OF LCD_DELAY_TIME TO TRUE MICROSECONDS */#if LCD_READ_REQUIRED == 0 || LCD_IO_MODE == 2 || LCD_IO_MODE == 7#define LCD_DELAY_SHORT ( (LCD_DELAY_TIME*(F_CPU/60000))/100 )#define LCD_DELAY_LONG ( LCD_DELAY_SHORT*40 )#endif/*######################################################################################################*/#if LCD_IO_MODE == 2/*######################################################################################################*/#define LCD_DATA_PORT_IS_IO 1#define LCD_CLOCK_PORT_IS_IO 1#define LCD_DATA_PORT CONCAT1(PORT,LCD_DATA_SIGNAL_PORT)#define LCD_DATA_DDR_REG CONCAT1(DDR,LCD_DATA_SIGNAL_PORT)#define LCD_CLOCK_PORT CONCAT1(PORT,LCD_CLOCK_SIGNAL_PORT)#define LCD_CLOCK_DDR_REG CONCAT1(DDR,LCD_CLOCK_SIGNAL_PORT)#define LCD_READ_REQUIRED 0#if defined(__AVR_ATmega103__)#if LCD_DATA_PORT == PORTC#undef LCD_DATA_PORT_IS_IO#undef LCD_DATA_DDR_REG#define LCD_DATA_PORT_IS_IO 0#endif#if LCD_CLOCK_PORT == PORTC#undef LCD_CLOCK_PORT_IS_IO#undef LCD_CLOCK_DDR_REG#define LCD_CLOCK_PORT_IS_IO 0#endif#endif /* #if defined(__AVR_ATmega103__) *//*######################################################################################################*/#elif LCD_IO_MODE == 6/*######################################################################################################*/#define lcd_toggle_e() ({ cbi(LCD_E_PORT, LCD_E_PIN); delay(F_CPU/6000000); \sbi(LCD_E_PORT, LCD_E_PIN); })#if LCD_READ_REQUIRED == 1#undef LCD_MULTIPLEX_REQUIRED#define LCD_MULTIPLEX_REQUIRED 0#define BUSY_FLAG 0#define DATA 1#endif#if LCD_LINES == 1 || LCD_LINES == 2 || LCD_LINES == 4#else#error THE LCD LINES MUST BE 1 OR 2 OR 4 !#endif#define LCD_D4_PORT_IS_IO 1#define LCD_D5_PORT_IS_IO 1#define LCD_D6_PORT_IS_IO 1#define LCD_D7_PORT_IS_IO 1#define LCD_RS_PORT_IS_IO 1#define LCD_RW_PORT_IS_IO 1#define LCD_E_PORT_IS_IO 1#define LCD_D4_PORT CONCAT1(PORT, LCD_DATA4_PORT)#define LCD_D5_PORT CONCAT1(PORT, LCD_DATA5_PORT)#define LCD_D6_PORT CONCAT1(PORT, LCD_DATA6_PORT)#define LCD_D7_PORT CONCAT1(PORT, LCD_DATA7_PORT)#define LCD_RS_PORT CONCAT1(PORT, LCD_RS_SIGNAL_PORT)#define LCD_RW_PORT CONCAT1(PORT, LCD_RW_SIGNAL_PORT)#define LCD_E_PORT CONCAT1(PORT, LCD_E_SIGNAL_PORT)#define LCD_D4_DDR_REG CONCAT1(DDR, LCD_DATA4_PORT)#define LCD_D5_DDR_REG CONCAT1(DDR, LCD_DATA5_PORT)#define LCD_D6_DDR_REG CONCAT1(DDR, LCD_DATA6_PORT)#define LCD_D7_DDR_REG CONCAT1(DDR, LCD_DATA7_PORT)#define LCD_RS_DDR_REG CONCAT1(DDR, LCD_RS_SIGNAL_PORT)#define LCD_RW_DDR_REG CONCAT1(DDR, LCD_RW_SIGNAL_PORT)#define LCD_E_DDR_REG CONCAT1(DDR, LCD_E_SIGNAL_PORT)#if LCD_READ_REQUIRED == 1#define LCD_D4_PIN_REG CONCAT1(PIN, LCD_DATA4_PORT)#define LCD_D5_PIN_REG CONCAT1(PIN, LCD_DATA5_PORT)#define LCD_D6_PIN_REG CONCAT1(PIN, LCD_DATA6_PORT)#define LCD_D7_PIN_REG CONCAT1(PIN, LCD_DATA7_PORT)#elif LCD_READ_REQUIRED == 0#undef LCD_RW_PORT#undef LCD_RW_DDR_REG#undef LCD_RW_PORT_IS_IO#endif#if defined(__AVR_ATmega103__)#if LCD_D4_PORT == PORTC#if LCD_READ_REQUIRED == 1#error THE PORT FOR LCD_D4 IS OUTPUT ONLY!#endif#undef LCD_D4_PORT_IS_IO#undef LCD_D4_DDR_REG#define LCD_D4_PORT_IS_IO 0#endif#if LCD_D5_PORT == PORTC#if LCD_READ_REQUIRED == 1#error THE PORT FOR LCD_D5 IS OUTPUT ONLY!#endif#undef LCD_D5_PORT_IS_IO#undef LCD_D5_DDR_REG#define LCD_D5_PORT_IS_IO 0#endif#if LCD_D6_PORT == PORTC#if LCD_READ_REQUIRED == 1#error THE PORT FOR LCD_D6 IS OUTPUT ONLY!#endif#undef LCD_D6_PORT_IS_IO#undef LCD_D6_DDR_REG#define LCD_D6_PORT_IS_IO 0#endif#if LCD_D7_PORT == PORTC#if LCD_READ_REQUIRED == 1#error THE PORT FOR LCD_D7 IS OUTPUT ONLY!#endif#undef LCD_D7_PORT_IS_IO#undef LCD_D7_DDR_REG#define LCD_D7_PORT_IS_IO 0#endif#if LCD_RS_PORT == PORTC#undef LCD_RS_PORT_IS_IO#undef LCD_RS_DDR_REG#define LCD_RS_PORT_IS_IO 0#endif#if LCD_READ_REQUIRED == 1#if LCD_RW_PORT == PORTC#undef LCD_RW_PORT_IS_IO#undef LCD_RW_DDR_REG#define LCD_RW_PORT_IS_IO 0#endif#endif#if LCD_E_PORT == PORTC#undef LCD_E_PORT_IS_IO#undef LCD_E_DDR_REG#define LCD_E_PORT_IS_IO 0#endif#endif /* #if defined(__AVR_ATmega103__) *//*######################################################################################################*/#elif LCD_IO_MODE == 7/*######################################################################################################*/#define lcd_toggle_e() ({ cbivar(lcd_E_port, lcd_E_pin); delay(F_CPU/6000000); \sbivar(lcd_E_port, lcd_E_pin); })#if SREG > 0X3F#define IO_TO_MEM_OFFSET 0#else#define IO_TO_MEM_OFFSET 0X20#endif#define LCD_READ_REQUIRED 0#if LCD_0_LINES == 1 || LCD_0_LINES == 2 || LCD_0_LINES == 4#else#error THE LCD LINES MUST BE 1 OR 2 OR 4 !#endif#if LCD_1_LINES == 1 || LCD_1_LINES == 2 || LCD_1_LINES == 4#else#error THE LCD LINES MUST BE 1 OR 2 OR 4 !#endif#if NUMBER_OF_LCD_UNITS >= 3#if LCD_2_LINES == 1 || LCD_2_LINES == 2 || LCD_2_LINES == 4#else#error THE LCD LINES MUST BE 1 OR 2 OR 4 !#endif#endif#define LCD_D4_PORT_IS_IO 1#define LCD_D5_PORT_IS_IO 1#define LCD_D6_PORT_IS_IO 1#define LCD_D7_PORT_IS_IO 1#define LCD_RS_PORT_IS_IO 1#define LCD_0_E_PORT_IS_IO 1#define LCD_1_E_PORT_IS_IO 1#if NUMBER_OF_LCD_UNITS >=3#define LCD_2_E_PORT_IS_IO 1#endif#define LCD_D4_PORT CONCAT1(PORT, LCD_DATA4_PORT)#define LCD_D5_PORT CONCAT1(PORT, LCD_DATA5_PORT)#define LCD_D6_PORT CONCAT1(PORT, LCD_DATA6_PORT)#define LCD_D7_PORT CONCAT1(PORT, LCD_DATA7_PORT)#define LCD_RS_PORT CONCAT1(PORT, LCD_RS_SIGNAL_PORT)#define LCD_0_E_PORT CONCAT1(PORT, LCD_0_E_SIGNAL_PORT)#define LCD_1_E_PORT CONCAT1(PORT, LCD_1_E_SIGNAL_PORT)#if NUMBER_OF_LCD_UNITS >=3#define LCD_2_E_PORT CONCAT1(PORT, LCD_2_E_SIGNAL_PORT)#endif#define LCD_D4_DDR_REG CONCAT1(DDR, LCD_DATA4_PORT)#define LCD_D5_DDR_REG CONCAT1(DDR, LCD_DATA5_PORT)#define LCD_D6_DDR_REG CONCAT1(DDR, LCD_DATA6_PORT)#define LCD_D7_DDR_REG CONCAT1(DDR, LCD_DATA7_PORT)#define LCD_RS_DDR_REG CONCAT1(DDR, LCD_RS_SIGNAL_PORT)#define LCD_0_E_DDR_REG CONCAT1(DDR, LCD_0_E_SIGNAL_PORT)#define LCD_1_E_DDR_REG CONCAT1(DDR, LCD_1_E_SIGNAL_PORT)#if NUMBER_OF_LCD_UNITS >=3#define LCD_2_E_DDR_REG CONCAT1(DDR, LCD_2_E_SIGNAL_PORT)#endif#if defined(__AVR_ATmega103__)#if LCD_D4_PORT == PORTC#undef LCD_D4_PORT_IS_IO#undef LCD_D4_DDR_REG#define LCD_D4_PORT_IS_IO 0#endif#if LCD_D5_PORT == PORTC#undef LCD_D5_PORT_IS_IO#undef LCD_D5_DDR_REG#define LCD_D5_PORT_IS_IO 0#endif#if LCD_D6_PORT == PORTC#undef LCD_D6_PORT_IS_IO#undef LCD_D6_DDR_REG#define LCD_D6_PORT_IS_IO 0#endif#if LCD_D7_PORT == PORTC#undef LCD_D7_PORT_IS_IO#undef LCD_D7_DDR_REG#define LCD_D7_PORT_IS_IO 0#endif#if LCD_RS_PORT == PORTC#undef LCD_RS_PORT_IS_IO#undef LCD_RS_DDR_REG#define LCD_RS_PORT_IS_IO 0#endif#if LCD_0_E_PORT == PORTC#undef LCD_0_E_PORT_IS_IO#undef LCD_0_E_DDR_REG#define LCD_0_E_PORT_IS_IO 0#endif#if LCD_1_E_PORT == PORTC#undef LCD_1_E_PORT_IS_IO#undef LCD_1_E_DDR_REG#define LCD_1_E_PORT_IS_IO 0#endif#if NUMBER_OF_LCD_UNITS >=3#if LCD_2_E_PORT == PORTC#undef LCD_2_E_PORT_IS_IO#undef LCD_2_E_DDR_REG#define LCD_2_E_PORT_IS_IO 0#endif#endif /* #if NUMBER_OF_LCD_UNITS >=3 */#endif /* #if defined(__AVR_ATmega103__) */#endif /* #elif LCD_IO_MODE == 7 *//*######################################################################################################*//* type definitions */typedef unsigned char u08;typedef unsigned short u16;/*######################################################################################################*//* FUNCTION PROTOTYPES *//*######################################################################################################*/#if LCD_IO_MODE == 7static void sbivar(unsigned char port, unsigned char bit);static void cbivar(unsigned char port, unsigned char bit);#endif#if LCD_READ_REQUIRED == 1static unsigned char lcd_read(unsigned char rs);static inline unsigned char lcd_waitbusy(void);#endifstatic void delay(unsigned long int us);/*######################################################################################################*//* GLOBAL variables *//*######################################################################################################*/static unsigned char x,y, putc_lock=0;#if LCD_IO_MODE == 7static unsigned char lcd_E_port=0, lcd_E_pin=0, lcd_chars_per_line=0, lcd_lines=0, current_lcd_unit=0;static struct xy {unsigned char x;unsigned char y;} xy_coordinates[NUMBER_OF_LCD_UNITS];#endif/*######################################################################################################*//* local functions *//*######################################################################################################*/static void delay(unsigned long int us)/* delay for a minimum of <us> microseconds (with a 6 Mhz crystal, the resolution is 1 us) */{while ( us ) { us--; } /* 6 cpu cycles per loop */}/*######################################################################################################*/#if LCD_IO_MODE == 7 /* lcd_write() function for 6 bit i/o one lcd unit *//*######################################################################################################*/static void sbivar(unsigned char port, unsigned char bit){register unsigned char temp=0;temp=*((unsigned char*)(port+IO_TO_MEM_OFFSET));temp|= (1<<bit);*((unsigned char*)(port+IO_TO_MEM_OFFSET))=temp;return;}/*######################################################################################################*/static void cbivar(unsigned char port, unsigned char bit){register unsigned char temp=0;temp=*((unsigned char*)(port+IO_TO_MEM_OFFSET));temp &= ~(1<<bit);*((unsigned char*)(port+IO_TO_MEM_OFFSET))=temp;return;}/*######################################################################################################*/static void lcd_write(unsigned char data, unsigned char mode){register unsigned char rs=0;if(mode==DATA_MODE) rs=1; else rs=0; /* set the rs value *//* output high nibble first */if(data&0x10) sbi(LCD_D4_PORT, LCD_D4_PIN); else cbi(LCD_D4_PORT, LCD_D4_PIN);if(data&0x20) sbi(LCD_D5_PORT, LCD_D5_PIN); else cbi(LCD_D5_PORT, LCD_D5_PIN);if(data&0x40) sbi(LCD_D6_PORT, LCD_D6_PIN); else cbi(LCD_D6_PORT, LCD_D6_PIN);if(data&0x80) sbi(LCD_D7_PORT, LCD_D7_PIN); else cbi(LCD_D7_PORT, LCD_D7_PIN);if(rs) sbi(LCD_RS_PORT, LCD_RS_PIN); else cbi(LCD_RS_PORT, LCD_RS_PIN);lcd_toggle_e();/* output low nibble *//* if INIT_MODE skip this section else execute it */if(mode!=INIT_MODE){if(data&0x01) sbi(LCD_D4_PORT, LCD_D4_PIN); else cbi(LCD_D4_PORT, LCD_D4_PIN);if(data&0x02) sbi(LCD_D5_PORT, LCD_D5_PIN); else cbi(LCD_D5_PORT, LCD_D5_PIN);if(data&0x04) sbi(LCD_D6_PORT, LCD_D6_PIN); else cbi(LCD_D6_PORT, LCD_D6_PIN);if(data&0x08) sbi(LCD_D7_PORT, LCD_D7_PIN); else cbi(LCD_D7_PORT, LCD_D7_PIN);if(rs) sbi(LCD_RS_PORT, LCD_RS_PIN); else cbi(LCD_RS_PORT, LCD_RS_PIN);lcd_toggle_e();}delay(LCD_DELAY_SHORT);}/*------------------------------------------------------------------------------------------------------*/void select_lcd(unsigned char lcd_unit){/* Save the current lcd unit x,y coordinates */xy_coordinates[current_lcd_unit].x=x;xy_coordinates[current_lcd_unit].y=y;if(lcd_unit==0){lcd_E_port= LCD_0_E_PORT;lcd_E_pin = LCD_0_E_PIN;lcd_chars_per_line = LCD_0_CHARS_PER_LINE;lcd_lines = LCD_0_LINES;current_lcd_unit=lcd_unit; /* Make the requested lcd unit current (active) */x=xy_coordinates[lcd_unit].x; /* Load the saved x,y coordinates of the specified lcd unit */y=xy_coordinates[lcd_unit].y;}else if(lcd_unit==1){lcd_E_port= LCD_1_E_PORT;lcd_E_pin = LCD_1_E_PIN;lcd_chars_per_line = LCD_1_CHARS_PER_LINE;lcd_lines = LCD_1_LINES;current_lcd_unit=lcd_unit;x=xy_coordinates[lcd_unit].x;y=xy_coordinates[lcd_unit].y;}#if NUMBER_OF_LCD_UNITS >=3else if(lcd_unit==2){lcd_E_port= LCD_2_E_PORT;lcd_E_pin = LCD_2_E_PIN;lcd_chars_per_line = LCD_2_CHARS_PER_LINE;lcd_lines = LCD_2_LINES;current_lcd_unit=lcd_unit;x=xy_coordinates[lcd_unit].x;y=xy_coordinates[lcd_unit].y;}#endifreturn;}/*######################################################################################################*/#elif LCD_IO_MODE == 6 /* lcd_write() function for 6 bit i/o with multi lcd units *//*######################################################################################################*/#if LCD_READ_REQUIRED == 1#define LCD_READ_DELAY ( (10*(F_CPU/60000))/100 )static unsigned char lcd_read(unsigned char rs){register unsigned char data=0;/* RS=1: read data, RS=0: read busy flag, RW=1 read mode */if (rs) sbi(LCD_RS_PORT, LCD_RS_PIN); else cbi(LCD_RS_PORT, LCD_RS_PIN);/* configure data pins as input */cbi(LCD_D4_DDR_REG, LCD_D4_PIN );cbi(LCD_D5_DDR_REG, LCD_D5_PIN );cbi(LCD_D6_DDR_REG, LCD_D6_PIN );cbi(LCD_D7_DDR_REG, LCD_D7_PIN );/* set R/W pin for reading from LCD */sbi(LCD_RW_PORT, LCD_RW_PIN);delay(LCD_READ_DELAY);if(bit_is_set(LCD_D7_PIN_REG, LCD_D7_PIN)) { data+=1; }data=(data<<1);if(bit_is_set(LCD_D6_PIN_REG, LCD_D6_PIN)) { data+=1; }data=(data<<1);if(bit_is_set(LCD_D5_PIN_REG, LCD_D5_PIN)) { data+=1; }data=(data<<1);if(bit_is_set(LCD_D4_PIN_REG, LCD_D4_PIN)) { data+=1; }data=(data<<1);lcd_toggle_e();delay(LCD_READ_DELAY);if(bit_is_set(LCD_D7_PIN_REG, LCD_D7_PIN)) { data+=1; }data=(data<<1);if(bit_is_set(LCD_D6_PIN_REG, LCD_D6_PIN)) { data+=1; }data=(data<<1);if(bit_is_set(LCD_D5_PIN_REG, LCD_D5_PIN)) { data+=1; }data=(data<<1);if(bit_is_set(LCD_D4_PIN_REG, LCD_D4_PIN)) { data+=1; }lcd_toggle_e();/* clear R/W pin for writting to LCD */cbi(LCD_RW_PORT, LCD_RW_PIN);/* configure data pins as outputs */sbi(LCD_D4_DDR_REG, LCD_D4_PIN );sbi(LCD_D5_DDR_REG, LCD_D5_PIN );sbi(LCD_D6_DDR_REG, LCD_D6_PIN );sbi(LCD_D7_DDR_REG, LCD_D7_PIN );return (data);}/*######################################################################################################*/static inline unsigned char lcd_waitbusy(void)/* loops while lcd is busy, reads address counter */{register unsigned char c;while ( (c=lcd_read(BUSY_FLAG) & (1<<LCD_BUSY)) );return (c); // return address counter}#endif /* #if LCD_READ_REQUIRED == 1 *//*######################################################################################################*/static void lcd_write(unsigned char data, unsigned char mode){register unsigned char rs=0;/* save and set DDR(X) register(s) in case another program altered those values */#if LCD_MULTIPLEX_ENABLE == 1#if LCD_D4_PORT_IS_IO==1unsigned char d4_is_output=0;if(inp(LCD_D4_DDR_REG)&(1<<LCD_D4_PIN)) { d4_is_output=1; }sbi(LCD_D4_DDR_REG, LCD_D4_PIN );#endif#if LCD_D5_PORT_IS_IO==1unsigned char d5_is_output=0;if(inp(LCD_D5_DDR_REG)&(1<<LCD_D5_PIN)) { d5_is_output=1; }sbi(LCD_D5_DDR_REG, LCD_D5_PIN );#endif#if LCD_D6_PORT_IS_IO==1unsigned char d6_is_output=0;if(inp(LCD_D6_DDR_REG)&(1<<LCD_D6_PIN)) { d6_is_output=1; }sbi(LCD_D6_DDR_REG, LCD_D6_PIN );#endif#if LCD_D7_PORT_IS_IO==1unsigned char d7_is_output=0;if(inp(LCD_D7_DDR_REG)&(1<<LCD_D7_PIN)) { d7_is_output=1; }sbi(LCD_D7_DDR_REG, LCD_D7_PIN );#endif#if LCD_RS_PORT_IS_IO==1unsigned char rs_is_output=0;if(inp(LCD_RS_DDR_REG)&(1<<LCD_RS_PIN)) { rs_is_output=1; }sbi(LCD_RS_DDR_REG, LCD_RS_PIN );#endif#endif /* LCD_MULTIPLEX_ENABLE == 1 */if(mode==DATA_MODE) rs=1; else rs=0; /* set the rs value *//* output high nibble first */if(data&0x10) sbi(LCD_D4_PORT, LCD_D4_PIN); else cbi(LCD_D4_PORT, LCD_D4_PIN);if(data&0x20) sbi(LCD_D5_PORT, LCD_D5_PIN); else cbi(LCD_D5_PORT, LCD_D5_PIN);if(data&0x40) sbi(LCD_D6_PORT, LCD_D6_PIN); else cbi(LCD_D6_PORT, LCD_D6_PIN);if(data&0x80) sbi(LCD_D7_PORT, LCD_D7_PIN); else cbi(LCD_D7_PORT, LCD_D7_PIN);if(rs) sbi(LCD_RS_PORT, LCD_RS_PIN); else cbi(LCD_RS_PORT, LCD_RS_PIN);lcd_toggle_e();/* output low nibble *//* if INIT_MODE skip this section else execute it */if(mode!=INIT_MODE){if(data&0x01) sbi(LCD_D4_PORT, LCD_D4_PIN); else cbi(LCD_D4_PORT, LCD_D4_PIN);if(data&0x02) sbi(LCD_D5_PORT, LCD_D5_PIN); else cbi(LCD_D5_PORT, LCD_D5_PIN);if(data&0x04) sbi(LCD_D6_PORT, LCD_D6_PIN); else cbi(LCD_D6_PORT, LCD_D6_PIN);if(data&0x08) sbi(LCD_D7_PORT, LCD_D7_PIN); else cbi(LCD_D7_PORT, LCD_D7_PIN);if(rs) sbi(LCD_RS_PORT, LCD_RS_PIN); else cbi(LCD_RS_PORT, LCD_RS_PIN);lcd_toggle_e();}#if LCD_READ_REQUIRED == 0delay(LCD_DELAY_SHORT);#elif LCD_READ_REQUIRED == 1lcd_waitbusy();#endif/* Restore the DDR registers, if multiplexing wanted */#if LCD_MULTIPLEX_ENABLE == 1#if LCD_D4_PORT_IS_IO==1if(!d4_is_output) { cbi(LCD_D4_DDR_REG, LCD_D4_PIN ); }#endif#if LCD_D5_PORT_IS_IO==1if(!d5_is_output) { cbi(LCD_D5_DDR_REG, LCD_D5_PIN ); }#endif#if LCD_D6_PORT_IS_IO==1if(!d6_is_output) { cbi(LCD_D6_DDR_REG, LCD_D6_PIN ); }#endif#if LCD_D7_PORT_IS_IO==1if(!d7_is_output) { cbi(LCD_D7_DDR_REG, LCD_D7_PIN ); }#endif#if LCD_RS_PORT_IS_IO==1if(!rs_is_output) { cbi(LCD_RS_DDR_REG, LCD_RS_PIN ); }#endif#endif /* LCD_MULTIPLEX_ENABLE == 1 */}/*######################################################################################################*/#elif LCD_IO_MODE == 2 /* lcd_write() function for 2 bit i/o *//*######################################################################################################*/static void lcd_write(unsigned char lcd_data,unsigned char mode){#define toggle_clock() ({ sbi(LCD_CLOCK_PORT, LCD_CLOCK_PIN); cbi(LCD_CLOCK_PORT, LCD_CLOCK_PIN); })#define data(x) ({ if(x) sbi(LCD_DATA_PORT, LCD_DATA_PIN); else cbi(LCD_DATA_PORT, LCD_DATA_PIN); })#define toggle_data() ({ data(1); delay(F_CPU/6000000); data(0); })register unsigned char x=0, rs=0;/* INITIALIZATION *//* Set clock and data pins as outputs, at low state and set rs value */#if LCD_CLOCK_PORT_IS_IOsbi(LCD_CLOCK_DDR_REG, LCD_CLOCK_PIN);#endif#if LCD_DATA_PORT_IS_IOsbi(LCD_DATA_DDR_REG, LCD_DATA_PIN);#endifcbi(LCD_CLOCK_PORT, LCD_CLOCK_PIN); cbi(LCD_DATA_PORT, LCD_DATA_PIN);if(mode==DATA_MODE) rs=1; else rs=0;/* send high nibble first */x=6; while(x--) { toggle_clock(); } /* clear shift register */data(1); toggle_clock(); /* send E "AND" signal */data(rs); toggle_clock(); /* send RS signal */x=0x80; while(x>=0x10) { data(lcd_data&x); toggle_clock(); x=(x>>1); }/* Strobe E pin making sure that the pulse is 450 ns min */toggle_data();/* send low nibble Clock and Data are already low */x=6; while(x--) { toggle_clock(); } /* clear shift register */data(1); toggle_clock(); /* send E "AND" signal */data(rs); toggle_clock(); /* send RS signal */x=0x08; while(x>=0x01) { data(lcd_data&x); toggle_clock(); x=(x>>1); }/* if INIT_MODE do NOT strobe the E pin else strobe it */if(mode!=INIT_MODE) { toggle_data(); }delay(LCD_DELAY_SHORT); /* wait for command to execute */}/*######################################################################################################*/#endif /* #elif LCD_IO_MODE == 2 *//*######################################################################################################*//*######################################################################################################*//* PUBLIC FUNCTIONS *//*######################################################################################################*/void lcd_command(unsigned char cmd)/* send command <cmd> to LCD */{lcd_write(cmd,CMD_MODE);}/*######################################################################################################*/void lcd_gotoxy(unsigned char lcd_x, unsigned char lcd_y)/* goto position (x,y) */{#if LCD_IO_MODE == 7if(lcd_x >= lcd_chars_per_line || lcd_y >= lcd_lines) { putc_lock=1; return; }else putc_lock=0;if (lcd_y==0 ) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE1+lcd_x); }else if(lcd_y==1) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE2+lcd_x); }else if(lcd_y==2) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE3+lcd_x); }else { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE4+lcd_x); }/*------------------------------------------------------------------------------------------------------*/#elif LCD_IO_MODE == 6 || LCD_IO_MODE == 2/*------------------------------------------------------------------------------------------------------*/if(lcd_x >= LCD_CHARS_PER_LINE || lcd_y >= LCD_LINES) { putc_lock=1; return; }else putc_lock=0;#if LCD_LINES==1if (lcd_y==0 ) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE1+lcd_x); }#endif#if LCD_LINES==2if (lcd_y==0 ) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE1+lcd_x); }else { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE2+lcd_x); }#endif#if LCD_LINES==4if (lcd_y==0 ) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE1+lcd_x); }else if(lcd_y==1) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE2+lcd_x); }else if(lcd_y==2) { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE3+lcd_x); }else { lcd_command((1<<LCD_DDRAM)+LCD_START_LINE4+lcd_x); }#endif#endifx=lcd_x;y=lcd_y;}/* lcd_gotoxy *//*######################################################################################################*/unsigned int lcd_getxy(void){return((y*100)+x);}/*######################################################################################################*/void lcd_clrscr(void)/* clear lcd and set cursor to home position */{lcd_command(1<<LCD_CLR);#if LCD_READ_REQUIRED == 0 || LCD_IO_MODE == 2 || LCD_IO_MODE == 7delay(LCD_DELAY_LONG); /* this command needs more waiting time to execute */#elif LCD_READ_REQUIRED == 1 && LCD_IO_MODE == 6lcd_waitbusy();#endifx=0; y=0;}/*######################################################################################################*/void lcd_clrline(unsigned char line)/* clear a specific lcd line and set cursor at the start of the line */{#if LCD_IO_MODE == 7if(lcd_lines==1){lcd_gotoxy(0, 0);while(x<lcd_chars_per_line) { lcd_putc(' '); }lcd_gotoxy(0, 0);}if(line<lcd_lines){lcd_gotoxy(0, line);while(x<lcd_chars_per_line) { lcd_putc(' '); }lcd_gotoxy(0, line);}#elif LCD_IO_MODE == 6 || LCD_IO_MODE == 2#if LCD_LINES == 1lcd_gotoxy(0, 0);while(x<LCD_CHARS_PER_LINE) { lcd_putc(' '); }lcd_gotoxy(0, 0);#else /* #if LCD_LINES == 1 */if(line<LCD_LINES){lcd_gotoxy(0, line);while(x<LCD_CHARS_PER_LINE) { lcd_putc(' '); }lcd_gotoxy(0, line);}#endif /* #if LCD_LINES == 1 */#endif /* #if LCD_IO_MODE == 7 */}/*######################################################################################################*/void lcd_home(void)/* set cursor to home position */{lcd_command(1<<LCD_HOME);#if LCD_READ_REQUIRED == 0 || LCD_IO_MODE == 2 || LCD_IO_MODE == 7delay(LCD_DELAY_LONG); /* this command needs more waiting time to execute */#elif LCD_READ_REQUIRED == 1 && LCD_IO_MODE == 6lcd_waitbusy();#endifx=0; y=0;}/*######################################################################################################*/void lcd_putc(unsigned char c)/* print character at current cursor position */{if(!putc_lock){#if LCD_IO_MODE == 7if(lcd_lines !=1){ if(c=='\n') { if(y<lcd_lines-1) lcd_gotoxy(0,(y+1)); }else if(x<lcd_chars_per_line) { lcd_write(c, DATA_MODE); x++; }#if LCD_AUTO_LINE_FEED == 1else if(y<lcd_lines-1) { lcd_gotoxy(0,(y+1)); lcd_write(c, DATA_MODE); x++; }else { lcd_gotoxy(0,0); lcd_write(c, DATA_MODE); x++; }#endif}else{if(c=='\n') { return; }if(x<lcd_chars_per_line) { lcd_write(c, DATA_MODE); x++; }}#elif LCD_IO_MODE == 6 || LCD_IO_MODE == 2#if LCD_LINES!=1if(c=='\n') { if(y<LCD_LINES-1) lcd_gotoxy(0,(y+1)); }else if(x<LCD_CHARS_PER_LINE) { lcd_write(c, DATA_MODE); x++; }#if LCD_AUTO_LINE_FEED == 1else if(y<LCD_LINES-1) { lcd_gotoxy(0,(y+1)); lcd_write(c, DATA_MODE); x++; }else { lcd_gotoxy(0,0); lcd_write(c, DATA_MODE); x++; }#endif#elseif(c=='\n') { return; }if(x<LCD_CHARS_PER_LINE) { lcd_write(c, DATA_MODE); x++; }#endif#endif /* #if LCD_IO_MODE == 7 */}}/*######################################################################################################*/void lcd_puts(const unsigned char *s)/* print string on lcd (no auto linefeed) */{register unsigned char c;while ( (c = *s++) ) { lcd_putc(c); }}/*######################################################################################################*/void lcd_puts_p(const unsigned char *progmem_s)/* print string from program memory on lcd (no auto linefeed) */{register unsigned char c;while ( (c = PRG_RDB(progmem_s++)) ) { lcd_putc(c); }}/*######################################################################################################*/void lcd_puts_e(unsigned char *eeprom_s)/* print string from eeprom on lcd (no auto linefeed) */{register unsigned char c;while( (c=eeprom_rb((unsigned int)eeprom_s++))&& c!=0xFF ) { lcd_putc(c); }/*{ if(c==0xFF) break; lcd_putc(c); }*/}/*######################################################################################################*/void lcd_puti(int value, unsigned char dot_position)/* print signed integer on lcd with or without comma (no auto linefeed) */{unsigned char lcd_data[6]={'0','0','0','0','0','0' }, position=sizeof(lcd_data), radix=10;/* convert int to ascii */if(value<0) { lcd_putc('-'); value=-value; }do { position--; *(lcd_data+position)=(value%radix)+'0'; value/=radix; } while(value);/* some fractional digit corrections */if( dot_position>=sizeof(lcd_data) ) return;while( (sizeof(lcd_data)-dot_position)<=position ) position--;/* start displaying the number */for(;position<=(sizeof(lcd_data)-1);position++){if( position==sizeof(lcd_data)-dot_position ) lcd_putc(',');lcd_putc(lcd_data[position]);}return;}/*######################################################################################################*/#if LCD_IO_MODE == 6 || LCD_IO_MODE == 2/*######################################################################################################*/void lcd_init(void){/* initialize display and select type of cursor *//* dispAttr: LCD_DISP_OFF, LCD_DISP_ON, LCD_DISP_ON_CURSOR, LCD_DISP_CURSOR_BLINK */#if LCD_LINES==1#define LCD_FUNCTION_DEFAULT LCD_FUNCTION_4BIT_1LINE#else#define LCD_FUNCTION_DEFAULT LCD_FUNCTION_4BIT_2LINES#endif#if LCD_IO_MODE == 6#if LCD_E_PORT_IS_IO==1sbi(LCD_E_DDR_REG, LCD_E_PIN );#endifsbi(LCD_E_PORT, LCD_E_PIN );#if LCD_MULTIPLEX_ENABLE == 0#if LCD_D4_PORT_IS_IO==1sbi(LCD_D4_DDR_REG, LCD_D4_PIN );#endif#if LCD_D5_PORT_IS_IO==1sbi(LCD_D5_DDR_REG, LCD_D5_PIN );#endif#if LCD_D6_PORT_IS_IO==1sbi(LCD_D6_DDR_REG, LCD_D6_PIN );#endif#if LCD_D7_PORT_IS_IO==1sbi(LCD_D7_DDR_REG, LCD_D7_PIN );#endif#if LCD_RS_PORT_IS_IO==1sbi(LCD_RS_DDR_REG, LCD_RS_PIN );#endif#if LCD_READ_REQUIRED == 1#if LCD_RW_PORT_IS_IO == 1sbi(LCD_RW_DDR_REG, LCD_RW_PIN );#endifcbi(LCD_RW_PORT, LCD_RW_PIN );#endif#endif /* #if LCD_MULTIPLEX_ENABLE == 0 */#endif /* #if LCD_IO_MODE == 6 *//*------ Initialize lcd to 4 bit i/o mode -------*//* initial write to lcd is 8bit using delay since busy flag can't be checked here anyway */delay(LCD_POWER_ON_DELAY); /* Wait 20 milliseconds */lcd_write(LCD_FUNCTION_8BIT_1LINE, INIT_MODE);delay(LCD_INIT_DELAY); /* Wait 5 milliseconds */lcd_write(LCD_FUNCTION_8BIT_1LINE, INIT_MODE);lcd_write(LCD_FUNCTION_8BIT_1LINE, INIT_MODE);lcd_write(LCD_FUNCTION_4BIT_1LINE, INIT_MODE); /* set IO mode to 4bit *//* from now on the lcd accepts only 4 bit I/O, so we can use lcd_command() */lcd_command(LCD_FUNCTION_DEFAULT); /* function set: display lines */lcd_command(LCD_DISP_OFF); /* display off */lcd_clrscr(); /* display clear */lcd_command(LCD_MODE_DEFAULT); /* set entry mode */lcd_command(LCD_DISP_ON); /* LCD DISPLAY ON (DEFAULT) */}/* lcd_init *//*######################################################################################################*/#elif LCD_IO_MODE == 7/*######################################################################################################*/void lcd_init(void){unsigned char lcd_unit=0;/* initialize display and select type of cursor *//* dispAttr: LCD_DISP_OFF, LCD_DISP_ON, LCD_DISP_ON_CURSOR, LCD_DISP_CURSOR_BLINK */#if LCD_D4_PORT_IS_IO == 1sbi(LCD_D4_DDR_REG, LCD_D4_PIN );#endif#if LCD_D5_PORT_IS_IO == 1sbi(LCD_D5_DDR_REG, LCD_D5_PIN );#endif#if LCD_D6_PORT_IS_IO == 1sbi(LCD_D6_DDR_REG, LCD_D6_PIN );#endif#if LCD_D7_PORT_IS_IO == 1sbi(LCD_D7_DDR_REG, LCD_D7_PIN );#endif#if LCD_RS_PORT_IS_IO == 1sbi(LCD_RS_DDR_REG, LCD_RS_PIN );#endif#if LCD_0_E_PORT_IS_IO == 1sbi(LCD_0_E_DDR_REG, LCD_0_E_PIN );#endifsbi(LCD_0_E_PORT, LCD_0_E_PIN );#if LCD_1_E_PORT_IS_IO == 1sbi(LCD_1_E_DDR_REG, LCD_1_E_PIN );#endifsbi(LCD_1_E_PORT, LCD_1_E_PIN );#if NUMBER_OF_LCD_UNITS >= 3#if LCD_2_E_PORT_IS_IO == 1sbi(LCD_2_E_DDR_REG, LCD_2_E_PIN );#endifsbi(LCD_2_E_PORT, LCD_2_E_PIN );#endif/*------ Initialize lcd to 4 bit i/o mode -------*//* initial write to lcd is 8bit using delay since busy flag can't be checked here anyway */xy_coordinates[LCD_0].x=0;xy_coordinates[LCD_0].y=0;xy_coordinates[LCD_1].x=0;xy_coordinates[LCD_1].y=0;#if NUMBER_OF_LCD_UNITS >=3xy_coordinates[LCD_2].x=0;xy_coordinates[LCD_2].y=0;#endiffor(lcd_unit=0; lcd_unit<NUMBER_OF_LCD_UNITS; lcd_unit++){select_lcd(lcd_unit);delay(LCD_POWER_ON_DELAY); /* Wait 20 milliseconds */lcd_write(LCD_FUNCTION_8BIT_1LINE, INIT_MODE);delay(LCD_INIT_DELAY); /* Wait 5 milliseconds */lcd_write(LCD_FUNCTION_8BIT_1LINE, INIT_MODE);lcd_write(LCD_FUNCTION_8BIT_1LINE, INIT_MODE);lcd_write(LCD_FUNCTION_4BIT_1LINE, INIT_MODE); /* set IO mode to 4bit *//* from now on the lcd accepts only 4 bit I/O, so we can use lcd_command() *//* function set: set how many lines the lcd unit has. */if(lcd_lines==1) { lcd_command(LCD_FUNCTION_4BIT_1LINE); }else { lcd_command(LCD_FUNCTION_4BIT_2LINES); }lcd_command(LCD_DISP_OFF); /* display off */lcd_clrscr(); /* display clear */lcd_command(LCD_MODE_DEFAULT); /* set entry mode */lcd_command(LCD_DISP_ON); /* Display on */}select_lcd(0);return;}/* lcd_init */#endif/*######################################################################################################*//* T H E E N D *//*######################################################################################################*/