کمک در مورد adc

[sia541]

سلام
خسته نباشید
سوالی داشتم در مورد اینکه من میخوام که adc نمونه برداری کنه بمدت x ثانیه و بعد بیشترین مقدار ولتاژ خوانده شده توسط را در متغییری جا گذاری کنه چطوری عمل کنم در بسکام
ممنون

[baby_1]

پاسخ : کمک در مورد adc

سلام

$regfile = "m32def.dat"
$crystal = 1000000
'====================
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Timer0 = Timer , Prescale = 1024
Config Int0 = Low Level
'===================
Dim W As Word
Dim W1 As Word

Dim T As Integer
Dim T1 As Integer

Enable Interrupts
Enable Timer0
On Ovf0 Label
Start Timer0
'====================
T = 1
T1 = 1 * 4

Do

W1 = Getadc(0)
If W1 > W Then W = W1
Waitus 20

Loop


End
'=====================
Label:
Incr T
If T > T1 Then
Print "Max Value:" ; W
T = 1
End If

Return

در عبارت T1 = 1 * 4
به جای عدد یک که بیانگر یه ثانیه هست تعداد ثانیه هاتون رو بزارین فقط روی باشه که از حجم integer تجاوز نکنه مثل برای 3 ثانیه داریم
T1 = 3 * 4

مقدار متغییر w مقدار ماکزیمم خونده شده از پورت A0 هست

بچه های کنترل هم باید میکرو بخونن؟ برای پروژه کارشناسی هست یا کلاس میکرو و ...؟

[sia541]

پاسخ : کمک در مورد adc

خیلی ممنون از کمک و راهنمایی :smile:
بله میکرو هم میخونیم جز دروس تخصصی هستش
واسه پروژه دانشکاهه
بازم ممنون :nice: