;Reply and Post Script for Qterm
;See QTMES.SCR - by Rob Friedman
;
;--updated 2/4/90
;
;Remember to edit to your specs. as in Phone numbers, UID, and Password
;edit out all lines with the ";"
;  Enjoy..
;             Rob Friedman (Sysop ADAM CP/M)
--------------------------------------------
!b2400 8n1                                  ;sets baud and parity
!k2Rob Friedman(Sysop Adam CP/M)            ;sets keys
!k5Rob Friedman                             ;"
!k176072,417\r                              ;"
%ATZ\r%OK\r\n%%5%                           ;resets Modem to make sure
%ATDT2944190\r%CONNECT 2400\r\n%%%9%7       ;dials 1st # and checks
%ATZ\r%OK\r\n%%5%                           ;resets if 1st # n/g
%ATDT9322088\r%CONNECT 2400\r\n%%%          ;dials 2nd #
%\d\x03%\r\n%                               ;hits ^C
%%D: %                                      ;waits for I.D: prompt
%76702,417\r%ord: %                         ;sends# ,looks for PW
%PASS/WORD\r\n\r\n%!%                       ;sends PW, looks for !
%g club\r%Forum !%30%                       ;sends G CLUB, looks for Forum !
                                           ;and waits 30 sec if CIS is slow
%rep 85285\r%done)%%                        ;tells CIS it will REPLY to
                                           ;mess. 85285, and waits for done)
!p ronmes.rep                               ;sends the reply-message
%%action !%%                                ;waits for the read action prompt
%post\r%Forum !%                            ;posts the message, looks for !
%off\r%NO CARRIER\r\n%                      ;Logs off CIS, waits for NO
                                           ;CARRIER from modem
!,                                          ;hangs up via ATH0 string
!a                                          ;rings bell to wake you up
--------------------------------------------
;and poof!
;
;The whole idea of this is to automate the sending of messages, and
;shorten your time on CIS and save $$. Be sure to read the QTERM.DOC,
;as well as the SCRIPTS.QTM file, both in the QTERM LBRs.
;
;
;Here's another section.. used for Composing new messages.
--------------------------------------------
%g club\r%Forum !%30%                       ;same as above
%compose\r%done)%%                          ;tells your doing a new message
!p new.mes                                  ;sends the new message
%%action !%%                                ;waits for read action prompt
%post to:all sec:9 sub:co\r%Forum !%        ;all-in-one command, tells how
                                           ;and where to post the message
%off\r%NO CARRIER\r\n%                      ;like before.. signs off
--------------------------------------------
;
;Be aware that the numbers in the reply need to be edited every time
;you send a reply. As well as the name of the reply. To send several
;replies, simply repeat the reply section starting with the rep # and
;ending with the Post.
;
;The following is the same as the original QTMES.SCR . Please be aware
;that these commands CAN be used for any Modem program:
;
;Well.. I hope this helps some of you and you get to be proficient with
;QTERM. Even though ZMP runs more options, I've found QTERM's scripts to
;be really fast when dialing in.. and a real timesaver for use on CIS, as
;well as a timesaver for dialing into Starlink. What with all those numbers
;and ID's to dial..whew.
;
;A note here for NON-QTERM users who are on CIS. Please look at the CIS scripts.
;The commands I'm using are standard CIS commands, and can be used with ANY
;modem program for fast capture or sending of messages. Again.. having an
;external modem running at 1200b or 2400b really helps. And again.. these
;scripts for QTERM are for use with an external modem <unless you have
;adapted it for the Sydmodem 1200 internal modem>.
;
;Enjoy it!
;Rob Friedman- Sysop ADAM CP/M
;CompuServe Computer Club Forum
;