In a message to ALL , SCOTT UNDERWOOD said:
SU>I run QmodemPro for Windows version 1.11c. I have never had any luck
SU>making a script (either piecing it together or putting the program on
SU>"learn" mode.) I would like to have a script that would call the two o
SU>three BBS's I get mail from (one is a GAP BBS running Mainmail and the
SU>other is a Wildcat board running wcMAIL.) I would like to be able to
Here's a script I use to call a Wildcat board using wcMAIL...it should help
you get started:
'---------------------------------------------------
' Qmodem/Win Script for MVPCUG and TomCat-Mail Door
'---------------------------------------------------
'
' SLIQ Code Written 5/18/94 by FGH
'
' updated 10/19/94 to include 2 escapes at startup FGH
timeout 600 ' Set Timeout for 10 Minutes
capture ConfigDownloadPath+"\mvpcug.cap" ' Capture Session in a file
when clear all ' Housekeeping, Clear Previous Whens
delay 1.5
send "^[";
send "^[";
WAITFOR "first name? "
SEND "fred"
WAITFOR "last name? "
SEND "hall"
WAITFOR "Password?"
SEND "whatever"
When match ", [S]top?" do send
' WAITFOR ", [S]top?"
' SEND
when match "like to view it" do send "n"
WHEN MATCH "letin menu [Y/n]" do send "n"
WHEN match "ist new mail, [C]ontinue" do send "c"
When match "[ENTER] to continue" do send
WAITFOR "ain Menu Command >>"
SEND "m"
WAITFOR "age Menu Command >>"
SEND "t"
WAITFOR "REP Menu Command"
SEND "d"
WAITFOR "]oodbye when done?"
SEND "y"
WAITFOR ".QWK now"
DOWNLOAD "", Zmodem
if exists(ConfigUploadPath+"\tomcat.rep") then
goto Do_it_all ' Do We Have a Reply Packet?
else
goto Get_it ' No Replies Today:
end if ' Download New Mail Only!
Do_it_all:
WAITFOR "REP Menu Command"
SEND "u"
WAITFOR ".REP now"
UPLOAD "D:\WINDOWS\QMWIN\DOWNLOAD\TOMCAT.REP", Zmodem
Get_it:
WAITFOR "REP Menu Command"
SEND "q"
WAITFOR "Command >>"
SEND "q"
WAITFOR "Command >>"
SEND "g"
WAITFOR "to logoff [Y/n]"
SEND
capture off
end
Fred -- hallf@rl.af.mil -- brought to you by Win95 build 490
... A flashlight is a case in which to carry dead batteries.
* Wave Rider 1.33 # 81 *
--- GEcho 1.11+
---------------
* Origin: PowerLine OLS 315.865.4070 Marcy NY (1:2609/2)
|