WONDERFUL RUNNING LED WITH ATMEGA8535

Dengan menyempatkan sedikit waktu luang yang saya miliki akhirnya selesai juga iseng project saya yang kali ini saya beri nama Wonderful Running Led With Atmega8535. Awalnya saya tertarik untuk belajar mikrokontroler khususnya belajar pemrograman BASCOM AVR.

Wonderful Running LED

Mengapa saya menggunakan chip ATMEGA8535 itu karena selain banyak di pasaran, IC ini juga memiliki fitur yang cukup kompleks sehingga akan mudah diaplikasikan ke dalam bentuk pengontrolan yang lain. Untuk lebih jelasnya mengenai ATMEGA8535 bisa download datasheetnya di sini.

Sebagai langkah awal pembelajaran, saya aplikasikan mikrokontroler ATMEGA8535 sebagai pengendali running led yang diprogram dengan software BASCOM AVR.

Pemrograman dengan BASCOM AVR

LED akan secara bergantian hidup dan mati sesuai dengan instruksi program yang tersimpan dalam chip mikrokontroler. Dengan bahasa pemrograman basic kita menggunakan istilah pengondisian DO - IF - THEN - END - IF - LOOP.

Berikut contoh programnya:

$regfile = "m8535dat"

$crystal = 11059200

config portb = input

config porta = output

config portc = output

sw1 Alias PORTB.1
LED Alias PORTC
 
Ddrb = &B00000000
PORTC = &B11111111
'--------------------------------

Do

If sw1 = 0 then

waitms 50
LED = &B00000000
waitms 20
LED = &B11111111
waitms 50
LED = &B00000000
waitms 20
LED = &B11111111
waitms 50
LED = &B00000000
waitms 20
LED = &B11111111
waitms 50
LED = &B00000000
waitms 20
LED = &B11111111
waitms 50
'---------------------------------- 

LED = &B11111110

waitms 10

LED = &B11111101

waitms 10

LED = &B11111011

waitms 10

LED = &B11110111

waitms 10

LED = &B11101111

waitms 10

LED = &B11011111

waitms 10

LED = &B10111111

waitms 10

LED = &B01111111

'------------------------------------- 1

waitms 10

LED = &B01111110

waitms 10

LED = &B01111101

waitms 10

LED = &B01111011

waitms 10

LED = &B01110111

waitms 10

LED = &B01101111

waitms 10

LED = &B01011111

waitms 10

LED = &B00111111

'------------------------------ 2

waitms 10

LED = &B00111110

waitms 10

LED = &B00111101

waitms 10

LED = &B00111011

waitms 10

LED = &B00110111

waitms 10

LED = &B00101111

waitms 10

LED = &B00011111

'------------------------------- 3

waitms 10

LED = &B00011110

waitms 10

LED = &B00011101

waitms 10

LED = &B00011011

waitms 10

LED = &B00010111

waitms 10

LED = &B00001111

'----------------------------------- 4

waitms 10

LED = &B00001110

waitms 10

LED = &B00001101

waitms 10

LED = &B00001011

waitms 10

LED = &B00000111

'---------------------------------- 5

waitms 10

LED = &B00000110

waitms 10

LED = &B00000101

waitms 10

LED = &B00000011

'---------------------------------- 6

waitms 10

LED = &B00000010

waitms 10

LED = &B00000000

'--------------------------------- 7
waitms 30
LED = &B11100111
waitms 10
LED = &B11000011
waitms 10
LED = &B10000001
waitms 10
LED = &B00000000
waitms 10
LED = &B10000001
waitms 10
LED = &B11000011
waitms 10
LED = &B11100111
waitms 10
LED = &B11111111
'---------------------------------
waitms 30
LED = &B11100111
waitms 10
LED = &B11000011
waitms 10
LED = &B10000001
waitms 10
LED = &B00000000
waitms 10
LED = &B10000001
waitms 10
LED = &B11000011
waitms 10
LED = &B11100111
waitms 10
LED = &B11111111
'--------------------------------
waitms 30
LED = &B11100111
waitms 10
LED = &B11000011
waitms 10
LED = &B10000001
waitms 10
LED = &B00000000
waitms 10
LED = &B10000001
waitms 10
LED = &B11000011
waitms 10
LED = &B11100111
waitms 10
LED = &B11111111
End If
Loop     

Videonya dapat dilihat dibawah ini:

Program kendali hidup mati LED dapat diubah sesuai yang temen-temen inginkan. Caranya dengan mengubah kode biner pada port C. Bagi yang penasaran, selamat mencoba...!!!