ࡱ> 7  bjbjUU 7|7|il  8  }  (8 8 8 8 8 8 ,l||||||~ ,| 8 8 8 8 8 |` 8 8 |` ` ` 8 ( 8 8 ` 8 ` ` r r8 ΄ RWM  ` rr|0 }r?` ?r`   PAGE 2 Letter 342  September 1825 Letter 342  September 1825  PAGE 1 *0246JRZ\jprtvɽɽ jU0J6CJEHOJQJj0J6CJOJQJU0JCJ0JCJOJQJ0J0J6mHnHu0J6j0J6U#TVXZ.)8&#$$d%d+DNO8&#$$d'd+DNQ.)A&#$%d&d+DOPA&#$&d'd+DPQ.)A&#$%d&d+DOPA&#$&d'd+DPQ.)8&#$$d%d+DNO8&#$$d'd+DNQ  ' 0&P/ =!K "5 # $ %(; iV@V Normal$ xPda$CJOJQJ_HmH sH tH HH Heading 2$$dx@&a$6CJ<A@< Default Paragraph Font:@: Header$ x a$6CJ, @, Footer  !2)@2 Page Number CJOJQJFF LetterHead$  xa$6CJ2O12 GreekText6CJOJQJOA OSFOJQJ44 LetterSig$ PBa$0Oa0 LetterTextSCOJQJ:Oq: NoteNumTextCJ EHH*OJQJ<< NoteTextdB =CJ6O6 NoteNumNoteCJ EHOJQJ&& NoteBib<(( Point-6dllLetterEnclosureHead$x<a$#CJOJQJ_HmHnHsH tH u00 ParaPoint-3d66 LetterSig7$]a$>> LetterSig1$ PB]a$00 ParaPoint-6 d>> NoteVerse!$dB`a$CJH"H LetterVerse"$ Pxxa$DD LetterAttribution#$^a$6OA6 SuperScriptCJEHOJQJ2OQ2 SuperNoteCJEHOJQJ2Oa2 GreekNote6CJOJQJ*Oq* ContSectBreakO NoteGap$O$ NoteNumGap.. LetterDate*$a$JJ Footnote Text+d. xP=CJH&@H Footnote ReferenceCJEHH*OJQJ O Italic6JOJ ChronDate.$$1$dP( CJOJQJDD ChronNormal/(d$^`(CJVV Register/0 xP`0h3d$^`3CJjj FrontHeader1<1$$$ HP !$dx1$a$CJ44 Display2d$xxCJ0Or10 NoteNumDisplayEH\ \Index 1,4$ xP6 SdB^`Sa$CJmHnHuN N Index 2)5$ xPZSdB^Z`Sa$CJN N Index 3)6$ xPSdB^`Sa$CJN N Index 4)7$ xPSdB^`Sa$CJ<< FrontHeader2 8@ CJ.. EndOfTheIndex9ff IndexLettersTo:dB1$^`CJOJQJ_HmH sH tH kl*UZ^chk IPRk!!JTilThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerC:\MyTemplates\Indexer.dotThomas MinskerKC:\WINDOWS\Application Data\Microsoft\Word\AutoRecovery save of Indexer.asdThomas MinskerKC:\WINDOWS\Application Data\Microsoft\Word\AutoRecovery save of Indexer.asdilAKBOCDEWFHJYKQMGN6O1P7R)S<TRWU eeeeee%e eeeeeee#ete)*+,-./veYeZe\e]e^e_ewexeDV"`))V#V))V$[))V%W))V&X))V'))V(U))V)1))V*T))V+))V,))V-))V.))V/D))V0))V1!))V27))V3h))V4i))V5 ))V65))V76))V8))V9))V:9))V; ))V<4))V=))V> ))V?))V@ ))VA))VB3))VCH))VD))VE"))VFa))VG$))VH2))VI))VJ8))VK())VL))VMF))VN))VO0))VP))VQb))VR'))VS:))VT))VU<))VV))VW&))VX))VYc))VZ))V[ ))V\;))V=V>V?V@VAVBVCVEVG !(Macro1Macro1NewMacros.Macro1(Normal.NewMacros.Macro2Macro2NewMacros.Macro2 IndexerMain IndexerMainV]rm V]rm V]rm V]rm V]rm 0 (@IndexerCustom Popup 26 (@EntrysCustom Popup 25 (@NumbersCustom Popup 20 (@GrabberCustom Popup 27 (@GoToCustom Popup 2 (@FormatCustom Popup 22 (@CharsCustom Popup 24 (@ToolbarsCustom Popup 8Custom Popup 1 Custom Popup 10   *@; Normal StyleNormal(p("( Letter HeadConvert Letter Head1NewMacros.ConvertLetterHead1(p( (Letter Head At Page TopLetter Head At Page TopNewMacros.LetterHeadAtPageTop(p(  *@;  LetterVerse LetterVerse(p(  *@; Letter AttributionLetterAttribution(p(" *@; GreekText GreekText(p(  *@;LetterText Small Caps LetterTextSC(p("(Letter(Close)Sig7Con Letter Sig7NewMacros.ConLetterSig7(""""p(?? (Letter(Signature)Sig1Con Letter Sig1NewMacros.ConLetterSig1(""""p(OO (Letter Enclosure HeadConvert Enclosure HeadNewMacros.ConvertEnclosureHead(p(" *@; OSF StyleOSF(p(" *@;LetterSig Style LetterSigCustom Popup 2 Custom Popup 2"f"f"f"f"f0(GoTo Last Thing SelectedGo to Last Thing SelectedGotoBooks.GoToLastThingSelected( GoTo Last Move SubEntry CutPoint#Go to Last Move Sub Entry Cut Point&GotoBooks.GoToLastMoveSubEntryCutPointCustom Popup 3 Custom Popup 30 (Goto Next NoteBib MSGoto Next Note BibNewMacros.GotoNextNoteBib(p(ۣ˺I.[ *@;Note BibliographyNoteBib(p( *@; Note TextNoteText(p( *@;  Note Verse NoteVerse(p( *@;  Text Note# NoteNumText(p( *@;  Note Note# NoteNumNote(p( *@;Greek Note Style GreekNote(p( *@;Footnote Text Style Footnote Text(p( *@;Footnote Reference StyleFootnote Reference(p(Custom Popup 4 Custom Popup 4EEEEE0 (Select The IndexSelect The IndexFinalIX.SelectTheIndex"(Generate Indented IndexGen Indented IndexFinalIX.GenIndentedIndex(p(|{{{{{{{{{{|"(Conversion Part 1Conversion Part1FinalIX.ConversionPart1(p(x~~~~~~~{~}~~~~ (Change Blank Para To ParaChange Blank Para to ParaFinalIX.ChangeBlankParaToPara (Change Color Of Para MarkersChange Color of Para Markers FinalIX.ChangeColorOfParaMarkers (Fix Aster A ZeroFix Aster AZeroFinalIX.FixAsterAZero (Remove AsterisksRemove AsterisksFinalIX.RemoveAsterisks (Change Blue Letter #s To Italic$Change Blue Letter Numbers to Italic'FinalIX.ChangeBlueLetterNumbersToItalic (Add Comma For Roman PagesAdd Comma For Roman PagesFinalIX.AddCommaForRomanPages"( Find + Catenate Duplicate Notes (Find and Catenate Duplicate Note Numbers+FinalIX.FindAndCatenateDuplicateNoteNumbers(p(x{{}~~{{| (Find Next Adjacent DuplicatesFind Adjacent DuplicatesFinalIX.FindAdjacentDuplicates (Catenate Duplicate Note NumbersCatenate Duplicate Note Numbers$FinalIX.CatenateDuplicateNoteNumbers (Find Next Catenated Notes Find Next Set of Catenated Notes#FinalIX.FindNextSetOfCatenatedNotes(p(ϿHp\|xp|"(&Find + Combine Adjacent Letter #s OnlyFind Adjacent Letter Nums Only"FinalIX.FindAdjacentLetterNumsOnly(p(|{{~>{{| (Combine Adjacent Letter #s Only!Combine Adjacent Letter Nums Only%FinalIX.CombineAdjacentLetterNumsOnly (Find Next Catenated Letter #s&Find Next Set of Catenated Letter Nums(FinalIX.FindNextSetOfCatenatedLetterNums(p(ϿHp\|xp|"(Find + Fix Catenated Letter #s"Find and Fix Catenated Letter Nums%FinalIX.FindAndFixCatenatedLetterNums(p(x{{{{{ (Find + Fix Catenated Note #s Find and Fix Catenated Note Nums#FinalIX.FindAndFixCatenatedNoteNums(p(x{x{{{{xCustom Popup 5 Custom Popup 5     0Custom Popup 6 Custom Popup 60Custom Popup 7 Custom Popup 70*@;Em DashDashEm(p(*@;En DashDashEn(p(*@;NonBreaking DashDashNB(p(*@;Optional HyphenDashOpt(p((Em Double LineDouble Line EmNewMacros.DoubleLineEm(p(( Double Line Double LineNewMacros.DoubleLine(p(( 3 Em SpacesInsert3 Em SpacesNewMacros.Insert3EmSpaces(p(ymmmmy*@;Em SpaceSpaceEm(p(*@;En SpaceSpaceEn(p(*@;NonBreaking SpaceSpaceNB(p((NonBreaking Thin Space Thin SpaceNewMacros.ThinSpace(p((Open Single Quote Quote SOpenNewMacros.QuoteSOpen(p((Close Single Quote Quote SCloseNewMacros.QuoteSClose(p((Open Double Quote Quote DOpenNewMacros.QuoteDOpen(p(3w(Close Double Quote Quote DCloseNewMacros.QuoteDClose(p(Custom Popup 8 Custom Popup 80(Main Toolbar (Nick1) Toolbar Nick1FinalIX.ToolbarNick1(Toolbars: Indexer EntrysToolbar Index EntrysFinalIX.ToolbarIndexEntrys(333330333330p((Toolbars: Indexer NumbersToolbar Index NumbersFinalIX.ToolbarIndexNumbers(p(m8}8}Custom Popup 9 Custom Popup 9 0Custom Popup 10 Custom Popup 10 0Custom Popup 11 Custom Popup 11 0   *@;Normal Style 10.5/12Normal(p(  *@;NormalSmall Style 9.5/11 NormalSmall" (@ Front MatterCustom Popup 16" *@;LetterHead Style LetterHead("""p(s`  *@;LetterDate Style LetterDate(""""p(  *@;Letter(Close)Sig7 Style LetterSig7("""""p(33  *@;Letter(Signature)Sig1 Style LetterSig1(""""p({" *@;NoteBib(liography) StyleNoteBib(__""""p({s ?  *@;NoteText StyleNoteText(__""""p(  ?" *@;Greek(in)Text Style GreekText(p(  *@;Greek(in)Note Style GreekNote(p(" *@; Para 3-Point ParaPoint-3(p(  *@; Para 6-Point ParaPoint-6(p(%  XT vCustom Popup 12 Custom Popup 12 0 (Top of DocumentGo to Top of DocumentNewMacros.GoToTopOfDocument(""""""    """ p(xxxo` (Display Letter#Index Display Letter Number"NewMacros.IndexDisplayLetterNumber( """!" p(" (@Index Words at CursorCustom Popup 13 (@Flip Name at CursorCustom Popup 15" (@Peacock's FamilyCustom Popup 14Custom Popup 13 Custom Popup 130( Index 1 Word Index1 WordNewMacros.Index1Word(!"! !"! ! !"! " """ 33p(7( Index 2 Words Index2 WordNewMacros.Index2Word(!"!!!"!!"!!"!"!!""!""""""033330p(7( Index 3 Words Index3 WordNewMacros.Index3Word(က!"!!!"!!""!!""!"!!"""!""""""""3333333p(7Custom Popup 14 Custom Popup 140(Tom Minsker (test)Iname1Indexing.Iname1(Nick Joukovsky (test)Iname2Indexing.Iname2Custom Popup 15 Custom Popup 150 (LastName (only)Index Last First1NewMacros.IndexLastFirst1( !!""!""!""!""003333PPp({{\: (LastName, FirstNameIndex Last First2NewMacros.IndexLastFirst2("""""!"!"""!"""!""""!"""00003333330@p(k  (LastName, FirstName MiddleNameIndex Last First3NewMacros.IndexLastFirst3(""!"""""!!""!"!!""!""!"!""!""""!!033333333p(/Custom Popup 16 Custom Popup 160 *@;Chronology Date Style ChronDate *@;Chronology Normal Style ChronNormal *@;Register StyleRegisterCustom Popup 17 Custom Popup 170(100%Zoom100NewMacros.Zoom100(125%Zoom125NewMacros.Zoom125(150%Zoom150NewMacros.Zoom150Custom Popup 18 Custom Popup 180 (Select All Notes Next LetterSelect All Notes Next Letter#FinalStuff.SelectAllNotesNextLetter(333333333333333333333333333333p(?????? ($Manually Hyphenate Current SelectionManually HyphenateFinalStuff.ManuallyHyphenate(""""p("(Find Next 1-Line NoteFind Next1 Line NoteFinalStuff.FindNext1LineNote("""" "#33!"""" """ """ p(??_[{{?? (Append Next NoteJoin Next Note to ThisNewMacros.JoinNextNoteToThis(ŀ""""p(?????? (Unjoin Last NoteUnjoin Last NoteNewMacros.UnjoinLastNote(ŀ""  p(??_????"(Loop Through Section HeadersLoop Through Section Headers$FinalStuff.LoopThroughSectionHeaders(~p(???? Custom Popup 19 Custom Popup 190Custom Popup 20 Custom Popup 20ppppp0(Toolbars: Indexer NumbersToolbar Index NumbersFinalIX.ToolbarIndexNumbers(p(m8}8}(Move To Previous BlankMove to Prev BlankNumbers.MoveToPrevBlank(p(m8}8}(Move To Next BlankMove to Next BlankNumbers.MoveToNextBlank(p(m8}8}(![Alt+J] &Join Numbers 3, 4 to 3-4Collapse Surrounding Numbers"Numbers.CollapseSurroundingNumbers(30"!"#31p(}8}8}m8}8}(-[Alt+&K] &Collapse selection "2, 3, 4" to 2-4Collapse Entry SelectionNumbers.CollapseEntrySelection(3233233323#23#23"#3"#3"#23323323"#3"#3"#2332332333333333p(/(Sort + Combine Number Sequence Sort and Combine Number Sequence$FinalIX.SortAndCombineNumberSequence IndexerEntrys  IndexerEntrys0  ([Alt+F] Select &Full EntrySelect This Entire EntryEntrys.SelectThisEntireEntry(333330"!            "!333331p(oonooooonono ([+S] Select this &SubEntrySelect This Sub EntryEntrys.SelectThisSubEntry(333330"!     "!333330p(oooon"(![+P] Swap SubEntry with &PreviousSwap Entry With PrevEntrys.SwapEntryWithPrev(€DDDD33""      DDDD3 "" DDDDp( ````p_ ([+N] Swap SubEntry with &NextSwap Entry With NextEntrys.SwapEntryWithNext(€ DDDD"" DDDD3   ""33DDDDp(_p`` "( [+C] &Cut Current Index SubEntryCut Current Index EntryEntrys.CutCurrentIndexEntry(€3333303303330@@DDD@3330333330p( ([+R] Put Clip Board Entry BackPut Entry BackEntrys.PutEntryBack(€3333303303330DD@DD@DDD@3330333330p( (![+M] &Move Current Index SubEntryMove Current Index EntryEntrys.MoveCurrentIndexEntry(€3333303303330DD@DD@DDD@3330333330p( (#[+B] Paste SubEntry &Before CurrentPaste Entry Before CurrentEntrys.PasteEntryBeforeCurrent(€DDDDDD""" 33333333DDDDp( ("[+A] Paste SubEntry &After CurrentPaste Entry After CurrentEntrys.PasteEntryAfterCurrent(€DDDD33333333" ""DDDDDDp("([+T] Move SubEntry to &TopMove Sub Entry to Logical TopEntrys.MoveSubEntryToLogicalTop(€33330DD@DDD@""      DDD@"" 33330p(||||n ([+E] Move SubEntry to &End Move Sub Entry to Logical Bottom"Entrys.MoveSubEntryToLogicalBottom(€33330"" DD@ DDD@  "" DDD@33330p(o~|| ( [+W] Move SubEntry Where it &Was Move Sub Entry Back Where It Was!Entrys.MoveSubEntryBackWhereItWas(€33330"" ""     "" 33330p(~oo~~~"( [+O] All Menu Items OnIndex Entrys All OnEntrys.IndexEntrysAllOn(p(@@@@@@@Custom Popup 21 Custom Popup 21666660(Verify Blue Letter ***#s Verify XELetter NumbersVerifiyer.VerifyXELetterNumbers(Verify Green Note ***#s Verify XENote NumbersVerifiyer.VerifyXENoteNumbersCustom Popup 22 Custom Popup 22aaaaa0(ConvertToRunInConvert to Run InFormat.ConvertToRunIn(Final Color And HighLightFinal Color and High LightFormat.FinalColorAndHighLight(Remove Color in ParaRemove Color in ParaFormat.RemoveColorInPara(Remove HighLight in ParaRemove High Light in ParaFormat.RemoveHighLightInPara(Demote Selected Entrys 1 LevelDemote Selected Entrys1 Level"FinalIX.DemoteSelectedEntrys1LevelCustom Popup 23 Custom Popup 23hfhfhfhfhf0 (100 %Zoom100General.Zoom100 (125 %Zoom125General.Zoom125 (150 %Zoom150General.Zoom150 (175 %Zoom175General.Zoom175Custom Popup 24 Custom Popup 24:::::0 @Q(Sȸp(@Y(Sȸp(( ThinSpace Thin SpaceChars.ThinSpace(Sȸp((En DashEn DashChars.InsertEnDash(Tȸp((Em DashEm DashChars.InsertEmDash(Tȸp(( 3 Em SpacesInsert3 Em SpacesChars.Insert3EmSpaces(Tȸp(ss(Open ' Quote SOpenChars.QuoteSOpen(ȸp((Close ' Quote SCloseChars.QuoteSClose(ȸp((Open " Quote DOpenChars.QuoteDOpen(ȸp(wg3(Close " Quote DCloseChars.QuoteDClose(ȸp(w3gIndexerNumbersIndexerNumbers^^^^^0 (Move To Previous BlankMove to Prev BlankNumbers.MoveToPrevBlank(p(m8}8} (Move To Next BlankMove to Next BlankNumbers.MoveToNextBlank(p(m8}8}"(![Alt+J] &Join Numbers 3, 4 to 3-4Collapse Surrounding Numbers"Numbers.CollapseSurroundingNumbers(30"!"#31p(}8}8}m8}8} (-[Alt+&K] &Collapse selection "2, 3, 4" to 2-4Collapse Entry SelectionNumbers.CollapseEntrySelection(3233233323#23#23"#3"#3"#23323323"#3"#3"#2332332333333333p(/"(Sort + Combine Number Sequence Sort and Combine Number Sequence$FinalIX.SortAndCombineNumberSequenceCustom Popup 25 Custom Popup 250 (Toolbars: Indexer EntrysToolbar Index EntrysFinalIX.ToolbarIndexEntrys(333330333330p("([Alt+F] Select &Full EntrySelect This Entire EntryEntrys.SelectThisEntireEntry(333330"!            "!333331p(oonooooonono ([+S] Select this &SubEntrySelect This Sub EntryEntrys.SelectThisSubEntry(333330"!     "!333330p(oooon"(![+P] Swap SubEntry with &PreviousSwap Entry With PrevEntrys.SwapEntryWithPrev(€DDDD33""      DDDD3 "" DDDDp( ````p_"( [+C] &Cut Current Index SubEntryCut Current Index EntryEntrys.CutCurrentIndexEntry(€3333303303330@@DDD@3330333330p( ([+R] &Replace Clip Board EntryPut Entry BackEntrys.PutEntryBack(€3333303303330DD@DD@DDD@3330333330p( (![+M] &Move Current Index SubEntryMove Current Index EntryEntrys.MoveCurrentIndexEntry(€3333303303330DD@DD@DDD@3330333330p( ([+N] Swap SubEntry with &NextSwap Entry With NextEntrys.SwapEntryWithNext(€ DDDD"" DDDD3   ""33DDDDp(_p``  (#[+B] Paste SubEntry &Before CurrentPaste Entry Before CurrentEntrys.PasteEntryBeforeCurrent(€DDDDDD""" 33333333DDDDp( ("[+A] Paste SubEntry &After CurrentPaste Entry After CurrentEntrys.PasteEntryAfterCurrent(€DDDD33333333" ""DDDDDDp("([+T] Move SubEntry to &TopMove Sub Entry to Logical TopEntrys.MoveSubEntryToLogicalTop(€33330DD@DDD@""      DDD@"" 33330p(||||n ([+E] Move SubEntry to &End Move Sub Entry to Logical Bottom"Entrys.MoveSubEntryToLogicalBottom(€33330"" DD@ DDD@  "" DDD@33330p(o~|| ( [+W] Move SubEntry Where it &Was Move Sub Entry Back Where It Was!Entrys.MoveSubEntryBackWhereItWas(€33330"" ""     "" 33330p(~oo~~~"( [+O] All Menu Items OnIndex Entrys All OnEntrys.IndexEntrysAllOn(p(@@@@@@@Custom Popup 26 Custom Popup 260 (Generate Run-In Index {1}Generate Run in Index1Index.GenerateRunInIndex1(p( (Generate Run-In Index {2}Generate Run in Index2Index.GenerateRunInIndex2(p( (Generate Run-In Index {3}Generate Run in Index3Index.GenerateRunInIndex3(p("(Update Current IndexUpdate Current IndexIndex.UpdateCurrentIndex(p("(Convert Index To A FileConvert Index to AFileIndex.ConvertIndexToAFile(KKp(Custom Popup 27 Custom Popup 270 ( Remove Entry and Grab #sRemove Entry and Grab Numbers!Grabber.RemoveEntryAndGrabNumbers(3233323#23"#3"#23323"#3"#2332333333p(pp( Put Last Grabbed Entry BackPut Last Grab BackGrabber.PutLastGrabBack(p(?m8}8}(  Just Grab #sJust Grab NumsGrabber.JustGrabNums(3233323#23"#3"#23323"#3"#2332333333p(( Paste Grabbed #s at StartPaste Grab Start of NumsGrabber.PasteGrabStartOfNums(3303#02"03#02"03#0330p( qq( Paste Grabbed #s Before CursorPaste Grab Nums PrevGrabber.PasteGrabNumsPrev(33#3303#23#12"32"03#33#02"32"03#33#0333330p( ( Paste Grabbed #s After CursorPaste Grab Nums NextGrabber.PasteGrabNumsNext(3233323#23"#3"#23323"#3"#2332333333p(( Paste Grabbed #s at EndPaste Grab End of NumsGrabber.PasteGrabEndOfNums(3303#02"03#02"03#0330p( qq( Append Grab to Unnumbered LineAppend to Unnumbered LineGrabber.AppendToUnnumberedLine(3233323#23"#3"#23323"#3"#2332333333p(( Show Last GrabShow Last GrabGrabber.ShowLastGrabIndexerGrabber IndexerGrabberJTJTJTJTJT 0 ( Remove Entry and Grab #sRemove Entry and Grab Numbers!Grabber.RemoveEntryAndGrabNumbers(3233323#23"#3"#23323"#3"#2332333333p(pp( Put Last Grabbed Entry BackPut Last Grab BackGrabber.PutLastGrabBack(p(?m8}8}(  Just Grab #sJust Grab NumsGrabber.JustGrabNums(3233323#23"#3"#23323"#3"#2332333333p(( Paste Grabbed #s at StartPaste Grab Start of NumsGrabber.PasteGrabStartOfNums(3303#02"03#02"03#0330p( qq( Paste Grabbed #s Before CursorPaste Grab Nums PrevGrabber.PasteGrabNumsPrev(33#3303#23#12"32"03#33#02"32"03#33#0333330p( ( Paste Grabbed #s After CursorPaste Grab Nums NextGrabber.PasteGrabNumsNext(3233323#23"#3"#23323"#3"#2332333333p(( Paste Grabbed #s at EndPaste Grab End of NumsGrabber.PasteGrabEndOfNums(3303#02"03#02"03#0330p( qq( Append Grab to Unnumbered LineAppend to Unnumbered LineGrabber.AppendToUnnumberedLine(3233323#23"#3"#23323"#3"#2332333333p(( Show Last GrabShow Last GrabGrabber.ShowLastGrab GreekText(TemplateProject.FinalIX.ToolbarIndexMain)TemplateProject.Index.GenerateRunInIndex2OSF LetterTextSC4TemplateProject.FinalIX.CopyNumberSequenceToSortFile0TemplateProject.FinalIX.CombineContiguousNumbers,TemplateProject.FinalIX.CopyFinalNumbersBack4TemplateProject.FinalIX.SortAndCombineNumberSequence)TemplateProject.Index.GenerateRunInIndex1)TemplateProject.Index.GenerateRunInIndex3(TemplateProject.Index.UpdateCurrentIndexNoteBib NoteText NoteNumNote NoteNumText(TemplateProject.FinalIX.GenIndentedIndex%TemplateProject.FinalIX.GenRunInIndex!TemplateProject.FinalIX.IxGotoTopLetterAttribution ParaPoint-3 ParaPoint-6.TemplateProject.Entrys.CombineLevel3IntoLevel2)TemplateProject.Index.ConvertIndexToAFile+TemplateProject.Entrys.CutCurrentIndexEntry*TemplateProject.Entrys.CutCurrentParagraph2TemplateProject.Entrys.FindFirstItalicWithinLevel1 NoteVerse LetterVerse%TemplateProject.Entrys.FindNextLevel3%TemplateProject.Entrys.FindPrevLevel3(TemplateProject.Entrys.GotoStartOfLevel1'TemplateProject.Entrys.IndexEntrysAllOn+TemplateProject.Entrys.IndexEntrysToolbarOn LetterSig,TemplateProject.Entrys.MoveCurrentIndexEntry GreekNote2TemplateProject.Entrys.MoveSubEntryToLogicalBottom/TemplateProject.Entrys.MoveSubEntryToLogicalTop-TemplateProject.Entrys.PasteEntryAfterCurrentSpaceNBSpaceEmSpaceEnDashEmDashEnDashNBDashOpt.TemplateProject.Entrys.PasteEntryBeforeCurrent#TemplateProject.Entrys.PutEntryBack,TemplateProject.Entrys.SelectThisEntireEntry*TemplateProject.Entrys.SelectThisParagraph)TemplateProject.Entrys.SelectThisSubEntry(TemplateProject.Entrys.SwapEntryWithNext(TemplateProject.Entrys.SwapEntryWithPrev'TemplateProject.Entrys.WhatWasLastLevel,TemplateProject.Format.RemoveHighLightInPara(TemplateProject.Format.RemoveColorInPara/TemplateProject.GotoBooks.GoToLastThingSelected6TemplateProject.GotoBooks.GoToLastMoveSubEntryCutPoint1TemplateProject.Entrys.MoveSubEntryBackWhereItWas1TemplateProject.Grabber.RemoveEntryAndGrabNumbers'TemplateProject.Grabber.PutLastGrabBack$TemplateProject.Grabber.JustGrabNums$TemplateProject.Grabber.ShowLastGrab)TemplateProject.Grabber.PasteGrabNumsPrev,TemplateProject.Grabber.PasteGrabStartOfNums*TemplateProject.Grabber.PasteGrabEndOfNums%TemplateProject.Format.ConvertToRunIn)TemplateProject.Grabber.PasteGrabNumsNext-TemplateProject.Format.FinalColorAndHighLight.TemplateProject.Grabber.AppendToUnnumberedLine*TemplateProject.FinalIX.ToolbarIndexEntrys%TemplateProject.Chars.Insert3EmSpaces"TemplateProject.Chars.InsertEmDash TemplateProject.Chars.QuoteDOpen!TemplateProject.Chars.QuoteDClose!TemplateProject.Chars.QuoteSClose& TemplateProject.Chars.QuoteSOpen LetterDate LetterHead LetterSig1 LetterSig7TemplateProject.Chars.ThinSpace+TemplateProject.FinalIX.ToolbarIndexNumbers.TemplateProject.Numbers.CollapseEntrySelection2TemplateProject.Numbers.CollapseSurroundingNumbers'TemplateProject.FinalIX.MoveToNextBlank'TemplateProject.FinalIX.MoveToPrevBlank ChronDate ChronNormal NormalSmall Register&TemplateProject.FinalIX.SelectTheIndex-TemplateProject.FinalIX.ChangeBlankParaToPara.TemplateProject.FinalIX.JoinSurroundingNumbers%TemplateProject.FinalIX.CheckToGoHome2TemplateProject.FinalIX.DemoteSelectedEntrys1LevelD"TEMPLATEPROJECT.CHARS.THINSPACE# TEMPLATEPROJECT.CHARS.QUOTEDOPEN$ TEMPLATEPROJECT.CHARS.QUOTESOPEN%!TEMPLATEPROJECT.CHARS.QUOTEDCLOSE&!TEMPLATEPROJECT.CHARS.QUOTESCLOSE'!TEMPLATEPROJECT.FINALIX.IXGOTOTOP("TEMPLATEPROJECT.CHARS.INSERTEMDASH)#TEMPLATEPROJECT.ENTRYS.PUTENTRYBACK$TEMPLATEPROJECT.GRABBER.JUSTGRABNUMS$TEMPLATEPROJECT.GRABBER.SHOWLASTGRAB*%TEMPLATEPROJECT.CHARS.INSERT3EMSPACES+%TEMPLATEPROJECT.ENTRYS.FINDNEXTLEVEL3,%TEMPLATEPROJECT.ENTRYS.FINDPREVLEVEL3-%TEMPLATEPROJECT.FINALIX.CHECKTOGOHOME.%TEMPLATEPROJECT.FINALIX.GENRUNININDEX/%TEMPLATEPROJECT.FORMAT.CONVERTTORUNIN0&TEMPLATEPROJECT.FINALIX.SELECTTHEINDEX1'TEMPLATEPROJECT.ENTRYS.INDEXENTRYSALLON2'TEMPLATEPROJECT.ENTRYS.WHATWASLASTLEVEL3'TEMPLATEPROJECT.FINALIX.MOVETONEXTBLANK4'TEMPLATEPROJECT.FINALIX.MOVETOPREVBLANK'TEMPLATEPROJECT.GRABBER.PUTLASTGRABBACK5(TEMPLATEPROJECT.ENTRYS.GOTOSTARTOFLEVEL16(TEMPLATEPROJECT.ENTRYS.SWAPENTRYWITHNEXT7(TEMPLATEPROJECT.ENTRYS.SWAPENTRYWITHPREV8(TEMPLATEPROJECT.FINALIX.GENINDENTEDINDEX9(TEMPLATEPROJECT.FINALIX.TOOLBARINDEXMAIN:(TEMPLATEPROJECT.FORMAT.REMOVECOLORINPARA;(TEMPLATEPROJECT.INDEX.UPDATECURRENTINDEX<)TEMPLATEPROJECT.ENTRYS.SELECTTHISSUBENTRY)TEMPLATEPROJECT.GRABBER.PASTEGRABNUMSNEXT)TEMPLATEPROJECT.GRABBER.PASTEGRABNUMSPREV=)TEMPLATEPROJECT.INDEX.CONVERTINDEXTOAFILE>)TEMPLATEPROJECT.INDEX.GENERATERUNININDEX1?)TEMPLATEPROJECT.INDEX.GENERATERUNININDEX2@)TEMPLATEPROJECT.INDEX.GENERATERUNININDEX3A*TEMPLATEPROJECT.ENTRYS.CUTCURRENTPARAGRAPHB*TEMPLATEPROJECT.ENTRYS.SELECTTHISPARAGRAPHC*TEMPLATEPROJECT.FINALIX.TOOLBARINDEXENTRYS*TEMPLATEPROJECT.GRABBER.PASTEGRABENDOFNUMSD+TEMPLATEPROJECT.ENTRYS.CUTCURRENTINDEXENTRYE+TEMPLATEPROJECT.ENTRYS.INDEXENTRYSTOOLBARONF+TEMPLATEPROJECT.FINALIX.TOOLBARINDEXNUMBERSG,TEMPLATEPROJECT.ENTRYS.MOVECURRENTINDEXENTRYH,TEMPLATEPROJECT.ENTRYS.SELECTTHISENTIREENTRYI,TEMPLATEPROJECT.FINALIX.COPYFINALNUMBERSBACKJ,TEMPLATEPROJECT.FORMAT.REMOVEHIGHLIGHTINPARA,TEMPLATEPROJECT.GRABBER.PASTEGRABSTARTOFNUMSK-TEMPLATEPROJECT.ENTRYS.PASTEENTRYAFTERCURRENTL-TEMPLATEPROJECT.FINALIX.CHANGEBLANKPARATOPARAM-TEMPLATEPROJECT.FORMAT.FINALCOLORANDHIGHLIGHTN.TEMPLATEPROJECT.ENTRYS.COMBINELEVEL3INTOLEVEL2O.TEMPLATEPROJECT.ENTRYS.PASTEENTRYBEFORECURRENTP.TEMPLATEPROJECT.FINALIX.JOINSURROUNDINGNUMBERS.TEMPLATEPROJECT.GRABBER.APPENDTOUNNUMBEREDLINEQ.TEMPLATEPROJECT.NUMBERS.COLLAPSEENTRYSELECTIONR/TEMPLATEPROJECT.ENTRYS.MOVESUBENTRYTOLOGICALTOPS/TEMPLATEPROJECT.GOTOBOOKS.GOTOLASTTHINGSELECTEDT0TEMPLATEPROJECT.FINALIX.COMBINECONTIGUOUSNUMBERSU1TEMPLATEPROJECT.ENTRYS.MOVESUBENTRYBACKWHEREITWAS1TEMPLATEPROJECT.GRABBER.REMOVEENTRYANDGRABNUMBERSV2TEMPLATEPROJECT.ENTRYS.FINDFIRSTITALICWITHINLEVEL1W2TEMPLATEPROJECT.ENTRYS.MOVESUBENTRYTOLOGICALBOTTOMX2TEMPLATEPROJECT.FINALIX.DEMOTESELECTEDENTRYS1LEVELY2TEMPLATEPROJECT.NUMBERS.COLLAPSESURROUNDINGNUMBERSZ4TEMPLATEPROJECT.FINALIX.COPYNUMBERSEQUENCETOSORTFILE[4TEMPLATEPROJECT.FINALIX.SORTANDCOMBINENUMBERSEQUENCE\6TEMPLATEPROJECT.GOTOBOOKS.GOTOLASTMOVESUBENTRYCUTPOINT@k`UnknownG:Times New Roman5Symbol3& :Ariala NewBskvll BTTimes New RomanENewBaskervilleKNewBaskerville SC;GraecaUBS#1h6f{lK&&F$r0dI1eThis is just a test to see if the lines are correct for the height of the page so the book is correctThomas MinskerThomas Minsker iH@HNormal'CJ OJPJQJ_HmHnHsH tH u<A@< Default Paragraph FontXOX SpaceEm$ xPda$CJOJQJ_HmH sH tH XOX SpaceEn$ xPda$CJOJQJ_HmH sH tH DashEmDashEnDashNBDa Oh+'0,8L dp    fThis is just a test to see if the lines are correct for the height of the page so the book is correct hisThomas Minskerthom Indexer.dotThomas Minskert239Microsoft Word 9.0 @@D9@þ@BOM ՜.+,0` hp  BPenn State Universityt fThis is just a test to see if the lines are correct for the height of the page so the book is correct Title  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~a.bRoot Entry FRWM61Table IWordDocumentSummaryInformation(DocumentSummaryInformation8MacrosRWMRWMVBA RWMRWMdir  !"#$%&'()*+,-./012345689:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijlmnopqrstuvwxyz{|}~ڳ0* pHdTemplateProjectQH@  = |  L;! J< 9stdole>stdoleP f%\*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\SYSTEM\STDOLE2.TLB# Automation#/MSForms>!SFEr ms3DD452EE1-E08F-101A-8-02608C4D0BB4DFM20.DLL#Micr@osoft 9 \ Ob Library/;C1s00}#0#0r 497CA363-3FC4-11D1-ADC6F63D53B5-@OP\VBE\G.EXD /.E .`M A}Offic}Ozfic}z p,2DF8D04C-5BFAZB-BDER5,AA|42,OFFICE97\,O97L[ 8.0["¼ >ThisDocumentG" Th@,s"D@cu@en 2 (HB11XB,!T>"B+BFinalIXG"F#naIhX 2Ob2O!uE@ntrysGE"rycBy&2 K % GotoBhook@-t`B`ok,2/,+NumberNB=bUrbO, % nJ,a`M>aK, i jACHaa `,CQaFL2K/ Q/ M+ IndexG IHd`)x V?F# Gp@-d+ 3Grab@7#dG ab e #d#7  'CHars   Index 7 Entrys _Format K>MxME @    @   8) "   0 Pp "x   "  "  "  ( 0P "X ` h "  "   0 dfh "B@b dfh "B@b dfh "B@bo@ dfh "B@boP dfh "B@bo dfh "B@bo dfh "B@bo@ dfh "B@bopdfh "B@b NLP R$ "B@J "!NewBaskerville99qoPAttribute VB_Name = "CHars" Sub Insert3EmSpaces() '  Selec tion.FSymbol CharacterNumber:=8195, Unicode:=True, Bias:=0IEnd } EmDash2125QuoteDOpen42043CloTse31)S71.7 4SN16afThinN16hMoveLeftt:=wd, CounaExtendCWith aFont.NewBaskerville~"Siz1T! Uc >xME @    I  `  X`3" "  (8"@ HX" ` hVp "  " "8`*p ", "8`, $ $  0 @.P   1Adexeo`@2Ao@3Ao  "!`` l INDEX \f " " \c "1"d "!B@^o0  "!B@o` "!B@ NLP "B@V NLP R$ "B@J "!B@ "!``CurIndex Z!\B@^ (&CurIndex "B@ NLP "B@J NLP "B@V "!`` CurIndexS Z!\B@^ (&CurIndex "B@ NLP "B@V NLP "B@J "!`` CurIndexe Z!\B@^ (& CurIndexS "B@ "B@$ (& CurIndexE "B@ "B@ B@^    "B@Index 1 Z%^(Index 2 Z%^(Index 3 Z%^(oAttribute VB_Name = "Index" Sub Generat`eRunI`1 () Call|("1"BEnd 2*2 E3E3 E(PsuyNo\'nSelection.Fields.Add Ran0ge:= , HTyp wdEmpty ext0:= _'"INDEX \f """ & ;) \c 1, PreserveFormatting:=True UpdπCurrentbb"ConverToAFileYToggleShowCodes LMoveRight Uni@wdCharacter, Coun1 Lef , Extend:=wdCMj(AsveDocumJ.Book0mark[v:=>"WV@ArGoTo Wha;, GK=#(X?=exSwd _DŒ_%Jx,5enJxME     !"#$%&'()*+,-k0123456789:;<=>?@ABCDEFGHIJKLMNOQRSTUVWXYZ[\]^_`cdefghijlm~opqrstuvwxyz{|}  K>%xMEH X     $X  & (  I* 8I, XI. xI0 I2 I4 I6 I8 I: 8I< XI> xI@  F "  HX  P  R  T  X \1 `' j( nX p r t< xX | ~ "(8"@Hh" "  $0 PX `4h  .6" $(0P &  , H` 4h" 4 @ @0 @p @ @ 40 h"p x$0    : 6P   , H 40hp"x $0  6 8P  , H 40 h p " x  * * * *0 *` * * * * *P * * *  "  ( 6H  " 6 4 @ @@ @ @ @ @@ B0 8 X0h* 6 ( 0"8 @ Hhp0 . 00 H8"  0 * @0P HB0 8X 0` 0(&X   2@HP"X `h8((Ppx (    08@ x "  " (8 @PX`hpx ( " (8 @PX`hpx (    0@"H PXx:, @6H  :   (08@HPX`hp   0 "  8P:`, 6  :0 p     @ 0P ",$ 0 ( 28  p ( 0  "   !"0!X! "`! h!p!!!!!"! " " " 0" 8" @" H" P" X" `" h"p"x"""""" """ #"# @#P# X#h#p#x########  # #"# $$ $0$8$@$H$P$X$`$h$p$x$  $ $$ $$ $$$$%%%% %(%0%@%`%h% "p% x%%"% %% %%%%%&&&& &(& 8& X&`&&&&&&' "' ''"(' P'`' h'x''''''''''' "' ''"' (0( 8(H(P(X(`(h(p(x((((( (] Last Level Selected was A@o@X NLP "B@V LP "B@x LP R$ "B@ "B@jo8 CutCurrentParagraph LastEntryCut Z!\%"B@"An Entry is already on Clip Board! A@|kA@ "!``LastEntryThingCut Z!\B@^| "B@j " "!`` LastEntryCut Z!\B@^NA o LastEntryCut Z!\%!No Entry currently on Clip Board! A@|xkp (& LastEntryCut "B@ "B@ LastEntryCut Z%\B@ (&LastEntryThingCut "B@B Selection.MoveUp Unit:=wdParagraph, Count:=1, Extend:=wdExtendA@"- Call MoveControlButtons(1, 1, 1, 0, 0, 0)oXA@- CommandBars("IndexEntrys").Visible = True9 CommandBars("IndexEntrys").Controls(1).Enabled = True: CommandBars("IndexEntrys").Controls(2).Enabled = False: CommandBars("IndexEntrys").Controls(3).Enabled = False9 CommandBars("IndexEntrys").Controls(4).Enabled = True9 CommandBars("IndexEntrys").Controls(5).Enabled = True- Call MoveControlButtons(1, 0, 0, 1, 1, 1)oX LastEntryCut Z!\%!No Entry currently on Clip Board! A@| kA@ NLP "B@J3 Selection.MoveRight Unit:=wdCharacter, Count:=10 Selection.MoveUp Unit:=wdParagraph, Count:=1 "B@ LastEntryCut Z%\B@ (&LastEntryThingCut "B@B Selection.MoveUp Unit:=wdParagraph, Count:=1, Extend:=wdExtend- Call MoveControlButtons(1, 1, 1, 0, 0, 0)A@"o LastEntryCut Z!\%!No Entry currently on Clip Board! A@|kA@ NLP "B@V0 Selection.MoveUp Unit:=wdParagraph, Count:=12 Selection.MoveDown Unit:=wdParagraph, Count:=1 "B@ LastEntryCut Z%\B@ (&LastEntryThingCut "B@B Selection.MoveUp Unit:=wdParagraph, Count:=1, Extend:=wdExtend- Call MoveControlButtons(1, 1, 1, 0, 0, 0)A@"o IndexerEntrys$( * IndexerEntrys$%B(D , IndexerEntrys$%B(D . IndexerEntrys$%B(D 0 IndexerEntrys$%B(D 2 IndexerEntrys$%B(D 4 IndexerEntrys$%B(D 6 IndexerEntrys$%B(D 8 IndexerEntrys$%B(D : IndexerEntrys$%B(D < IndexerEntrys$%B(D > IndexerEntrys$%B(D @ IndexerEntrys$%B(D IndexerEntrys$%B(Do IndexerEntrys$(A oxA - CommandBars("IndexEntrys").Visible = True9 CommandBars("IndexEntrys").Controls(1).Enabled = True9 CommandBars("IndexEntrys").Controls(2).Enabled = True9 CommandBars("IndexEntrys").Controls(3).Enabled = True9 CommandBars("IndexEntrys").Controls(4).Enabled = True9 CommandBars("IndexEntrys").Controls(5).Enabled = True9 CommandBars("IndexEntrys").Controls(6).Enabled = Trueox'H (&LastEntryThingSelected "B@ NLP "B@J "!$$'J J'L LP "B@ "!$$'N N J (&LastEntryThingSelected "B@No Previous Entry at Same LevelA@ N J eL d "!``PreviousAlikeStarts Z!\B@^'HkiX CutCurrentParagraphA@$H (&LastEntryThingSelected "B@ "B@j (&PreviousAlikeStarts "B@ "B@ (&LastEntryThingSelected "B@kB Selection.MoveUp Unit:=wdParagraph, Count:=1, Extend:=wdExtendox CutCurrentParagraphA@$T (&LastEntryThingSelected "B@ "B@j (&NextAlikeStarts "B@ "B@ (&LastEntryThingSelected "B@kx B Selection.MoveUp Unit:=wdParagraph, Count:=1, Extend:=wdExtendo( 'T (&LastEntryThingSelected "B@ NLP "B@J "!$$'J J' (&LastEntryThingSelected "B@ NLP "B@V NLP "B@JL( LP "B@ "!$$'V V J (&LastEntryThingSelected "B@No Next Entry at Same LevelA@ V J eLh k` XX LP "B@ "!$$'V V J X d "!``NextAlikeStarts Z!\B@^'Tk i  "!Z "! "!``LastEntryThingSelected Z!\B@^|@ NLP "B@Jk NLP "B@V LP "B@ "!``SEntry Z!\B@^ "!$$'J J'L LP "B@ "!$$'V V J GLj "!``EEntry Z!\B@^ "( (&SEntry "B@ "( "!``LastEntryThingSelected Z!\B@^oX NLP "B@V LP "B@ NLP "B@V "!,B@.Index 1 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@qh "!,B@B NLP "B@J "!``SEntry Z!\B@^ "!,B@.Index 1 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@qh "!,B@B "!,B@B NLP "B@J "!``EEntry Z!\B@^ "( (&SEntry "B@ "(o NLP "B@J NLP "B@V "!$' b b1/This function is not feasible at level: Index 1A@|kIndex b $$h$f ' dA@ "!``LastMoveSubEntryCut Z!\B@^ "B@j "!``LastMoveSubEntryCutPoint Z!\B@^ "!,B@. d Z%^ "!,( "!,9d50(d92 6949989:9<9>9@q "!,B@B NLP "B@V "B@ (&LastEntryThingSelected "B@o NLP "B@J NLP "B@V "!$' b b1/This function is not feasible at level: Index 1A@|XkPIndex b $$h$f ' lA@ "!``LastMoveSubEntryCut Z!\B@^ "B@j "!``LastMoveSubEntryCutPoint Z!\B@^ "!,B@. l Z%^ "!,( "!,9d50(d92 6949989:9<9>9@q "!,B@B NLP "B@J "B@ (&LastEntryThingSelected "B@oxLastMoveSubEntryCut Z!\%No SubEntry was Moved! A@|k (&LastEntryThingSelected "B@ "B@j (&LastMoveSubEntryCutPoint "B@ "B@LastMoveSubEntryCut Z%\B@ (&LastEntryThingSelected "B@o X NLP "B@V LP "B@ LP R$ "B@o "!Index 1 NLP "B@V LP "B@d0 "!,B@.Index 1 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@q "!,B@B NLP "B@JkPoH NLP "B@V LP "B@ "!,B@.Index 1 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@qP "!,B@B "( "!,B@.Index 1 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@q "!,B@B "( "!,B@. "!,!(v "!,9d50(d92 X949989:9<9>9@q "!,B@B NLP "B@JAo "!,B@.Index 2 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@q "!,B@B NLP "B@Vz "!Index 3G|j NLP "B@J; d "B@ NLP "B@ LP "B@zoX "!,B@.Index 3 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@q@ "!,B@Bo( "!,B@.Index 3 Z%^ "!,( "!,9d50(d92 X949989:9<9>9@qp "!,B@BoXPAttribute VB_Name = "Entrys" Public LastSelectedlLevel Sub Wha0tWasD*() MsgBPox "0 2  was " &End [`CutCurrentParagraphcPion.MoveRight Unit:`=wdCh-r@, Coun1s 4Up/Down, ExtendB;h qIndexÂr' '*If ActiveDocum.Bookmarks.Exists(("")True Then!EkAn is already on Clip Board!", vbExclamat^;tmA7IfCC^ThisvB0Add Range:=md, :=6ng8AC?Call CoolButtons(0, 1@ɊPutDBack~PrwFalswTNowcClw +'4GoTo‚!`ER6)Pe5mZ.DtkGn;~GysAllOmcyTFCDL6!E)geomman0dBar`s").VisiblAA\s(1).Ena@dĉf2iU3{4?!$f5u9:}l\C~efore7ľcry ]i]~:Sc3/^4L|efz~zT!?~a=~;e;phO~cHuHHP$zoHXlo o g oHu5/*2j)j *R'eK{jYEAfter_+Ok/A2`!_+ 5Ok// _+I*O'+{ +eO'K'/@w*&0P**ۯrA.?*?*s?*3r?*rs?*2Ghlu:*r bb2, b3040506070*80901 [b1)120Cser+s#%d tb'ɯs(sb2M_"s(sbN3Ss(sb4sb5˯6Ywb6u778]899'1010 %%(rols(12).Enabled = b12 CommandBars("IndexerEntrys").Co $3 x1 End Sub  lhToolbarOn() ' Visi!True0al@l MoveB utton, 1tAllK{1' j w4,56~Function FindPrevLikehAo 0SeleB.GoTo What:=wdBookmark, Name:= "LastThingCed" Left UniCharacter, Cou&n tys@$Val(R ight(%Style)A2 "Level  NextP:qUp&P graph+ O!("If4&ACveDocument.eBs.Add RangCgEeAlRStart^sDRB `dx Ife\#SwapWith DutCurr<# a4 '`$n()@@1 g9g88 Cut  xp"w* PtˇA2B, a}j, Extend##:`09P9GC9qhPOOOOOOOOSUQ 1ononWuZc.a R:hC.!60?h?h?h?h?h ?h?h8?h?h1?hedbD>hTuuuu!a "rulxsCaDownssyP|n.puz|sisaxsBr_sWs_s TPe5 Ando:}  t $ ~Ÿ~~LQ_?= L~}]$a#!B <0&+ '6 TTExi1:OHOH >PKy__W[S3(** cSaHHBƝH StyNext = Val(Right(Selection.le, 1))H If>$This Then GoTo -PR AveDocument.Bookmarks.Add Range:=m , Nam"EEntry"H| .ExtendModeTrue What:=wd cS1a,Fals-9gLast6ng5edo End Sub  ire(' rMovBe UnitCharacter@, Coun 1)UpP gr8aph[  Find.ClearFormatti|ngBrYs("Index 1"ĢWithIAC.Te"ȏ.Replace'warnd@ |BWGwdAAsk4G MatchCasWho0leWoildc#sRS@w dsLikAllA(LAP#M(.Execut^-NLeftMe*s?Jd'?Ja6?J@ ?J@/$JCJ= Ja JQWJunJ@VJF!f JM'M=M_̀)__4 {f!!ToLogicalToprk ?bXCur$w/14Y" 1"0MsgBox "qm fu nB not feasible at level: _Exitsr If0 AbpQ b" + LTrim(Str( -!1 *Q s?%'~9Cut~ߒߒtPoin?2.R9?T 2 = bspyCTNd ?y ?y= VT-p*TCon`%1J$Ty2TǟTyX2y51-ay=Pas~3"J'Jh0o 25 y0LBottomLQOM@f1OM߰ ,OM[ OMϣ!OMpOMOMUOMHM`BelowOMOM FM0 MMM!MQRMM__.M MMwMsM MMMpvoM.oM!$ .bE  .MatchWildcards = Fals(e  SoundsLikeAllWordForm End WithSelection.Find.Executo !MoveLeft Unit:=wdCharacter,, C1 3PasNGoTo W haJ Bookmark, Na@me:="LEntryThingUed" bSub  LBackWhereItWas()HIf AsveDocument.6sy`ists(6$Cut") Th en%MsgBox "No < wasDd!", vbExclamaExitbIfCcxG(1BPoint^KwXTV.Dņ=KMf sPgraph'MD:0Righ UpFFWA Down , Extendl#]]GotoStartOfLevel1h ]!)StylA"Index 1"X?'! Ɛ  EʘŽClearaatt }3 MLM x~!@ .Tetxt|"D[aReplaceua@ward, WM@wdaAskTru(1CasWhole`Ĉwɧwa! "Index 3" Then Exit Sub MoveLeft Unit:=wdCharacter, Coun&1 fTypeText :="(; " "DteC)TDown3PAgraph GoTo Agai@n End  n FindPrevLevel3() 'L.ClearFormatting#= AveDocument9s(1WithÁ2*.= " Repplace*Oward = Fahlse&W wd2Ask 4Tru MatchCaseWholeWoildc#sUS@dsLikAllA(LqAPC2G8.Execlut@3{N?{d?{@v<{ nzJG=EW=un=I=&v= c>jxME @W I YI     `   X` "DP h        *(  X x "  " "8`x" "    D  hx         0 8 H X ` x     " @Pp " "8 H Xx  "  0Pp"x L    "( 08"X"  , "   "@ "h     %Convert to Run-In is Final! Continue?  v  $'r r G|j ~L "B@|1' h A 1K2K3KTS(| n 1KT 1KT2KT "!``ThisSty Z!\B@^ LP "B@ NLP "B@J NLP R$ "B@J "!!  NLP "B@V NLP R$ "B@V "!!  (&ThisSty "B@ : Ad (&ThisSty "B@ , Ak8d0 (&ThisSty "B@ , Ak ' > Call AppendToPrevious(wdBlue, ", ", wdNoHighlight)3KTSnx2KT 1KT2KT '  , A3KT '  , ASn3KT 1KT2KT '  ; A3KT '  , ASPnHS@|8n0 '    G|j NLP "B@J LP R$ "B@ "B@j NLP "B@J\d "B@ "B@ NLP "B@V NLP "B@ o@ NLP "B@J LP R$ "B@  "!( "B@j NLP "B@J d "B@   NLP "B@J NLP R$ "B@V  "!`( NLP "B@Vk "B@ NLP "B@V NLP "B@o-Final Color and Highlight is Final! Continue?  v  $'r r G|j "B@  "!(  "!`(o  LP "B@ LP R$ "B@ NLP R$ "B@J& Selection.Font.ColorIndex = wdAuto  "!`( NLP "B@Vo` LP "B@ LP R$ "B@ NLP R$ "B@J  "!( NLP "B@Vo80ӴAttribute VB_Name = "Format" Sub ConvertToRunIn() @AnswerMsgBox("L to P-In is Final!tinue?", vbYe sNo +Qu@estion DefaultBu tton2fIf ivb6Then Exit SelecL.HomeKey Unit:=wdStoryLastSty$1GetNext:"Call Goto ParaMark(T8hisI4 Cpase   "1r"230:Else aEnd + 4[ (4' Jw2(A@PveDocument.Bookm@@s.Add Range:=C%@m., :=>"DDG& Mo0veUpfXgraph,unkB1YLeftChhcterB,tendE>xAK"K5FoKColorIndexwdRe2d@en CRigh42=16aKGoTo Wha *wdeHDi"pApp1ToPrevious(), ": jwdBlueqi+l)G5XaGreen ABwdNoH:la;}If ;k+@* ($ '5'9'ũ "k&I)1F /Re?, UDC) _?U,ߤ֤{/#,# {.v n.!/+ Q'u{˗ 1owd--˗1r  /bAndL>'S  aГV______GWhole{o2wdAuto? CRem`ԆInaW "?Z6ZҰ@:=1 Selection.MoveDown Unit:=wdParagraph, CounL1, Ext8endxLe$ftChctDer ' Font.ColorIndex = wdAuto tRange.Hi(ghlt 1NoRW End Sub  Rem1()\,Up+_AiQ FinalIX /AGrabberPw Numbers k(GotoBooksp<C2>OxME( `@Y   * H . l` n p  7 ` P % `  I @I      `     " ( "0 8Hh "p x   8 "@ H"Px,     (08@HPXh(     (08 Hh"    "     (08@HPX`p " ", ( 8 H Xhpx "4"(Ph"px (*"  H "X "  8*@p ""  0 @  P h  x          @ 0 *P  "    "     "      (  8  H X h                 8  H X p x           8             8H ` p""8 F`" "( 0H"h    ( H `    "      0P *XB       6 H8@<  ("0 0X " ",   8 HXhpx   0 "8 @Hh "p x" " , D8" , N0"8 @$Hp  Index ConverterA@oP` "B@$ (&a "B@o "!,B@. "!,!0B@. "!, ^p9d^p50(d92 6949989:9<9>9@q FD "!,B@Bo NLP R$ "B@J "' T NLP "B@V T G NLP "B@Jj "!,B@. "!, 9d50(d92 X949989:9<9>9@q "!,B@B NLP "B@V "!``PairS Z!\B@^ "!,B@. "!, 9d50(d92 X949989:9<9>9@q "!,B@B dfh "B@b NLP "B@J NLP R$ "B@J "B@jo8  "!,B@. "!, 9d50(d92 X949989:9<9>9@q "!,B@B NLP "B@Joh` NLP R$ "B@V "' T NLP "B@J T G NLP "B@Vj "!,B@. "!, 9d50(d92 X949989:9<9>9@qP "!,B@B NLP "B@JoStart at top of File? t v x $'r r zG ~L "B@|j r Gjo "!!P' Only 1 paragraph is selected!A@|8k0 "!``SelRange Z!\B@^ NLP "B@J LP R$ "B@ "B@ (&SelRange "B@ NLP "B@J "B@ LP R$ "B@  "!( NLP "B@V2 Selection.MoveLeft Unit:=wdCharacter, Count:=1 "!``DemoteS Z!\B@^ LP "B@'   LP "B@ LP R$ "B@ NLP R$ "B@J "B@j "!Index 1KTIndex 2 "(Index 2KTIndex 3 "(Index 3KTIndex 4 "('S8n0 "B@  G&Warning: Level 3 entry(s) encountered!A@j NLP "B@V "!``DemoteE Z!\B@^ "B@$ (&DemoteS "B@ "(o0 A@A@A@o` "B@$B@ "B@ "B@ "B@ "!,B@. "!,!0B@. "!,, 9d^p50(d92 6949989:9<9>9@q FD "!,B@B "!,B@. "!,!0B@. "!,a9d9999a50(d92 6949989:9<9>9@qH FD "!,B@B "B@ %-8 Paragraphs         "B@ "!,B@. "!,!0B@. "!,9999a9da50(d92 6949989:9<9>9@q FD "!,B@B "!,B@. "!,!0B@. "!,^p9d 50(d92 6949989:9<9>9@q( FD "!,B@B NLP "B@J LP R$ "B@ NLP R$ "B@J@ Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtendoP "!!P' NLP "B@J LP R$ "B@V "$' '   NLP "B@V LP R$ "B@V "$'    ' "B@j NLP "B@Jd   NLP "B@J NLP "B@J-d "B@  $d "B@ ' ' NLP "B@V LP R$ "B@Vk  ' 'k    -d "B@  $d "B@k $ MsgBox "/" & SS & "/" & SE & "/"op SS = 13SE = 118 ' MsgBox slen   0MsgBox Right(SS, L + 1) & " " & Right(SE, L + 1)BMsgBox Left(Right(SS, L + 1), 1) & " " & Left(Right(SE, L + 1), 1)   $$   $$    $$1Gjk ' '  G  $'j)MsgBox SS & " " & SE & " " & SX & " " & Lip ` ~L "B@ NLP R$ "B@J " G NLP "B@j "!,B@. "!,!0B@. "!, 9d, 50(d92 6949989:9<9>9@qP FD "!,B@B ~L "B@ ~L R$ "B@| "B@$B@ "B@o  IndexerMain$(o  IndexerEntrys$(oX  IndexerNumbers$(o ` ~L "B@ "!`` IndexAtEnd Z!\B@^ "!`` l INDEX \e ""d "!B@^ox ~L "B@ "!`` IndexAtEnd Z!\B@^ "!`` lINDEX \c "2" \r \e ""d "!B@^o (& IndexAtEnd "B@o+Attribute VB_Name = "FinalIX" Sub GiveAMessage(Msg$) C(Box ", , "Index ConverterzEnd SelectTheR(ion.Extend\GoTo What:=wd Bookm ark, := "a jnChangeBlankP`araTou' bwd.ClearFormattingReplacementWith ],$A.Text ^pY  *!KwardTrue(Wrap wd4\gFals Mat`chCasWholeWoPildc%sUSoundsLikAllA)LAR: TecAM' LJoinSurrA#uNumbersҁMoveLeft0 UniraJc,un1, A $A*-ARigh If S" " n'CMR?V`# UY9ǤU GUAsk @acM?U?Ud?U?Urm?Utr%U#1A:=1ActDocues.Add R:= Paio"BٗA"?????G3.Ex"1Ins@Sym0bol f#:=821@code:=A(, Bias:=0- ?K'?hr_Oy^O"}.CutUlXQ xrevyW2O)p_Jt wuO)zO) .G)_JHu_)_J ._)2 t ttt51_)t!!vcNoџ"1pvvv,||sov, Y=,,,,,0,oUW,,,Ϣ,, 1,1,,,,n>.qM ,cCheckToGoHomeqJAnswer'S("S tart top of File?", vbYesNoCancel +Ques!DefaultButton~1$а(KeyV-Storyds D emoteedEntrys1LeveluNP5 .!g0hs.C$^0r1r G "Only 1 p`d is "s5ed!.Exit!1JIfo"ok ?uG ;DownLineqNCop  pJJaPastGM&oveUp Unit:=wdLine, Counp1, Extendd$ Selection.Font.ColorIndex = wdGrPay50 RMRightCharacterp4 ' e;Lef :AveDocumeBookmarks.Add Range:=, Nam "Demote,S"\PZgraph[ZGiv0eMsgFor P1 To NP.oDown1$]XcCut8 ; Case `Style B"C1a)* T 2 34 E16Els;EAMcludeHeader:=-, FieldL:="ƌsp:_ #RTypwderic,WOrAsc@ E, H2P 0Alph|an@k@)?ng 3e0? O Sep3@Y:=eB`yTabsu mnfHSens,it0VLPuapgeIDIA?Non4Q ]e<#29o?orz`o?o? "^=yA ro?-o?o? o?o?,o?o?]6 B=o?=o?o?lo?o? |x<//{A 1{y "}o]{q o]{3o]o]{e#W_Ecter, Count:=1  Selection.MoveDown Uni|wdParagraph, Extend:=wdLeft\Ch E'RighGWordEnd Sub mbineContiguousNumbers() 'Z`NW = 0s.1j`SJpVal(LX E WS3For Ab1 To g- CdCB.BC.If SSE + @+hen6CƤCut' ElseG!E > SS T !J£ ETypeText :="-".KL TruncateSE(SS, SE SHXI GsbwdwxIf,Na(W'>/5/MsgBox "/" &P&EE٠ bF : '`X= 13j 18 slen pLen@`@' LBⅅ=GjLt)A E, @ d(x, 1g)! 2= 6HwA <> Or `Gc "1" Go@Leave3EL #01: '/&SE#0# h$.`4@<(4FXF+ = pyFinalBackGKeyfStory^)?o}@" S DCtez] d.Clear`)matting?nd.Replacement1CWith .T=p T:, @ ward0`d.WPwdq҅nu Fag.MatchCaseWholeaRildc@ sSdsLik? AllA \a(?0ExecuPџ}ß))Home+ϡCopD.Windows(1).A@v pPast rU6ToolbarInde xMain5CommandBa"er!").VisiblC!OFEntryɦoerCW` OerTGen ntedrFP0F 5 cu9Bookmarks.Add Range:=wB, Nams`sAtD7mFieldrzz(Empty, _Q "INDEX \e ", Preserve:aG:=QRuE.b% lda0c2"" \r__+$IxGotup##vWha5" dp ap\c> xMEH @    @   1      " 0"P x " ""( P.` 0    "((0X(p" "" 8H Xh"""  0.@ p  "  "  *&H"p"      (8@HPX`hpx      ( 8HPX`hpx "  .  "  @"`"    ( 00  ` (p  " "  . 8 "@ H P ` "        ( H  ` p x   * &   "  ( H h  &    NLP "B@V LP "B@ LP R$ "B@$"' 6x #'  <@ NLP "B@J01 NL P R$ "B@V "B@j LP R$ "B@ith NLP R$ "B@J$"' @le "!`` LastGrabNums Z!\B@^ "B@jK<@ NLP "B@try "!`` LastGrabEntry Z!\B@^  (d "B@jko@ (& LastGrabEntry "B@ d "B@HmG (& LastGrabEntry "B@ LP R$ "B@o8 NLP "B@V LP "B@ LP R$ "B@$"'  #'  NLP "B@J NL P R$ "B@V NLP "B@V LP R$ "B@ NLP R$ "B@J "B@$"'  "!`` LastGrabNums Z!\B@^  (kxop  (oPBA@ NLP "B@J "B@,d "B@ LastGrabNums$!\% (& LastGrabNums "B@ NLP R$ "B@Vk`oX@ NLP "B@V LP "B@ "!,B@. "!,#9d50(d92 X949989:9<9>9@q "!,B@B NLP "B@V "B@,d "B@ NLP "B@J "(I "!,B@.I "!,#9d50(d92 X949989:9<9>9@qp "!,B@B NLP R$ "B@V"$"' I "!`` LastGrabNums Z!\B@^o NLP "B@V LP "B@ LP R$ "B@ NLP R$ "B@J$"'  NLP "B@V #,d "B@d#d "B@k "!`` StartOfAppend Z!\B@^ "B@ (& StartOfAppend "B@ "( LP R$ "B@ NLP R$ "B@J$"'  "!`` LastGrabNums Z!\B@^oBA@ NLP "B@V NLP R$ "B@V$"'  ,KT NLP "B@V "B@,d "B@ $KT NLP "B@J,d "B@ "B@S NLP "B@J "B@nP LastGrabNums$!\% (& LastGrabNums "B@ko LP "B@ NLP "B@J#d "B@ "B@ (& LastGrabNums "B@o@8`Attribute VB_Name = "Grabber" Sub RemoveEntryAn"dlNumxs() ' Selection.MVRight Unit:=wdCharacter, CouJn&1hUp1PA0graph1Down3, Exptend wLast$x^hgInTherInStr(`, "#"}fB > 0 n2Lef ?v (CutOSO,]:*dAAveDocument.Bookmarks.Add Range:=\, :="ps TF>D@@'ab(ApplicaStatus(Barì$CrEl set4End If APut#Back_"GoTo Wha"y.+ TypeText :=  >k fX"JuOAE/":=r6a ]w= F,e=d O aO:GG#m_? n.CopyG{gaLR?Hs3H< F85FShowe( NN/vKK@|eĈsPrev1ڈThis F ("B%{+"27PqM\N",\If !js(1)kExists(ki)0TrueoĕX$pR;z;d irtOf SFind.ClearFormatting3WithhC[1)."k#x.Replace wardDMWPwdQAskc Faj|.MatchCasAWhol8eWoildcsSиdsLik? AllA \ !ã Exec ųss_7!_7`[sYModQ8C%#%d%0%'%%%4 .%%%B%%(-%U%%2M g4&.Mvɷ1krfUOU4@CU;t:=wdParagraph, Coun1  Selection.MoveDown Uni, ExtendLeft ChzcterCyE$ = ()]Righ^4If InStr(+$, "#") Then8.TypeText :=","Else#nd If Acument.Bookmarks.Add Range:=|., Nam "StartOpfApp1P8astN5 GoTo WhasxModeeTru?59@q "!,B@B NLP "B@V "!``PairS Z!\B@^ "!,B@. "!, 9d50(d92 X949989:9<9>9@q "!,B@B dfh "B@b NLP "B@J NLP R$ "B@J "B@j NLP "B@VoAttribute VB_Name = "Numbers" Sub CollapseEntrySelectio@n() ' Get Second n  AVveDocument.Bookmarks.Add Rang(e:=R., :="edUS)MoveLeft Unit:=wdChar@acter,un1 3Righ4WordXE6StartWGoTo WhaUv\$w vxME @ @"08"@2H  (&LastEntryThingSelected "B@o@@ (&LastMoveSubEntryCutPoint "B@%oxpAttribute VB_Name = "GotoBooks" Sub GoToLastThingSelected() !ion.L What:=wdmark, :="Entry eEnd ia nMove0CutPoint5uK w +>>#ThisDocument_VBA_PROJECTnPROJECTPROJECTwmxME (SLSS<N0{00020906-0000-0000-C000-000000000046}8(%H xAttribute VB_Name = "ThisDocument" Bas0{00020P906-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2 ID="{CDE2B878-B98A-11D4-8191-00500487CA96}" Document=ThisDocument/&H00000000 Module=FinalIX Module=Entrys Module=GotoBooks am  *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLL#Visual Basic For Applications *\G{00020905-0000-0000-C000-000000000046}#8.1#0#c:\Program Files\Microsoft Office\Office\MSWORD9.OLB#Microsoft Word 9.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\STDOLE2.TLB#OLE Automation*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\SYSTEM\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{497CA363-3FC4-11D1-ADC6-0000F63D53B5}#2.0#0#C:\WINDOWS\TEMP\VBE\MSForms.EXD#Microsoft Forms 2.0 Object Library.E .`M *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.1#0#C:\OFFICE97\OFFICE\MSO97.DLL#Microsoft Office 8.0 Object Library    L;!> ThisDocument023b4c8d74ThisDocument>1FinalIX033b4c8d74FinalIXO2 Entrys043b4c8d74 Entrys%0KGotoBooks053b4c8d74GotoBooksHNumbers063b4c8d74NumbersnJ`% Format073b4c8d74 Formatjxi CHars083b4c8d74 CHarsMQ Index093b4c8d74 Indexi Grabber1;3b4c8e45Grabber H0x`E͊PʖG͊PʖI͊PʖK͊PʖM͊PʖO͊PʖQ͊PʖS͊Pʖv͊Pʖ   NU FormatWordkVBAWin16~Win32MacVBA6#TemplateProjectEstdole`MSFormsCOfficeu ThisDocument< _EvaluateFinalIX$ GiveAMessageMsgQMsgBoxRSelectTheIndex SelectionZExtend?WhatCwdGoToBookmarkJChangeBlankParaToPara FindnClearFormatting) ReplacementForwardWrapWywdFindContinueBP MatchCaseMatchWholeWordXMatchWildcardsMatchSoundsLike0MatchAllWordFormsExecuteYReplacef wdReplaceAllu#JoinSurroundingNumberst MoveLeftvUnit wdCharacterCount0vwdExtenddSj MoveRight wdFindAsktActiveDocument\ Bookmarks?nAddrRange  InsertSymbolCharacterNumberUnicodeWBiasCut.MoveToPrevBlankBMoveToNextBlankV CheckToGoHome<Answer, vbYesNoCancelq vbQuestionvbDefaultButton1vbYesa?HomeKeywdStory&vbCancel'DemoteSelectedEntrys1Level{NPk^ ParagraphsfMoveDown̝wdLineCopyƿPasteMoveUpFontU ColorIndexwdGray50 wdParagraphHGiveMsgG PgStylep ExtendModejSortAndCombineNumberSequenceCopyNumberSequenceToSortFile2CombineContiguousNumbersCopyFinalNumbersBackWindowsdActivate| WholeStorySort ExcludeHeader FieldNumber SortFieldType0lwdSortFieldNumericw SortOrder4wdSortOrderAscending5K FieldNumber282SortFieldType2RwdSortFieldAlphanumeric1  SortOrder2 FieldNumber392SortFieldType3S SortOrder3 Separator^wdSortSeparateByTabs SortColumng CaseSensitiveu LanguageIDwdLanguageNoneNWq^Words8wdWordmSS'_ValSE_WmSC_TypeText TruncateSEQzslenLcRight LeavetEndKey5DeletexToolbarIndexMain0 CommandBars VisibleToolbarIndexEntrysrToolbarIndexNumbersGenIndentedIndexFields7 wdFieldEmptyPreserveFormatting= GenRunInIndexO IxGotoTopEntrys#LastSelectedEntryLeveloWhatWasLastLevelfCutCurrentParagraphCutCurrentIndexEntryExists] vbExclamationSelectThisSubEntrysMoveControlButtonsK PutEntryBackIndexEntrysAllOnMoveCurrentIndexEntryPasteEntryBeforeCurrentthPasteEntryAfterCurrentb1\b2\b3\b4\b5\b6\b7\b8\b9\b10}ub11~ub12uControlsKEnabled۪IndexEntrysToolbarOn6FindPrevLikeEntryLStyThisNextPAStyPrevSwapEntryWithPrevSwapEntryWithNextkFindNextLikeEntryLStyNext'AndNextStartSelectThisEntireEntryStyles pMoveSubEntryToLogicalToptStyCur;BStyAboveLTrimbStrMoveSubEntryToLogicalBottomрStyBelowMoveSubEntryBackWhereItWasUSelectThisParagraphk&GotoStartOfLevel1;hFindFirstItalicWithinLevel1'Italic!CombineLevel3IntoLevel2AgainsFindPrevLevel3FindNextLevel3w GotoBooksGoToLastThingSelectedGoToLastMoveSubEntryCutPointzNumbers3CollapseEntrySelectionCollapseSurroundingNumbersYConvertToRunIni6vbYesNovbDefaultButton2vbNo%LastStyGetNextSGotoNextParaMarkThisSty"wdRedºAppendToPrevious]wdBlue"wdGreenb wdNoHighlightyBwdPink{ WithColor'SepjWithHighHighlightColorIndexFinalColorAndHighLightU7wdAutoKVRemoveHighLightInPara_RemoveColorInPara<CHars>Insert3EmSpacesJ InsertEmDash', QuoteDOpen& QuoteDClose QuoteSClose QuoteSOpenr ThinSpacekSizeIndexGenerateRunInIndex11GenerateRunInIndexrGenerateRunInIndex22GenerateRunInIndex33 PsuIndexNoUpdateCurrentIndexUpdateConvertIndexToAFile2ToggleShowCodesT[ Documents PasteSpecialKLinkhDataType%? wdPasteRTF5% PlacementIwdInLine DisplayAsIconAutomaticallyUpdateoModule1bGrabberORemoveEntryAndGrabNumbersp LastGrabEntryvInThereSelf Application* StatusBarʜPutLastGrabBack? JustGrabNums ShowLastGrab?PasteGrabNumsPrevĢSelectThisNumEntry jPasteGrabStartOfNums~PasteGrabEndOfNums PasteGrabNumsNextChrK~AppendToUnnumberedLine Documentj Module=Format Module=Chars Module=Numbers Module=Index Module=Grabber Name="TemplateProject" HelpContextID="0" VersionCompatible32="393222000" CMG="35378AADBE0CC20CC20CC20CC2" DPB="90922F5030503050" GC="EBE954F3AEF4AEF451" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C FinalIX=77, 24, 490, 430, C Entrys=-2, 0, 528, 474, C GotoBooks=10, 113, 540, 561, C Format=29, 31, 527, 449, C Chars=0, 0, 448, 312, C Numbers=5, 13, 453, 325, C Index=0, 0, 440, 312, C Grabber=0, 0, 427, 331, Z ThisDocumentThisDocumentFinalIXFinalIXEntrysEntrysGotoBooksGotoBooksFormatFormatCharsCharsNumbersNumbersIndexIndexGrabberGrabber  FMicrosoft Word Document MSWordDocWord.Document.89q7 bjbjUU 7|7|l?l?l$ Cڄڄڄڄڄڄڄڄ) IڄڄڄڄڄڄڄڄڄڄڄڄڄڄڄڄڄڄڄK7ڄڄ΄ RWMڄڄڄ 0CڄIڄIڄڄ      / =!"#$%CompObjjObjectPoolRWMRWMshOptSpaceEmSpaceEnSpaceNBSpaceEmSpaceEnNormal @`UnknownG:Times New Roman5Symbol3& :Ariala NewBskvll BTTimes New RomanENewBaskervilleKNewBaskerville SC;GraecaUBS"0h0