Hallo,
ich habe ein LCD mit 2 Controllern.
Wie bekomme ich das LCD angesteuert? Im Netz habe ich einen Code gefunden, aber ich weiß nicht, wie ich den als Schleife einbinden kann:
Der Code läuft einmal durch und das Ergebnis ist auf dem LCD.
Was muss ich machen damit die Variable auf dem LCD hochgezählt wird?
mit einem "GoTo" Verweis hab ich es noch nicht geschafft...
Vielen Dank, Tobias
Code:$regfile = "m32def.dat" 'AT-Mega32 $crystal = 1000000 'Quarz: 1 MHz Dim X As Single 'Variable zum hochzählen Dim ___lcdno As Bit Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , Db7 = Portb.3 , E = Portb.5 , Rs = Portb.4 , E2 = Portb.6 Config Lcd = 40 * 4 ___lcdno = 0 'Ober Displayhälfte initialisieren, wenn das Display zwei LCD-Controller besitzt Initlcd Cursor Off Cls Locate 1 , 1 Lcd "1estesttesttesttesttesttest" Locate 2 , 1 Lcd "2estesttesttesttesttesttest" ___lcdno = 1 'Dies ist nur notwendig wenn das Display zwei LCD-Controller besitzt Initlcd Cursor Off Cls Locate 1 , 1 Lcd "3estesttesttesttesttesttest" Locate 2 , 1 Lcd X '"4estesttesttesttesttesttest" Do Incr X wait 1 'goto Anzeige 'funktioniert aber bei mir nicht.... Loop End







Zitieren

Lesezeichen