Problem mit TG12864B + ATmega32 + Bascom

Gast #3106640
Lesenswert?

Hallo,

ich habe wie oben Beschrieben ein Problem mit der Display-Ausgabe.

Das ist der Code:
1
$regfile = "m32def.dat"
2
$crystal = 16000000
3
$baud = 19200
4
$hwstack = 32
5
$swstack = 10
6
$framesize = 40
7

8
$lib "glcdKS108.lbx"
9

10
Wait 2
11

12
Config Graphlcd = 128 * 64sed , Dataport = Portc , Controlport = Portd , Ce = 4 , Ce2 = 3 , Cd = 5 , Rd = 6 , Reset = 2 , Enable = 7
13

14
Dim X As Byte , Y As Byte
15

16
Print "Cls"
17

18
Cls
19

20
Wait 1
21

22
Setfont Font8x8
23

24
Lcdat 1 , 1 , "123"
25

26
Lcdat 2 , 1 , "123" , 1
27

28
Wait 1
29
Line(0 , 0) -(127 , 64) , 1
30
Wait 2
31
Line(0 , 0) -(127 , 64) , 0
32

33
For Y = 1 To 20
34
   Circle(30 , 30) , Y , 1
35
   Waitms 100
36
Next
37

38
Wait 1
39
Glcdcmd &H3E , 1 : Glcdcmd &H3E , 2
40
Wait 1
41
Glcdcmd &H3F , 1 : Glcdcmd &H3F , 2
42

43
End
44

45
$include "font8x8.font"

In den Angehängten Dateien sind meine Schaltung und der 
Displayanschluss.

Das Display zeigt einfach nichts an.
Hintergrundbeleuchtung und Kontrast funktionieren.
JTAG ist deaktiviert.

Bitte um Hilfe. Bin am Verzeifeln.
Gruß Marc
Angehängte Dateien:

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren