Metronome: Difference between revisions
Content added Content deleted
Drkameleon (talk | contribs) No edit summary |
|||
Line 889:
130 if counter=bpb then counter=0
140 return</lang>
=={{header|Nim}}==
Textual version only.
<lang Nim>import os
proc metronome(tempo, pattern: Positive) =
let delay = 60_000 div tempo # In milliseconds.
var beats = 0
while true:
stdout.write if beats mod pattern == 0: "\nTICK" else: " tick"
stdout.flushFile
inc beats
sleep(delay)
metronome(72, 4)</lang>
=={{header|Perl}}==
| |||