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
Tidak ada komentar:
Posting Komentar
Silahkan berkomentar !