پروژه ای که در این مطلب توسط میکروکنترلر avr و به زبان bascom (بسکام) برای دانلود آماده شده است ، ساعت دیجیتال می باشد.این پروژه با ساعت های طراحی شده دیگر کمی متفاوت است .جذابیت این ساعت به این است که در کنار شمارشگر دیجیتال مانند ساعت های عقربه دار بجای هر ثانیه یک LED گذاشته است ، ربع های ساعت قرمز رنگ و هر 5 ثانیه LED زرد و بقیه ثانیه ها سبز رنگ . می توانید از این پروژه ساده برای اتاق خود استفاده کنید و با هزینه کم صاحب ساعتی دست ساز و زیبا شوید.

اولین کار در برنامه نویسی پروژه ساعت دیجیتال انتخاب نوع میکروکنترلر AVR  میباشد، که با استفاده از دستور  regfile$ آی سی ATMEGA8  انتخاب شده است.

توضیح برنامه پروژه ساعت دیجیتال با میکروکنترلر AVR 

 

خط اول :اولین کار در برنامه نویسی پروژه ساعت دیجیتال انتخاب نوع میکرو است که با استفاده از دستور regfile$ آی سی ATMEGA8  انتخاب شده است.

خط دوم: تنظیم فرکانس داخلی آی سی با دستور crystal$ که مقدار آن  یک مگا هرتز (1MHz) انتخاب شده است.

خط های سوم و چهارم و پنجم : معرفی پین های ورودی به آی سی ATMEGA8

Config Pinb.0 = Input

Config Pinb.1 = Input

Config Pinb.2 = Input

خط های ششم و هفتم و هشتم : برای راحتی کار ، نام پین های ورودی را طبق عملکردشان عوض کردم.

Hour Alias Pinb.0

Mine Alias Pinb.1

Sece Alias Pinb.2

خط نهم :  معرفی یک متغیر از نوع بایت بنام V که این متغیر برای استفاده در حلقه for  ،  next به کار برده شد.

Dim V As Byte

خط دهم : فعال کردن وقفه سراسری آی سی برای استفاده از پروژه ساعت دیجیتال با دستور:

Enable Interrupts

خط یازدهم : استفاده از ساعت پیش فرض بسکام با دستور:

Config Clock = Soft

خط دوازدهم: با این دستور می توانیم یک زمان دلخواه برای شروع به کار ساعت انتخاب کنیم که من ساعت و دقیقه و ثانیه را جهت تنظیم راحت تر روی صفر قرار دادم.

Time$ = “00:00:00”

خط سیزدهم : دستور پاک کردن LCD

CLS

خط های چهاردهم و پانزدهم و شانزدهم :  در این خط می توان هر نامی رو وارد کرد که در هنگام شروع به مدت  3 ثانیه روی LCD به نمایش در می آید و بعد پاک می شود.

Lcd “ostad name”

Wait 3

 خط هفدهم : با استفاده از این دستور خطی که زیر LCD قرار میگرفت را پاک کردم.

Cursor Off

خط های هجدهم و نوزدهم و بیستم :

با استفاده از دستور (declare sub) سه گروه  A ، B و C  را معرفی کردم که هر کدام برای انجام وظیفه ای به کار گرفته شدند.

گروه A: نمایش ساعت بروی LCD

گروه B: تنظیم زمان

گروه C:سرعت افزایش زمان (در تنظیم ساعت)  را بر عهده دارد.

Declare Sub A

Declare Sub B

Declare Sub C

خط های  21 و 22 و 23 و 24 : خط 21 و 24 استفاده از دستور حلقه DO & LOOP است که هر پارامتری که در این میان باشد مدام تکرار می شود. خط 22 و 23 با استفاده از دستور CALL گروه های A و B فراخونی می شوند.

Do

Call A

Call B

Loop

خط های  25 و 26 و 27 و 28 و 29 و 30 :

زیر برنامه ی مربوط به گروه A است که با فرمان Sub A شروع و با فرمان End Sub پایان می پذیرد. که بر روی LCD سطر اول ساعت نشان داده می شود و در سطر دوم (digital clock) را نوشتم.

Sub A

Home

”     ” ; $Lcd “Time:” ; Time

Lowerline

Lcd “<digital clock>”

End Sub

خط سی ویکم برنامه : زیر برنامه گروه B است که برای تنظیم زمان نوشته شده شد.

Sub B

خط های 32 و 33 و 34 و 35 و 36: با استفاده از دستور شرط If & Then مقدار پارامتری ساعت را مشخص کردم و خط 36 پایان شرط است.

If Hour = 1 Then

Incr _hour

If _hour > 23 Then _hour = 0

Call C

End If

خط های 37 و 38 و 39 و 40 و 41 : با استفاده از دستور شرط If & Then مقدار پارامتری دقیقه را مشخص کردم و خط 41 پایان شرط است.

If Mine = 1 Then

Incr _min

If _min > 59 Then _min = 0

Call C

End If

خط های 42 و 43 و 44 و 45 و 46 : با استفاده از دستور شرط If & Then مقدار پارامتری ثانیه را مشخص کردم و خط 46 پایان شرط است.

If Sece = 1 Then

Incr _sec

If _sec > 59 Then _sec = 0

Call C

End If

خط چهل و هفتم : پایان زیر برنامه ی گروه B  است با دستور

End Sub

خط های 48 و 49 و 50 و 51 و 52 : زیر برنامه ی گروه C است و با حلقه ی Next & For سرعت تنظیم ساعت را کنترل می کنیم.

Sub C

For V = 0 To 5

Call A

Next V

End Sub

 خط پنجاه و سوم : پایان برنامه است.

End     ‘end program

در ضمن این ساعت برای اینکه دقیق کار کند باید به آن کریستال اضافه کرد.

شما میتوانید به جای ostad name یا digital clock هر اسمی که دوست دارید در برنامه بسکام قرار داده و کامپایل کنید.

———-w————i——-——-k———–i———

دانلود مستقیم :  دانلود پروژه ساعت دیجیتال با میکروکنترلر AVR

دانلود کمکی :   دانلود پروژه ساعت دیجیتال با میکروکنترلر AVR

رمز عبور فایل : www.wikipower.ir

حجم : 340  KB

اشتراک گذاری شده توسط : ویکی پاور

——-p———o———–w———-e———r———-