ساخت کورنومتر

[saman1366]

سلام :job: :job:[size=10pt]سلام من میخوام یه کورنومتر بسازم ولی از دستور waitus استفاده نکنم چون این دستور زیاد دقیق نیست اگه کسی کمکم کنه ممنون میشم
سی

[Akbar-Hi]

پاسخ : ساخت کورنومتر

سلام.
شما میتونین از تایمر استفاده کنین. مثلا یه تایمر با زمان 1ms بسازین و بعد با هر بار سر ریز این تایمر به یه متغیر یه واحد اضافه کنه و بعد این متغیر زمان رو بر حسب میلی سانیه تو خودش داره حالا مثلا میتونین بگین وقتی این متغیر به 1000 رسید یه متغیر دیگه رو هم اضافه کنه(به عنوان مثلا ثانیه). فقت به کمی خلاقیت و اشنایی با بخشهای مختلف میکرو نیاز داره تا این کارا رو انجام بدید. :read:

[پشه 007]

پاسخ : ساخت کورنومتر

Timer1 = T
Enable Ovf1
On Ovf1 Ovf1routine
dim t as long
dim times as long
Config Timer1 = Timer , Prescale = 1024
Enable Interrupts
Start Timer1
Timer1 = 0

do
F = A * 65536
F = F + Timer1
Print "f + t is " ; F
times= F / 7812
loop

Ovf1routine:
'Print Timer1
Incr A
Return

با کریستال 8 مگاهرتز شما دقتی تا 9 رقم اعشار دارید

[Ahp_online]

پاسخ : ساخت کورنومتر

سلام :job: :job:[size=10pt]سلام من میخوام یه کورنومتر بسازم ولی از دستور waitus استفاده نکنم چون این دستور زیاد دقیق نیست اگه کسی کمکم کنه ممنون میشم
سی

سلام
دوست عزیز من قبلا این برنامه را برای یکی از کاربران همین سایت نوشتم و این بحث تکراری است ولی خوب می توانی این پروژه همراه با فایل پروتیوس و سورس از وب سایت خودم دانلود کنید:
http://www.hayatieng.com/index.php?option=com_content&view=article& id=67:1389-05-16-20-39-32&catid=44:1389-01-07-20-43-13&Itemid=77
موفق باشید