pic ile LCD,ye yazı yazdıramıyorum yardım

[inkone]

Merhaba
Benim pic ile sensör devresi yapmam lazım yaptıgım devre aşağıda var fototransistörler iletime geçtiğinde deponun ne kadar dolu oldugunu lcd de göstericek ancak benim sorunum transistörlerle değil pic entegrem Lcd ye yazdıgım bilgiyi göstermiyor ekranda kareler cıkıyor program ve proteus altta yardımcı olursanız inanılmaz sevineceğim bitirme projem sabahtan beri ugrasıyorum
TrisA=%11111
TrisB=0
DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 0
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 5
DEFINE LCD_RWREG PORTB
DEFINE LCD_RWBIT 6
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 7
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
I VAR BYTE
BASLA:
if PORTA=%01111 THEN I=100
if PORTA=%00111 THEN I=75
if PORTA=%00011 THEN I=50
if PORTA=%00001 THEN I=25
if PORTA=%00000 THEN I=0
PAUSE 400
LCDOUT $FE,1
LCDOUT $FE,2,"SILO KAPASITE"
LCDOUT $FE,$C0,"%", dec I,"DOLU"
GOTO BASLA
END

 

[GüvTek]

Devrede kontrast girişi ile besleme girişi ters bağlı..
VDD = +5 volt
VSS = Şase
Vee = Kontrast(mümkünse bu ayaktan + ve - ye birer direnç at)

Basic dilinde nasıldır bilemem ama, LCD kurulumu için uzun beklemeler var.. "Pause 400" komutu bunu karşılar mı bilemem..