Bascom GLCD mit SSD1289 aus Bascom ansteuern

[metek]

Xpt2046

hallo riesen,

hast Du inzwischen etwas errrichen können, was den touch-controller betrifft ?

mfG

 

[riesen]

Hallo Xpt2046

Ja, konnte eine Lösung finden. Es war ein "Hardware-Fehler", habe da beim Arduino 2560
schlicht einen falschen Pin verdrahtet, und laaaaaange nicht gemkert... zuuu lange

Nun funktioniert alles super. Werde mich nun an den Test eines Displays mit ILI9325
machen, da hat ja Hkipnik auch schon Lösungen präsentiert hier.

Verschneite Grüsse
Thomas

 

[metek]

hallo riesen,

freut mich dass es geklappt hat.

Den Code für die ILI93xx kannst du auch in bascom-forum finden, die groszügige Beitraege von hkipnik, six1, ben und evert dekert werden sehr hilfreich sein.

Sehr wahrscheinlich hast du SD-Card und Touch gleichzeitig an SPI gehaengt und mit SS(slave select, bzw. Cs:Chip select) Sd card oder Touch angesprochen.

Ich habe ein 7" TFT bildschirm bestellt mit ssd1963 controller und XPT2046 . Wurde vorgestellt in Bascom Forum, model : AT070TN90. kostet ca.38,-EU .Nicht schlecht für 800X480..

Nun, da die Chinesen fast gar kein Dokumentation mitliefern, würde ich dich bitten, mir ein lauffaeiges Program zu schicken, -oder hier veröffentlichen-, damit ich ein Anfangs-Basis habe, für mein Touchcontroller umzuschreiben.
metekelektronik@superonline.com

regnerische Grüsse aus istanbul

 

[riesen]

Hallo metek

Sorry für die späte Antwort, spielen mit TFt's usw. ist (leider) nur mein Hobby ..

Nein, ich habe den Touch-Controller per Software-SPI angepsrochen, benutze den
Code wie ihn hier Hkipnik veröffentlich hat. Das Ansteuern über Hardware-SPI und
getrennten CS-Signalen habe ich nicht hinbekommen. Die Parameter für die SD-Card
und den Touch-Controller müssen ja auch unterschiedlich sein, so dass ich hier
einen Konflikt bekommen habe. Aber ehrlich gesagt, mit dem Hardware-SPI bin ich
schlecht vertraut, vielleicht gibt es hier trotzdem eine Lösung. Mit der nun gewählten
Lösung per Software klappt es auch super.

Viele Grüsse
Thomas

Sub Lcd_read_touch()
Local Tx As Word , Ty As Word
Local Res As Single
Touch_flag = 0
Clock = 0
Cst = 0
Waitms 10
Shiftout Dout , Clock , X_dout , 1 , 8 , 40
Waitms 5
Shiftin Din , Clock , Touchx , 1 , 16 , 40
Shiftout Dout , Clock , Y_dout , 1 , 8 , 40
Waitms 5
Shiftin Din , Clock , Touchy , 1 , 16 , 40
Cst = 1
Tx = Touchx And &B0111_1111_1111_1000
Shift Tx , Right , 3
' Print "x-l1= " ; Tx
Tx = Tx - 400 'wert zwischen 1 und 240 zb 478 für x=1 und 3712 für x=240 then 3312/ 78 = 13.47
Res = Tx / 13.75
Touchx = Int(res)
Ty = Touchy And &B0111_1111_1111_1000
Shift Ty , Right , 3
' Print "y-l1= " ; Ty
Ty = Ty - 280
Res = Ty / 10.53
Touchy = Int(res)
If Touchx > 240 Then Touchx = 0
If Touchy > 320 Then Touchy = 0
Touchy = 320 - Touchy 'Y wert gedreht für display
' Print "x-l= " ; Touchx
' Print "Y-l= " ; Touchy
'Waitms 500
Touch_flag = 0

End Sub

 

[Protoncek]

Hello!
I hope it's ok to write in English (i'm from Slovenia)...
I'm trying to work out this program, too. And first of all, i want to thank the author for great code! It works like a charm.

But, when i start to modify it, i already have a problem: since i need big fonts i created 40x28 font and 32x32 font. The problem is that if i add these two fonts into subroutine lcd_text, big text is shown just fine, BUT after i write first character with lcd_text subroutine, files from SD card are no longer accesible and lines can't be drawn anymore. This doesn't happen if i add these two fonts in sub lcd_text_t. Do you have any idea why is this happening?
Sure, i could write big fonts with second routine, but it's slower than first one...

I use xmega128A1U. Maybe i should mention that for SD card to work i have to increase clock division from 2 to 4, but i guess this can be because my SD card is slow...


Thanks!

Best regards!
Pavel

 

[Hkipnik]

hello
Change Dim Zeichenarray(40) As Byte
to Dim Zeichenarray(80) As Byte

greeting
Hkipnik

 

[Protoncek]

Great! I have to change it to 120 in order to work (i guess 40x28 is big font).
I knew you will know what the problem is, since you wrote the program. Many thanks! I'm more or less beginner in bascom (i work with it some 3-4 years), and i'm not even close to being able to write such a complex program like this.


Best regards!
Pavel