Zitat:
"Wenn ich das Display an µC anschließe, dann erscheint ein schwarzer Balken in der ersten Zeile".
Die Kontrastspannung, meist VEE genannt, darf nicht direkt mit der Versorgungsspannung oder GND verbunden werden. Meist hängt ein Poti
10 kOhm zwischen der Versorgungsspannung und GND und der Abgriff an VEE. Damit stellt man den Kontrast erst mal so ein, das die Display Zeile gerade beginnt dunkel zu werden.
Des Weiteren kann dein Programm einfach zu schnell sein.( Code nicht gecheckt). Man kann den display controller abfragen ob er "Busy" ist indem man seine Daten liest und prüft ob das "Busy Flag" gesetzt ist (Bit 7).
Wenn Daten / Commands kommen wärend der Controller beschäftigt ist, dann gibt es meistens Mist.
Hallo
Der Kontrast kann nicht das Problem sein, habe schon von Anfang an ein Poti drin und habe auch nach jedem neuen Programm versucht ob es am Kontrast liegt.
Wie kann ich jetzt herausbekommen ob mein Programm zu schnell ist?
Kann es sein daß die Taktfrequenz von 12 MHz einfach zu hoch ist? Wenn ja wie kann ich das ändern? Ich meine auf die schnelle, hab grad leider kein langsameres Quarz da... Werd mir aber mal ein 4 Mhz Quarz besorgen.
MFG
Bean
du hast doch die ganzen Warteschleifen auf 12MHz angepasst, weil sie wohl für 4MHz gedacht waren, oder? Sonst kann es auch nicht funktionieren.
Ich habe mir auch mal wieder die Mühe gemacht, nachdem mein UART jetzt mit dem externen Quarz läuft, mein LCD in Gang zu bekommen.
Habe den gleichen Code von Mikrocontroller.net genommen und den Port auf C umgeschrieben, weil der noch frei war.
Hat leider nicht funktioniert, also habe ich mit obigem Programm sämtliche Schleifen neu berechnet und eingefügt. Hat aber auch nichts gebracht.
Ich schätze, dass ich irgendwelche Störungen in der Schaltung habe und es deswegen nicht funktioniert. Muß mal die Mikrocontroller.net Checkliste durchgehen und überall wo nötig Pullup-down Widerstände reinsetzen und das mit den Entstörkondensatoren sollte ich auch mal machen.
Kann ich irgendwie nicht wahrhaben, dass jeder Hans und Franz so ein dummes LCD zum laufen kriegt und ich nicht. Aber ich benutze auch nicht das RN Board oder ähnliches sondern Marke-Eigenbau, weil mir das mehr Spaß macht, als irgendwelche Dinge nachzubauen. Dafür fehlt mir jetzt auch die Erfahrung und der Support von den Leuten, die schon länger mit diesen fertigen Boards arbeiten. Naja, aus Fehlern lernt man. (hoffentllich)
Code:.include "m8def.inc" .def temp1 = r16 .def temp2 = r17 .def temp3 = r18 ldi temp1, LOW(RAMEND) ; LOW-Byte der obersten RAM-Adresse out SPL, temp1 ldi temp1, HIGH(RAMEND) ; HIGH-Byte der obersten RAM-Adresse out SPH, temp1 ldi temp1, 0xFF ;Port C = Ausgang out DDRC, temp1 rcall lcd_init ;Display initialisieren rcall lcd_clear ;Display löschen ldi temp1, 'T' ;Zeichen anzeigen rcall lcd_data ldi temp1, 'e' ;Zeichen anzeigen rcall lcd_data ldi temp1, 's' ;Zeichen anzeigen rcall lcd_data ldi temp1, 't' ;Zeichen anzeigen rcall lcd_data loop: rjmp loop ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; LCD-Routinen ;; ;; ============ ;; ;; (c)andreas-s@web.de ;; ;; ;; ;; 4bit-Interface ;; ;; DB4-DB7: PC0-PC3 ;; ;; RS: PC4 ;; ;; E: PC5 ;; ;; für 4MHz Quarz ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;sendet ein Datenbyte an das LCD lcd_data: mov temp2, temp1 ;"Sicherungskopie" für ;die Übertragung des 2.Nibbles swap temp1 ;Vertauschen andi temp1, 0b00001111 ;oberes Nibble auf Null setzen sbr temp1, 1<<4 ;entspricht 0b00010000 out PORTC, temp1 ;ausgeben rcall lcd_enable ;Enable-Routine aufrufen ;2. Nibble, kein swap da es schon ;an der richtigen stelle ist andi temp2, 0b00001111 ;obere Hälfte auf Null setzen sbr temp2, 1<<4 ;entspricht 0b00010000 out PORTC, temp2 ;ausgeben rcall lcd_enable ;Enable-Routine aufrufen rcall delay50us ;Delay-Routine aufrufen ret ;zurück zum Hauptprogramm ;sendet einen Befehl an das LCD lcd_command: ;wie lcd_data, nur ohne RS zu setzen mov temp2, temp1 swap temp1 andi temp1, 0b00001111 out PORTC, temp1 rcall lcd_enable andi temp2, 0b00001111 out PORTC, temp2 rcall lcd_enable rcall delay50us ret ;erzeugt den Enable-Puls lcd_enable: sbi PORTC, 5 ;Enable high nop ;3 Taktzyklen warten nop nop cbi PORTC, 5 ;Enable wieder low ret ;Und wieder zurück ;Pause nach jeder Übertragung delay50us: ;50us Pause ; ============================= ; delay loop generator ; 200 cycles: ; ----------------------------- ; delaying 198 cycles: ldi R16, $42 WGLOOP0: dec R16 brne WGLOOP0 ; ----------------------------- ; delaying 2 cycles: nop nop ret ; ============================= ; ldi temp1, $42 ;delay50us_:dec temp1 ; brne delay50us_ ; ret ;wieder zurück ;Längere Pause für manche Befehle delay5ms: ;5ms Pause ; ldi temp1, $21 ;WGLOOP0: ldi temp2, $C9 ;WGLOOP1: dec temp2 ; brne WGLOOP1 ; dec temp1 ; brne WGLOOP0 ; ============================= ; delay loop generator ; 20000 cycles: ; ----------------------------- ; delaying 19998 cycles: ldi R16, $21 WGLOOP1: ldi R17, $C9 WGLOOP2: dec R17 brne WGLOOP1 dec R16 brne WGLOOP0 ; ----------------------------- ; delaying 2 cycles: nop nop ; ============================= ret ;wieder zurück ;Initialisierung: muss ganz am Anfang des Programms aufgerufen werden lcd_init: ldi temp3,50 powerupwait: rcall delay5ms dec temp3 brne powerupwait ldi temp1, 0b00000011 ;muss 3mal hintereinander gesendet out PORTC, temp1 ;werden zur Initialisierung rcall lcd_enable ;1 rcall delay5ms rcall lcd_enable ;2 rcall delay5ms rcall lcd_enable ;und 3! rcall delay5ms ldi temp1, 0b00000010 ;4bit-Modus einstellen out PORTC, temp1 rcall lcd_enable rcall delay5ms ldi temp1, 0b00101000 ;noch was einstellen... rcall lcd_command ldi temp1, 0b00001100 ;...nochwas... rcall lcd_command ldi temp1, 0b00000100 ;endlich fertig rcall lcd_command ret ;Sendet den Befehl zur Löschung des Displays lcd_clear: ldi temp1, 0b00000001 ;Display löschen rcall lcd_command rcall delay5ms ret
Hallo
Also so langsam versteh ich das ganze echt nichtmehr. Weiß nichtmehr was ich noch probieren soll. Ich hab mir jetzt mal ein 4 MHz Quarz bestellt und stütze mich auf die Hoffunung daß es damit funktioniert. Habe nämlich die Vermutung daß die Datenwörter einfach zu kurz am Display anliegen und dieses die Befehle gar nicht "mitbekommt" Ich hab jetzt nochmal meine letzte Codevariante angehängt... Kann ja eigentlich auch nicht sein daß hier eigentlich jeder diese Displays zum laufen bekommt nur ich nicht...Falls irgendjemand doch einen Fehler findet bitte melden...
Vielen Dank im Voraus!!!!
MFG
Bean
Code:.include "m8def.inc" .def temp1 = r16 .def temp2 = r17 .def temp3 = r18 ldi temp1, LOW(Ramend) out SPL, temp1 ldi temp1, High(Ramend) out SPH, temp1 ldi temp1, 0xFF out DDRB, temp1 rcall delay5ms rcall lcd_init rcall lcd_clear loop: rjmp loop ; LCD Routinen ;4-Bit Interface ;BDB4-BDB7: PB0 - Pb3 ;RS: PB4 ;E: PB7 ;sendet ein Datenbyte an das LCD lcd_data: mov temp2, temp1 ;"Sicherungskopie" für die Übertragung des zweiten Nibbles swap temp1 ;vertauschen andi temp1, 0b00001111 ;oberes Nibble auf 0 setzen sbr temp1, 1<<4 ;entspricht 0b00010000 out PORTB, temp1 ;ausgeben rcall lcd_enable ;Enable-Routine aufrufen andi temp1, 0b00001111 ;obere Hälfte auf null setzen sbr temp2, 1<<4 ;entspricht 0b00010000 out PORTB, temp2 ;ausgeben rcall lcd_enable ;enable routine aufrufen rcall delay50us ;Delay routine aufrufen ret ;zurück zum Hauptprogramm ;sendet einen Befehl an das LCD lcd_command: ;wie lcd_data, nur ohne RS zu setzen mov temp2, temp1 swap temp1 andi temp1, 0b00001111 out PORTB, temp1 rcall lcd_enable rcall delay50us andi temp2, 0b00001111 out PORTB, temp2 rcall lcd_enable rcall delay50us ret ;erzeugt den Enable-Puls lcd_enable: sbi PORTB, 7 ;Enable high rcall delay50us cbi PORTB, 7 ;Enable wieder low ret ;wieder zurück ;Pause nach jeder Übertragung delay50us: ;50us Pause ldi temp2, $1E WGLOOP0: ldi temp3, $14 WGLOOP1: dec temp3 brne WGLOOP1 dec temp2 brne WGLOOP0 ;wieder zurück ;Längere Pause für manche Befehle delay5ms: ;5ms Pause WGLOOP2: ldi temp2, $01 WGLOOP3: dec temp2 brne WGLOOP3 dec temp1 brne WGLOOP2 ret ;wieder zurück ;Initialisierung: muss ganz am Anfang des Programms aufgerufen werden lcd_init: ldi temp3,50 powerupwait: rcall delay5ms dec temp3 brne powerupwait ldi temp1, 0b00000011 ;muss 3 mal hintereinander gesendet werden zur Initialisierung out PORTB, temp1 ;1 rcall lcd_enable rcall delay5ms rcall lcd_enable ;2 rcall delay5ms rcall lcd_enable ;3 rcall delay5ms ldi temp1, 0b00000010 ;4Bit Modus einstellen out PORTB, temp1 rcall lcd_enable rcall delay5ms ldi temp1, 0b00101000 rcall lcd_command ldi temp1, 0b00001100 rcall lcd_command ldi temp1, 0b00000100 rcall lcd_command ret ;sendet einen Befehl zur Löschung des Displays lcd_clear: ldi temp1, 0b00000001 ;Display Löschen rcall lcd_command rcall delay5ms ret
Hallo Mr Bean.
Könntest du mal bitte bischen mehr zu deinen Komponenten schreiben. LCD hast du ja genannt. Mein Quellcode über deinem ist auf 4MHz eingestellt. die Warteschleifen sogar neu berechnet mit dem Programm oben.
Ich benutze ein Board Marke Eigenbau mit Steckbrettanbindung. Fotos versuche ich mal zu machen.
Habe ein LCD Display, welches auch auf einem Foto hier bei RN abgebildet ist.
Habe das Display schonmal mit einem Adapter am Parallelport getestet und es läuft.
Wenn du deinen 4MHz Quarz hast, dann kannst ja mal meinen Code reinschreiben, mußt nur auf deinen Port abändern.
LCD ist eine so wichtige Anwendung, dass ich es unbedingt hinbekommen muß. Wenn ich schon kein LCD hinbekomme, dann wird es auch nichts mit anderen sinnvollen Anwendungen.
habe das ganze eben noch auf 8bit umgesteckt und auf PD gelegt und RS und E auf PB1-2. Ein Programm geschrieben für eine Routine, die ich mit dem Datenblatt bekommen habe. Leider hat nichts funktioniert.
Kann man die Leitungen direkt mit den Port-Pins verbinden oder müssen da noch Widerstände oder so zwischen?
Habe schon soviele Routinen ausprobiert, dass ich jetzt nur noch mit einem Schaltungsfehler rechne.
Code:.include "m8def.inc" .def temp1 = r16 .def temp2 = r17 .def temp3 = r18 ldi temp1, LOW(RAMEND) ; LOW-Byte der obersten RAM-Adresse out SPL, temp1 ldi temp1, HIGH(RAMEND) ; HIGH-Byte der obersten RAM-Adresse out SPH, temp1 ldi temp1, 0xFF ;Port D = Ausgang out DDRD, temp1 ldi temp1, 0x02 ;Port B 1 als Ausgang und 2 als Eingang out DDRB, temp1 rcall lcd_init ;Display initialisieren loop: rjmp loop lcd_init: rcall wait1sek ;1Sek nach Einschalten warten ldi temp1,0x00 ;RS=0 out portb,temp1 ldi temp1,0x30 ;30h senden out portd,temp1 rcall wait4500us ;4,5ms warten ldi temp1,0x00 ;RS=0 out portb,temp1 ldi temp1,0x30 ;30h senden out portd,temp1 rcall wait120us ldi temp1,0x00 ;RS=0 out portb,temp1 ldi temp1,0x30 ;30h senden out portd,temp1 rcall busyflagcheck ;busyflag kontrollieren E=0 PB2=0 ldi temp1,0x00 ;RS=0 out portb,temp1 ldi temp1,0x3c ;4 Displayzeilen, 8bit Ansteuerung out portd,temp1 rcall busyflagcheck ldi temp1,0x00 ;RS=0 out portb,temp1 ldi temp1,0x08 ;Display aus zum testen out portd,temp1 ret busyflagcheck: in temp1,portb sbrs temp1,2 rjmp busyflagcheck ret wait1sek: ; ============================= ; delay loop generator ; 4000000 cycles: ; ----------------------------- ; delaying 3999996 cycles: ldi R17, $24 WGLOOP0: ldi R18, $BC WGLOOP1: ldi R19, $C4 WGLOOP2: dec R19 brne WGLOOP2 dec R18 brne WGLOOP1 dec R17 brne WGLOOP0 ; ----------------------------- ; delaying 3 cycles: ldi R17, $01 WGLOOP3: dec R17 brne WGLOOP3 ; ----------------------------- ; delaying 1 cycle: nop ; ============================= ret wait4500us: ; ============================= ; delay loop generator ; 18000 cycles: ; ----------------------------- ; delaying 17985 cycles: ldi R17, $37 WGLOOP4: ldi R18, $6C WGLOOP5: dec R18 brne WGLOOP1 dec R17 brne WGLOOP0 ; ----------------------------- ; delaying 15 cycles: ldi R17, $05 WGLOOP6: dec R17 brne WGLOOP2 ; ============================= ret wait120us: ; ============================= ; delay loop generator ; 480 cycles: ; ----------------------------- ; delaying 480 cycles: ldi R17, $A0 WGLOOP7: dec R17 brne WGLOOP0 ; ============================= ret
ganz kurz, die Taktfrequenz kann man bis 8MHZ mit den Fusebits einstellen, schau mal ins Datenblatt. Aber aufpassen, je nach Programmer ist das einstellen der Fusebits etwas verwirrend.
Bei der LCD ansteuerung halt ich mich mal lieber fein raus
Hab hier nämlich auch ein LCD an dem ich bei seiner Ansteuerung verzweifelt bin (ist glaub auch nen KS0073). Am besten immer den HD4... Controller nehmen. Kann gut sein das der KS0073 anderst initialisiert werden muss.
Ich glaub ich muss doch mal ne universal LCD ansteuerroutine schreiben in der man die Portbelegung und Taktfrequenz sehr einfach ändern kann.
Viele Grüße,
Mehto
-
Berechtigungen
Zitieren
Lesezeichen