Aplikasi Tombol pada ATMega8535 Menggunakan Bahasa BASCOM AVR

Pada aplikasi ini saya menggunakan 2 jenis tombol yang berbeda. Pertama menggunakan Tombol Push Button, sedangkan yang kedua menggunakan Tombol Toggle. Maka disini saya membuat 2 buah contoh program untuk masing-masing jenis tombol.

Tombol Push Button.

Pada program pertama, saya menggunakan tombol push button sebagai masukan melalui PortC, dengan indikator yang ditunjukan pada 7Segment di PortA. Jika tombol tidak ditekan, maka data akan terbaca sebagai Low (0), Jika tombol ditekan maka data akan terbaca High (1). Maka untuk dapat membedakan pembacaan tombol pada saat ditekan atau tidak, saya menghubungkan tombol push button dengan Vcc +5 Volt DC. 

Gambar Rangkaian Aplikasi Tombol

Contoh Program 1

’Program Baca Masukan Tombol Push Button

  1 $regfile = "m8535.dat"
  2 $crystal = 4000000
  3 Config Porta = Output
  4 Config Portd = Output
  5 Config Portb = Input
  6 Config Portc = Input
  7 
  8 Do
  9 Select Case Pinc
 10 Case 1 : Porta = 1
 11 Case 2 : Porta = 2
 12 Case 4 : Porta = 3
 13 Case 8 : Porta = 4
 14 Case 16 : Porta = 5
 15 Case 32 : Porta = 6
 16 Case 64 : Porta = 7
 17 Case 128 : Porta = 8
 18 
 19 'Case Else : Porta = 0
 20 End Select
 21 Waitms 1
 22 Loop
 23 End 

Tombol Toggle.

Pada program kedua, saya menggunakan tombol toggle (On/Off) sebagai masukan melalui PortB dan menggunakan indikator keluaran LED melalui PortD. Program yang digunakan sangat sederhana seperti contoh program dibawah ini.

Contoh Program 2 ’Program Baca Masukan Tombol Toggle

  1 $regfile = "m8535.dat"
  2 $crystal = 4000000
  3 Config PortD = Output
  4 Config PortB = Input
  5 
  6 Do
  7 PortD=PinB
  8 Loop
  9 End