[mikro.digital]

تواجهنى مشكلة فى تشغيل شاشة 2*16 بالبيك 18f4620 الشاشة لاتظهر البيانات اريد تشغيل الشاشة على البورت a من المتحكم

ودة الكود

dim LCD_RS as sbit at LATA5_bit
     LCD_EN as sbit at LATA4_bit
     
     LCD_D7 as sbit at LATA3_bit
     LCD_D6 as sbit at LATA2_bit
     LCD_D5 as sbit at LATA1_bit
     LCD_D4 as sbit at LATA0_bit

LCD_RS_Direction as sbit at TRISA5_bit
LCD_EN_Direction as sbit at TRISA4_bit

LCD_D7_Direction as sbit at TRISA3_bit
LCD_D6_Direction as sbit at TRISA2_bit
LCD_D5_Direction as sbit at TRISA1_bit
LCD_D4_Direction as sbit at TRISA0_bit

main:
 ADCON0 = 0x07

 CMCON  = 0x07
Lcd_Init()
Lcd_Cmd(_LCD_CURSOR_OFF)
while true
Lcd_Cmd(_LCD_CLEAR)
Lcd_Out(1,6,"welcome")
Lcd_Out(2,6,"A")


Delay_ms(200)
wend