void clear_display(void);
void init_port(void);
void init_lcd(void);
void set_position(char);
void return_origin(void);
void setup() {
  init_port();
  init_lcd();
  char str[] = " Welcome ";
  disable_cursor();

  for(char pos=9; pos<10; pos++){
    for(int i=pos; i<(16+pos); i++) 
    {
      write_lcd(str[i]);
//   dec_cursor();
    }
    delay2();
    return_origin();
  }
 
//  for (int j=15; j>0; j--){
//   for(int i=j,k=0;i<16;i++,k++){
//      dec_cursor();
//      write_lcd(str[k]);
//      delay2();
//    }
//    clear_display();
//    delay2();
//  }
//   disable_cursor();
} 

void init_port(){
  char *ddr1 = (char*)0x30;
  *ddr1 = 0x0F;

  char *ddr2 = (char*)0x107;
  *ddr2 = 0xFF;
}

void out_en_rs(char data){
  char *out = (char*)0x31;
  *out = data;
}

void out_data(char data){
  char *out = (char*)0x108;
  *out = data;
}

void init_lcd(){
  out_data(0x38);
  enable();
  out_data(0x0F);
  enable();
  out_data(0x81);
  enable();
  out_data(0x06);
  enable();
}

void enable(){
  out_en_rs(0x01);
  delay1();
  out_en_rs(0x00);
  delay1();
}

void write_lcd(char data){
  out_data(data);
  register_enable();
}

void register_enable(){
  out_en_rs(0x02);
  delay1();
  out_en_rs(0x03);
  delay1();
}

void second_line(){
  out_data(0x38);
  enable();
  out_data(0xC0);
  enable();
}

void dec_cursor(){
  out_data(0x38);
  enable();
  out_data(0x04);
  enable();
}

void disable_cursor(){
  out_data(0x38);
  enable();
  out_data(0x0C);
  enable();
}

void delay1(){
  volatile long i;
  for(i=0;i<1000;i++);
}

void delay2(){
  volatile long i;
  for(i=0;i<100000;i++);
}

void clear_display()
{
  out_data(0x01);   // Clear Display
  enable();
}

void set_position(char pos)
{
  pos = 0x80 + pos;
  out_data(pos);   // Clear Display
  enable();
}

void return_origin(void)
{
  out_data(0x02);   // Origin
  enable();

}
void loop() {
  // put your main code here, to run repeatedly:

}
mega:SCL
mega:SDA
mega:AREF
mega:GND.1
mega:13
mega:12
mega:11
mega:10
mega:9
mega:8
mega:7
mega:6
mega:5
mega:4
mega:3
mega:2
mega:1
mega:0
mega:14
mega:15
mega:16
mega:17
mega:18
mega:19
mega:20
mega:21
mega:5V.1
mega:5V.2
mega:22
mega:23
mega:24
mega:25
mega:26
mega:27
mega:28
mega:29
mega:30
mega:31
mega:32
mega:33
mega:34
mega:35
mega:36
mega:37
mega:38
mega:39
mega:40
mega:41
mega:42
mega:43
mega:44
mega:45
mega:46
mega:47
mega:48
mega:49
mega:50
mega:51
mega:52
mega:53
mega:GND.4
mega:GND.5
mega:IOREF
mega:RESET
mega:3.3V
mega:5V
mega:GND.2
mega:GND.3
mega:VIN
mega:A0
mega:A1
mega:A2
mega:A3
mega:A4
mega:A5
mega:A6
mega:A7
mega:A8
mega:A9
mega:A10
mega:A11
mega:A12
mega:A13
mega:A14
mega:A15
lcd1:VSS
lcd1:VDD
lcd1:V0
lcd1:RS
lcd1:RW
lcd1:E
lcd1:D0
lcd1:D1
lcd1:D2
lcd1:D3
lcd1:D4
lcd1:D5
lcd1:D6
lcd1:D7
lcd1:A
lcd1:K