• [^] # Re: Force

    Posté par (site web personnel) . En réponse au journal Journal Portage de TapTempo en Forth. Évalué à 3. Dernière modification le 11 mars 2018 à 14:23.

    Oui c'est voulu pour permettre de lisser les calculs du tempo sur 6 battements.

    Pour le côté cryptique, c'est pas bien de ma part : je n'ai pas documenté l'usage du tas.

    Mais en gros, au début on a le temps de départ et le compteur sur le tas.
    A chaque itération de la boucle on diminue le compteur.
    Quand il atteint 0, on calcule le tempo :

    steps 60 1000 1000 * * * s>f => on place le numérateur steps*60*1000*1000 sur le tas des flottants.
    drop => on enlève le compteur du tas
    now => on place le temps actuel sur le tas
    swap => on inverse le temps de départ et le temps actuel
    - => on calcule la différence
    s>f => on place le dénominateur sur le tas des flottants
    f/ => on effectue la division