Je rencontre un probleme avec ma carte 18F46J50.
La carte est equipé de & BP raccordé sur le PortB2 et 2 leds raccordé sur PortE 0 et 1.
Les leds j'ai reussi à les faire clignoter sans probleme par contre je suis bloqué sur la conf du PortB pour faire passer le bit 2 en entrée.
Vous avez la DS en lien et voila mon code test:
Code : Tout sélectionner
program TESTprogboot
' Declarations section
' LED1 Port E 0
' LED2 Port E 1
' BP Port B 2
dim led1 as sbit at LATE0_bit
led2 as sbit at LATE1_bit
led1_direction as sbit at TRISE0_bit
led2_direction as sbit at TRISE1_bit
bp as sbit at LATB2_bit
bp_direction as sbit at TRISB2_bit
dim x as word
i as word
dim compt,lumiere as byte
main:
' Main program
ANCON1.0 = 1
INTCON2.7 = 0
led1_direction = 0
led2_direction = 0
bp_direction = 1
x=1
i=0
compt=lumiere=0
while TRUE
if (bp=1) and (compt<10) then
inc(compt)
end if
if (bp=0)then
compt=0
end if
if (compt=3) then
inc(lumiere)
end if
if lumiere = 0 then
led1=1
led2=0
end if
if lumiere = 1 then
led1=0
led2=1
end if
if lumiere > 1 then
lumiere = 0
end if
wend ' Endless loop
end.
Dans la DS le registre ANCON1 indique de passer le bit 0 à l'etat 1 pour mettre PB2 en voie digital.
Chose que j'ai fait mais rien n'y fait la voie 2 reste comme muet.
JE sais que ca fonctionne car avec le code d'origine le BP fonctionnait, il sert de demo.
Merci d'avance pour vos lumieres