مشکل در راه اندازی GLCD

[sinaitg]

سلام
من واسه یه پروژه ای مجبورم از LCD گرافیکی استفاده کنم ، با بسکام کار میکنم ، متن برنامه ام به این صورته :

$regfile = "m8def.dat"
$crystal = 1000000
$lib "glcdKS108.LBX"
$include "font8x8.font"

Config Graphlcd = 128 * 64sed , Dataport = Portd , Controlport = Portb , Ce = 1 , Ce2 = 0 , Cd_
  = 2 , Rd = 3 , Reset = 4 , Enable = 5
Setfont Font8x8
Cls
Do
Lcdat 0 , 63 , "sina"
Loop
End

ولی ال سی دی اصلا چرت و پرت میزنه .......
اینم پروتیوسش:
http://s5.picofile.com/file/81530597...chive.zip.html
کمکم کنین.....
ممنون

[sinaitg]

پاسخ : مشکل در راه اندازی GLCD

هیچکس نیست؟؟؟؟؟؟؟؟؟؟؟؟

[محمد نوری]

پاسخ : مشکل در راه اندازی GLCD

سلام
این سطر باید بعد از END قرار بگیره.متاسفانه الان پروتئوس در دسترس ندارم تست کنم.

$include "font8x8.font"

[sinaitg]

پاسخ : مشکل در راه اندازی GLCD

آخه این کار رو میکنم ، اصلا دیگه هیچچی نشون نمیده !!!!!!!

[rroozisia]

پاسخ : مشکل در راه اندازی GLCD

$regfile = "m64def.dat"
$crystal = 8000000
$hwstack = 64
$swstack = 64
$framesize = 64

Config Graphlcd = 128 * 64sed , Dataport = Portd , Controlport = Porte , Ce1 = 7 , Ce2 = 6 , Cd = 5 , Rd = 4 , Reset = 0 , Enable = 1
Setfont My6_8
$lib "glcdKS108.lbx"

do

Lcdat 2 , 1 , "Plase wait"


wait 1
cls
loop

$include "my6_8.font"

یادت باشه که فونت مورد نظرت تو اون پوشه ک برنامه نوشتی کپی کنی

[sinaitg]

پاسخ : مشکل در راه اندازی GLCD

سلام
میشه اینفونت 6*8 رو هم واسم پ کنین ؟؟
ممنون