found a problem , the init subroutine needs to pause a bit after the rst pulse otherwise display may not initialise properly
Code:lcd_init: @ GLetAddress _font7x5,_glcdFont bigtxt = 0 inverted =0 #ifdef use_mssp SSP1CON1=$21 ;$22,21,20 all work @32mhz 20 is fastest SSP1STAT=$40 #endif LCD_CE=1 pause 30 Lcd_RST = 0 ' Reset LCD (HW reset) pause 1 Lcd_RST = 1 ' Release Reset pause 1 ;add this pause ' lcd_dc=0 LCDCMD $21 ' LCD EXTENDED COMMANDS LCDCMD $c8 ' SET LCD Vop (CONTRAST) initial value $C8 = 200. LCDCMD $06 ' SET TEMP COEFFICIENT LCDCMD $13 ' LCD BIAS MODE LCDCMD $20 ' LCD STANDARD COMMANDS LCDCMD $08 ' LCD blank LCDCMD $0c ' LCD IN NORMAL MODE return




Bookmarks