This code works fine with 18MHz and also with 20MHz
[code:1:a6df09eb67]
'Test mit Pollin Display LCD-Modul TG12864B-13
$regfile = "m168def.dat"
$crystal = 18432000
$hwstack = 64
$swstack = 32
$framesize = 24
$lib "glcdKS108.lib"
Config Graphlcd = 128 * 64sed , Dataport = Portd , Controlport = Portb , Ce = 2 , Ce2 = 3 , Cd = 0 , Rd = 1 , Reset = 5 , Enable = 4
Cls
Setfont Font8x8
Do
Showpic 0 , 0 , Bild1
Wait 4
Cls
Line(0 , 30) -(127 , 30) , 1
Line(0 , 31) -(127 , 31) , 1
Line(0 , 32) -(127 , 32) , 1
Line(0 , 0) -(127 , 63) , 1
Line(0 , 63) -(127 , 0) , 1
Circle(63 , 31) , 30 , 1
Wait 3
Cls
Loop
End
'Zeichensatzdatei:
$include "font8x8.font"
Bild1:
$bgf "Star.bgf"
[/code:1:a6df09eb67]
↧