ts12864a LCD

[ma_bazrafshan]

--------------------------------------------------------------------------------

سلام
اقا من یه lcd دارم که مدلش ts12864a هست با bascom برنامشو نو شتم اما کار نمی کنه لطفا کمکم کنید که خیلی خیلی گیرم
اینم برنامهای هست که من نوشتم نمی دونم اشکالم چی هست
$regfile = "m16def.dat"

$crystal = 1000000
$lib "glcdKS108.lib"
Config Porta = Output
Config Portc = Output



Wait 2

Print "Config"

Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 7 , Ce2 = 6 , Cd = 3 , Rd = 2 , Enable = 4 , Reset = 5 , Mode = 8

Dim X As Byte , Y As Byte

Print "cls"

Wait 1

Setfont Font8x8



Lcdat 1 , 1 , "123"

Lcdat 2 , 1 , "123" , 1
End
از خط setfont font8x8 ایراد میگیره اما نمیدونم چرا
bascom من ورژن 1.11.8.7 هست

[nsm]

پاسخ : ts12864a LCD

بعد از END پایان برنامه این خط اضافه کن.

$include "font8x8.font"

کرک ورژنی که استفاده می کنی درسته؟

[ma_bazrafshan]

پاسخ : ts12864a LCD

سلام

اقا من اول یه ورژن 1.11.8.1 داشتم اگه اشتباه نکنم که از جوان خریده بودم اما بهم گفتن این ورژن ts12864a رو پشتیبانی نمی کنه
من ورژن جدید رو از


http://www.sfz11.com/uploads/bascom1,11,8,7.rar
برداشتم نمی دونم کرکش رو چه جوری تست کنم که درست هست یا نه
در ضمن اون دستور رو هم در اخر برنامه نوشتم کار نکرد
پیغام
file not found
میده

[ma_bazrafshan]

پاسخ : ts12864a LCD

سلام اقا ممنونم از لطفتون
من الان فقط ورژن 7 رو دارم برنامه ام رو بصورت زیر تغییر دادم اما بازم کار نکرد
$regfile = "m16def.dat"
$crystal = 1000000
$lib "glcdKS108.lib"
Wait 2

Print "Config" ' printing will still work as only the receiver pin is disabled


Config Porta = Output
Config Portc = Output



Wait 2

Print "Config"

Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 7 , Ce2 = 6 , Cd = 3 , Rd = 2 , Enable = 4 , Reset = 5 ', Mode = 8

Dim X As Byte , Y As Byte

Print "cls"

Wait 1

Setfont Font8x8

Home

Lcd "123"

Locate 2 , 1
Lcd "123"
End
$include "font8x8.font"
Plaatje:
$bgf "ks108.bgf"
میدونید error میگیره و$include "font8x8.font و رو نمیشناسه
لطفا اگه راه حلی به ذهنتون میرسه کمکم کنید

[nsm]

پاسخ : ts12864a LCD

فایل جای ذخیره کن که فایل font8*8.font همون جا باشه یعنی هر دو تا فایل تو یه پوشه باشه. ببین می شه یا نه اگر نشد برو اونجای که Bascom نصب کردی ببین اصلا فایل font8*8.font وجود داره یا نه.

[ma_bazrafshan]

پاسخ : ts12864a LCD

اقا واقا ممنونم
ببین از کجا ببینم که فایل font8*8.font هست یا نه از کجای bascom ؟

[ma_bazrafshan]

پاسخ : ts12864a LCD

سلام
اق
ا من الان 3 روز هر شب دارم تا 2 با این lcd ور میرم اما جواب نمیده
فکر میکنم برنامه من نمی تونه ks108 رو پیدا کنه چون نه فایل
'$bgf "ks108.bgf" رو میشناسه و نه


$include "font8x8.font"



از هر دو تاشون ایراد می گیره
اما تو سمپل ها این نوع را داره و از همون جا که اجراش میکنم هر کاری میکنم پرگرام نمیشه ای سی
تو lib هم اینو دارم

[nsm]

پاسخ : ts12864a LCD

سلام
تو قسمت Sample خود Bascom که بری تو پوشه Lcdgraph که بری مشخص که فایل font8x8.font وجود داره یا نه. اگر نشد با خود Search ویندوز کلمه Font8x8 را Search کن.
آقا شما اول باید این فایل پیدا کنی ببینی اصلا این فایل داری یا نه.
برنامه زیر هم یه امتحان بکن.
موفق باشید.

$regfile = "m16def.dat"
$crystal = 8000000
$lib "glcdKS108.lbx"
Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 0 , Ce2 = 1 , Cd = 4 , Rd = 3 , Reset = 2 , Enable = 5
Cls
Wait 1
Setfont Font8x8
Lcdat 1 , 1 , " WWW.ECA.IR "
Lcdat 2 , 1 , " WWW.ECA.IR " , 1
wait 2
lcdat 4 , 1 , "1234567890"
End
$include "font8x8.font"

[ma_bazrafshan]

پاسخ : ts12864a LCD


