Servus,
ich vermute auch das die Schriftzeichen irgendwie halbiert sind...
Die Schrift ist die Font16x16.font aus Bascom/SAMPLES/LCDGRAPH.
Hoffe das dir noch was auffällt
MfG
EagleStar
$regfile = "m8def.dat"
$crystal = 8000000
$baud = 19200
$framesize = 298
$swstack = 256
$hwstack = 256
Config Portc = Input
Btn0 Alias Pinc.0
Btn1 Alias Pinc.1
Btn2 Alias Pinc.2
Btn3 Alias Pinc.3
$lib "glcdEADOGS102.lbx"
Config Graphlcd = 128 * 64eadogm , Cs1 = Portb.4 , A0 = Portb.1 , Si = Portb.3 , Sclk = Portb.5 , Rst = Portb.0
Initlcd
Wait 1
Setfont Font16x16
Cls
Lcdat 2 , 5 , "Start!"
Do
Debounce Btn0 , 0 , Btn0_isr , Sub
Debounce Btn1 , 0 , Btn1_isr , Sub
Debounce Btn2 , 0 , Btn2_isr , Sub
Debounce Btn3 , 0 , Btn3_isr , Sub
Loop
End
Btn0_isr:
Cls
Lcdat 1 , 1 , "Taste 1"
Return
Btn1_isr:
Cls
Lcdat 1 , 1 , "Taste 2"
Return
Btn2_isr:
Cls
Lcdat 1 , 1 , "Taste 3"
Return
Btn3_isr:
Cls
Lcdat 1 , 1 , "Taste 4"
Return
$include "Font16x16.font"
'$include "Font8x8tt.font"
Lesezeichen