Metronome: Difference between revisions
Content added Content deleted
m (→with sound, PC/REXX only: changed some comments.) |
|||
Line 1,138: | Line 1,138: | ||
call sound tickf, tickd /*sound a tick. */ |
call sound tickf, tickd /*sound a tick. */ |
||
$t=$t+bt /*bump the TOCK time.*/ |
$t=$t+bt /*bump the TOCK time.*/ |
||
end /*until |
end /*until e≥es*/ |
||
end /*until |
end /*until et≥dur*/ |
||
/*stick a fork in it, we're all done. */</lang> |
/*stick a fork in it, we're all done. */</lang> |
||