پروژه رقص نور با LED , AVR-ATMEGA8به زبان بیسیک
این پروژه با میکرو کترلر avr_atmega8طراحی و به زبان بیسیک برنامه ریزی شده است .
این پروژه دارای 16 led است (البته 8 تاled استفاده شده است) که 4 تا سفید و 4 تا قرمز که شما می توانید به سلیقه خودت هر رنگی که دوست داری استفاده کنید....... که جمعش بشه 16 تا led یعنی دو تا از پورت های atmega8 \پورت d و پورتb

خب بریم ببینیم برنامه میکرو چیه:
'www.bargh-elk.blogfa.com
'sajjadforghany
$regfile = "m8def.dat"
$crystal = 111000
config portd = output
config portb = output
dim i as long
do
for i = 0 to 819
portd = lookup(i , sajjad)
portb = lookup(i , sajjad)
waitms 300
next i
loop
end 'end program
sajjjad:
data &b01111111
data &b10111111
data &b11011111
data &b11101111
data &b11110111
data &b11111011
data &b11111101
data &b11111110
data &b01111111
data &b10111111
data &b11011111
data &b11101111
data &b11110111
data &b11111011
data &b11111101
data &b11111110
data &b01111111..........................
خب خط ۱ و ۲ که معلومه اسم وبلاگم و اسم خودم
خط دوم معرفی ایسی (atmega8)
خط سوم بیانگر فرکانس کار میکرو است.(این جا دوست داشتم این فرکانس رابدم 111000 البته هرچی فرکانس بیشتر باشه سرعت کار آیسی بیشتر میشه)
خط چهارم و پنجم پورت d,b را به عنوان خروجی قرار دادم(همون 16 تا led)
خط ششم متغیری به نام(i)معرفی کردم
خط هفتم معنیش همون انجام بده خودمونه(دیگه معلومه)
خط هشتم اومدم گفتم متغیر (i) را به اندازه 0 تا 819 حرکت بده(شیفت بده)
خط 9 و10 که بیانگر متغیر (i)است و به متن دیتا دقت کن(به جای متن دیتا من نوشتم sajjad)
خط 11 ایجاد تاخیر 300 میکرو ثانیه
خط 12 ادامه و کامل کننده خط 11 است
خط 12 و 13 ایجاد حلقه و اتمام برنامه است
و ادامش هم که همون دیتا کد است که می توانید به سلیقه و علاقه خود تغییر دهید.
فقط همین..... و دیگر هیچ برید حالشو ببرید
ایشلا تغذیه میکرو یادتون نره یعنی پایه7 میکرو به +5 ولت و پایه 8 میکرو به- gnd
بین خروجی میکرو به led حتما مقاومت 330 اهمی قرار دهید تا led هاتون نسوزن
دانلود فایل سورس و نقشه پروتیوس مدار



