XMEGA LCD Initialisieren

[XMEGA LCD (Gast)]

Hey Leute,
ich weis ihr habt es sich 1000 mal gehört und gelesen aber ich komme 
seit 2 Tagen einfach nicht weiter. Ich versuche mit dem XMEGA128A1 das 
Display
http://www.reichelt.de/index.html?ACTION=3;ARTICLE=31653;SEARCH=lcd16
zu initialisieren.
Der Controller läuft mit 16MHz.

Ich hab schon viele Sachen aus dem Internet an mein Controller angepasst 
aber das LCD macht nicht weiter.

Ich bekomme das Display soweit initialisiert das es 2 Zeilen ganz in 
schwarz anzeigt.

Meine Initialisierung sieht zimlich wild und unübersichtlich aus. Aber 
mehr habe ich nicht und irgentwie weis ich auch nicht wo ich weiter 
ansetzen soll.

Hier mal Code und Pinbelegung

LCD_RS PORTB 0
LCD_RW PORTB 2
LCD_EN PORTB 4

DB0-DB7 PORTA

#define sbi(ADDRESS,BIT) ADDRESS |= (1<<BIT) // set Bit
#define cbi(ADDRESS,BIT) ADDRESS &= ~(1<<BIT) // clear Bit

void LCD_init(void)
{
  wait1ms(16);
  cbi(PORTB.OUT,0);
  cbi(PORTB.OUT,2);
  
  wait50us(2);        
  
  /*Interface auf 8-Bit setzen*/
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,4);
  sbi(PORTA.OUT,5);
  wait50us(1);
  clr_LCD_enable();

  wait1ms(5);

  cbi(PORTA.OUT,4);
  cbi(PORTA.OUT,5);

  /*Interface auf 8-Bit setzen*/
  wait10us(1);
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,4);
  sbi(PORTA.OUT,5);
  wait50us(1);
  clr_LCD_enable();

  wait50us(3);

  cbi(PORTA.OUT,4);
  cbi(PORTA.OUT,5);

  /*Interface auf 8-Bit setzen*/
  wait10us(1);
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,4);
  sbi(PORTA.OUT,5);
  wait50us(1);
  clr_LCD_enable();

  wait50us(1);
  
  cbi(PORTA.OUT,4);
  cbi(PORTA.OUT,5);
  
  wait10us(1);
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,4);
  sbi(PORTA.OUT,5);
  wait50us(1);
  clr_LCD_enable();
  
  wait50us(1);
  
  cbi(PORTA.OUT,4);
  cbi(PORTA.OUT,5);    

  /*Set Function*/
  wait10us(1);
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,3);  //5x7 dots
  sbi(PORTA.OUT,4);  //2 line display
  sbi(PORTA.OUT,5);  //8 bit interface
  wait50us(1);
  clr_LCD_enable();
  
  wait50us(1);

  cbi(PORTA.OUT,3);
  cbi(PORTA.OUT,4);
  cbi(PORTA.OUT,5);
  
  /*Display off*/
  wait10us(1);  
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,3);
  wait50us(1);
  clr_LCD_enable();
  
  wait1ms(2);

  cbi(PORTA.OUT,3);

  /*Display Clear*/
  wait10us(1);
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,0);
  wait50us(1);
  clr_LCD_enable();

  wait50us(1);

  cbi(PORTA.OUT,0);

  /*Entry Mode Set*/
  wait10us(1);
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,1);  //Set cursor move Increase
  sbi(PORTA.OUT,2);
  wait50us(1);
  clr_LCD_enable();

  wait50us(1);

  cbi(PORTA.OUT,1);
  cbi(PORTA.OUT,2);

  /*Display Ein*/
  wait10us(1);
  set_LCD_enable();
  wait50us(1);
  sbi(PORTA.OUT,3);  
  sbi(PORTA.OUT,2);  //Display ein
  sbi(PORTA.OUT,1);  //Cursor ein
  sbi(PORTA.OUT,0);  //Blinkender Cursor
  wait50us(1);
  clr_LCD_enable();
  
  wait50us(1);

  PORTB.OUT =0x00;
  PORTA.OUT =0x00;


}

void set_LCD_enable(void)
{
  sbi(PORTB.OUT,4);
}

void clr_LCD_enable(void)
{
  cbi(PORTB.OUT,4);
}

Hoffe ihr könnt mir helfen.

Grüße

[Georg G. (df2au)]

Das Display ist insofern gemein, dass es etwas längere Flachbandkabel 
zum Controller überhaupt nicht mag. Die 25ns Flanke am E-Signal ist 
kritisch. Ich hatte schon Fälle, in denen ein separater Treiber 
notwendig war.

[Peter D. (peda)]

XMEGA LCD schrieb:
> Meine Initialisierung sieht zimlich wild und unübersichtlich aus.

Solche Copy&Paste Monster guckt sich keiner an, sie sind zu 
fehleranfällig.

Schreib eine einfache Nibble-Funktion und benutze sie.

http://www.avrfreaks.net/index.php?name=PNphpBB2&file=viewtopic&t=102296

[XMEGA LCD (Gast)]

Ich habe grade einmal zwischen den einzelnen Initzialisierungsschritten 
einfach mal zum Teseten 1s warte zeiten eingefügt um zu sehen was das 
Display nach den einzlnen Schritten anzeigt.
Und siehe da es Funktioniert aufeinmal.
Cursor Position änder Funktioniert auch jetzt muss ich nur noch die 
Ausgabe der zeichen hinbekommen.


Zum Kommentar von Peter Dannegger,
Du hast recht der Code sieht wirklich noch nicht schön aus ist aber auch 
nur erstmal zum Testen sobald alles Läuft wird der ganze Code noch in 
Funktionien geschrieben etc. damit es dan Kürtzer ist und besser 
aussieht.

[Peter D. (peda)]

XMEGA LCD schrieb:
> nur erstmal zum Testen sobald alles Läuft wird der ganze Code noch in
> Funktionien geschrieben

Klingt wie: Ich klebe den Tisch erstmal aus abgebrannten Streichhölzern 
zusammen und wenn er fertig ist, nehme ich richtige Bretter.

Die Verwendung von Funktionen will Dir das Leben erleichtern, d.h. 
unnütze Schreibarbeit und viele Fehlerquellen ersparen.
Du mußt nur eine Funktion debuggen, anstatt hunderte Codezeilen.
Um das Aussehen gehts nicht.

[XMEGA LCD (Gast)]

Danke für die Antwort.

Habe inzwischen alles sauber in Funktionen Untergebracht. =) und es 
läuft immer noch :D

Ich durchstöber grade das Datenblatt für die nächste Aufgabe. Ich such 
den Event Chanell für den Counter bzw die Eventchannel. Ma sehn wo das 
iost. Danke nochma für die Hilfe