bjr à tous
voilà mon problème
j'utilise un pic16f84 pour un banc de test pour modem
lorsque j'appui sur un bouton poussoir (pin 7), je veux envoyer un caractère avec la commande serout (pin 11) dans le modem, et le récuperer sur une autre pin(pin 1) avec la commande serin.
Lorsque j'appui sur le bouton rien ne se passe.
Si qq'1 aurait un peu de temps pour jeter un coup d'oeil, je le remercie.
Voila mon programme:
'----------------------------------------------------------------
include "modedefs.bas"
init:
option_reg = %10000000
input portb.1
input portb.7
output portb.5
goto pgmpal
pgmpal:
if portb.7 = 1 then
gosub char
else
lcdout "wait char"
pause 100
endif
LCDOUT $fe, 1
goto pgmpal
'---------------------------------------------------------------
char:
B var word
C var word
B = 25
C = 0
pause 100
serout 11, T1200, [B]
serin 7, T1200, [B], C
if B = C then
lcdout "char ok", #C
PAUSE 500
LCDOUT $fe, 1
C = 0
lcdout $fe, $c0
else
lcdout "char mauvais", #C
PAUSE 500
LCDOUT $fe, 1
C = 0
endif
return
'------------------------------------------------------------------