lcd kayan yazı devresi

[cpax]

Arkadaşlar elektroniğe yeni başladımda bana lcd li kayan yazı devresi var sa gönderirmisiniz arkadaşlar.pic16f84a ile çalıştırabileceğim veya pic16f877ileolabilirmi.





                                   Şimdiden gösterdiğiniz ilgiden teşekkürler.

[bayramonur]

Forumu incelersen bu iş hakkında fikir sahibi olacak bilgi var gerisi senin tasarım kabiliyetine bağlı ki yapacağın program başlangıç seviyesinde.

http://picproje.org/index.php/topic,6913

http://picproje.org/index.php/topic,6861

Eğer burdaki gibi CCS kullanıyorsan LCD'yi LCD.C dosyasındaki yazdığı şekilde bağlamalısın.4 bit üzerinden haberleşme yapıyorsun.Normaldeki ayarlar bu şekilde:
                                               
//     D0  enable                                
//     D1  rs                                        
//     D2  rw                                      
//     D4  D4                                      
//     D5  D5                                        
//     D6  D6                                        
//     D7  D7                                          
Ama oradaki
// #define use_portb_lcd TRUE
satırını aktif edersen LCD'yi portb'ye bağlayabilirsin.

Ayrıca LCD'de kontrast ayarı yapman lazım bunun için pot gerekli.Yada bir voltaj bölücü direnç ikilisi.

[stlg]

Sevgili cpax
Arkadasım LCD ile kayan yazı devresi konusunda bir uyarıda bulunmak istiyorum normal led turu seklindeki kayan yazılar gibi yazıyı kaydırman
mumkun olmaz cunku lcd lerde kaydırma karakter bazında yapılır normal kayan yazılarda ise nokta nokta kaydırma yapabilirsin yani lcd ile yapacagın kayan yazıda kesik kesik bir calısma olacaktır ve goze hosgorunmeyecektir kolay gelsin

          ALLAHA EMANET OLUNUZ

[cpax]

Yardımalarınız için çok sağol un.çalışmalarınız da başarılar.

[seco06]

DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTA
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTA
DEFINE LCD_EBIT 1
DEFINE LCD_RWREG PORTA
DEFINE LCD_RWBIT 2


LCDOUT $FE,$60,$04,$0E,$04,$04,$04,$04,$0e,$00
lcdout $fe,1
pause 100
kay var byte

Lcdkol con 16
lcds con 28
For kay=0 to lcds
pause 10
LcdOut $FE,$c90,REp " "\-kay,"sebahattin erarslan"
pause 200
next kay
pause 500
for kay=0 to Lcdkol
next kay

bu sana bir örnek olabilir