Hello Kevin,

> Oh, in that case I understand your need. I haven't tried what you are
> attempting, but will follow this thread with interest.

It works all you have to do is remember to copy the entire contents of
the message to the clipboard before you select the text you want to
quote with the F4 key.

If you are interested here is the reply template I place in the AB for
the individuals I want such a reply.

------------------begin reply template--->----------------
Hello Professor,

%ODateEn, %OTimeLongEn, %OFROMFNAME wrote:

%Qinclude="w"
%Cursor

-- 
Sincerely,

Greg Strong
Phone: 111-111-1111
Cell:  222-222-2222
%BCC="[EMAIL PROTECTED]"


%QInclude(tech)%-
---------------end reply template-------<---------------


The quick template below is Carsten's modified box quote per Roelof's
suggestion. I called it "tech" QT.

------------------begin tech quick template--->----------------
%REM=' bq - Paste as Boxquote
            written by Carsten Thoenges, December 2002
            June 2003 - use new features of v1.63 beta 8
'%-
%_TopAndTail=" "%-
%_TopCorner=" "%-
%_BottomCorner=" "%-
%_Side="> "%-
%_TitleFormat=" "%-
%-
%-
%If:+%-
%___%SetPattRegExp="\A(ct,6667,,,TOH)"%-
%___%RegExpMatch(%_Text)+=++%-
:+%-
%___%_TopCorner%_TopAndTail%_TitleFormat
%___%_Text="%Clipboard"%-
%___%If:"%SetPattRegExp='(?is).*\n\z'%RegExpMatch(%_Text)"="":"%-
%______%-%_Text='%_Text
'"%-
%___%_Text="ct,6667,,,TOH%_Text"%-
%___%QInclude(tech)
%___%_BottomCorner%_TopAndTail%-
+:+%-
%___%If:"%-
%___%SetPattRegExp='(?is)\A.*?\n(.*)\z'%-
%___%RegExpMatch='%_Text'"<>""%-
:"%-
%___%SetPattRegExp='(?is)\Act,6667,,,TOH(.*?\n)'%-
%___%_Side%RegExpMatch='%_Text'%-
%___%_Text='ct,6667,,,TOH%-
%______%SetPattRegExp=#(?is)\Act,6667,,,TOH.*?\n(.*)#%-
%______%RegExpMatch(%_Text)'%-
%___%QInclude(tech)"%-
:"%_Side%SetPattRegExp=&\Act,6667,,,TOH(.*)&%-
%__%-%RegExpMatch=&%_Text&%-
"%-
+%-
---------------end tech qt-------<---------------


I include recursive wrap in my replies so the message is always the same
approximate width.  If there is formatting in the original you may want
to exclude this from a reply template.

----------------------begin w QT --------->-------
%_Wrap_Text="%Qinclude(qx)"%-
%QINCLUDE(wrap2)
----------------------end w QT-----------<--------


----------------------begin qx QT --------->-------
%QUOTES('%SETPATTREGEXP="(?is)%-
((\s*)?\n?-----BEGIN PGP SIGNED.*?\n(Hash:.*?\n)?\s*)?%-
(\s*(Dear|Hi|Hello|Hey|Greetings|Howdy).{0,20}\n+)?%-
(-+[\S ]+\n)?%-
(.*?)(^(%-
- -*?\s*?--\s*\n|%-
--+\s*\n|%-
_{40,}\s*\n|%-
-{40,}\s*\n|%-
Kind regards,?\n|%-
Love,?\n|%-
Cheers,?\n|%-
\n-----BEGIN PGP SIGNATURE.*s?\n|%-
--+\s+.*roups.*~--\>)|%-
\n\nYour use of|%-
\n+Get your FREE download|%-
\nNote that the email address of the sender has been changed|%-
\n---\nOutgoing mail is certified Virus Free.|%-
\z)"%-
%REGEXPBLINDMATCH(%TEXT)%-
%SUBPATT(7)')%-
----------------------end qx QT-----------<--------


----------------------begin wrap2 QT --------->-------
%IF:'%-
%SETPATTREGEXP="(?is-m)[^\n]+"%-
%REGEXPMATCH(%_Wrap_Text)'<>'':'%-
%-
%SETPATTREGEXP="(?is-m)^(.*?)((\n((\w{0,5}(\>\s*)+)?\s*\n)+)(.*)\s*$|\z)"%-
%REGEXPBLINDMATCH(%_Wrap_Text)%-
%-
%_Paragraph_1(%Subpatt(1))%-
%_Blank_Space(%Subpatt(3))%-
%_Remainder_Of_Text(%Subpatt(7))%-
%-
%WRAPPED(%_Paragraph_1)

%_Wrap_Text(%_Remainder_of_Text)%-
%-
%QINCLUDE(wrap2)'%-
----------------------end wrap2 QT-----------<--------


Just copy the reply template into the AB. You may want to modify the
greeting, and copy and past all the QTs. There you have it. Works fine.

-- 
Best regards,

Greg Strong

Using The Bat! v2.00.6 on Windows XP 5.1 Build  2600
Service Pack 1


________________________________________________
Current version is 2.00 | "Using TBUDL" information:
http://www.silverstones.com/thebat/TBUDLInfo.html

Reply via email to