Conference Applaudir routine

remarque : Prend les applaudissements comme signe de fin de Presence

     in Lieu de Presentation, Public
     in Public, Applaudisssemnt
          si Aplaudissement = absent
          alors routine Conference Applaudir
     action "Se lever"
     action"Aller", Entree, Lieu de Presentation

     repeter
          in Entree, Gens
               si Gens = present
               alors action "Remercier", Gens
          in Lieu de Presentation, Gens
     jusqu'a Gens = 0

     retour