[REBOL] Terry's API Corner - Beep!

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

  [This is the only message in the thread]