Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: DTMF Tone Generator

by arhuman (Vicar)
on Jun 27, 2003 at 13:02 UTC ( #269531=note: print w/ replies, xml ) Need Help??


in reply to DTMF Tone Generator

I really don't know if the tones produced are indeed at the right frequencies... It sounds right to me but I'm no expert

I'm not an expert too, but the generated tones are quite different from those generated by "dtmfdial"...
Based on what I found on http://www.hut.fi/~then/mytexts/dtmf_generation.html, I modified your prog :

for my $tone (@tones) { my @hz = map { 2 * $pi * $_ } @{$dtmf{$tone}}; add_tone(@hz); }
(note the factor '2')

and now I got (what I think to be) similar tones...
I also had to modify $duration to to have the exact same output as dtmfdial but that's just a detail


"Only Bad Coders Code Badly In Perl" (OBC2BIP)


Comment on Re: DTMF Tone Generator
Download Code
Re: Re: DTMF Tone Generator
by Mr. Muskrat (Abbot) on Jun 27, 2003 at 14:27 UTC

    ++arhuman. Good catch! I remember copying and pasting the formulas in. So I really do not know when I lost the 2.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://269531]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (8)
As of 2014-07-29 07:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (211 votes), past polls