Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!shadooby!samsung!uunet!portal!cup.portal.com!RONIE
From: RONIE@cup.portal.com (RONALD LEE FERGUSON)
Newsgroups: comp.sys.apple
Subject: Re: DataLink 2400 Modem
Message-ID: <24477@cup.portal.com>
Date: 26 Nov 89 02:28:25 GMT
References: <113300140@uxa.cso.uiuc.edu>
Organization: The Portal System (TM)
Lines: 60

I have two problems writting a Macro for the Datalink 2400 modem
COULD SOMEONE PLEASE HELP ME?
1. First problem:

The Macro will dial the phone # for Telenet.  Once I get the 
CONNECTED 2400 message It just sets there.  If I let it set there
long enough  it will disconnect.
In the Macro I have a string (xmit "@D ^J^M") which should send the
@ D and a return.  This is not sent or if it is then nothing happens.
Please tell me what control characters I need to send.

2. Second problem:

I want to be able to turn on my computer before I go to bed and run this 
macro.  I want it to ask the question "At what time do you want to dial?"
I need to be able to enter more than one time depending on the time of
day I want it to dial out.  I can do it by many many if statements. 
I want to be able to do it with out putting in 20 or 24 if statements.
I need to know how to write the IF statement so that it will use the 
time that i input.  For example (If input = 00:30 then time = 00:30.  
Waitfor time "input"
Could someone please tell me how to do this?

I am encluding the file after my name so you can see what I have done.
page backward 2
Thank you very much.
Ronie@cup.portal.com
919-822-8145
==================================================
# START

Display "^L^J^J Portal DownLoad File Program^J^M"
Display "^J^J^J^J^M"
Display "^J^J A = 01:00  B= 08:00 ^J^M"
Display "^J^J    Set time for Download in this Format: 00:00 "


SET TIMER 20
waitfor time "08:30"

# A
 
Set baud 2400
set DUPLEX FULL
set prefix /my
xmit "ATM0^M"
Waitfor string "OK"
xmit "ATDT 323 4148^M"
set timer 15
waitfor string "CONNECT 2400"

xmit "@ D ^J ^J ^J ^M"

if failed goto B
stop

# B
xmit "HANGUP^J^M"
SET TIMER 30
goto Start