Led Berkedip Bascom Avr

Tutorial kali ini sangat sederhana, apalagi bagi para master programmer akan tetapi tidak bagi para pemula seperti saya mungkin dibutuhkan sekali dasar dasar pemprograman, berikut ini contoh sederhana membuat led berkedip dengan compiler bascom avr.

$regfile = "m32def.dat"

$crystal = 12000000

Config Portc = Output

Portc = 0

Do

Set Portc.0

Waitms 100

Reset Portc.0

Waitms 100

Loop

End

Alur program diatas yaitu pertama sebelum sebuah port diberi keluaran terlebih dahulu saya beri logika 0 pada portc, fungsinya yaitu mematikan semua port. Setelah semua port saya kondisikan dalam keadaan mati untuk menghidupkan portc atau khususnya portc.0 saya berikan perintah set portc.0, setelah itu saya beri jeda dengan menggunakan perintah waitms 100 yang artinya jeda sekitar 100 mili detik, tapi biasanya jeda tidak sesuai dengan waktu sebenarnya karena untuk meberikan jeda waktu yang pas harus terlebih dahulu menghitung clock yang dipergunakan, saya menggunakan clock/crystal dengan nilai 12000000 alias 12 Mhz. semoga tutorial ini membantu teman-teman semuanya, mohon maaf jika tulisan saya berantakan, masih dalam tahap belajar, harap dimaklumi. Gambar dibawah ini hasil simulasi menggunakan proteus.