Pollin TG12864B-03 und Atmega32 in Bascom - Wie eigene Grafiken darstellen?

Fabian G. Gast #2555091
Lesenswert?
• ▲
▼ 
Hallo zusammen,
Ich habe mir vergangene Woche das Pollin TG12864B-03 Grafikdisplay 
angeschafft. Ich habe mich dann durch diverse Foren gewühlt und hab es 
dann endlich geschafft Texte und eine Grafik erfolgreich darzustellen.
Programmieren und Brennen tue ich mit Bascom AVR.
Ich benutze den KS108.bas Code zum Ansteuern.
Die Beispielgrafiken von Bascom (BascomAvr/Samples/Lcdgraph/ks108.bgf)
lassen sich einwandfrei darstellen, nur wenn ich mit dem Graphic 
Converter eigene BMP Bilder einfüge und Umwandel in Bgf-Dateien dann 
zeigt das Display bei mir nur Verpixeltes Wirrwarr. In der Bascom-Hilfe, 
steht dass dann die Funktion "Showpic" nicht mehr für eigene Grafiken 
benutzt werden kann.

Ich möchte also eigene Grafiken darstellen mit Bascom, aber welchen 
Befehl muss ich dann verwenden oder wie muss ich dann vorgehen? Ich 
werde aus der Bascom Hilfe nich ganz schlau.
Ich bin dankbar für jeden Tipp!

Fabian G.
Beitrag melden Bearbeiten Thread verschieben Thread sperren Anmeldepflicht aktivieren Anpinnen Thread löschen Thread mit anderem zusammenführen Markierten Text zitieren Antwort Antwort mit Zitat
Fabian G. Gast #2555169
Lesenswert?
• ▲
▼ 
Hier nochmal die beiden Bilder, Das linke ergibt sich wenn ich die 
Bascom-Beispielgrafik nehme. Das rechte wenn ich eine eigene Grafik 
darstellen möchte.
Anstatt der Beispiel bgf-Datei, hab ich mal die Eigene eingefügt.
Ich habe die Bilder genau auf 128x64 Pixel zugeschnitten und convertiert 
und mit dem Showpic versucht darzustellen, aber es scheint zu stimmen, 
dass man seine eigenen Grafiken mit diesem Befehl nicht darstellen kann.
Wie soll ich nun vorgehen?

Hier noch mein verwendeter Code für die eigene Grafik:

$regfile = "m32def.dat"
$crystal = 8000000
$baud = 19200
$hwstack = 32
$swstack = 10
$framesize = 40

$lib "glcdKS108.lbx"

Wait 2

Print "Config"
Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , 
Ce = 0 , Ce2 = 1 , Cd = 4 , Rd = 3 , Reset = 2 , Enable = 5

Dim X As Byte , Y As Byte

Print "Cls"
Cls

Wait 1
Glcdcmd &H3E , 1 : Glcdcmd &H3E , 2
Wait 1
Glcdcmd &H3F , 1 : Glcdcmd &H3F , 2

Showpic 0 , 0 , Plaatje                                     'show a 
compressed picture
End                                                         'end program

$include "font8x8.font"

Plaatje:

$bgf "WinXP.bgf"
Angehängte Dateien:
Beitrag melden Bearbeiten Löschen Markierten Text zitieren Antwort Antwort mit Zitat
Thread beobachten

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

Bestehender Account

oder

Mit Google-Account einloggen

Noch kein Account?

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren