10 bit ADC display on LCD using 16f873

[mark_s]

Hi pr2don,

Looks like a few typos and omissions

Your defines:

Define LCD_DBIT 4
Define LCD_RSREG PORTB
Define LCD_RSBIT 3
Define LCD_EREG PORTB
Define LCD_EBIT 2
Define LCD_EBITS 4
Define LCD_LINES 2

Try changing your defines to these

Define LCD_DREG PORTB
Define LCD_DBIT 4
Define LCD_RSREG PORTB
Define LCD_RSBIT 3
Define LCD_EREG PORTB
Define LCD_EBIT 2
Define LCD_BITS 4
Define LCD_LINES 2
Define LCD_COMMANDUS 2000
Define LCD_DATAUS 50

Also on your subroutine "ADC" you need to add a colon after ADC:

Hope this helps

[mark_s]

pr2don

Are you using pic basic pro or pic basic? No LCDout command in pic basic. If using pic basic pro, look up the "adcin" command

[ScaleRobotics]

You might want to initialize the LCD too.

PAUSE 500 : LCDOUT $FE,1 : PAUSE 250 ; Initialize LCD (You may not need this,
                                     ;  but some displays are picky)