OpenEuphoria

1. alternative to sound or beep command

• Posted by tiger0581 Jul 24, 2009
• 885 views
• Last edited Jul 25, 2009

Hello. Since the sound and beep functions only work under DOS, are there alternatives for Windows, Linux and Mac OS 10? I wrote a countdown timer that I would like to beep a few times when the time is up. Thanks.

3. Re: alternative to sound or beep command

• Posted by doncole2009 Jul 24, 2009
• 880 views
• Last edited Jul 25, 2009

Try

include graphic.e 
 
 global procedure beep(integer num) 
 atom t 
 for i = 1 to num do 
     machine_proc(1, 1000) 
         t = time() 
          while time() < t + .1 do 
           end while 
    machine_proc(1, 0) 
        t = time() 
           while time() < t + .1 do 
         end while 
    end for 
 end procedure 
 
Don Cole