Karakteres LCD kezelése
Hello!
Kicseréltem az IC-t (a programozóban) és továbbra se jó. Itt a program:
Kicseréltem az IC-t (a programozóban) és továbbra se jó. Itt a program:
Kód: Egész kijelölése
$regfile = "2313def.dat"
$crystal = 4000000
Config Lcd = 20 * 4
Config Lcdpin = Pin , Rs = Portb.2 , E = Portb.3 , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7
Config lcdmode = PORT
Cursor Off
initlcd
Cls
Dim Szam As Byte
Szam = 0
Do
Cls
initlcd
Lcd "Hello! " ; Szam
Szam = Szam + 1
Waitms 1000
Loop
End
Bence
Elvileg jónak kéne lennie.
De azért azt az Initlcd-t feltétlenül vedd ki a Do-Loop ciklusból
Az lcd init meg valahogy így:
A kijelző R/W kivezetése GND-n van, ugye?
Egyébként ha működik úgy hogy nincs összekötve az STK200-al, akkor ott kéne keresni a "hibát".
(Már ha azt hibának nevezhetjük hogy programozóval összekötve misztikus dolgokat művel az áramköröd... )
De azért azt az Initlcd-t feltétlenül vedd ki a Do-Loop ciklusból
Az lcd init meg valahogy így:
Kód: Egész kijelölése
Config Lcd = 20 * 4
Config Lcdpin = Pin , Rs = Portb.2 , E = Portb.3 , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7
Config lcdmode = PORT
initlcd
Cls
initlcd
Cls
...
Egyébként ha működik úgy hogy nincs összekötve az STK200-al, akkor ott kéne keresni a "hibát".
(Már ha azt hibának nevezhetjük hogy programozóval összekötve misztikus dolgokat művel az áramköröd... )
Lehúzott programozóval jó, megfordított szalagkábel semmi. Azt nem tom, hogy a chip 5V-ot rendesen kap-e, de amikor rajta van az áramkörön a programozó (mert a táp az áramkörről jön be a programozó is innen kapja) a 7805-ös forró (!), ha nincsa rajta a programozó, akkor szoba hőmérsékletű. Valószínűleg valami zárlatos, holnap alaposan megvizsgálom, de ma már késő van.
Bence