Sujet Précédent Sujet Suivant

Pic16f84 serin

h82kev Messages postés 2 Date d'inscription jeudi 19 août 2004 Statut Membre Dernière intervention 20 septembre 2004 - 20 sept. 2004 à 14:18
djamel28dz Messages postés 4 Date d'inscription vendredi 26 février 2010 Statut Membre Dernière intervention 8 mars 2010 - 8 mars 2010 à 12:17

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
'------------------------------------------------------------------

1 réponse

Réponse 1 / 1

djamel28dz Messages postés 4 Date d'inscription vendredi 26 février 2010 Statut Membre Dernière intervention 8 mars 2010
8 mars 2010 à 12:17

Discussions similaires

le pic16f84

pic16f84

Lecture d'une carte à puce Gold (pic16f84) par pic16f876

Votre réponse

Discussions similaires