پاسخ : سوالات مربوط به LCD های کاراکتری و گرافیکی
وقت بخیر
من به مشکلی برخوردم ، لطفا راهنایی بفرمایید؛
دستور
CLS TEXT
همه ال سی دی روپاک میکنه ، به جای اینکه فقط متن رو پاک کنه ؟!
برنامه ساده من هم اینه:
وقت بخیر
من به مشکلی برخوردم ، لطفا راهنایی بفرمایید؛
دستور
CLS TEXT
همه ال سی دی روپاک میکنه ، به جای اینکه فقط متن رو پاک کنه ؟!
برنامه ساده من هم اینه:
کد:
$regfile = "m32def.dat" ' specify the used micro
$crystal = 1000000 ' used crystal frequency
$baud = 1200 ' use baud rate
$hwstack = 100 ' default use 32 for the hardware stack
$swstack = 100 ' default use 10 for the SW stack
$framesize = 400 ' default use 40 for the frame space
' used crystal frequency
$lib "glcdKS108.lbx"
Config Portb = Output
Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 6 , Ce2 = 7 , Cd = 0 , Rd = 1 , Reset = 5 , Enable = 3
Dim X As Byte , Y As Byte
Dim S As String * 16
Dim A As String * 16
Dim E As Word
'---------------------------
Setfont Font8x8
Cls
Showpic 83 , 6 , Img1
Wait 1
Lcdat 1 , 1 , "DATE:"
Lcdat 2 , 1 , "TIME"
Lcdat 3 , 1 , "1391"
Wait 3
Cls Text
Wait 2
Lcdat 1 , 1 , "DATE="
Lcdat 2 , 1 , "TIME="
Lcdat 3 , 1 , "1391+"
End
$include "font8x8.font"
'$include "font16x16.font"
Img1:
$bgf "uni.bgf"
دیدگاه