Touch-Tone(R) Dialer Update

In ANALOG issue 19, we ran the Touch-Tone(R) Dialer, a program which allowed your computer to generate tones that would "dial" your phone. Unfortunately, some phone systems aren't as lenient as the one here at ANALOG and won't accept the tones as listed.

Warren P. Silberstein, M.D., of Baldwin, New York, sent in the following changes that should allow the Dialer to work property for everyone. He has used the Atari's ability to combine two sound registers in order to give finer frequency control. The POKE in Line 90 sets up the fine-tune mode.

Simply add the following changes to the existing program, and you'll be dialing by computer in no time!

BASIC Listing

TDIALUPD.LST is available in ATASCII format.

80 DIM F1(11),F2(11),C1(11),C2(11),PN$
(20)
90 FOR X=0 TO 3:SOUND X,0,0,0:NEXT X:P
OKE 53768,120
100 FOR X=0 TO 11:READ A,B,D,E:F1(X)=A
:C1(X)=B:F2(X)=D:C2(X)=E:NEXT X
230 POKE 53762,C1(N):POKE 53760,F1(N):
POKE 53766,C2(N):POKE 53764,F2(N)
240 POKE 53767,168:POKE 53763,168:REM 
*** LEAVE TONE ON A MOMENT ***
270 POKE 53767,0:POKE 53763,0
350 DATA 150,2,176,3
360 DATA 221,2,253,4
370 DATA 150,2,253,4
380 DATA 87,2,253,4
390 DATA 221,2,131,4
400 DATA 150,2,131,4
410 DATA 87,2,131,4
420 DATA 221,2,19,4
430 DATA 150,2,19,4
440 DATA 87,2,19,4
450 DATA 221,2,176,3
460 DATA 87,2,176,3