Salut à tous. Voici une 2ème version en Clojure de TapTempo.
Je ne mets pas de référence vers le premier jet tellement il était à côté de la plaque (la version en Forth était beaucoup trop simpliste aussi). Désolé pour le bruit.
Dans celle-ci, nous avons :
Le lissage avec une vraie moyenne sur sample-size.
la gestion des arguments en ligne de commande avec validation des entrées :
Salut à tous. Voici un portage de TapTempo en Forth.
5 set-precision
6 Constant steps
: now utime drop ;
: calc-tempo steps 60 1000 1000 * * * s>f drop now swap - s>f f/ ;
: print-tempo ." Tempo: " f. ." bpm" cr ;
: restart now steps ;
: main
." Appuyer sur la touche entrée en cadence (q pour quitter)." cr
restart
begin
key 113 <> while 1- dup 0 = if calc-tempo print-tempo restartSalut à tous.
Voici une version en Clojure. Rien de remarquable, juste qu'on affiche le tempo tous les 6 battements.
Il n'y a pas la prise en charge d'arguments ou d'internationalisation.
(ns taptempo.core
(:import jline.console.ConsoleReader)
(:gen-class))
(defn now []
(System/currentTimeMillis))
(defn read-char []
(->(ConsoleReader.) (.readCharacter) char))
(defn calc-tempo [start end taps]
(* (/ taps (- end start))
La version 1212 de CLFSWM vient de sortir récemment.
Pour rappel, CLFSWM (Common Lisp FullScreen Window Manager) est un gestionnaire de fenêtres où les fenêtres sont la plupart du temps maximisées à l'écran.
CLFSWM est constitué de cadres qui peuvent contenir d'autres cadres ou des fenêtres. Il peut être manipulé au clavier ou avec la souris. Et il dispose de menus pour les actions moins fréquentes.
Le cadre ou la fenêtre courante est maximisé à l'écran. Les cadres peuvent être créés au fur et à mesure avec le clavier ou la souris et peuvent arranger leurs enfants (cadres ou fenêtres) de manières différentes (maximisés, pavés, en colonnes…).
Voici un exemple d'agencement que l'on peut obtenir sur un double écran :
Vous trouverez plus de détails sur les changements depuis la dernière version dans la suite de la dépêche.
La version 1106 de CLFSWM vient de sortir récemment. CLFSWM (Common Lisp FullScreen Window Manager) est un gestionnaire de fenêtres ou les fenêtres sont la plupart du temps maximisées à l'écran. Dans le principe, CLFSWM est constitué de cadres qui peuvent contenir d'autres cadres ou des fenêtres. Il peut être manipulé au clavier ou avec la souris (pas de dogme). Et il dispose de menus pour les actions moins fréquentes.
Le cadre ou la fenêtre courante est maximisé (…)
Bonjour, suite au journal de Kopec et au commentaire d'Axioplase ıɥs∀, je me suis amusé à tester l'algorithme pour trouver des nombres amis avec plusieurs langages : Python, C, Lisp, Lua et forth.
Voici les résultats que j'ai obtenu.
C 0.466 1 sbcl (compilé, optim, sans cons) 0.468 1 sbcl (compilé, optimisation) 0.511 1.09 sbcl (compilé, sans optimisation) 0.878 1.88 gforth-fast 1.025 2.19 sbcl (sans optimisation) 1.59 3.41 gforth 2.761 5.92 lua 7.377 15.8 python 29.877 64.1
Ce (…)
