Terry's API Corner - Beep!
[1/1] from: depotcity::telus::net at: 15-Jun-2001 19:49
Control the PC Speaker via API (windows)
a: %/c/winnt/system32/kernel32.dll
b: load/library a
c: "Beep"
d: make routine! [
dwFreq [integer!]
dwDuration [integer!]
] b c
;first integer is the frequency in hertz (37 to 32,767)
;second integer is the duration
; a one second low beep
d 50 1000