ساخت التراسونیک

[vahid1371]

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

[roboreza]

پاسخ : ساخت التراسونیک

میخواید سنسورش رو خودتون راه بندازین یا با استفاده از ماژول فاصله رو در بیارین؟

[mobin-m]

پاسخ : ساخت التراسونیک

سلام

اگه از ماژول های آماده مثل SRF05 یا SRF04 استفاده می کنید : یه پالس 20 تا 50 میکرو ثانیه ای به trigger میدین و ماژول یه پالس بازگشتی (Echo) به شما میده که کافیه پهنای این پالس رو بگیرید !

اگر خودتون ماژول میسازید : باید یه پالس از فرستنده بفرستید و هم زمان تایمر زمان سنج رو فعال کنید - و وقتی پالس از گیرنده دریافت شد باید تایمر رو قطع کنید و زمان بدست آمده رو با کمک فرمول های ساده ریاضی و با در نظر گرفتن سرعت صوت به فاصله طی شده تبدیل کنید

[vahid1371]

پاسخ : ساخت التراسونیک

ممنون دوست عزیز .من از ماژول آماده استفاده می کنم .شما که تجربه دارید این ماژول نکته خاصی نداره.
رابطه ریاضی مربوطه و همچنین سرعت صوت را یاد ندارید.برای چی باید پهنای پالس را اندازه بگیرم.
سنسور التراسونیک را در پروتوس چی سرچ کنم.

[mobin-m]

پاسخ : ساخت التراسونیک

سلام داداش

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

[vahid1371]

پاسخ : ساخت التراسونیک

سلام داداش

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

سلام ممنون
srf05

[mobin-m]

پاسخ : ساخت التراسونیک

خب داداش
اینو ببین :

$regfile = "m8def.dat"
$crystal = 8000000

Config Lcd = 16 * 2
Config Lcdpin = Pin , Rs = Portc.5 , E = Portc.4 , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0

Config Portd.4 = Output
Trigger Alias Portd.4
Trigger = 0

Config Portd.5 = Input

Config Portd.7 = Output
Led Alias Portd.7
Led = 0

Dim A As Word
Dim S As Single
Config Single = Scientific , Digits = 2
Const K = 0.1725

Waitms 50

Cursor Off
Cls
Lcd "SRF-05"
Locate 2 , 1
Lcd "AUTO Range"

Led = 1
Waitms 100
Led = 0

Wait 3

Do

Trigger = 1
Waitus 15
Trigger = 0

Waitus 10
Pulsein A , Pind , 5 , 1

S = A * K

Cls
Locate 2 , 1
Lcd "dis: " ; S ; " cm"

If S < 20 Then
 Led = 1
 Waitms 20
 Led = 0
End If

Waitms 100

Loop

End

---

اضافه شده در تاریخ :
این میاد فاصله رو روی ال سی دی نشون میده

[vahid1371]

پاسخ : ساخت التراسونیک

خب داداش
اینو ببین :

$regfile = "m8def.dat"
$crystal = 8000000

Config Lcd = 16 * 2
Config Lcdpin = Pin , Rs = Portc.5 , E = Portc.4 , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0

Config Portd.4 = Output
Trigger Alias Portd.4
Trigger = 0

Config Portd.5 = Input

Config Portd.7 = Output
Led Alias Portd.7
Led = 0

Dim A As Word
Dim S As Single
Config Single = Scientific , Digits = 2
Const K = 0.1725

Waitms 50

Cursor Off
Cls
Lcd "SRF-05"
Locate 2 , 1
Lcd "AUTO Range"

Led = 1
Waitms 100
Led = 0

Wait 3

Do

Trigger = 1
Waitus 15
Trigger = 0

Waitus 10
Pulsein A , Pind , 5 , 1

S = A * K

Cls
Locate 2 , 1
Lcd "dis: " ; S ; " cm"

If S < 20 Then
 Led = 1
 Waitms 20
 Led = 0
End If

Waitms 100

Loop

End

---

اضافه شده در تاریخ :
این میاد فاصله رو روی ال سی دی نشون میده

خیلی ممنون دوست عزیز واقعا زحمت کشیدین
چندتا سوال در مورد دستورات تو این برنامه داشتم اگه زحمتی نیست جواب بدین.
دستور dim s as single یعنی چی بعدش config single کلا نفهمیدم چیکار میکنه
const k=0.1725 یعنی چی و بعدشم اون s=a*k هم که فرمولشه درسته
ببخشید اینقدر سوال می کنم شما هم توی زحمت می اندازم

[mobin-m]

پاسخ : ساخت التراسونیک

سلام

خواهش میکنم
دستور DIM A AS SINGLE که یک متغییر با نام A از نوع SINGLE تعریف میکنه
دستور بعدش هم میاد معین میکنه که هر مقداری که در متغییر SINGLE قرار گرفت تا دورقم پشت اعشار قرار بگیره
K هم اینجا یه ثابت تناسبی هستش که در فرمول S=A*K با ضرب شدن در پهنای پالس بدست آمده مقدار فاصله برحسب سانت در متغییر S قرار میگیره

من به اینکه این انجمن جای سوال و جواب و صحبت و بحث علمیه از صمیم قلب معتقدم ! پس داداش خیالت راحت هر چه دل تنگت میخواهد بپرس :agree:

[vahid1371]

پاسخ : ساخت التراسونیک


ممنون دوست خوبم این ماژول التراسونیک رو در پروتوس چی سرچ می کنن من هرچی می گردم چیزی پیدا نمی کنم. :eek: .

[mobin-m]

پاسخ : ساخت التراسونیک

داداش پرتئوس به خودی خود این ماژول رو نداره! باید برای ورژن پروتئوست کتابخونش رو دانلود کنی
فک کنم wle این کتابخونه ها رو داره!

[vahid1371]

پاسخ : ساخت التراسونیک

:cry: :cry: :cry: :cry:
کتاب خونه اش رو دانلود کردم و همونجوری که خودش گفته بود عمل کردم ولی بازم هرچی سرچ می کنم srf05 بازم هیچی پیدا نمیکنه. :angry:
:cry2: :cry2: :cry2:
به نظرت چیکارکنم

[mobin-m]

پاسخ : ساخت التراسونیک

من از اون کتابخونه استفاده نکردم ولی شما چیز های دیگه هم سرچ کنید مثلا :

ultrasonic

range finder

و

.....

[vahid1371]

پاسخ : ساخت التراسونیک

شما چه جوری در پرتئوس مدارتون رو شبیه سازی کردید. :eek:

[mobin-m]

پاسخ : ساخت التراسونیک

من که اصلا این پروژه رو شبیه سازی نکردم! ساختمش