Hallo,
ich habe das LCD Datavision DG-12232 von Pollin. Mit Hilfe dieses Beitrages aus dem Nachbarforum http://www.avr-praxis.de/forum/showt...=4862#post4862 habe ich es angeschlossen und zum laufen gebracht.
Mein Code ist:
Auf den Fotos seht ihr mein Problem. Ist das Display kaputt oder passt da sonst irgend etwas nicht?Code:'Definition für Mega 8 $regfile "m8def.dat" 'Angabe der Taktfrequenz (1Mhz) $crystal = 8000000 $lib "glcdSED1520.lib" '====================================================== 'Konfig '====================================================== Config Portb.1 = Output Dim I As Long Config Graphlcd = 120 * 64sed , Dataport = Portd , Controlport = Portc , Ce = 4 , Ce2 = 3 , Cd = 2 , Rd = 5 'Initlcd '====================================================== 'Ini '====================================================== '====================================================== 'Main '====================================================== Glcdcmd &H3E , 1 : Glcdcmd &H3E , 2 ' both displays off Cls Waitms 50 Glcdcmd &H3F , 1 : Glcdcmd &H3F , 2 'both on Waitms 50 Cls Waitms 50 Do Setfont Font16x16 Lcdat 1 , 1 , "" ; I Lcdat 3 , 60 , "" ; I Toggle Portb.1 Waitms 200 I = I + 1 Loop End 'Ende des Programms $include "font8x8.font" $include "font16x16.font"
Danke
Gruß Daniel







Zitieren
Lesezeichen