dpalermo@aludra.usc.edu (Dan Palermo) (12/01/90)
I recently replaced my aging 1200 baud apple modem with a (very inexpensive)
2400 baud modem when I realized that the apple modem had some capabilities
that weren't quite Hayes compatilble. One of these "features" was that it
had the capability to automatically redial (atx2). My new modem didn't have
this feature so I wrote a quick script for TIC and dropped it into one of
the macro keys. Just put this into a file name tic.key.X (where X is the
macro key you want to activate this script) and put a line in tic.macros
as Xdescription (X is key and description is a string) and you are ready
to fly. Oh, one other thing, make sure you put the number you wish to
dial into the script below (sorry this is only a one number script ;-).
Hope you find this useful,
Dan Palermo
PS: I still use TIC 2.02 since the TIC 3.0 I got when I paid my shareware
fee disables my RAM drive when it is run. Does anyone have a newer
version, and if so, can you display /RAM? I like some of the features
of 3.0 (quit w/ port enable/disable, temporarily change manual settings,
more commands in the script language) but I like using my RAM disk more.
----- cut here ------
#
# Automatic redial script for TIC
#
# Will automatically redial a given number (see atdt below)
# until a connection is made. Delay value for retry and
# to get system prompt should be changed if you have an
# accelerated system and are using a version of TIC < 3.00
# (no time constant in manual settings for TIC 2.X)
#
# Author: Dan Palermo, dpalermo@usc.edu
#
goto dial
# retry
pause 2
# delay before dialing again
# dial
set timer 0
# wait for modem status (replace xxxxxxx with number)
xmit atdtxxxxxxx^M
pause
# don't read echoed outgoing dial command
waitfor string
set timer 1
# timeout quick if we didn't connect (at any speed)
waitfor string CONNECT
# if we didn't connect try again
if failed goto retry
# else get system prompt (optional)
pause
xmit ^M^M^M