WELCOME TO MY BLOG

LCD DENGAN BASCOM AVR






1. Rangkaian Simulasi [kembali]

Prinsip Kerja:
Rangkaian tersusun dari mikrokontroller ATMEGA8535, KEYPAD dan LCD. KEYPAD dihubungkan pada port D (DO-D6), dan LCD dihubungkan pada port A (A0-A7.untuk memulai program silahkan tekan tombol play pada pojok kiri bawah. setelah itu masukkan program dan tunggu program dikompailer. Sebelum memulai silahkan tombol reset. setelah itu apabila keypad tombol 1 ditekan maka LCD akan mencetak tulisan "LABORATORIUM ELDI".

2. Listing Program [kembali]

$regfile =
"m8535.dat"                       'Library
untuk ATmega 8535
$crystal = 16000000                           'Setting
crystal yang digunakan
Config Lcdpin = Pin ,
Rs = PORTA.4 , E = PORTA.7 , Db4 = PORTA.0               'Setting LCD
Config Lcdpin = Pin ,
Db5 = PORTA.1 , Db6 = PORTA.2 , Db7 = PORTA.3       'Setting
LCD
Config Lcd = 16 * 2                           'Tipe
LCD yang digunakan    
DDRD = &B1110000                        'Konfigurasi
keypad
PORTD = &B11111111                     'PORTD aktif high
DDRA = &B11111111                      'PORTA sebagai output
Do                                                       'Lakukan perulangan
   PORTD = &B1101111                    'Aktif saat ditekan angka 1,4,7 dan *
   Waitms 10                                        'Delay selama 10 ms
   If PIND.0 = 0 Then                         'Jika
PIND.0 aktif low
   Cls                                                    'Reset LCD
   Lcd "LABORATORIUM"              'Cetak tulisan pada LCD
   Lowerline                                         'Baris bawah LCD

   Lcd "ELDI"                                     'Cetak
tulisan pada LCD
   Waitms 50                                        'Delay selama 50 ms

   Elseif PIND.1 = 0 Then                   'Jika
tidak PIND.1 aktif low maka
    Waitms 10                                       'Delay selama 10 ms
   Cls                                                    'Reset LCD
   Lcd "PRAKTIKUM MIKRO"        'Cetak tulisan pada LCD
   Lowerline                                         'Baris bawah LCD
   Lcd "SEMANGAT"                                    'Cetak tulisan pada LCD
   Waitms 50                                        'Delay selama 50 ms
   End If                                              'Akhir kondisi
Loop                                                    'Perulangan program
End                                                     'Akhir




3. Link Download [kembali]

File HTML - Download
File Proteus - Download

File Program - Download

Video Rangkaian - Download

0 komentar:

Posting Komentar

www.lowongankerjababysitter.com www.lowongankerjapembanturumahtangga.com www.lowonganperawatlansia.com www.lowonganperawatlansia.com www.yayasanperawatlansia.com www.penyalurpembanturumahtanggaku.com www.bajubatikmodernku.com www.bestdaytradingstrategyy.com www.paketpernikahanmurahjakarta.com www.paketweddingorganizerjakarta.com www.undanganpernikahanunikmurah.com