Ken,
perhaps you may want to ask at the picbasic pro forum?
http://www.picbasic.co.uk/forum/
victor
----- Original Message ----- 
From: "Ken Ouellette" <lerameur@yahoo.com>
To: "Microcontroller discussion list - Public." <piclist@mit.edu>
Sent: Sunday, October 29, 2006 9:08 AM
Subject: Re: [PIC]: ADCIN to LCDout


mainly I just want to use this program but convert it
in picbasic pro and hace a LCD out of the input.

'***Real A to D on the 876****
program RealAtoDSafe
Dim data1 as word
Main:
TrisB = %00000000
TrisA = %00001000
ADCON1 = %10000100
while TRUE
data1=Adc_Read(3)
If data1 < 4 Then
data1 = 4
End If
PortB = word(data1 >> 2)
wend
End.
'***************************

__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 
-- 
http://www.piclist.com PIC/SX FAQ & list archive
View/change your membership options at
http://mailman.mit.edu/mailman/listinfo/piclist

-- 
http://www.piclist.com PIC/SX FAQ & list archive
View/change your membership options at
http://mailman.mit.edu/mailman/listinfo/piclist