RosettaCodeData/Task/Metronome/AppleScript/metronome.applescript

7 lines
181 B
AppleScript
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
set bpm to the text returned of (display dialog "How many beats per minute?" default answer 60)
set pauseBetweenBeeps to (60 / bpm)
repeat
beep
delay pauseBetweenBeeps
end repeat