Hallo,
ich habe ein problem mit einem mega16 und einem t6963c display. hab es folgendermaßen angeschlossen und mit folgendem code probiert :
Code:
'-----------------------------------------------------------------
' (c) 2001-2003 MCS Electronics
' T6963C graphic display support demo
'-----------------------------------------------------------------
'The connections of the LCD used in this demo
'LCD pin connected to
' 1 GND GND
'2 GND GND
'3 +5V +5V
'4 -9V -9V potmeter
'5 /WR PORTC.0
'6 /RD PORTC.1
'7 /CE PORTC.2
'8 C/D PORTC.3
'9 NC not conneted
'10 RESET PORTC.4
'11-18 D0-D7 PA
'19 FS PORTC.5
'20 NC not connected
$regfile = "m16def.dat"
$crystal = 8000000
Config Portb = Output
'First we define that we use a graphic LCD
Config Graphlcd = 240 * 64 , Dataport = Porta , Controlport = Portc , Ce = 2 , Cd = 3 , Wr = 0 , Rd = 1 , Reset = 4 , Fs = 5 , Mode = 8
'Dim variables (y not used)
Dim X As Byte , Y As Byte
Portb.0 = 1
'Clear the screen will both clear text and graph display
Cls
'Other options are :
' CLS TEXT to clear only the text display
' CLS GRAPH to clear only the graphical part
Cursor Off
Wait 1
'locate works like the normal LCD locate statement
' LOCATE LINE,COLUMN LINE can be 1-8 and column 0-30
Locate 1 , 1
'Show some text
Lcd "MCS Electronics"
'And some othe text on line 2
Locate 2 , 1 : Lcd "T6963c support"
Locate 3 , 1 : Lcd "1234567890123456789012345678901234567890"
Wait 2
jetzt zeigt das display aber nur dies an ( Foto ).
hatte jemand schonmal das gleiche problem ?
( habe alle anschlüsse kontrolliert und sie sind alle korrekt verbunden )
mfg Kay
Lesezeichen