Hello Henrik,
Thanks for the reply, I tried you code, but if I turn the pot just a little to the right it gives me 663. Please see my modified code below...

Define ADC_BITS 10 ' Set number of bits in result
Define ADC_CLOCK 3 ' Set clock source (3=rc)
Define ADC_SAMPLEUS 50 'Set sampling time in uS
'
'
adval var word 'Create adval to store result
'
'
Init:
PortB = $00 ' all outputs off to start
TrisB = %00000000 ' All of Port B is outputs
'

TRISA = %11111111 ' Set PORTA to all input
ADCON1 = %00000001 ' Set PORTA analog
loop:
ADCIN 0, adval ' Read channel 0 to adval
Pause 500
Serout 4, 6, [$1b, $2a,$80] 'Turn backlight half broghtness
Serout 4, 6, [254, 1]
pause 2
adval = adval*10/102
serout 4, 6, [#adval]
'********** Drive LEDs *************************
LEDtst1:
if adval > 25 then tst2 'If A/D value is less than 10
portb = %00000001 ' then light LED0 only

tst2:
if adval > 75 then tst3 'If A/D value is between 25 and 75
portb = %00000011
goto cont 'continue with the program
tst3:
if adval > 99 then
portb = %00000111
goto cont 'continue with the program

ENdif
cont:
Pause 100 'wait 1 second
goto loop
end


Thanks in advance,
joe