Hallo Apollo
ich hab dein prog mal getestet Es funktionirert bei mir mit einem 2*20
und mit einem 4*20 LCd
Du solltest allerdings die "lcd.lib" auskommentieren.
Die LCD Konfiguration dagegen nicht ! (Hab ich für meinen Programmer geändet und hier wieder auskommentiert)
Code:'lcdtest.bas fuer apollo aus Roboternetz 9.4.5 '$regfile = "m16def.dat" 'ATMega 16-Deklarationen $regfile = "2313def.dat" '2313-Deklarationen '$crystal = 16000000 'geändert auf 16MHz $crystal = 3686400 'Quarz: 3.6864 MHz '$lib "lcd.lib" 'nicht notwendig ! weg damit ! Config Lcdpin = Pin , Db4 = Portb.3 , Db5 = Portb.2 , Db6 = Portb.1 , Db7 = Portb.0 , E = Portd.4 , Rs = Portd.5 'Anschluß von meinem LCD ' Config Lcdpin = Pin , Db4 = Porta.3 , Db5 = Porta.2 , Db6 = Porta.1 , Db7 = Porta.0 , E = Porta.4 , Rs = Porta.5 Config Lcd = 16 * 2 ' "a" für spezielles Display Initlcd Do Cls Wait 1 Locate 1 , 1 ' upperline ist einfacher Lcd "test" Wait 1 Locate 2 , 1 'lowerline ist einfacher Lcd "123" Wait 1 Loop End
Gruß Bernd (Gandalf)







Zitieren

Lesezeichen