Hallo,
es klappt, bin aber noch nicht zufrieden. Zeile 2 und 4 flackert.
VEE habe ich jetzt mit Poti eingestellt.
VCC -> [1 KOhm] -> Led+
GND -> Led-
VCC -> [1KOhm] -> Anode
GND -> Kathode
Ich habe folgende Zeile ergänzt:
Code:
'LCD 4x40 testen
$lib "Lcd_i2c.lib"
$regfile="m8def.dat"
$crystal=16000000
Const Pcf8574_lcd = &H40
Config Scl = Portc.5
Config Sda = Portc.4
Dim _lcd_e As Byte
_lcd_e = 192
I2cstart
I2cwbyte &H40
I2cwbyte 1
Waitms 1.64
i2cstop
Cls
Locate 1,1
Lcd "Hallo roboternetz!"
Locate 3,1
Lcd "Meine LCD 4x40 klappt, bin aber nicht zufrieden :)"
Bild hier
Lesezeichen