Ulterasonic and 8051_Help me

[hd_uni_pro]

نه

سلام
نه مهندس
آخه من در مدار به جای سنسور های معمولی که send و recive آن ها جداگانه است منظورم در یک package جداگانه است از سنسور های استفاده کردم که دو قسمت توی یک پکیج ات مثل سنسورهایی که در پشت ماشینهای سمند و پژو هست حال باز هم مدار همان مدار ی است که برای شما شکل آن را فرستادم یعنی نمی خواد ic رو عوض کنم مثلا به جای 833n یک هی سی دیگه بذارم

[hd_uni_pro]

Ulterasonic and 8051_Help me

با سلام و معذت بسیار از شما
من برنامه سنسور را نوشته ام
و سخت افزار آن را هم بسته ام با 8051 من در نقشه زیرهمان طور که گفتم به جایpic 8051 گذاشتم و نمی دانم پا یه های ccpi که در pic است با چه پا یه ای از 8051 وصل کنم و البته من شنیده ام که 8051 قابلیت ccpi ندارد ولی نمی توان از یک ای سی ویا هر چیز دیگری که همان کارپایه ی ccpi در pic را می کند استفاد کرد . به 8051 وصل کر
د
(شکل مدار با pic

http://i12.tinypic.com/4hkvyfq.gif

$sim
$large
'IN THE NAME OF GOD
'--------------------------
'CONFIGURE STATEMENT-------
$regfile = "reg51.dat"
$crystal = 12000000
Enable Timer0
Enable Timer1
Config Lcd = 16 * 2
Config Lcdbus = 4
Config Timer0 = Counter , Mode = 1 , Gate = Internal
Config Timer1 = Counter , Mode = 1 , Gate = Internal
On Timer0 F_time0 'for wave 40 khz 'f
On Timer1 F_time1
Dim T_resault As Word
Dim X As Word
'SAVEs time of timer0 and 1
Dim Ix_t0 As Word
Dim Ix_t1 As Word
Dim T0 As Word
Dim T1 As Word
Dim T0_timer As Word 'save time timer0
Dim T1_timer As Word 'save time timer1
'SETINGs and load OF TIMER----------

Th0 = &HF4 'for create wave 40 khz
Tl0 = &H43

Th1 = &HB8
Tl1 = &HFA
'SETTING OF LCD-------------
Cls
Cursor Off
Lcd "HI"
Wait 1
Cls
Lcd "PROJECT RANGE"
Lowerline
Lcd "METER WITH 8051"
Wait 2
Cls
'MAIN PROGRAM--------------
Do
Gosub F_recive
Delay
T_resault = T0 - T1
X = T_resault * 330
Cls
Lcd "RANGE:" ; X
Wait 1
Loop
F_recive:
T0 = Counter0
Stop Counter0
Waitms 10
If P2.6 = 1 Then
T1 = Counter1
Stop Counter1
Start Counter1
Start Counter0
Else
nop
End If
Return



'ROUTINEs TIMERS------------------
F_time0:
$asm 'send pules to sensor transmiter
cpl p2.7
$end Asm

Return
F_time1:
Incr Ix_t1
T1_timer = Ix_t1
If Ix_t1 = 47354 Then
Ix_t1 = 0
End If
Return
End



راستی در مداری که من فرستادم برای وصل سنسور به 8051 نمی خواد هی سی های 833 و 358و ...
رو بردارم و ای سی دیگه بزارم

[رضا حاجي زاده]

Ulterasonic and 8051_Help me

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

[رضا حاجي زاده]

Re: book

راستش رو بخواین مهندس جان
این برنامه رو من به زبان bascom 8051 یعنی بیسیک نوشتم در ضمن من یک کتاب تهیه کردم که توش این مداری که برای شما فرستادم است ولی با pic و همین طور که گفتم pic یاد ندارم و اگر انجام بدم امکان داره استادم سوالی بکنه و

:? :twisted: :twisted: :? :? :? :? :cry: :cry: :cry:
بقیه رو خودتون می تونید حدس بزنید
راستی این پروژه پاایان ترم من است

با سلام تا جائیکه نم یادمه این پروژه تو اینترنته تو توی کتاب
شما اگه می خوای استاد نفهمه بهتره همه چی رو خودت طراحی بکنی
این برای بارصدمه که خدمتتون عرض می کنم
مو فق باشی :cry: :shock:

[hd_uni_pro]

ok

:neutral:سلام
lمدار افا رضا که در سایت است نام ای سی atl074 نام کاملش چیست البته من به جاش 833 و 358 گذاشتم.