Hei.Mor
13.03.2005, 20:49
Hallo,
ich habe mir auch mal ein LCD gegönnt. Leider habe ich erst nach dem Kauf gesehen, dass ein 8x2LCD in Bascom gar nicht enthalten ist.
Kann man so was nicht zum laufen bringen? Ich anscheinend nicht!
Ich habe das mal wie folgt angeschlossen:
'1 Vss GND
'2 Vcc 5V
'3 Vee Poti
'4 RS PD5 am AVR
'5 RW GND
'6 E PD4 am AVR
'7 DB0 GND
'8 DB1 GND
'9 DB2 GND
'10 DB3 GND
'11 DB4 PD3 am AVR
'12 DB5 PD2 am AVR
'13 DB6 PD1 am AVR
'14 DB7 PD0 am AVR
aber es passiert überhaupt nichts. LCD Vee an Masse ergibt in einer Zeile schwarze Kästen.
Mit Atmega 8 dran und dem folgenden Code passiert nichts:
$regfile = "m8def.dat"
$crystal = 1000000 '1Mhz Default
Config Lcdpin = Pin , Db4 = Portd.3 , Db5 = Portd.2 , Db6 = Portd.1 , Db7 = Portd.0 , E = Portd.4 , Rs = Portd.5
Dim A As Byte
Config Lcd = 16 * 1 'configure lcd screen
Initlcd
Cls 'clear the LCD display
Lcd "Test"
Do
Loop
Ich hoffe ihr könnt mir helfen.
Danke
ich habe mir auch mal ein LCD gegönnt. Leider habe ich erst nach dem Kauf gesehen, dass ein 8x2LCD in Bascom gar nicht enthalten ist.
Kann man so was nicht zum laufen bringen? Ich anscheinend nicht!
Ich habe das mal wie folgt angeschlossen:
'1 Vss GND
'2 Vcc 5V
'3 Vee Poti
'4 RS PD5 am AVR
'5 RW GND
'6 E PD4 am AVR
'7 DB0 GND
'8 DB1 GND
'9 DB2 GND
'10 DB3 GND
'11 DB4 PD3 am AVR
'12 DB5 PD2 am AVR
'13 DB6 PD1 am AVR
'14 DB7 PD0 am AVR
aber es passiert überhaupt nichts. LCD Vee an Masse ergibt in einer Zeile schwarze Kästen.
Mit Atmega 8 dran und dem folgenden Code passiert nichts:
$regfile = "m8def.dat"
$crystal = 1000000 '1Mhz Default
Config Lcdpin = Pin , Db4 = Portd.3 , Db5 = Portd.2 , Db6 = Portd.1 , Db7 = Portd.0 , E = Portd.4 , Rs = Portd.5
Dim A As Byte
Config Lcd = 16 * 1 'configure lcd screen
Initlcd
Cls 'clear the LCD display
Lcd "Test"
Do
Loop
Ich hoffe ihr könnt mir helfen.
Danke