Thai microtron community

#include <18F4550.h>
#fuses HS,USBDIV,PLL5,CPUDIV1,VREGEN,NOWDT,NOPROTECT,NOLVP,NODEBUG
//#fuses HSpll,BROWNOUT,NOWDT,NOPROTECT,NOLVP,USBDIV,VREGEN,NODEBUG,CPUDIV1,PLL5
//#fuses HS,PUT,BROWNOUT,NOWDT,NOPROTECT,NOLVP

#define CLOCK_SP 20000000 
#use delay (clock=CLOCK_SP)

#define use_portd_lcd         // define for use portb lcd
#include "lcd.c"              // use module function
#include <math.h>


#define STRING_SIZE 17
#define msg0   "LCD Module Show "
#define msg1   " 16x2 character "
#define msg2   "Test Running ..."
#define msg3   " Left & Right   "
#define msg4   "Write Character "
#define msg5   "  on sequence   "
#define msg6   "Hello World AST."

//** LCD.C : Driver for common LCD modules *******************************
// As defined in the following structure the pin connection is as follows:
//   B0 = E(enable), B1 = RS, B2 = R/W
//   B4 = D4, B5 = D5, B6 = D6
//   B7 = D7
//   LCD pins D0-D3 are not used and PIC B3 is not used.


/***********************************************************************
 *   Functions prototypes
 ***********************************************************************/
void LCD_Command(int cm);
void LCD_ShiftLeft(void);
void LCD_ShiftRight(void);
void LCD_MoveRight(char p);
void LCD_MoveLeft(char p);
void strcpy(char *s1, char *s2);
void LCD_String(char *s, int dly);
void LCD_Show(void);


/***********************************************************************
 * FUNCTION:     LCD_Command
 * DESCRIPTION:  LCD Command
 * PARAMETERS:   cm
 * RETURNED:     nothing
 ***********************************************************************/
void LCD_Command(int cm) {

   lcd_send_byte(0,cm);
}


/***********************************************************************
 * FUNCTION:     LCD_ShiftLeft
 * DESCRIPTION:  LCD ShiftLeft
 * PARAMETERS:   nothing
 * RETURNED:     nothing
 ***********************************************************************/
void LCD_ShiftLeft(void) {

   lcd_send_byte(0,0x18);
}


/***********************************************************************
 * FUNCTION:     LCD_ShiftRight
 * DESCRIPTION:  LCD ShiftRight
 * PARAMETERS:   nothing
 * RETURNED:     nothing
 ***********************************************************************/
void LCD_ShiftRight(void) {

   lcd_send_byte(0,0x1C);
}


/***********************************************************************
 * FUNCTION:     LCD_MoveRight
 * DESCRIPTION:  LCD MoveRight
 * PARAMETERS:   p
 * RETURNED:     nothing
 ***********************************************************************/
void LCD_MoveRight(char p) {

   char i;

   for(i=0; i<p; i++) {
      LCD_ShiftRight();
      delay_ms(100);
   }
}


/***********************************************************************
 * FUNCTION:     LCD_MoveLeft
 * DESCRIPTION:  LCD MoveLeft
 * PARAMETERS:   p
 * RETURNED:     nothing
 ***********************************************************************/
void LCD_MoveLeft(char p) {

   char i;

   for(i=0; i<p; i++) {
      LCD_ShiftLeft();
      delay_ms(100);
   }
}


/***********************************************************************
 * FUNCTION:     strcpy
 * DESCRIPTION:  string copy
 * PARAMETERS:   *s1, *s2
 * RETURNED:     nothing
 ***********************************************************************/
void strcpy(char *s1, char *s2) {

   while(*s1++ = *s2++);
   
}


/***********************************************************************
 * FUNCTION:     LCD_String
 * DESCRIPTION:  LCD String
 * PARAMETERS:   *s, dly
 * RETURNED:     nothing
 ***********************************************************************/
void LCD_String(char *s, int dly) {

   while(*s!=0) {
      lcd_putc(*s++);
      delay_ms(dly);
   }
}


/***********************************************************************
 * FUNCTION:     LCD_Show
 * DESCRIPTION:  LCD Show
 * PARAMETERS:   nothing
 * RETURNED:     nothing
 ***********************************************************************/
void LCD_Show(void) {

   int i;
   char str[17];

   LCD_Command(0x80);      // start 1st line
   strcpy(str, msg0);
   LCD_String(str,0);
   strcpy(str, msg1);
   LCD_String(str,0);
   LCD_Command(0xC0);      // start 2nd line
   strcpy(str, msg2);
   LCD_String(str,0);
   strcpy(str, msg3);
   LCD_String(str,0);

   delay_ms(1000);

   for(i=0; i<16; i++) {
      LCD_ShiftLeft();   // LCD Shift Left
        delay_ms(400);
   }

   delay_ms(500);

   LCD_Command(0x80);      // start 1st line
   strcpy(str, msg4);
   LCD_String(str,0);
   LCD_Command(0xC0);      // start 2nd line
   strcpy(str, msg5);
   LCD_String(str,0);

   for(i=0; i<16; i++) {
      LCD_ShiftRight();      // LCD Shift Right
        delay_ms(400);
   }

   delay_ms(500);
   LCD_Command(0x01);      // Clear LCD
   delay_ms(100);
   LCD_Command(0x02);      // cursor to home
   LCD_Command(0x0F);      // LCD On, & cursor   blink
   delay_ms(200);
   strcpy(str, msg6);
   LCD_String(str,1000);

   for(i=0; i<2; i++) {
      delay_ms(1000);
      LCD_Command(0x08);      // LCD Off & cursor off
      delay_ms(1000);
      LCD_Command(0x0E);      // LCD On, & cursor   on
   }

   delay_ms(500);
   LCD_Command(0x01);      // Clear LCD

}


/***********************************************************************
 * FUNCTION:    Main
 * DESCRIPTION: This is the main entry point for the program.
 * PARAMETERS:  nothing
 * RETURNED:    nothing
 ***********************************************************************/
void main(void) {

   lcd_init();       // LCD initialize

   while(TRUE){
      LCD_Show();
   };
}

#fuses HS,PUT,BROWNOUT,NOWDT,NOPROTECT,NOLVP
#use delay(clock=20000000) 

HSpll,BROWNOUT,NOWDT,NOPROTECT,NOLVP,USBDIV,VREGEN,NODEBUG,CPUDIV1,PLL5
#use delay(clock=48000000)