LCD funktioniert nicht richtig.

[Thomas D. (firehead)]

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

[Paul Baumann (Gast)]

"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