اطلاعیه

Collapse
No announcement yet.

LCD کاراکتری با 3 پین

Collapse
X
 
  • فیلتر
  • زمان
  • Show
Clear All
new posts

    LCD کاراکتری با 3 پین

    شرمنده دوستان،فکر کنم نتونستم توی تاپیک قبلی منظورمو خوب بیان کنم ولی سعی می کنم بهتر براتون توضیح بدم که قضیه از چه قراره؟!

    خب اگه ما بخوایم یک LCD رو از طریق یک میکرو راه اندازی کنیم حداقل به 6 پین از پین های میکرو نیاز داریم ولی با استفاده از این ماژول فقط به یک پین نیاز خواهیم داشت. این ماژول کلا 3 تا ورودی داره یک : Vcc دو : گیرنده سریال RXD سه : زمین GND

    منظورم از متن برنامه ای که نوشتم اینه که اون دسته از دوستانی که تمایل دارن این ماژول در میکروکنترلرهای PIC و 8051 هم تست بشه این کد رو برای میکروی مورد نظرشون بنویسن اونم با زبان برنامه نویسی ای که دوست دارن مثلا برای PIC با زبان C ، بعد سورس اون کد رو به من بدن تا من بتونم ماژول را با کدی که این عزیزان نوشتن تست کنم که ببینم جواب می ده یا اینکه باید کار خاصی روی کد نوشته شده انجام بدن! آخه برای استفاده از این ماژول باید بعداز هر دستوری که به پورت سریال می فرستیم یک کاراکتر Enter هم بفرستیم! که کد اسکی این کاراکتر عدد 13 هست. حالا بعضی از زبانهای برنامه نویسی مثل بیسیک در AVR خودشون این کاراکتر رو به انتهای مطلب ارسال شده اضافه می کنن ولی در Code Vision این اتفاق نمی افته و کاربر باید خودش کد اسکی13 رو به پورت سریال میکروش بفرسته.

    حالا من می خوام این وضعیت رو در سایر زبانها و میکروها تست کنم تا بتونم یک Help قوی و جامع برای استفاده از ماژول بنویسم!

    امیدوارم تونسته باشم منظورمو بخوبی بیان کنم.

    اینم کدی که باید برای میکروکنترلر مورد نظرتون بنویسید:

    کد:
    '           In The Name Of GOD
    
    'Project Planner   : Morteza Rahimi Kordmahalle
    'Microcontroller   : ATTiny2313
    
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    
    $regfile = "2313def.dat"
    $crystal = 7372800
    $baud = 9600
    
    $hwstack = 32
    $swstack = 10
    $framesize = 40
    
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Configurations 
    Config Lcd = 16 * 2
    Config Lcdpin = Pin , Db7 = Portb.2 , Db6 = Portb.3 , Db5 = Portb.4 , Db4 = Portb.5 , E = Portb.1 , Rs = Portb.0
    
    Config Portd = Input
    
    '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Main Program 
    
    Do
    
    If Pind.4 = 1 Then
    
     Print "cls"
     Waitms 100
    
     Print "lcd MrK"
     Waitms 1000
    
     Print "cursor on 200,5"
     Waitms 3000
    
     Print "cursor off"
     Waitms 3000
    
     Print "locate 2,1 Mohamad"
     Waitms 3000
    
    End If
    
    Loop
    
    End

    اَللّهُمَ صَلّ عَلی مُحَمَّد وَ آلِ مُحَمَّد وَ عَجّل الفَرَجَهُم

    {خلاف قوانین}
    [img width=124 height=100]http://mortezark.persiangig.com/image/Web/6_3.PNG[/img]
لطفا صبر کنید...
X