Notes

// LCD Bağlantı Ayarları
sbit LCD_RS at LATB4_bit;
sbit LCD_EN at LATB5_bit;
sbit LCD_D4 at LATB0_bit;
sbit LCD_D5 at LATB1_bit;
sbit LCD_D6 at LATB2_bit;
sbit LCD_D7 at LATB3_bit;

sbit LCD_RS_Direction at TRISB4_bit;
sbit LCD_EN_Direction at TRISB5_bit;
sbit LCD_D4_Direction at TRISB0_bit;
sbit LCD_D5_Direction at TRISB1_bit;
sbit LCD_D6_Direction at TRISB2_bit;
sbit LCD_D7_Direction at TRISB3_bit;

char i;

void main() {

ANSELB = 0x00; // PortB dijital yapılmalı (18F45K22 için şart)

Lcd_Init(); // LCD başlat
Lcd_Cmd(_LCD_CLEAR); // LCD temizle
Lcd_Cmd(_LCD_CURSOR_OFF); // İmleci kapat

Lcd_Out(1, 3, "Beti Bilisim"); // Yazı yaz

delay_ms(2000);

// Yazıyı sola kaydır 2 kez
for(i = 0; i < 2; i++) {
Lcd_Cmd(_LCD_SHIFT_LEFT);
delay_ms(600);
}

// Sonsuz döngü → sağa kaydırma
while(1) {
for(i = 0; i < 4; i++) {
Lcd_Cmd(_LCD_SHIFT_RIGHT);
delay_ms(200);
}
for(i = 0; i < 4; i++) // ekrandaki yazı 4 kere sola kaydırılır.
{
Lcd_Cmd(_LCD_SHIFT_LEFT);
delay_ms(400);
}
}
}