اطلاعیه

**mojtaba_led** · 2011-05-10T22:18:57

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

سلام
واسه استراحت وقت زیاده فقط مطالعه ! البته به شرط یادگیری
موفق باشی دوست من!

**khandani** · 2011-05-11T16:31:43

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

:angry: :angry: :angry: :angry:
واااای جواب نمیده
ببینید
با فرکانس 8000000 , prescal=1024 فرکانس تایمر میشه 78125 یا زمان هر پالس میشه 1/78125 که میشه 125 میکرو ثانیه اگر این عدد را در 2000 ضرب کنیم میشه 250 میلی ثانیه که اگر timer1=65536-2000=63536 این زمان (250 میلی ثانیه) میشه زمان سرریز حالا اگه در زیر برنامه بنویسیم
incr a
if a<4 then
incr s
a=0
end if
در این صورت s باید ثانیه رو نشون بده
مگه نه؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
پس چرا نمیشه؟
$regfile = "m16def.dat"
$crystal = 8000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db7 = Portc.7 , Db6 = Portc.6 , Db5 = Portc.5 , _
Db4 = Portc.4 , E = Portc.3 , Rs = Portc.2
Config Timer1 = Timer , Prescale = 1024
Config Pina.0 = Input
Enable Interrupts
Enable timer1
Enable Ovf1
Dim H As Byte
Dim M As Byte
Dim S As Byte
Dim A As Word , D As Byte , Mo As Byte , Key As Byte , K As Byte , I As Byte
H = 0 : A = 0 : M = 0 : S = 0 : D = 0 : Mo = 0
Timer1 = 63536
On Ovf1 Clock
Stop timer1
Start timer1
Cursor Off
Cls
Do
Loop
End
Clock:
Stop timer1
Incr A
If A > 4 Then
Incr S
A = 0
End If
If S > 59 Then
Incr M
S = 0
End If
If M > 59 Then
Incr H
M = 0
End If
If H > 23 Then
Incr D
H = 0
End If
If D > 29 Then
Incr Mo
H = 0
End If
If Mo > 12 Then
H = 0 : A = 0 : M = 0 : S = 0 : D = 0 : Mo = 0
End If
Gosub Show
Start timer1
Return
Show:
If H > 9 Then
Locate 2 , 1
Lcd H ; ":"
Else
Locate 2 , 1
Lcd "0" ; H ; ":"
End If
If M > 9 Then
Locate 2 , 4
Lcd M ; ":"
Else
Locate 2 , 4
Lcd "0" ; M ; ":"
End If
If S > 9 Then
Locate 2 , 7
Lcd S ;
Else
Locate 2 , 7
Lcd "0" ; S ;
End If
If Mo > 9 Then
Locate 2 , 11
Lcd Mo ; ":"
Else
Locate 2 , 11
Lcd "0" ; Mo ; "/"
End If
If D > 10 Then
Locate 2 , 14
Lcd D ;
Else
Locate 2 , 14
Lcd "0" ; D ;
End If
Start Timer1
Return

**mojtaba_led** · 2011-05-12T01:15:58

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

سلام
خسته نباشید
اگه فرمولی رو که من گفتم رو قبول داری بزار طبق اون گام به گام بریم جلو

مقادیر ورودی :
1- Fosc = 8000000
2- Prescale =1024
3- تایمر مورد نظر : تایمر 1 که 16 بیتی هست
خوب فرمول 16 بیتی بود :
Δt = (65536 – X0 )*( Prescale/Fosc)[s]false[/s]
پس طبق فرمول بالا حداکثر زمان رخداد وقفه به ازای X0 = 0 برابر است با : 8.388608 ثانیه ، پس چون زمان بیشتر از یک ثانیه شد می تونیم بدون احتیاج به زمان پایه به وقفه با زمان یک ثانیه برسیم
خوب پس حلا می گیم
Δt = 1
پس طبق فرمول بالا داریم : X0 = 57723.5
همانطور که میبینید مقدار آ‌X0 یک مقدار اعشاری شد این درحالی که ما میتونیم به تایمر فقط یک مقدار صحیح باعلامت مثبت بدیم پس : X0 = 57723 یا X0 =57724
ما میگیریم : X0 = 57723
به این ترتیب وقفه سریز هر 1.000064 ثانیه رخ میده
به این ترتیب برنامه رو بنده به صورت زیر البته با اجازه شما اصلاح می کنم و میریم پروتئوس تست می کنیم
( در ضمن تایمر رو در وقفه خاموش نکنید تا در کار زمان سنجی تاخیر ایجاد نگردد )

کد:

$regfile = &quot;m16def.dat&quot;
$crystal = 8000000
&#039;-------------------------------------------------------
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db7 = Portc.7 , Db6 = Portc.6 , Db5 = Portc.5 , _
Db4 = Portc.4 , E = Portc.3 , Rs = Portc.2
&#039;-------------------------------------------------------
Dim H As Byte , M As Byte , S As Byte
Dim D As Byte , Mo As Byte , Year As word
S = 0 : M = 0 : H = 0 : D = 0 : Mo = 0 : Year = 0
&#039;------------------------------------------------------
Config Pina.0 = Input
&#039;-------------------------------------------------------
Config Timer1 = Timer , Prescale = 1024
Enable Interrupts
Enable timer1
Enable Ovf1
On Ovf1 Clock
Stop Timer1
Timer1 = 57723
Start Timer1
&#039;----------------------
Cursor Off
Cls
&#039;------------------------
Do
Locate 1 , 1
Lcd H ; &quot;:&quot; ; M ; &quot;:&quot; ; S
Locate 2 , 1
Lcd Year ; &quot;/&quot; ; Mo ; &quot;/&quot; ; D
Loop
End
&#039;-----------------------------
Clock:
&#039;----- INITIAL VALUE ---------------
Timer1 = 57723
&#039;-----------SUB RUTIN------------------------
Incr S
If S &gt; 59 Then
Cls
Incr M
S = 0
End If
If M &gt; 59 Then
Incr H
M = 0
End If
If H &gt; 23 Then
Incr D
H = 0
End If
If D &gt; 29 Then
Incr Mo
D = 0
End If
If Mo &gt; 12 Then
Incr Year
Mo = 0
End If
Return

**khandani** · 2011-05-12T22:15:10

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

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

**mojtaba_led** · 2011-05-13T10:27:50

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

سلام

نوشته اصلی توسط khandani

اشکال محاسباتی که نوشته بودم رو بگو.مشکل کارم کجاس؟

خوب به چیزی که نوشتی دقت کن ببین چی نوشتی :

نوشته اصلی توسط khandani

8000000فرکانس , prescal=1024 فرکانس تایمر میشه 78125 یا زمان هر پالس میشه 1/78125 که میشه 125 میکرو ثانیه اگر این عدد را در 2000 ضرب کنیم میشه 250 میلی ثانیه که اگر timer1=65536-2000=63536 این زمان (250 میلی ثانیه) میشه زمان سرریز حالا اگه در زیر برنامه بنویسیم

اولین اشکال : فرکانس تایمر میشه : 7812.5
دومین اشکال : زمان هر پالس میشه : 128 میکرو ثانیه
سومین اشکال : در عدد 2000 ضرب بشه میشه 256 میلی ثانیه ولی ما یک ثانیه می خواهیم پس: 1تقسیم بر 128میکرو میشه : 7812.5 یعنی باید 7812.5 رو بجای 2000 منظور کنیم
اشکال چهارم : اشکال چهارم در محاسبه مقدار اولیه هست خوب طبق فرمول X0 = 65536 - 7812.5 =57723.5 که ما میگریم 57723 به این ترتیب وقفه هر 1.000064 ثانیه رخ میده
موفق باشید

**karimip** · 2011-09-26T15:02:53

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

سلام
ببخشید اینجا دارم سوالمو مطرح میکنم آخه یه تاپیک باز کردم اما فقط یه نفر بهم جواب داد اما هنوز به نتیجه نرسیدم
منم همین مشکل ایشونو دارم
با کریستال 8مگاهرتز میخوام هر 1 ثانیه یه پالس تولید کنم اما با این فرمولی که شما گفتید این عددو در نمیارم
میشه بگید این 2000 از کجااومد؟؟!!!
من باید با کدویژن برنامه شو بنویسم اونجام باید مقادیرو توی OCR1AH , OCR1AL , OCR1BH و OCR1BL بریزم میخوام بدونم چه جوری مقداری که بدست میاد یعنی همون 7812 که نفهمیدم از کجا بدست اومد چه طوری اینو بریزم توی این رجیسترا؟؟؟!!!!
مقدار اولیه تایمرو X0 چه جوری بدست میاریم؟؟؟؟
تروخدااااااا کمک کنید :cry: :cry: :cry:
انقدر جزوه و کتاب خوندم دیگه قاطی کردم همه رو هرکدوم یه جور توضیح داده :sad:

**mojtaba_led** · 2011-09-26T15:41:17

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

نوشته اصلی توسط karimip

سلام
ببخشید اینجا دارم سوالمو مطرح میکنم آخه یه تاپیک باز کردم اما فقط یه نفر بهم جواب داد اما هنوز به نتیجه نرسیدم
منم همین مشکل ایشونو دارم
با کریستال 8مگاهرتز میخوام هر 1 ثانیه یه پالس تولید کنم اما با این فرمولی که شما گفتید این عددو در نمیارم
میشه بگید این 2000 از کجااومد؟؟!!!
من باید با کدویژن برنامه شو بنویسم اونجام باید مقادیرو توی OCR1AH , OCR1AL , OCR1BH و OCR1BL بریزم میخوام بدونم چه جوری مقداری که بدست میاد یعنی همون 7812 که نفهمیدم از کجا بدست اومد چه طوری اینو بریزم توی این رجیسترا؟؟؟!!!!
مقدار اولیه تایمرو X0 چه جوری بدست میاریم؟؟؟؟
تروخدااااااا کمک کنید :cry: :cry: :cry:
انقدر جزوه و کتاب خوندم دیگه قاطی کردم همه رو هرکدوم یه جور توضیح داده :sad:

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

برای تایمرهای 8 بیتی:
Δt = (256 – X0 )*( Prescale/Fosc)
برای تایمرهای 16بیتی:
Δt = (65536 – X0 )*( Prescale/Fosc)
X0 : مقدار اولیه ی تایمر هست
Δt : مدت زمانی که طول میکشه وقفه سرریز رخ بده
برای مثال برای تولید زمان یک ثانیه ، خوب ما برای ایجاد این زمان احتیاج به یک زمان پایه داریم
تا با تکرار اون بتونیم به زمان مورد نظر برسییم
خوب اول برای تایمر 8 بیتی مثل تایمر صفر
فرض کنیم که :
1- fosc = 8000000
2- prescal = 8
خوب اگه دقت کنید ما با این مقادیر حداکثر زمانی که می تونیم داشته باشیم تا یک وقفه سریز تایمر و در
پی آن تغییری در یک متغیر ، 256 میکرو ثانیه هست
بدین ترتیب اگه بخواهیم یک زمان پایه مثلا به مقدار 200 میکرو ثانیه داشته باشیم طبق فرمول مقدار اولیه تایمر
رو 56 قرار می دهیم و هر با که سر ریز رخ داد مقدار اولیه تایمر رو دوباره باید برابر 56 قرار دهید چرا که با هر بار سریز تایمر مقدار اون صفر خواهد شد ، در ضمن تایمر رو در وقفه خاموش هم نکنید و اولین دستور درون وقفه باید همین مقدار اولیه که برابر 56 هست باشه
خوب ما زمان 200 میکرو ثانیه رو حساب کردیم حالا میگیم که هر 1 ثانیه برابر است با 5000 تا 200 میکرو ثانیه
خوب شما می تونید یک متغیر از نوع word رو تعریف کنید و اون رو داخل سریز هر بار 1 واحد افزایش دهید
به این ترتیب با رسیدن اون متغیر به 5000 شما به زمان 1 ثانیه خواهید رسید

به همین راحتی !

نوشتن کدش به زبان سی هم که دیگه کاری نداره فقط در مورد مقدار دهی به تایمر ها اگه اون ها رو بایت به بایت مقدار دهی میکنید حواستون باشه اول باید بالا و بعد بایت پایین رو مقدار دهی کنید !
و در هنگام خوندن تایمر اگه باز دارین بایت به بایت اینکار رو میکنید برعکس اول بایت پایین رو بخونید بعد بایت بالا رو

اگه نتونستید بنویسید کدتون رو بزراید تا یه ادیتی با هم داشته باشیم .

**karimip** · 2011-09-26T15:54:06

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

سلام ممنون از پاسختون یه چیزایی برام روشن شد
این کد برنامه منه که باید با تایمر 1 هر ثانیه یکبار led متصل به پورت C0 چشمک بزنه

#include <stdio.h>
#include <mega16.h>
#include <delay.h>
#define xtal 8000000
interrupt[TIM1_OVF] void timer1_ovf_isr(void)
{
TCCR1A=0x50;
TCCR1B=0x05;
DDRD=0x30;
PORTD=0xFF;
PORTC.0=!(PORTC.0);
delay_us(500);
while(!TIFR&0x04);
TIFR=TIFR|0b00000100;

}
void main(void)
{
DDRD=0x30;
PORTD=0x00;
DDRC=0xFF;
DDRC=0x00;
OCR1AH=0xE1;
OCR1AL=0x7B;
TIMSK=0x04;
interrupt()
#asm("sei&quot

while(1);
}

**mojtaba_led** · 2011-09-26T16:18:22

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

خوب اول یه چیز بگم سعی کنید تا جایی که میتونید توی وقفه هیچ گونه تابعی رو فراخونی نکنید اللخصوص DELAY
مورد بعدی اینکه این یعنی چی :

while(!TIFR&0x04);
TIFR=TIFR|0b00000100;

مورد بعدی اینکه چرا شما همش با این مقایسه کننده کار میکتید آخه نیاز بهش نیست برای اینکار :
مورد سوم اینکه من دقیقا نفهمیدم که دراین چیکار میکنید پس برنامه زیر روببینید داره یه پالس به فرکانس 1 هرتز روی پایه PB0 میکرو ایجاد میکنه :

#include <mega16.h>

// Timer1 overflow interrupt service routine
interrupt [TIM1_OVF] void timer1_ovf_isr(void)
{
/*FOR BASE TIME : 5000us*/
static unsigned char i=0;
TCNT1=0xec78;
if(++i==100)PORTB^=1,i=0;

}

void main(void)
{
DDRB=(1<<DDB0);
TCCR1B=(1<<CS11);
TIMSK=(1<<TOIE1);

// Global enable interrupts
#asm("sei&quot

while (1);
}

**karimip** · 2011-09-26T18:38:57

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

سلام
ببینید من میخوام یه led به پوت PC0 متصل کنم و با استفاده از وقفه تایمر 1 یه برنامه بنویسم که هر ثانیه یکبار این led من چشمک بزنه
اون دو تا خطم برای این نوشتم :
خط while(!TIFR&0x04); یعنی تایمر 1 که روشن شد و شروع به شمارش کرد تاوقتیکه پرچم TOV1 که برای سرزیر تایمر1 هست یک نشده منتظر میمونه و خط TIFR=TIFR|0b00000100; برای اینه که اگر به سرریز رسید با عمل or تصدیق کنه فقط بیت TOV1 یک شده و بقیه بیت هام بدون تغییر باقی موندن.
خوب اگر من بخوام پورت من یک ثانیه روشن و یک ثانیه خاموش باشه و اگر طبق گفته شما نباید از delay استفاده کنم پس چطور بهش بفمونم که روشن و خاموش بشه؟ یعنی اصلا نیازی به delay نیست؟
ببخشید من متوجه نشدم میشه بگید معنی این د تا خط چیه؟
TCNT1=0xec78;
if(++i==100)PORTB^=1,i=0
اون مقداربکه توی TCNT1 ریختید از کجا اومد؟ با همون شرایط fosc=8 و clk/1024 و عدد 65536 این عدد رو بدست آوردین؟
و اون عدد 100 توی حلقه به چه معنیه؟ :eek:

**mojtaba_led** · 2011-09-26T21:32:33

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

ببینید من میخوام یه led به پوت PC0 متصل کنم و با استفاده از وقفه تایمر 1 یه برنامه بنویسم که هر ثانیه یکبار این led من چشمک بزنه

خوب پس شما یک پالس مربعی میخواهید به فرکانس 5. هرتز خوب بیایید با هم محاسبات رو انجام بدیم :
فرضیات :
1. تایمر 16 بیتی مثلا تایمر 1
2. فرکانس اوسیلاتور fosc=8Mhz
3. پرسکالر Prescale=8
4.مد کاری تایمر : در حالت نرمال با مقدار حداکثر 65536که معادل ffff هگزه هست .
5.Δt = یک مقدار مناسب برای ایجاد زمان پایه که بعد از محاسبه بیشترین مقدار Δt تعیین اش میکنیم .
6. زمان مورد نظر برای وقوع اتفاق اصلی : 1 ثانیه
فرمول :

Δt = (65536 – X0 )*( Prescale/Fosc)

حل :

Δt(max): --> X0=0
Δt(max) = (65536 – 0 )*( 8/8M)=65536E-6 s

خوب همونطور که میبینید حداکثر زمانی که میتونیم برای وقوع هر وقفه سریز با نوع فرضیات مسئله داشته باشیم برابر هست با 65536 میکرو ثانیه یا 65.536 میلی ثانیه پس ما مجبوریم که برای ایجاد زمان یک ثانیه یک زمان پایه ایجاد کنیم و با تکرار اون به زمان اصلیمون برسیم

خوب حالا من میام میگم زمان پایم رو 50 میلی ثانیه یا همون 50000 میکرو ثانیه میگیرم (کمتر از 65.536میلی ثانیه)
در این صورت باید یک متغیر در روتین وقفه تعریف کنیم و مقدار اون رو هر بار یک واحد زیاد کنیم تا برسه به مقدار
1 تقسیم بر 50 میلی که میشه 20 که معادل همون 1 ثانیه خودمونه پس دوباره محاسبات رو برای بدست آوردن X0 انجام میدیم :

50000E-6 = (65536 – X0 )*( 8/8E6-) -----> X0=15536=0X3CB0

پس ما باید مقدار اولیه تایمر رو برابر با 15536 قرار دهیم یا به عبارتی بنویسیم : TCNT1=0X3CB0
و البته مستحضر هستید که مقدار تایمر پس از هر بار سرریز برابر با صفر میشه بنابراین میام توی روتین وقفه سرریز تایمر اولین کاری که میکنیم تایمر رو مقدار دهی میکنیم .

نوشتن برنامه :
انجام تنظیمات اولیه :
1. PC0 رو به صورت خروجی تنظیم میکنیم :

DDRC=(1<<DDC0);

2. تنطیمات تایمر :
2-1. اول اینکه تایمر رو روشن میکنیم و پرسکالر و مد اون رو مطابق اونچه در فرضیات گفته شده انتخاب میکنیم ، مطابق اونچه در دیتا شیت میکرو امده باید بیاییم بیت CS11 از رجیستر TCCR1B رو یک کنیم پس مینویسیم :

TCCR1B=(1<<CS11);

2-2. حالا باید وقفه تایمر 1 رو فعال کنیم ، برای اینکار باید طبق دیتا شیت میکرو بیت TOIE1 از رجیستر TIMSK رو یک کنیم پس مینویسیم :

TIMSK=(1<<TOIE1);

3. حالا باید وقفه سراسری رو فعال کنیم برای این منظور باید بیت Iاز رجیستر SREG رو یک کنیم برای اینکار میاییم از دستور اسمبلی SBI استفاده میکنیم پس مینویسیم :

#asm("sei&quot

4. نوشتن روتین وقفه تایمر :
4-1. خوب اول مییایم یک متغیر از نوع یک بایتی و استاتیک تعریف میکنیم تا پس از خروج از وقفه مقدارش تغییر نکنه پس مینویسیم :

static unsigned char i=0;

4-2.حالا باید تایمر رو مقدار دهی کنیم یعنی باید مقدار تایمر رو برابر با 15536 کنیم پس مینویسیم :

TCNT1=0x3CB0;

4-3. حالا باید اون متغیری که در ابتدای روتین تعریف کردیم رو یک واحد افزایش بدیم و همینطور بیاییم چک کنیم که آیا مقدارش برابر با 20 شده یاخیر و اگر شده بود بیاد PC0 رو نات کنه برای این منظور میتونیم باییم بیت صفر رجیستر PORTC رو با یک XOR کنیم همون طور که میدونید هر بیتی که با یک XOR بشه مقدارش نات میشه و هر بیتی که با صفر XOR بشه مقدارش تغییری نمیکنه ؛ پس از نات شدن PC0 باید متغیر رو برابر با صفر کنیم تا آمده شمارش مجدد بشه پس مینویسیم :

if(++i==20)PORTC^=1,i=0;

کار تمومه !
این هم از نتیجه کار :

کد:

#include &lt;mega16.h&gt;

// Timer1 overflow interrupt service routine
interrupt [TIM1_OVF] void timer1_ovf_isr(void)
{
 /*FOR BASE TIME : 5000us*/
   static unsigned char i=0;
   TCNT1=0x3CB0;
   if(++i==20)PORTC^=1,i=0;

}


void main(void)
{
 DDRC=(1&lt;&lt;DDC0);
 TCCR1B=(1&lt;&lt;CS11);
 TIMSK=(1&lt;&lt;TOIE1);

// Global enable interrupts
#asm(&quot;sei&quot;)

while (1);
}

اگه سوالی داشتید من درخدمتم .

**karimip** · 2011-09-26T22:28:49

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

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

**axiom** · 2012-09-01T13:42:19

پاسخ : مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

بیشتر مطالعه کن :cry2:

اطلاعیه

مشکل در تولید یک ثانیه با میکرو(محاسبات فرکانس)

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه