On Thu, 30 Sep 1999 18:11:12 -0400, Stacy Brooks <stacyb1@ix.netcom.com> wrote:
>Congratulations to all who participated in the First Annual A.R.S. Literati
>Contest!
>
>I thought that all of the essays were extremely thoughtful, well-written,
>intriguing and educational. Each one provides a valuable perspective about
>Scientology, and I would like to make the full set available by creating a
>booklet which can be distributed to former Scientologists, current
>Scientologists, parents, friends and family members of Scientologists, and to
>anyone else who would like to know more about this cult.
>
>Therefore I am asking for permission from each of the writers to publish their
>essays. It will be one of the first officials actions of the Lisa Foundation.
>Hopefully I will be able to get the booklet published in time for it to debut
>in Clearwater during the Lisa McPherson Memorial Week. I'll try!
>
>I would also need your permission to do minor copy editing - for misspellings
>and minor grammatical and syntax errors only. If you wish, I will be happy to
>send you the final edited draft before it is published. Once the editing is
>finished, the copy will be professionally typeset, printed and bound.
Yes, this would be fine with me. The final version of mine is webbed on http://www.fzint.org/essays/rhilton.htm Its reformatted and probably easier to use. I had connection problems for the last few days of the contest so this version never made it to Bob in time.
For reformatting entries there is a pascal program I wrote on my website or if you have MS word then you could use the following macro:
Sub cleanupparas() ' Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "^p^p" .Replacement.Text = "`````" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll With Selection.Find .Text = "^p" .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "`````" .Replacement.Text = "^p^p" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll With Selection.Find .Text = " " .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll With Selection.Find .Text = " " .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll Selection.Find.Execute Replace:=wdReplaceAll End Sub--
Ralph Hilton http://Ralph.Hilton.org Freezone International: http://www.fzint.org