Ansteuerung Wintek 27*4

[felack]

Für alle, die die Pollin-LCD-Anzeige 120232 (Wintek 27x4) anschließen wollen, habe ich ein kurzes Testprogramm geschrieben.
Wie das Display angeschlossen wird steht im Kommentar.

'LCD Testprogramm für ATtiny2313
'und Wintek LCD 4x27 Zeichen Pollin Bestell-Nr.120232
'LCD Standard Anschluß und E2 auf Port B.1 (Pin 13)

$regfile = "attiny2313.dat"                      'Register-Datei für ATtiny2313
$crystal = 500000                                'Frequenz interner RC-Oszillator 
                                                 '(Lieferzustand)

Dim ___lcdno As Byte                             'Umschaltbyte für Anzeige : 
                                                 '0 = Chip 1 ; 1 = Chip 2

'LCD initialisieren

Config Lcd = 40 * 4                              'Anzeigemodus 40 x 4 Zeichen
Config Lcdpin = Pin , E2 = Portb.1               'Portb.1 an E2 anschließen
___lcdno = 0                                     'auf Chip 1 schalten
Initlcd                                          'die beiden oberen Zeilen 
                                                 'initialisieren
Cls                                              'die beiden oberen Zeilen löschen
 ___lcdno = 1                                    'auf Chip 2 schalten
Initlcd                                          'die beiden unteren Zeilen 
                                                 'initialisieren
Cls                                              'die beiden unteren Zeilen löschen


'LCD Anzeige ausgeben

'Die 2 oberen Zeilen anzeigen

___lcdno = 0

Locate 1 , 1
Lcd "1. Die erste Zeile" ;

Locate 2 , 1
Lcd "2. Die zweite Zeile"

Cursor Off

'Die 2 unteren Zeilen anzeigen

___lcdno = 1

Locate 1 , 1
Lcd "3. Die dritte Zeile" ;

Locate 2 , 1
Lcd "4. So einfach ist das !!!!"

Cursor Off

End                                               'Programmende

Und hier das Programm als Download :