Selasa, 10 Juli 2018

MENAMPILKAN KALIMAT PADA LCD 16:2


NAMA  : ADIAN                                 NIM       : 153600049
NAMA  : TEDDY SEPTIAN                NIM       : 153600042

TUJUAN PERCOBAAN
Menampilkan Kalimat pada LCD 16:2 dengan arduino uno, dengan kalimat yang bergerak atau roling

PROGRAM MICROKONTROL

#include <LiquidCrystal.h>
//Variabel untuk mengetahui besarnya perintah yang diterima
int val;
char inDataVB[37];
char dataMasukVB_Text[5];
char dataMasukVB_Baris_1[16];
char dataMasukVB_Baris_2[16];
char scroll = '0';
int Texto_LCD_in;
// Inisialisasi Library Liquid Crystal
LiquidCrystal lcd(7, 6, 5, 4, 3, 2);
// Setting komunikasi serial dan layar LCD

void setup()
{
 Serial.begin(9600);
 pinMode(13, OUTPUT);
 lcd.begin(16, 2); // Mendefinisikan jumlah LCD kolom dan baris:
 lcd.print("LCD Sudah Siap!"); // Menampilkan Pesan ke LCD
}

void loop()
{
  if (Serial.available() > 0)
  {    
    val = Serial.readBytes(inDataVB,38);
    if(inDataVB[0] =='L' && inDataVB[1]=='C' && inDataVB[2] =='D' && inDataVB[3]=='_' && inDataVB[4]=='_')
     {
         lcd.setCursor(0, 0);
          // Menulis baris pertama di LCD Display     
       for (int i=5; i<21;i++)
       {
           lcd.print(inDataVB[i]);
       Serial.print(inDataVB[i]);
           }
            // Menulis baris kedua di LCD Display
           lcd.setCursor(0, 1);
       for (int j=21; j<37;j++)
       {
       lcd.print(inDataVB[j]);
       Serial.print(inDataVB[j]);
       }
     }
       else
       {
       }
    // Hapus semua Tampilan LCD dan data
    if(inDataVB[0] =='L' && inDataVB[1]=='C' && inDataVB[2] =='D' && inDataVB[3]=='_' && inDataVB[4]=='0')
     {
        lcd.clear();
         for (int k=6; k<37;k++)
       {
            inDataVB[k]=' ';
            }
     }
    else
    {
    }
  }
}

Hasil

  


Tidak ada komentar:

Posting Komentar

PERCOBAAN PROGRAM PASCAL DASAR 1

NAMA  : ADIAN                                 NIM       : 153600049 NAMA  : TEDDY SEPTIAN                NIM       : 153600042 Peng...