کمک برای ساخت ماژول سریال LCD های کاراکتری

[SAMAN.ASADI]

پاسخ : کمک برای ساخت ماژول سریال LCD های کاراکتری

خیر ؛ در شماتیک نیازی به رسم و قرار دادن کریستال نیست.
موفق باشید

خدا خیرت بده ...
نجاتم دادی ...
من اینقدر با پروتئوس ور رفتم ولی نفهمیدم خطاش چی میگه...
همیشه فکر میکردم که پروتئوسم کرکش خرابه و نمیتونم روی 16 مگا تنظیمش کنم ...
خیر ببینی جوان :applause:

[Abbas Sarami]

پاسخ : کمک برای ساخت ماژول سریال LCD های کاراکتری

مرسی.کارت درسته.ممنون
فقط توی کدویژن کدوم گزینه ها رو تیک بزنم؟؟؟
...
و اگه خوده برنامه رو داری برام بزاری ممنون میشم

در مورد فیوز بیت ها در تالار بحث شده لطفاْ سرچ کنید.
خود برنامه را چند بار باید بذارمآ ؟ http://www.eca.ir/forum2/index.php?topic=90487.msg562083#msg562083

لینک دانلود Codevision Project File :
lcd.rar - 51 KB
--------------------

من اینقدر با پروتئوس ور رفتم ولی نفهمیدم خطاش چی میگه...
همیشه فکر میکردم که پروتئوسم کرکش خرابه و نمیتونم روی 16 مگا تنظیمش کنم ...

زودتر مطرح میکردی تا اینقدر خسته نشی

موفق باشید

[SAMAN.ASADI]

پاسخ : کمک برای ساخت ماژول سریال LCD های کاراکتری

--------------------زودتر مطرح میکردی تا اینقدر خسته نشی

روم نشد بگم ... و غرورم نگذاشت :angry:

[hamed.asadi]

پاسخ : کمک برای ساخت ماژول سریال LCD های کاراکتری

ممنون.اقا ما اینو امروز بستیم اِینهووو هلو کار میکرد :biggrin: :wow:
فقط یه مشکلی داشت و داره اونم اینه فاصله که مثلا به 120 میرسه,فاصله رو کم میکنی عدد قبلی رو پاک نمیکنه
شما از فاصله ی 120 سانتی متر بیای به 3 سانتی متر,3 سانتی متر نشون نمیده 320 نشون میده,20 رو پاک نمیکنه.

[Abbas Sarami]

پاسخ : کمک برای ساخت ماژول سریال LCD های کاراکتری

مشکل مربوط به PIC هست
کد زیر را برای PIC امتحان کن:

Include "modedefs.bas"                   ' Include serial modes

Trisa = %00000000                      ' set porta to outputs
Trisb = %00001000                      ' set portb pin 3 to input

Lcd Var Porta.3                       ' define variables and constants
Piezo Var Portb.4
Trigger Var Portb.2
Echo Var Portb.3
Left_led Var Portb.0
Right_led Var Portb.1
Baud Con T9600
Dist_raw Var Word
Dist_inch Var Word
Dist_cm Var Word
Conv_inch Con 15
Conv_cm Con 6

Low Trigger                         ' set trigger pin to logic 0
Low Left_led                        ' turn off left LED
Low Right_led                        ' turn off right LED

Serout Lcd , Baud , [241 , 12 , 242]                ' clear lcd screen

Pause 100                          ' give time to initialize lcd

Serout Lcd , Baud , [241 , 0, "- Sonar Ranger -",242]    ' display program title on the LCD

Sound Piezo , [100 , 10 , 50 , 5 , 70 , 10 , 50 , 2]    ' Make startup sound

Pause 100                          ' wait for 1 second

Serout Lcd , Baud , [241 , 0, "inches:     " ,242]    ' set up the LCD display
Pause 50
Serout Lcd , Baud , [241 , 1, "centimeters:  " ,242]
Pause 1000
Main:

   Gosub Sr_sonar                     ' get sonar reading
Pause 20
   Serout Lcd , Baud , [241 ,128 , #dist_inch, "  " , 242]    ' display the distance in inches
Pause 20
   Serout Lcd , Baud , [241 , 209 , #dist_cm , "  " , 242]     ' display the distance in centimeters

Goto Main

End

Sr_sonar:

     Pulsout Trigger , 1                ' send a 10us trigger pulse to the SRF04
     Pulsin Echo , 1 , Dist_raw             ' start timing the pulse width on echo pin
     Dist_inch =(dist_raw / Conv_inch)         ' Convert raw data into inches
     Dist_cm =(dist_raw / Conv_cm)           ' Convert raw data into centimeters
     Pause 1                      ' wait for 10us before returning to main

Return

[hamed.asadi]

پاسخ : کمک برای ساخت ماژول سریال LCD های کاراکتری

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