PIC 16F877 ile 2x16 LCD sürülmüştür. Devredeki PIC 16F84 ile de yapabilirsiniz. Tek farkı picbasic programında hex dosya yaparken bu PIC'i seçmeniz yeterli olacaktır.
PIC ile LCD uygulamaları için gerekli devre şemasıdır.
' Programın Adı : 2x16 LCD'nin 1. ve 2. satırına yazı yazma
DEFINE LCD_DREG PORTD
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTD
DEFINE LCD_RSBIT 2
DEFINE LCD_EREG PORTD
DEFINE LCD_EBIT 3
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
MAIN:
LCDOUT $FE,1
LCDOUT " DIKMEN AML, TL "
LCDOUT $FE,$C0
LCDOUT " EML VE MEM"
GOSUB GECIKME
GOTO MAIN
END
GECIKME :
PAUSE 1000
RETURN
' Programın Adı : 2x16 LCD'de 0-99 ileri-geri sayıcı yapımı
DEFINE LCD_DREG PORTD
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTD
DEFINE LCD_RSBIT 2
DEFINE LCD_EREG PORTD
DEFINE LCD_EBIT 3
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
SAY VAR BYTE
ADCON1 = 7
SAY=0
ANA_PROGRAM :
IF PORTA.0=0 THEN
SAY=SAY+1
ENDIF
IF PORTA.1=0 THEN
SAY=SAY-1
ENDIF
LCDOUT $FE,1
LCDOUT "SAYI =", DEC2 SAY
GOSUB GECIKME
GOTO ANA_PROGRAM
END
GECIKME :
PAUSE 200
RETURN
|