Aide programmation PIC

[invitede334bfc]

Bonjour a tous,
Voila je suis en train de réaliser un projet qui consiste a faire une mesure de largeur sur de la gaine plastique.
Pour cela je vais utiliser un clavier 4X4, un écran LCD 2X16 et un PIC 16F887.
J'ai réussis à gérer mon clavier mais je n'arrive pas a décaler mes chiffre. Je m'explique : je souhaite entrée la largeur à contrôler a l'aide de mon clavier et qu'il s'affiche sur l'écran, hors lorsque j'appuie sur une touche il s'affiche mais mon curseur ne se décale pas sur la droite afin de mettre le chiffre suivant. J'aimerai pour afficher une largeur sur 4 chiffres.
Je vous mets en pièce jointe une partie du code.
Je travaille avec Mikropascal Pro
A Bientôt
Sibe
-----

[kronanberg]

Salut !!

Ben c'est logique que ta valeur ne se décale pas dans l'affichage car tu l'affiches tout le temps au même endroit "Lcd_Chr(1, 9, A);"

Il faut que tu rajoutes une variable pour incrémenter le positionnement (9 + i) de ton curseur. Sinon tu as peut être dans ta bibliothèque LCD une fonction qui ecrit et decale directement le curseur !!

a+

[invitede334bfc]

Bonjour Kronanberg
Merci pour ton conseil, j'ai inserer ma variable et cela marche.
Une autre question.
Je voudrai lire la largeur affichee sur le LCD pour faire une comparaison avec ma lecture, je n'ai aucune idee comment recuperer cette valeur.
Merci.
Sibe

[antoine6]

Pourquoi tu veut lire la valeur que tu lui a demandé d'afficher? tu peut pas la calculer directement?

Si t'as 4 chiffre dans un tableau, le "chiffre[0]" étant le chiffre des milliers et le [3] le chiffre des unités

valeur = 0;
for(i = 0; i <=3; i++)
{
  valeur = valeur + chiffre[i];
  valeur = valeur *10;
}

[A voir en vidéo sur Futura]

[invitede334bfc]

Salut antoine6
Je ne comprend pas bien ton code.
Mon but est de rentrée une consigne de largeur, faire une mesure de largeur de ma gaine plastique et de les comparer.

[sdec25]

Bonjour,

Mon but est de rentrée une consigne de largeur, faire une mesure de largeur de ma gaine plastique et de les comparer.

Tu stockes ta consigne dans une variable consigne, tu mesure la largeur (variable mesure) et tu compares les 2 variables consigne et mesure.

[kronanberg]

Le principe pour ton programme est de sauvegarder ta valeur de consigne dans un tableau et ensuite de lancer ta mesure :

var valeur[4] : byte;	// declaration d'un tableau de 4 caractères

    while TRUE do
      begin
	
	i := 0;
	while (i<4) do 
	begin

        	kp := 0;                             // Reset key code variable
        	// Attend appuis sur touche
        	while ( kp = 0 ) do
          	kp := Keypad_Key_Click();          // Enregistre code touche dans variable kp

        	case kp of
            		1: kp := 49;  // 1
            		2: kp := 50;  // 2
            		3: kp := 51;  // 3
            		4: kp := 65;  // A
            		5: kp := 52;  // 4
            		6: kp := 53;  // 5
            		7: kp := 54;  // 6
            		8: kp := 66;  // B
            		9: kp := 55;  // 7
           		10: kp := 56;  // 8
           		11: kp := 57;  // 9
           		12: kp := 67;  // C
           		13: kp := 42;  // *
           		14: kp := 48;  // 0
           		15: kp := 35;  // #
           		16: kp := 68;  // D

        	end;

        	begin                               // Affiche code ASCII sur LCD
         		Lcd_Chr(1,(9+i),kp);
         		val[i] = kp - 0x48;	    // Enregistre ta valeur en decimal
         	
        	End;
	End;

	//Lance ta mesure avec ta valeur de consigne
    end;

Par contre niveau de la synthaxe je ne sais pas trop je code normalement en C

a+

[ftorama]

rraahhh du pascal

j'ai appris là-dessus et j'ai jamais retrouvé un langage aussi propre

[invitede334bfc]

Merci Kronanberg
ça ma mis sur la voie
Par contre le code pour l'enregistrement en décimale ne marche (sauf si kp=1)

[kronanberg]

Desolé une petite erreur c'est glissé !!
J'ai écrit la valeur en hexadecimal ! La valeur 48 est en binaire !!

Elle doit fonctionner pour les valeurs de 0 à 9, et comme tu n'as pas besoin de caractère pour rentrer ta consigne ça devrait le faire

[kronanberg]

48 en décimal !!! olala la pause café n'améliore pas l'état !

[invitede334bfc]

OK ça marche
Pas sure que ce soit le café
Merci

[invitede334bfc]

Bonsoir a tous
Je reviens ici pour trouver une solution a mon projet.
Je souhaite comparer le nombre que je rentre au clavier (consigne) et une valeur mesurer.
J'aimerai avoir vos idees pour pouvoir faire cette comparaison.
Je vous met en piece jointe l'electronique.
Pour info ma valeur mesure proviendra de deux capteur a ultrason qui me delivreront une tension analogique 0-10V et qui seront connectées sur le PORTA aux pin AN0 et AN1.
Ces deux signaux me donne deux mesures qui seront additionnes et me donneront ma valeur mesure.
Merci pour vos reponses et etudes