Beep works for me. This sequence plays a sequence of two tones through =
the PC speaker (that's the built-in one, not the sound card):

440 500 BEEP . 480 500 BEEP . 1 1 ok

The returned 1 indicates success.

Read the discussion for Beep() in the MSDN Windows API Reference (link =
from SwiftForth Help menu) for some limitations on this function.

=20

> -----Original Message-----
> From: sftalk-bounce_at_forth.com=20
> [mailto:sftalk-bounce_at_forth.com] On Behalf Of Roger Dube
> Sent: Monday, March 30, 2009 11:53 AM
> To: sftalk_at_forth.com
> Subject: [sftalk] Tones
>=20
> Has anyone been able to generate a tone within Swiftforth? I=20
> tried beep, but
> the PC speaker just gives a =B3thunk=B2 that doesn=B9t change=20
> frequency with input
> parameters (I expected it to respond to =B3frequency duration=20
> BEEP=B2 but it
> doesn=B9t change tone.
> Thanks -=20
>=20
> Roger
> --=20
> Dr. Roger Dube
> President/Chief Scientist
> Digital Authentication Technologies, Inc.
>=20
> 561.392.7404 (office)
>=20
> 561.892.2474 (eFax)
>=20
> RogerDube_at_datHQ.com
>=20
> 690 Yamato Road Suite 4 - #210
>=20
> Boca Raton, FL 33431
>=20
>=20
>=20
> ----------------------------------------------------------------------
> sftalk_at_forth.com The SwiftForth programming discussion email list
> To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
> For list command help, send subject "help" to sftalk-request_at_forth.com
> Message archives are located at http://www.forth.com/archive/sftalk
> ----------------------------------------------------------------------
> This list is a forum for SwiftForth users. For product support and
> bug reports, please send email to support_at_forth.com
> ----------------------------------------------------------------------
>=20
>=20

----------------------------------------------------------------------
sftalk_at_forth.com The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
For list command help, send subject "help" to sftalk-request_at_forth.com
Message archives are located at http://www.forth.com/archive/sftalk
----------------------------------------------------------------------
This list is a forum for SwiftForth users. For product support and
bug reports, please send email to support_at_forth.com
----------------------------------------------------------------------
Received on Mon Mar 30 2009 - 12:58:19 PDT