Hello All,
I am having some minor problems with a little script I have.  I am
calling a local BBS which has an FTP door (DOS) which I use to retrieve 
files from Planet Connect.  Sometimes, after a long delay or when there 
are no files, the script will timeout making my system unavailable for
dial-ins.
Here is a sample of the end:
;  QuickLearn Script generated at 22:05:14 on 10-14-97
;  FTP connection through Windmill BBS
;
Graphics ANSI
TurnON   8_BIT
TurnOFF  LINEFEED
TurnON   XON/XOFF
TurnON   NOISE
TurnON   MUSIC
TurnON   SCROLL
TurnOFF  PRINT
TurnOFF  ECHO
TurnOFF  SPLIT
TurnOFF  BS_DEL
TurnON   STATUSLN
TurnOFF  DOORWAY
Waitfor  "age # to use (Enter)=no change?"
Delay    100
Send     "^M"
Waitfor  "o you want graphics (Enter)=no?"
Delay    100
Send     "^M"
Waitfor  "33mWhat is your first name?^[[0m"
Delay    100
Send     "Peter Wierzba^M"
Waitfor  "ts will echo)? (^[[12C)^[[13D^[[0m"
Delay    100
Send     "********^M"
Send     "^M"
Send     "^M"
Send     "^M"
Send     "^M"
Send     "^M"
Send     "^M"
Send     "^M"
Send     "^M"
Send     "^M"
Send     "^M"
Waitfor  "): Main Board Command? ^[[0m"
Delay    100
Send     "ftp ftp.planetc.com^M"
Send     "n^M"
Waitfor  "tpicks list? (^[[1C)^[[2D^[[0mN^[[1D"
Delay    100
Send     "n^M"
Waitfor  "rId (^[[0manonymous^[[1;37m): ^[[0m"
Delay    100
Send     "********^M"
Waitfor  "^[[1;37mPassword: ^[[0m"
Delay    100
Send     "*********^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    100
Send     "bin^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    100
Send     "cd out^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    300
Send     "get 0e5d1676.mo0^M"
Timeout  120
Waitfor  "^[[36mEnter Selection: ^[[37m"
Delay    300
Send     "f^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    300
Send     "del 0e5d1676.mo0^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    300
Send     "get 0e5d1676.mo1^M"
Timeout  120
Waitfor  "^[[36mEnter Selection: ^[[37m"
Delay    300
Send     "f^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    300
Send     "del 0e5d1676.mo1^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    300
Send     "get 0e5d1676.mo2^M"
Timeout  120
.
.
.
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    300
Send     "del 0e5d1676.frz^M"
Waitfor  "m min left) ^[[0m^[[1;33mFTP >^[[0m"
Delay    300
Send     "quit^M"
TimeOut  20     ; Set Waitfor for 20 seconds
Waitfor  "): Main Board Command? ^[[0m"
Delay    300
Send     "d^M"
Timeout  20
Waitfor  "agged Files? (^[[1C)^[[2D^[[0mY^[[1D"
Delay    100
Send     "^M"
Send     "^M"
Timeout  10
Waitfor  "(Enter)=continue? (^[[1C)^[[2D^[[0m"
Delay    100
Send     "g^M"
Timeout  10
Download Z C:\VM10\INBOUND\
Timeout  20
Waitfor  "NO CARRIER"
Delay    100
System   Y
Exit
Does anyone have any ideas on what I need to add?  I would like to have
a failsafe before the script times out and hangs the system.
Thanks in advance.
--- ViaMAIL!/WC4 v1.30 
---------------
Next conference: FIDO Message Area
Next topic: 249 Quicken

FIDO MESSAGE AREA==> TOPIC: 249 QUICKEN       Ref: CAS00000 Date: 06/21/95
From: RICK PALMER                                           Time: 02:13pm
\/To: MODERATOR                                           (Read 35 times)
Subj: Shame

I *am* sorry. I was with my monster and did the wrong thing.
I will not do this in the future.
Sincerely,
Rick
___ Blue Wave/QWK v2.12
--- FLAME v1.1
---------------