To: 3:640/301
G'day Roy,
You can have great fun writing scripts in Telemate.
The script works from within Telemate not the Mail Reader.
I have found that you need to play around with the correct
delays and answers to prompts on different BBS's to get
successful results. But once perfected it can be fantastic.
;using Telemate 4.20 with BBS "hotkeys" turned on ( ie. no CR required )
;to logon on to Brisbug Madhouse BBS and download &/or upload QWKmail
..... logon details etc deleted for brevity
Put "O~~~", ; Offline mail reader selected and 12
se
FileExist "c:\telemate\upload\madhouse.rep", Found
If Found = True ; if an upload file exists then
upload i
Put "U~~~", ; select upload
Send "z","c:\telemate\upload\madhouse.rep"
If Success = True ; if it transferred successfully then
de
DOS "call madstore.bat" ; batch file to zip and transfer to
anot
Delete "c:\telemate\upload\madhouse.rep"
EndIf
Waitfor "Select:",300
EndIf
If Found = False
EchoColor cyan
EchoHilite
echo " nothing to upload this time"
Print
EchoNormal
EndIf
Delay 25 ; wait for 22 seconds
Put "D~~~", ; Download and 12 sec pause & no CR
Waitfor "Download these in QWK format [Y,n]?",55 ; wait up to 55 seconds
for s
If found
Put "Y~~~", ; Yes download and 12 sec pause & no
CR
EndIf
Delay 25 ; wait 22 seconds
.... logoff details deleted for brevity
FileExist "c:\telemate\recd\madhouse.qwk", Mad
If Mad = true
Set AlarmTime,5
Alarm " No Problems, John ^j Mailrun successful "
ExitTelemate
If Mad = false
Set AlarmTime,8
Set AlarmSound,10
Alarm " No Mail ^j has been ^j collected "
EndIf
EndIf
Stop
Madhouse.rep is created by my Offline QwkMail reader which
stores it in \telemate\upload\ ready for upload.
Madstore.bat uses pkzip to zip the .rep packet and append
it to Mailout.zip, so I have a record of what I said. :-)
As you can see, if the .rep packet was u'loaded successfully
then it is zipped and stored before the original is deleted.
Have fun ...
|\_/|
| c | John McLachlan
+-+ +--
___
* OFFLINE 1.58 * ... I keep my .BATs in D:\BELFRY
--- Maximus/2 3.00
---------------
* Origin: madHouse Inc (3:640/820)
|