Journal TapTempo en langage Linotte

Bonjour,
Bah oui, il fallait bien une variante de TapTempo en langage Linotte quand même ! Pour réaliser cette exemple, j'ai un peu triché. J'ai modifié le moteur du langage pour y ajouter la méthode taille() à un casier (une liste). Cela permet d'alléger le code.

J'ai ajouté quelques commentaires pour expliquer certaines commandes.

 /*
 Version originale : http://linuxfr.org/users/mzf/journaux/un-tap-tempo-en-ligne-de-commande
 Comptatible à partir de Linotte 2.7.7
 */
 principale :
 horloge est un horodatage // greffon permettant de récupérer le temps
 tempo valant 0 // équivaut à "tempo est un nombre valant 0"
 entrée valant "" // variable utilisée pour stocker les touches
 entrées est un casier de nombres // tableau qui contiendra les délais entre les tempos
 début
 tant que vrai lis
 tempo vaut horloge.maintenant()
 demande entrée
 si entrée = "q" lis
 affiche "Au revoir !"
 termine
 ferme
 sinon lis
 ajoute (horloge.maintenant()) - tempo dans entrées
 si (entrées.taille()) > 2 lis
 affiche "Tempo : " + calculerbpm(entrées) + " bpm"
 ferme
 sinon affiche "Appuyer encore sur la touche entrée pour lancer le calcul du tempo..."
 ferme
 ferme
 calculerbpm : liste // paramètre liste, contient la liste des tempos
 retour valant 0
 début
 si (liste.taille()) > 5 ôte liste{0} de liste // On supprime le premier élément
 pour liste, retour += joker // Somme des valeurs de la liste
 retour vaut retour / (liste.taille())
 retourne arrondi (60000 / retour)

La boucle principale du programme se trouve dans la première fonctionne qui s'appelle ici principale (En Linotte, c'est toujours la première fonction du programme qui est exécutée en premier).