Sine wave: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: syntax coloured, marked p2js incompatible) |
|||
Line 422: | Line 422: | ||
var buffer = sineWave.call(440, 5, sampleRate) |
var buffer = sineWave.call(440, 5, sampleRate) |
||
Wav.create("sinewave.wav", buffer, sampleRate)</lang> |
Wav.create("sinewave.wav", buffer, sampleRate)</lang> |
||
=={{header|Yabasic}}== |
|||
<lang Yabasic>// Rosetta Code problem: http://rosettacode.org/wiki/Sine_wave |
|||
// by Galileo, 05/2022 |
|||
sub MyBeep(frequency, duration) |
|||
local n |
|||
if duration = 0 duration = 5000 |
|||
if peek$("os") = "unix" then |
|||
system("play -n synth " + str$(duration/1000) + " sine " + str$(frequency)) |
|||
else |
|||
n = foreign_function_call("kernel32.dll", "uint8","Beep","uint32",frequency,"uint32",duration) |
|||
end if |
|||
end sub |
|||
MyBeep(440)</lang> |
|||
=={{header|zkl}}== |
=={{header|zkl}}== |