Bascom AVR
Tampilkan postingan dengan label Bascom AVR. Tampilkan semua postingan

Bascom AVR Vol.2


Bascom AVR merupakan salah satu compiler dari mikrokontroller. Contoh dari mikrokontroller yang bisa diprogram dengan Bascom AVR ini adalah mikroprosesor dari keluarga ATMEGA, seperti ATmega16, ATmega 128 dan lain lain.

Berikut contoh simulasi mengenai alikasi dari mikrokontroller ATmega 16 dengan compiler Bascom AVR:

Mengaktifkan Led meggunakan tombol (push button)
a. Listing program
'--------------------------------------
'Mengaktifkan LED Menggunakan Tombol
'--------------------------------------
$regfile = "m16def.dat"
'Jika menggunakan ATMega8535 maka diganti dengan "m8535.dat"
$crystal = 12000000
'------------------------ Konfigurasi
Ddra = &B11111111                                           'Port A dijadikan sebagai output (nilainya "1")
Ddrc = &B00000000                                           'Port B dijadikan sebagai input
Portc = &B00000000                                          'Resistor PULL-UP internal mikrokontroler DIAKTIFKAN
'------------------------
Do
   If Pinc.0 = 1 Then
      Porta = &B00000001


   Elseif Pinc.1 = 1 Then
      Porta = &B00000010


   Elseif Pinc.2 = 1 Then
      Porta = &B00000100


   Elseif Pinc.3 = 1 Then
      Porta = &B00001000


   Elseif Pinc.4 = 1 Then
      Porta = &B00010000


   Elseif Pinc.5 = 1 Then
      Porta = &B00100000


   Elseif Pinc.6 = 1 Then
      Porta = &B01000000


   Elseif Pinc.7 = 1 Then
      Porta = &B10000000
   End If

Loop
'------------------------ end

b. Contoh rangkaian


Bascom AVR

Bascom AVR merupakan salah satu compiler dari mikrokontroller. Contoh dari mikrokontroller yang bisa diprogram dengan Bascom AVR ini adalah mikroprosesor dari keluarga ATMEGA, seperti ATmega16, ATmega 128 dan lain lain.

Berikut contoh simulasi mengenai alikasi dari mikrokontroller ATmega 16 dengan compiler Bascom AVR:

1. Running Led
 a. Listing program
      '------------------------------------------
'Mengaktifkan LED Tanpa Menggunakan Tombol
'------------------------------------------
$regfile = "m16def.dat"
'Jika menggunakan ATMega8535 maka diganti dengan "m8535.dat"
$crystal = 12000000
'------------------------ Konfigurasi
Ddra = &B11111111                                           'Port A dijadikan sebagai output (nilainya "1")
'------------------------
Do
   Porta = &H00                                             'Jika nilainya "0" maka LED hidup (MSB-LSB)
      Waitms 1000
  ' Porta = &B00000010
   '   Waitms 100
   'Porta = &H04
    '  Waitms 100
  ' Porta = &H08
     ' Waitms 100
   'Porta = &H10
   '   Waitms 100
  ' Porta = &H20
  '    Waitms 100
  ' Porta = &H40
   '   Waitms 100
   'Porta = &H80
    '  Waitms 100
Loop
'------------------------ end
b. Contoh rangkaian 


Sekian untuk pertemuah hari ini, next time akan di tambah lagi aplikasinya
Langganan: Postingan (Atom)