LCD funktioniert nicht richtig.

OP #691981
Lesenswert?

Hallo,

ich habe aus einigen alten SAmsung Faxgeräten die LCDs ausgebaut und 
versuche momentan eins davon zum Laufen zu bringen.

Angeschlossen habe ich das Display an einem ATMEGA16 16PU und habe mit 
der Bascom-Demo das folgende Programm geschrieben:
***********************************************************************
$regfile = "m16def.dat"
$crystal = 1000000
$lib "Lcd4.lbx"

Config Lcdbus = 4
Config Lcdpin = Pin , Rs = Portd.0 , E = Portd.1 , Db4 = Portd.2 , Db5 = 
Portd.3 , Db6 = Portd.4 , Db7 = Portd.5

Config Lcd = 16 * 1

Do
Lcd "Test"
 Wait 1
Loop

End
************************************************************************

Ergebnis ist, dass ich immer die ersten 8 Blöcke angezeigt bekomme und 
keine Zeichen
Als LIB habe ich auch schon die LCD4e2.lbx ausprobiert und auch schon 
Config lcd = 16 * 1a.

Das Display hat einen 16poligen Anschluß und auf der Rückseite einen 
Aufkleber mit der folgenden Bezeichnung:
VHC16100
NRBC9
03-45WST
JH-23128
Ein Datenblatt habe ich bisher nicht auftreiben können.

Hat jemand eine Idee? Bin leider noch Anfänger und mit meinem Latein am 
Ende!


Gruß

Thomas
Gast #692217
Lesenswert?

"INITLCD" fehlt.

$regfile = "m16def.dat"
$crystal = 1000000
$lib "Lcd4.lbx"

Config Lcdbus = 4
Config Lcdpin = Pin , Rs = Portd.0 , E = Portd.1 , Db4 = Portd.2 , Db5 =
Portd.3 , Db6 = Portd.4 , Db7 = Portd.5

Config Lcd = 16 * 1

Initlcd

Do
Lcd "Test"
 Wait 1
Loop

End

MfG Paul

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren