تایمر ساده

[farzad.sharifi]

سلام دوستان

یک برنامه تایمر می خوام که 20 دقیقه یک رله را وصل کند و دوباره 20 دقیقه قطع شود و دوباره ... و این سیکل همچنان ادامه داشته باشد.

ممنون میشم این برنامه رو در اختیار بنده قرار دهید.
اگه با atmega8 یا atmega32 باشه عالی میشه

[mohsenjooon]

پاسخ : تایمر ساده

سلام دوستان

یک برنامه تایمر می خوام که 20 دقیقه یک رله را وصل کند و دوباره 20 دقیقه قطع شود و دوباره ... و این سیکل همچنان ادامه داشته باشد.

ممنون میشم این برنامه رو در اختیار بنده قرار دهید.
اگه با atmega8 یا atmega32 باشه عالی میشه

سلام دوست عزیز

$regfile = "m32def.dat"
$crystal = 8000000

Config Timer0 = Timer , Prescale = 1024
Config Porta.0 = Output
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portc.4 , Db5 = Portc.5 , Db6 = Portc.6 , Db7 = Portc.7 , E = Portc.0 , Rs = Portc.1
Cls

Dim Mohsen As Byte

'****************
'Gosub Mmc_initialize
'****************

Enable Interrupts
Enable Timer0
Enable Ovf0
On Ovf0 Ovflroutin
Timer0 = 177
Start Timer0

Do

Print Timer0

Loop


Ovflroutin:

Incr Mohsen
If Mohsen = 10 Then Set Porta.0
Timer0 = 177Return

End

عددهای عبارات قرمز برنامه فوق رو تغییر بده تا 20 دقیقه ایجاد بشه .

[farzad.sharifi]

پاسخ : تایمر ساده

سلام دوست عزیز

$regfile = "m32def.dat"
$crystal = 8000000

Config Timer0 = Timer , Prescale = 1024
Config Porta.0 = Output
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portc.4 , Db5 = Portc.5 , Db6 = Portc.6 , Db7 = Portc.7 , E = Portc.0 , Rs = Portc.1
Cls

Dim Mohsen As Byte

'****************
'Gosub Mmc_initialize
'****************

Enable Interrupts
Enable Timer0
Enable Ovf0
On Ovf0 Ovflroutin
Timer0 = 177
Start Timer0

Do

Print Timer0

Loop


Ovflroutin:

Incr Mohsen
If Mohsen = 10 Then Set Porta.0
Timer0 = 177Return

End

عددهای عبارات قرمز برنامه فوق رو تغییر بده تا 20 دقیقه ایجاد بشه .

آقا محسن عزیز میشه hex این برنامه رو برام بزارید. واقعا ممنون

اگه شماتیک برنامه رو هم بگید ممنون میشم . ( یه توضیح هم بدید که ولتاژ خروجی چقدر است ؟ میتونه یه رله رو فعال کنه؟)

با چه ic پروگرم کنم؟

thx a million

[mohsenjooon]

پاسخ : پاسخ : تایمر ساده

آقا محسن عزیز میشه hex این برنامه رو برام بزارید. واقعا ممنون

اگه شماتیک برنامه رو هم بگید ممنون میشم . ( یه توضیح هم بدید که ولتاژ خروجی چقدر است ؟ میتونه یه رله رو فعال کنه؟)

با چه ic پروگرم کنم؟

thx a million

اینم فایل هگزش:

http://rapidshare.com/files/445315528/timer_20.rar

اینم شماتیک:

ولتاژ خروجی هم 5 ولت هست که میتونی با یه ترانزیستور یا بافر تقویتش کنی.

[farzad.sharifi]

پاسخ : پاسخ : تایمر ساده

اینم فایل هگزش:

http://rapidshare.com/files/445315528/timer_20.rar


ولتاژ خروجی هم 5 ولت هست که میتونی با یه ترانزیستور یا بافر تقویتش کنی.

ممنون محسن جان

فقط پسورد می خواد این لینک :sad:

در مورد اون ترانزیستور یا بافر بیشتر توضیح میشه بدید به چه صورت ببندم؟

خیلی ممنون

[mohsenjooon]

پاسخ : پاسخ : تایمر ساده

ممنون محسن جان

فقط پسورد می خواد این لینک :sad:

در مورد اون ترانزیستور یا بافر بیشتر توضیح میشه بدید به چه صورت ببندم؟

خیلی ممنون

این لینکو امتحان کن :
http://www.persiangig.com/pages/download/?dl=http://froshshop.persiangig.com/timer%2020.rar

http://www.4shared.com/file/86wcQFwZ/timer_20.html

[/ftp]
بافر یه آیسی تقویت کننده ولتاژ یا جریانه که یه ورودی داره و یه جروجی تقویت شده ولتاژ.
مثلا میتونید خروجی تایمر در شکل فوق رو به ورودی بافر وصل کنید و در خروجی بافر ولتاژ بالا که مناسب رله هست بگیری . مثل ULN2803
بهتره ولتاژ خروجی میکرو رو بدی به به بیس ترانزیستور و از خروجی ترانزیستور برای تحریک رله استفاده کنی.

[farzad.sharifi]

پاسخ : پاسخ : پاسخ : تایمر ساده

این لینکو امتحان کن :
http://www.persiangig.com/pages/download/?dl=http://froshshop.persiangig.com/timer%2020.rar

http://www.4shared.com/file/86wcQFwZ/timer_20.html

[/ftp]

محسن جان اینها هم پسورد می خواد :sad:
میشه source برنامه رو بذارید فکر کنم یاد گرفتم چطور به hex تبدیل کنم

آقا از اینکه راهنمایی کردی واقعا متشکرم

[mohsenjooon]

پاسخ : پاسخ : پاسخ : تایمر ساده

محسن جان اینها هم پسورد می خواد :sad:
میشه source برنامه رو بذارید فکر کنم یاد گرفتم چطور به hex تبدیل کنم

آقا از اینکه راهنمایی کردی واقعا متشکرم

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

$regfile = "m8def.dat"
$crystal = 8000000

Config Timer2 = Timer , Async = On , Prescale = 128
Config Portb.0 = Output

Dim Mohsen As Word

Enable Interrupts
Enable Timer2
Enable Ovf2
On Ovf2 Ovflroutin
Start Timer2
Timer2 = 0

Do

Loop


Ovflroutin:

Incr Mohsen

If Mohsen = 1200 Then

Set Portb.0

Elseif Mohsen = 2400 Then

Reset Portb.0
Timer2 = 0
Mohsen = 0

End If



Return

End

با تغییر اعداد 1200 ثانیه و 2400 ثانیه میتونی تایم روشن و خاموش بودنتون رو تغییر بدین.
1200 ثانیه یعنی 20دقیقه روشن و 1200-2400 همون تایم خاموشی هست که حتما باید دو برابر تایم روشن بون باشه.

[farzad.sharifi]

پاسخ : پاسخ : پاسخ : پاسخ : تایمر ساده

با تغییر اعداد 1200 ثانیه و 2400 ثانیه میتونی تایم روشن و خاموش بودنتون رو تغییر بدین.
1200 ثانیه یعنی 20دقیقه روشن و 1200-2400 همون تایم خاموشی هست که حتما باید دو برابر تایم روشن بون باشه.

واقغا دمتون گرم محسن جان