Sine wave: Difference between revisions
cross platform
(Added the JavaScript language) |
(cross platform) |
||
Line 119:
=={{header|Phix}}==
<lang Phix>atom k32=NULL, xBeep
procedure beep(integer frequency, duration=5000)
if platform()=WINDOWS then
Line 129 ⟶ 128:
end if
c_proc(xBeep,{frequency,duration})
elsif platform()=LINUX then
system(sprintf("play -n synth %f sine %d", {duration/1000, frequency}))
end if
end procedure
beep(prompt_number("Enter Frequency (100..10000 recommended):",{0x25,0x7FFF}))</lang>
|