سوال در مورد تایمر ها در avr

[bambio]

با سلام
من تایمر صفرو تو پروتئوس پیکره بندی کردم ولی همیشه مقدار صفرو به من میده مشکل چیه ممنون میشم راهنمایی کنید
اینم برناممه خیییییییییییییییییییییییییییییییییییییییییییلی فوریه
$regfile = "m32def.dat"
$crystal = 8000000
'----------------------------------------------------------------------------
Config Porta = Output
Config Portb = Input
Config Timer0 = Timer , Prescale = 8
Enable Interrupts
Enable Timer0
Enable Ovf0
On Ovf0 Times
'--------------------------------------
Dim A As Long
Dim Count As Long
'--------------------------------------
Stop Timer0
Start Timer0
Waitms 1
A = Tcnt0
End 'end program

[hamed_online62]

پاسخ : سوال در مورد تایمر ها در avr

روتین وقفه رو کجا نوشتی؟
برنامه چرا یه حلقه نداره؟ این طوری بلافاصله به انتها میرسه.
مقدار اولیه برای Timer0 رو تعیین کن.
حتما به Sample خود نرم افزار یه نگاه بنداز. Help رو هم فراموش نکن.

[hamed_online62]

پاسخ : سوال در مورد تایمر ها در avr

این برنامه رو امتحان کن:

$regfile = "m32def.dat"
$crystal = 8000000
'-----------------------------------------------------------------------------
Config Timer0 = Timer , Prescale = 8
Config Portb = Output
Enable Timer0
Enable Interrupts
Stop Timer0
On Ovf0 Adding
Dim X As Word
Timer0 = 156
Start Timer0
Do
If X >= 100 Then
Toggle Portb.5
X = 0
End If
Loop

End

Adding:
Stop Timer0
Portb.4=1
Incr X
Timer0=156
Start Timer0
Return

[bambio]

پاسخ : سوال در مورد تایمر ها در avr

حامد جان اینم جواب نمیده تو پروتئوس لازم نیس کار خاصی بکنم

[hamed_online62]

پاسخ : سوال در مورد تایمر ها در avr

ببخشید. چون از برنامه ای که دادی کپی کردم یادم رفت PORB رو خروجی تعریف کنم. اونو اصلاح کن/
منم ویرایش می کنم پست بالا رو

[bambio]

پاسخ : سوال در مورد تایمر ها در avr

حامد جان اینو خودم تو برنامه درس کردم ولی بازم جواب نمیده نمیدونم مشکل از کجاس
ولی به هر حال ممنونم که وقت گذاشتین و مطالعه کردین و راهنمائیم کردین : :applause: :nerd: :nice: :rolleyes:

[hamed_online62]

پاسخ : سوال در مورد تایمر ها در avr

من هر چی نگاه می کنم برنامه ایرادی نداره. یه بار دیگه همه مراحلو تکرار کن.
باید جواب بگیری :nice:

[bambio]

پاسخ : سوال در مورد تایمر ها در avr

متاسفانه بازم جواب نداد تو حلقه do loop میمونه واسه راه اندازی تایمر نباید کار خاصی بکنم
:angry: oo: :cry2: :cry: :sad: :angry: :angry: :angry:

[hamed_online62]

پاسخ : سوال در مورد تایمر ها در avr

مقادیر رو تو برنامه تغییر دادم.
ببین این یکی اجرا میشه یا نه.
باید هر 100 میلی ثانیه پایه B.5 خاموش - روشن بشه.
با رفتن برنامه به روتین وقفه ( برای بار اول) پایه B.4 یک میشه.

[yek_doost]

پاسخ : سوال در مورد تایمر ها در avr

من در مورد VB نمی تونم کمک کنم ولی تو code vision و به زبان C خیلی راحته.