DINO EN LA LCD

CODIGO EN CCS_

CODIGO: 

 #INCLUDE <18f2550.H>

#FUSES XT,NOWDT

#USE DELAY (CLOCK = 4M)        //FRECUENCIA DE 4 MHZ

#INCLUDE <LCD.C>

#USE STANDARD_IO(A)

void MAIN() 

{

int dino1[] = {

  0B00000,

  0B00000,

  0B00000,

  0B00000,

  0B10000,

  0B10000,

  0B11000,

  0B11100

};

int dino2[] = {

  0B00000,

  0B00001,

  0B00001,

  0B00001,

  0B00001,

  0B00011,

  0B01111,

  0B11111

};

int dino3[] = {

  0B11111,

  0B10111,

  0B11111,

  0B11111,

  0B11100,

  0B11111,

  0B11100,

  0B11100

};

int dino4[] = {

  0B10000,

  0B11000,

  0B11000,

  0B11000,

  0B00000,

  0B10000,

  0B00000,

  0B00000

};

int dino5[] = {

  0B11111,

  0B11111,

  0B01111,

  0B00111,

  0B00011,

  0B00011,

  0B00010,

  0B00011

};

int dino6[] = {

    0B11111,

  0B11111,

  0B11111,

  0B11111,

  0B10110,

  0B00010,

  0B00010,

  0B00011

};

int dino7[] = {

  0B11111,

  0B11001,

  0B10000,

  0B00000,

  0B00000,

  0B00000,

  0B00000,

  0B00000

};

int dinopieder1[] = {

  0B11111,

  0B11111,

  0B11111,

  0B11111,

  0B10110,

  0B00011,

  0B00000,

  0B00000

};

int dinopieder2[] = {

  0B11111,

  0B11001,

  0B10000,

  0B00000,

  0B00000,

  0B10000,

  0B00000,

  0B00000

};

int dinopieiz1[] = {

  0B11111,

  0B11111,

  0B01111,

  0B00111,

  0B00011,

  0B00011,

  0B00000,

  0B00000

};

int dinopieiz2[] = {

  0B11111,

  0B11111,

  0B11111,

  0B11111,

  0B00110,

  0B10010,

  0B00010,

  0B00011

};

int caca[]= {

   0b00001,

   0b00011,

   0b00111,

   0b01111,

   0b00000,

   0b00000,

   0b00000,

   0b00000

};

 // Creamos los caracteres de nuestra animación 

//  del dinosaurio para que camine

  lcd_init();

 for (int a=0; a<=17; a++)

  {

  lcd_set_cgram_char(0,dino1);

  lcd_set_cgram_char(1,dino2);

  lcd_set_cgram_char(2,dino3);

  lcd_set_cgram_char(3,dino4);

  lcd_set_cgram_char(4,dino5);

  lcd_set_cgram_char(5,dino6);

  lcd_set_cgram_char(6,dino7);

  

  lcd_gotoxy(a-4,1);

  LCD_PUTC(0);

  lcd_gotoxy(a-3,1);

  LCD_PUTC(1);

  lcd_gotoxy(a-2,1);

  LCD_PUTC(2);

  lcd_gotoxy(a-1,1);

  LCD_PUTC(3);

  

  

  

  lcd_gotoxy(a-4,2);

  LCD_PUTC(4);

  lcd_gotoxy(a-3,2);

  LCD_PUTC(5);

  lcd_gotoxy(a-2,2);

  LCD_PUTC(6);

  

  lcd_gotoxy(a-5,1);

  lcd_putc(" ");

  

  delay_ms(100);

  

  

  lcd_set_cgram_char(5,dinopieder1);

  lcd_set_cgram_char(6,dinopieder2);

  lcd_gotoxy(a-4,2);

  LCD_PUTC(4);

  lcd_gotoxy(a-3,2);

  LCD_PUTC(5);

  lcd_gotoxy(a-2,2);

  LCD_PUTC(6);

  delay_ms(100);

  

  lcd_set_cgram_char(4,dinopieiz1);

  lcd_set_cgram_char(5,dinopieiz2);

  

  lcd_gotoxy(a-4,2);

  LCD_PUTC(4);

  lcd_gotoxy(a-3,2);

  LCD_PUTC(5);

  lcd_gotoxy(a-2,2);

  LCD_PUTC(6); 

  

   

  delay_ms(100);

  lcd_gotoxy(a-4,2);

  lcd_putc(caca);

  

  //lcd_putc("\f");

  }

  lcd_putc("\f");

}