:smile:
سلام
بالاخره 1 اتفاقاتی افتاد با کمک شما
اقا فایل font8x8 رو پیدا کردم و کپی کردم اونجایی که برنامه ام رو ذخیره کردم دیگه error نمده اما وقتی پروگرامش میکنم کار نمی کنه
حالا مشکل اینجاست که من مجبورم $craystall=100000000 بذارم فکر می کنی مشکل میتونه از این باشه؟یعنی سرعت میکرو اونقدر کمه که نمی تونه
glcd رو داریو کنه؟
اخه 1 برنامه ساده تست led رو اجرا کردم جواب داد اما وقتی فقط این قسمت از برنامه شما رو میریزم دیگه جواب نمی ده
$lib "glcdKS108.lbx"
Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 7 , Ce2 = 6 , Cd = 3 , Rd = 2 , Reset = 5 , Enable = 4
میتونه از کلاک باشه؟
در ضمن من از portc استفاده کردم ایا توی fusebit ها باید چیزی رو تغییر بدم؟

[ma_bazrafshan]

پاسخ : ts12864a LCD

سلام
:cry:
اقا من امروزم کامل با این lcd وبرنام های که شما دادید کار کردم اما نتونستم چیزی رو lcd نشون بدم حتی 1 حرف هر چند دیگه اون ایراد رو نمیگیره .چون اون فایلی رو که شما گفتید کپی کردمو درست شد
اما چرا هیچ چیزی نشون نمی ده
از بابت اتصالات پایه ها هم تقریبا مطمنم
فقط 1 جالب اینه که در مورد این نوع lcd تو datasheet نوشته yellow /green چون v1.0 هست اما مال من ابی هست و v1.1 فکر میکنم نباید ترتیب پایه ها فرق کنه
برنامه هم رو IC درست نصب میشه چون led رو روی پرت های دیگه میتونم روشن کنم
مشکل کجاست پس؟
چرا نمیتونم چیزی نشون بدم؟

[nsm]

پاسخ : ts12864a LCD

سلام
از پتانسیومتر 10کیلواهمی استفاده کردی برای پایه 18 LCD ؟
می تونی با پروتوس شبیه سازی کنی ببین جواب میده با نه؟

[ma_bazrafshan]

پاسخ : ts12864a LCD

:cry:
ببین من از پتانسیومتر استفاده نکردم اما با یک مقاومت1 کیلو پین 3 رو به 18 وصل کردم

این برنامه رو یه نگاه بکن.برنامه ای هست که خودت بهم دادی.کار نکرد من یه برنامه روشن خاموش led بهش اضافه کردم ببینم اصلا IC PROGRAM میشه یا نه خوب؟

نکته جالب اینجاست که اگه همه دستورات مربوط بهLCD رو غیر فعال کنم برنامه کاملا درست کار میکنه و LED روشن خموش میشه
اگه دستور $lib "glcdKS108.lbx را اضافه کنم بازم کار میکنه و LED روشن خاموش میشه اما به محض اینکه خط

Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portd , Ce = 0 , Ce2 = 1 , Cd = 4 , Rd = 3 , Reset = 2 , Enable =Config 5


را اضافه میکنم دیگه LED کار نمیکنه و هیچ اتفاقی نمی افته



$regfile = "m16def.dat"
$crystal = 8000000
Config Portb = Output
Config Porta = Output
Config Portd = Output
$lib "glcdKS108.lbx"
Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portd , Ce = 0 , Ce2 = 1 , Cd = 4 , Rd = 3 , Reset = 2 , Enable =Config 5
Do
Portb = &B11111111
Wait 1
Portb = &B00000000
Cls
Wait 1
Setfont Font8x8
Lcdat 1 , 1 , " WWW.ECA.IR "
Lcdat 2 , 1 , " WWW.ECA.IR " , 1
Wait 2
Lcdat 4 , 1 , "1234567890"
Loop
End
$include "font8x8.font"

[ma_bazrafshan]

پاسخ : ts12864a LCD

:angry:
سلام
من با پروتوس هم کار کردم جواب جواب نداد
الان مطمنم که مشکل هر چی هست از این خط config هست

[Iran-PC]

پاسخ : ts12864a LCD

شما دو مدل کانفیگ گذاشتی , یکی با پورت D و یکی با پورت C , یادت باشه اتصالاتت رو درست کنی.
بعدش هم اگه از پورت C استفاده میکنی , فیوزبیت JTAGEN رو باید غیر فعال کنی.
اینی هم که میگی وقتی کار به دستور کانفیگ میرسه میکرو دیگه کار نمیکنه ,احتمالا مال اینه که تا وقتی اون دستور از ال سی دی اوکی نگیره , از اون خط رد نمیشه.(یعنی اتصالاتت و یا فیوز بیت(برای پورت C) به درست نیست).
بعدش هم , بهتره از پتانسیومتر استفاده کنی و برق بک لایت هم یادت نره , ال سی دی های آبی , بدون بک لایت خیلی بد قابل دیدن هستند.

[ma_bazrafshan]

پاسخ : ts12864a LCD

سلام
اقا با تشکر از همه مخصوصا nsm که خیلی لطف کردن مشکل حل شد و راه افتاد
پایه 19 این نوع lcd ها 19 ولت ولتاژ منفی می دهد که باید به حدود 7 ولت کاهش پیدا کند و به پایه 18 وصل شود