>I need to have the PC beep a set of tones (The PC has no audio card/speakers).
>In the DOS version of the program I'm converting, I had this routine that worked well:
>

>procedure Tone
>parameters nFrequency,nDuration
>@ 0,0 say ""
>if empty(parameters())
>    set bell to 512,2    && no parameters - reset
>else
>    set bell to nFrequency,nDuration
>    ?? chr(7)
>endif
>

>
>Is there a way to force the output to the PC's internal speaker?
>
>TIA

I don't think you can if there's a sound card installed.

But maybe you can use the Beep API function instead:

DECLARE Beep IN WIN32API INTEGER nFrequency, INTEGER nDuration
Beep(1000,250)