Problème avec les broches spéciales RB0/INT et RA4/T0CKI

[Montd'est]

Bonjour,

J'ai un pic 16 f 84a que je programme en pascal , je cherche à créer un chenillard à 13 dels , il y a 2 vitesses différentes et à chaque "tour" on change de vitesse. Mon programme fonctionne en grande partie mais les 2 DELS branchés sur les ports spéciaux ne fonctionnent jamais , les ports ,RB0/INT et RA4TOCKI .

voici mon programme :

program NOEL2008squencedumlange;

var i : integer;

const premier : array[13] of byte =(%00000000, %00000000, %00000000,%00000000,
%00100000, %01000000, %10000000, %00000010,
%00000100,%00001000,%00010000, %00000001,%00000000); // commande du port B



const deuxieme : array[13] of byte =(%00010, %00100,%01000,%10000,%00000,%0 0000
,%00000,%00000,%00000,%00000,% 00000,%00000,%00001); // commande du port A




begin
Trisb:=0;
trisa:=0;
portb:=0;
porta:=0;

while (1=1) do

begin for i := 0 to 12 do // compteur
begin
portb:=premier[i]; // vitesse rapide sur port b
porta:=deuxieme[i]; //vitesse rapide sur port a
delay_ms(300); // 300 millième de secondes avant de changer de lampe
end;

for i := 0 to 12 do // compteur
begin
portb:=premier[i]; // vitesse lente sur port b
porta:=deuxieme[i]; //vitesse lente sur port a
delay_ms(1500); // 1.5 secondes avant de changer de lampe
end;

end;
end.

Ais-je activé une interruption ou quelque chose comme ça sans le savoir ?
( Le watch doc timer et power up timer sont sur off )

Pouvez vous m'éclairer s'il vous plait ??
-----

[lebaron71]

bonjour,
certainement les bits qui programment l'utilisation alternative de ces ports sont mal positionnés et empèchent l'instruction "trisx" de les mettre en sortie...

[gedonet]

Bonjour
Pour RA4, c'est un opendrain, c'est à dire qu'il s'agit d'une pin qui peut mettre à la masse si elle est à 0, mais qui ne fournit jamais de +5V à 1, il faut que tu branches ta led à l'envers, c'est en mettant à 0 qu'elle s'alumera par la mise à la masse, c'est simple à modifier dans ton programme, par exemple tu changes %00000010 en%00010010 .
Pour RB0, il n'y a rien de particulier en se qui l'a concerne, verifie la resistance et le sens de la led.
Gilles

[DavidDB]

Salut,

Je rectifie l'inversion de Gilles :

une pin qui peut mettre à la masse si elle est à 1

c'est en mettant à 1 qu'elle s'allumera par la mise à la masse-> bsf RA4

David.

[A voir en vidéo sur Futura]

[DavidDB]

Mea-culpa...

Pour RA4 :
BCF RA4 -> sortie à GND et BSF RA4-> sortie à VDD

Désolé pour l'erreur...

David.

[Montd'est]

Bonjour,

merci pour ces réponses , ça a bien marché pour A4 mais il faut penser chaque fois à faire l'inversion quand on commande le port.

Et pour B0 en faite le port était " claqué " , le même programme dans un pic neuf a bien activé B0.