Permutation circulaire de deux pompes

VARIABLES
PA en Entier ; // pompe active prend les valeurs 1 ou 2
BA en Entier ; // etat du bassin prend les valeur 0=vide 1=plein
P1 en Entier ; // pompe1 prend les valeurs 0=arret 1=marche
P2 en Entier ; // pompe2 prend les valeurs 0=arret 1=marche

DEBUT
PA = 1; //initialisation de la pompe active
P1 = 0; //pompe1 arret
P2 = 0; //pompe2 arret

LIRE BA; // etat initial du bassin
Si BA/=0 alors BA=1; // si le bassin n'est pas vide alors il est plein

FAIRE //boucle pricipale
  {
    Si BA==0 alors //bassin vide
      {
        Si PA==1 alors P1=1; //mise en marche de P1 ou P2
        Si PA==2 alors P2=1;
      }

    TantQue BA==0 //boucle d'attente de changement d'etat du bassin
       {
         LIRE BA; //remplissage du bassin , BA passe de 0 a 1
       }

    Si BA==1 alors //bassin plein
      {
        P1=0;//Arret des pompes
        P2=0;
      }

    TantQue BA==1 //boucle d'attente de changement d'etat du bassin
       {
         LIRE BA; //vidange du bassin , BA passe de 1 a 0
       }

    PA = PA+1; //permutation de la pompe active
    Si PA>2 alors PA=1;

  }//fin de la boucle principale

FIN.