سلام دوستان
من میخوام با یک ال سی دی گرافیکی کار کنم پیه هاش رو هم وصل کردم واون متنی رو هم که میخوام نشون میده ولی قاطی هست یعنی همراهش کلی چیزای چرت و پرت نشون میده البته همون متن رو هم خوب نشون نمیده
ممنون میشم اگه کسی بتونه راهنمایی کنه
نوع ال سی دی ts12864A-2
با بسکام هم کار میکنم
جای پایه های 15 و 16 رو با هم عوض کنین ببینین درست میشه یا نه ....
ببین باید زمانی که به ال سی دی دیتا میفرسی هچ وقفه ای رخ نده و ال سی دی دیتا هارو کامل بگیره
پایه های 15 و16 که ce1وce2 هست و روی نیمه چپ و راست lcd تاثیر داره حتی جای اونا رو هم عوض کردم ولی تاثیری نداشت
در مورد وقفه هم منظورتون از وقفه رو متوجه نشدم من یه waitچند میلی ثانیه به کار بردم اون که نمیتونه مشکل ایجاد کنه؟؟
نكته ي ديگه هم اينكه ، اتصالات سيم ها خيلي خيلي مهمه ، مخصوصا اگر روي برد بورد هست.
اين نوع LCD حالت عادي نويز مي گيرهه ، اگر سيم ها هم خوب اتصال نداشته باشن خرابي دارهه.
براي خودم ، بردبوردي كه روش مدار رو بسته بودم ، چند سوراخش گشاد كرده بود و سيم خوب اتصال پيدا نمي كرد ، وقتي دستش مي زد درست مي شد !
پايه 15 و 16 اگر اشتباه نكنم 2تا پايه اينيبل صفحه ي سمت چپ و راست بود ، درسته ؟
اگر سمت چپ و راست رو عوضي نشون مي دهه ، آره بايد جاي پايه ها رو عوض كني. ( يا سخت افزاري يا نرم افزاري )
آره دوست من روی برد برد بستم ولی من حتی برد برد رو هم تغیر دادم حتی با دو تا ال سی دی و میکروی دیگه آزمایش کردم ولی نتیجه نداد.بازم همون مشکل بود واسه همین فک میکنم مشکل از برناممم باشه
نمونه برنامم رو میزارم ببینین اشتباهی نکردم؟
$regfile = "m16def.dat"
$crystal = 1000000
'*******************************************************************************
Config Graphlcd = 128 * 64sed , Dataport = Portc , Controlport = _
Portd , Ce = 5 , Ce2 = 4 , Cd = 3 , Rd = 2 , Reset = 1 , Enable = 0
Cls Graph
Cls Text
Dim Y As Byte
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space
'*******************************************************************************
Do
For Y = 1 To 20
Circle(30 , 30) , Y , 1
Waitms 100
Next
Cls
Setfont Font8x8
Lcdat 2 , 2 , "AVR Bascom " 'both on
Waitms 500
Lcdat 1 , 1 , " Omid "
Wait 2
Cls
Loop
End
'*******************************************************************************
$lib "glcdKS108.lib"
$include "font8x8.font"
فرم دستور lcdat به شكل زير هست :
Setfont Font8x8 رو هم قبل از حلقه DO_Loop بذار.
نكته ي ديگه هم اينكه فركانس كاريه اين LCD ها هم زياد نيست. با 8 مگ و كمترش هم امتحان كن ببين تاثيري دارهه ...
اما به نظر من باز مشكل از اتصالات هست ... !
بهتره کتابخانه های ال سی دی گرافیکی رو هم اول برنامه بذارین
$lib "glcdKS108.lib"
$include "font8x8.font"
سلام
روال برنامه به این صورت میشه
کد php:
$regfile = "m32def.dat"
$crystal = 8000000
$hwstack = 64
$swstack = 64
$framesize = 64
$lib "glcdKS108.lbx"
Config Graphlcd = 128 * 64sed , Dataport = Portd , Controlport = Portb , _
Ce = 6 , Ce2 = 5 , Cd = 2 , Rd = 3 , Reset = 7 , Enable = 4
$include "font8x8.font"
Dim A As byte
Setfont Font8x8
Cls
Do
Cls
Lcdat 1 , 1 , "Project By:"
Wait 1
Lcdat 3 , 3 , "Jalal Jalali"
Wait 1
Lcdat 5 , 3 , "0911-856-4105"
Wait 3
Loop
End
موفق باشی.....
سلام بچه ها
واقعا دستت درد نکنه جلال جان
نمیدونم چطور ازت تشکر کنم برنامت جواب داد.
بلاخره معلوم شد که اشکال کارم نرم افزاری بوده و از برنام هست.
بچه ها کسی میدونه مشکل اون برنامه ای که گذاشتم چیه که جواب نمیداد!آخه منم دقیقا همون کارا رو کردم.
فهمیدم مشکل از کجا بوده
مشکل از فرکانس میکرو بوده
همون برنامه خودم رو با فرکانس 8 مگا آزمایش کردم و جواب داد.
بازم دسته همتون درد نکنه دوستان
سلام ایا در ال سی دی گرافیکی راخی برای ویرایش اتومات تصویر وحود داره یعنی مثلا میکرو خودش عکسی رو گرفته و اونو اگه رنگی بود اتومات سیاه و سفید بکنه ؟ تورو خدا کمکم کنید برای پایان نامم لازمش دارم همیشه دعاتون میکنم