SIMULASI
LED dan SWITCH menggunakan mikrokontroler ATMega8535 dengan software compiler BASCOM AVR
LED (Light Emitting Diode)
LED merupakan keluarga dari Dioda yang terbuat dari Semikonduktor. LED memiliki dua kutub yaitu kutub Positif (P) dan Kutub Negatif (N). LED hanya akan memancarkan cahaya apabila dialiri tegangan maju (bias forward) dari Anoda menuju ke Katoda.
Berbeda dengan dioda pada umumnya, kemampuan mengalirkan arus pada LED (Light Emitting Dioda) cukup rendah yaitu maksimal 20 mA. Apabila LED (Light Emitting Dioda) dialiri arus lebih besar dari 20 mA maka LED akan rusak, sehingga pada rangkaian LED dipasang sebuah resistor sebgai pembatas arus.
Warna-warna LED
Bahan Semikonduktor
|
Wavelength
|
Warna
|
Gallium Arsenide (GaAs)
|
850-940nm
|
Infra Merah
|
Gallium Arsenide Phosphide (GaAsP)
|
630-660nm
|
Merah
|
Gallium Arsenide Phosphide (GaAsP)
|
605-620nm
|
Jingga
|
Gallium Arsenide Phosphide Nitride (GaAsP:N)
|
585-595nm
|
Kuning
|
Aluminium Gallium Phosphide (AlGaP)
|
550-570nm
|
Hijau
|
Silicon Carbide (SiC)
|
430-505nm
|
Biru
|
Gallium Indium Nitride (GaInN)
|
450nm
|
Putih
|
Tengangan Maju (Forward Bias) LED
Tegangan Maju untuk LED tersebut tergolong rendah sehingga memerlukan sebuah Resistor untuk membatasi Arus dan Tegangannya agar tidak merusak LED yang bersangkutan. Tegangan Maju biasanya dilambangkan dengan tanda VF.
Warna
|
Tegangan Maju @20mA
|
Infra Merah
|
1,2V
|
Merah
|
1,8V
|
Jingga
|
2,0V
|
Kuning
|
2,2V
|
Hijau
|
3,5V
|
Biru
|
3,6V
|
Putih
|
4,0V
|
Kegunaan LED dalam Kehidupan sehari-hari
1. Lampu Penerangan Rumah
2. Lampu Penerangan Jalan
3. Papan Iklan (Advertising)
4. Backlight LCD (TV, Display Handphone, Monitor)
5. Lampu Dekorasi Interior maupun Exterior
6. Lampu Indikator
7. Pemancar Infra Merah pada Remote Control (TV, AC, AV Player)
Switch
Switch adalah sebuah perangkat elektronik yang digunakan untuk memutuskan jaringan listrik atau untuk menghubungkannya. Jadi switch pada dasarnya adalah alat penyambung atau pemutus aliran listrik.
4. Listing Program [kembali]
$regfile = "m8535.dat" 'memanggil library ATmega 8535
$regfile = 16000000 'menentukan nilai crystal ATmega 8535
Config Lcdpin = Pin , Rs = Porta.4 , E = Porta.5 , Db4 = Porta.0 'menentukan pin-pin pada lcd
Config Lcdpin = Pin , Db5 = Porta.1 , Db6 = Porta.2 , Db7 = Porta.3 'menentukan pin-pin pada lcd
Config Lcd = 16 * 2 'menentukan LCD yang digunakan
Config Portb.0 = Input 'PORTB0 sebagai input
Config Portc = Output 'PORTC sebagai ouput
Pinb.0 = 0 'keadaan awal PINB.0 mati
Pinb.1 = 0 'keadaan awal PINB.1 mati
Pinb.2 = 0 'keadaan awal PINB.2 mati
Do 'fungsi utama
If Pinb.0 = 1 Then
Portc = &B00000000 'jika PINB.0 bernilai 1
'PORTC bernilai 0
Waitms 100 'delay 0.1 sekon
Portc = &B11111111 'PORTC berniali 1
Cursor Off 'kursor pada lcd off
Cls 'keadaan awal lcd bersih
Lcd "ON OFF LED" 'pada lcd tertulis on off led
Lowerline 'pada baris 2 lcd
Lcd "LED BLINKING" 'pda lcd tertulis led blinking
Waitms 100 'delay 0.1 sekon
Elseif Pinb.1 = 1 Then
Portc = &B10101010
Waitms 100
Portc = &B01010101
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "LED RUNNING 1"
Waitms 100
Elseif Pinb.2 = 1 Then
Portc = &B00110011
Waitms 100
Portc = &B10011001
Waitms 100
Portc = &B11001100
Waitms 100
Portc = &B01100110
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "LED RUNNING 2"
Waitms 100
Elseif Pinb.3 = 1 Then
Portc = &B10000001
Waitms 100
Portc = &B01000010
Waitms 100
Portc = &B00100100
Waitms 100
Portc = &B00011000
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "LED KE DALAM"
Waitms 100
Else
Portc = &B00000000
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "PEPI & RENO"
Waitms 100
End If
Loop
End
5. Video [kembali]$regfile = 16000000 'menentukan nilai crystal ATmega 8535
Config Lcdpin = Pin , Rs = Porta.4 , E = Porta.5 , Db4 = Porta.0 'menentukan pin-pin pada lcd
Config Lcdpin = Pin , Db5 = Porta.1 , Db6 = Porta.2 , Db7 = Porta.3 'menentukan pin-pin pada lcd
Config Lcd = 16 * 2 'menentukan LCD yang digunakan
Config Portb.0 = Input 'PORTB0 sebagai input
Config Portc = Output 'PORTC sebagai ouput
Pinb.0 = 0 'keadaan awal PINB.0 mati
Pinb.1 = 0 'keadaan awal PINB.1 mati
Pinb.2 = 0 'keadaan awal PINB.2 mati
Do 'fungsi utama
If Pinb.0 = 1 Then
Portc = &B00000000 'jika PINB.0 bernilai 1
'PORTC bernilai 0
Waitms 100 'delay 0.1 sekon
Portc = &B11111111 'PORTC berniali 1
Cursor Off 'kursor pada lcd off
Cls 'keadaan awal lcd bersih
Lcd "ON OFF LED" 'pada lcd tertulis on off led
Lowerline 'pada baris 2 lcd
Lcd "LED BLINKING" 'pda lcd tertulis led blinking
Waitms 100 'delay 0.1 sekon
Elseif Pinb.1 = 1 Then
Portc = &B10101010
Waitms 100
Portc = &B01010101
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "LED RUNNING 1"
Waitms 100
Elseif Pinb.2 = 1 Then
Portc = &B00110011
Waitms 100
Portc = &B10011001
Waitms 100
Portc = &B11001100
Waitms 100
Portc = &B01100110
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "LED RUNNING 2"
Waitms 100
Elseif Pinb.3 = 1 Then
Portc = &B10000001
Waitms 100
Portc = &B01000010
Waitms 100
Portc = &B00100100
Waitms 100
Portc = &B00011000
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "LED KE DALAM"
Waitms 100
Else
Portc = &B00000000
Waitms 100
Cursor Off
Cls
Lcd "ON OFF LED"
Lowerline
Lcd "PEPI & RENO"
Waitms 100
End If
Loop
End







0 komentar:
Posting Komentar