Adcon0,adcon1 pic 16f877

[Eden Zeminian]

i put the pic in the LCD in port a:

D4 - d7 RA0 -RA3
Rw- RA4
E - RA3

whow many usualy adcom for porta in digital?

[aratti]

Place ADCON1 = 7 to turn portA all digital.

Cheers

Al.

[Eden Zeminian]

my code is: but not ready ldc, whith adcom 1=7

include "modedefs.bas"
DEFINE LCD_DREG PORTA
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTA
DEFINE LCD_RSBIT 4
DEFINE LCD_EREG PORTA
DEFINE LCD_EBIT 5
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE ADC_BITS 8
adcon1=7

C0 var byte
C1 var byte
pause 1000
loop:
Lcdout $fe, 1

Lcdout "Setron Alarmes"
pause 1000

For C0= 1 to 13
Lcdout $fe, $13
Lcdout $fe, 24

pause 500
next
Lcdout $fe, 1
Lcdout $fe, 1
Lcdout "Alarmes"
pause 1000

Lcdout $fe, $14
Lcdout "CFTV"
pause 1000
Lcdout $fe, 1
Lcdout $fe, 1
Lcdout "Monitoramento"
pause 1000
For C0= 1 to 13
Lcdout $fe, 24
pause 500
next

Lcdout $fe, 1
Lcdout "24 Horas"
pause 1000
For C0= 1 to 8
Lcdout $fe, 28
pause 500
next
For C1= 1 to 3
Lcdout $fe, 1
Lcdout $fe, $80+17
Lcdout "Setron"
pause 1000

For C0= 1 to 27

Lcdout $fe, 24
pause 200
next
next

Goto loop