ࡱ>   xy{7 bjbjUU 7|7|l` ` ` ` ` ` ` t t t t   t LLt t t t t t t t c b` t t t t t t ` ` t t t t t t ` t ` t t t t t ` ` t  D)jt t t 0Lt t t t ` ` ` `  / =!p"p#$%7 bjbjUU 7|7|l  wL 2 iP@P Normal$ h@da$CJOJQJ_HmH sH tH <A@< Default Paragraph FontBOB PlaySmallerCaps;CJ OJQJkH@O@ PlayNormalCaps;CJOJQJkHhOh LondonMonth$$$d1$a$5CJOJQJ_HmH sH tH zOz LondonIntroHead*$  Pd$&dPa$;CJOJQJ_HmH sH tH xO2x LondSeasonIntroHEven AB&dP;CJOJQJ_HmH sH tH .OB. PlayNormald8~OR~ LondSeasonMonthHEven$ ABd$&dP;CJOJQJ_HmH sH tH <Ob< PlaySmallerhd8`hCJ8Oq8 PlayTitle5:CJOJQJkH|O| LondSeasonMonthHOdd$ ABd$&dP;CJOJQJ_HmH sH tH @O@ PlayWeekDate$d8a$6CJdOd LondonSeason$$da$5CJ OJQJ_HmH sH tH vOv LondSeasonIntroHOdd AB&dP;CJOJQJ_HmH sH tH 2O2 PlayFirstEd h`hBOB PlayFirstEdCaps;CJOJQJkH:OA: PlayWeekNormal$a$CJD@D Footnote Textd81$`CJL&@L Footnote ReferenceCJ EHH*OJQJkH.O. LondonPlaySep!BO"B LondonMonthEven"hh^@O@ LondonMonthOdd#hh]6OB6 PlayWeekDateo$6PJ.OAR. PlayTheatre%CJ.Ob. QuoteOn &^PJzOz LondSeasonIntroTheater'$$$d1$a$CJOJQJ_HmH sH tH TOT LondSeasonRule!(d$ &dPPJbOb LondonPlayAnnoteEven)$$1$^a$ 6PJ]JOJ LondonPlayAnnoteOdd*]^DOD LondonSeason1+&dPPJ6O6 LondonSeason2,XPJJ @J Index 1%-$ hEd8^`Ea$CJJ @J Index 2%.$ hvEd8^v`Ea$CJJ @J Index 3%/$ h#Ed8^#`Ea$CJ>O> LondonPlaySep1pt0dPJ8O8 London Index Title1 Thomas MinskerC:\London\London.dotThomas MinskerC:\London\London.dotThomas MinskerC:\London\London.dotThomas MinskerC:\London\London.dotThomas MinskerC:\London\London.dotThomas MinskerC:\London\London.dotThomas MinskerC:\London\London.dotThomas MinskerJC:\WINDOWS\Application Data\Microsoft\Word\AutoRecovery save of London.asdThomas MinskerJC:\WINDOWS\Application Data\Microsoft\Word\AutoRecovery save of London.asdThomas MinskerJC:\WINDOWS\Application Data\Microsoft\Word\AutoRecovery save of London.asd 8I9HC>D?F`K[M:NaP@ e e eeee.e@eAeBeV5  V6  V7  V8  V9  V:  V;  V<  V=  V>  V?  V@  VA  VB  VC  VD  VE  VF  VG  VH  VI  VJ  VK  VL  VM  VN  VO  VP  VQ  VR  VS  VT  VU>  VV  VW  VX  VY  VZ"  V[  V\|  V]{  V^z  V_y  V`x  Vaw  Vbv  Vcu  Vdt  Ves  Vf  Vg  Vh  Vir  Vjq  Vkp  Vlo  Vmn  Vnm  Vol  Vpk  Vqj  VrT  Vs  Vt-  Vui  Vvh  Vwg  Vxf  Vye  Vzd  V{N  V|O  V}P  V~c  Vb  V  VC  VI  V7  Va  V#  V:  V  V  V  V  V   VU  VY  V^  V1  V=  V?  V<  V$  V  VQ  V%  VJ  VE  VG  VF  V2  VM  VV  V   V  V*  V+  VL  V3  VR  VZ  V(  V)  VK  V  V/  V9  V_  V  V0  V4  V6  V`  V}  V]  V  V  V  V  V   V  VH  V,  V5  V  V\  VD  V[  V   VW  V'  VX  V  V&  VS  V  V!  V;  V  V~  V  VV8 London ConverterLondon Converter9U]U]U]U]U]0  ( System: Lond TbarsLondTbars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(!! zz "(  TemplateProject.LondDocVars.MAIN Lond Doc VarsLondDocVars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(33"( !TemplateProject.LondConvert0.MAIN Lond Convert0LondConvert0.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(q{w;s{wqmuJu u*j"( "TemplateProject.LondPageSetup.MAINLond Page SetupLondPageSetup.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(ckhwj(uukIU{"( TemplateProject.DateField.MAIN Date FieldDateField.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(tIu4uY5UQU1"( TemplateProject.SomeText.MAIN Some Text SomeText.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(HmhqwSu'q" (@StylesCustom Popup 1" (@FixesCustom Popup 2" (@Go ToCustom Popup 3 London CalendarLondon CalendarUq Y Y Y Y 0(  Calendar: Lond TbarsLondTbars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(!! zz ( #TemplateProject.LondCreateFile.MAINLond Create FileLondCreateFile.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( "TemplateProject.LondSwapCells.MAINLond Swap CellsLondSwapCells.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(kkwj( "TemplateProject.LondSwapWidth.MAINLond Swap WidthLondSwapWidth.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( Hw[H(Con1Lond Swap Con1LondSwapCon1.Main((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(huMu u)m(PrevLond Prev PlayLondPrevPlay.Main((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp((NextLond Next PlayLondNextPlay.Main((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( TemplateProject.LondMonth.MAIN Lond MonthLondMonth.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( "TemplateProject.LondBookmarks.MAINLond BookmarksLondBookmarks.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(?("TemplateProject.LondShortCuts.MainLond Short CutsLondShortCuts.Main(iii                  p(R6RFvFR*S~~>~V6VFVF( "TemplateProject.LondPlayTable.MAINLond Play TableLondPlayTable.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( !TemplateProject.LondPlayMenu.MAINLond Play MenuLondPlayMenu.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( qmwmWj( "TemplateProject.LondonNothing.MAINLondon NothingLondonNothing.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp((  TemplateProject.LondColDate.MAIN Lond Col DateLondColDate.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp((  TemplateProject.LondColPlay.MAIN Lond Col PlayLondColPlay.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( #TemplateProject.LondNewspapers.MAINLond NewspapersLondNewspapers.MAIN((gʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp((  TemplateProject.LondColCast.MAIN Lond Col CastLondColCast.MAIN((ggʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( !TemplateProject.LondColOther.MAINLond Col OtherLondColOther.MAIN((gʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(7#( !TemplateProject.LondColSmall.MAINLond Col SmallLondColSmall.MAIN((gʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(7#(Indent00 Lond Indent00LondIndent00.Main(0000000000003333330p(@@@@o(Indent25 Lond Indent25LondIndent25.Main(0000000000000333300p(@@@x}( $TemplateProject.LondPhrasesSwap.MAINLond Phrases SwapLondPhrasesSwap.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@__`k _( TemplateProject.LondIndex.MAIN Lond IndexLondIndex.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(YRBJYiuJu u*qi( TemplateProject.LondIndexW.MAIN Lond Index WLondIndexW.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(YRBJYVVvp( !TemplateProject.LondIndexGen.MAINLond Index GenLondIndexGen.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(YRBJY-a-( TemplateProject.SomeText.MAIN Some Text SomeText.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(HmhqwSu'q London Intro London IntroryWyWyWyWy0 ( Intro: Lond TbarsLondTbars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(!! zz "( #TemplateProject.LondCreateFile.MAINLond Create FileLondCreateFile.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( TemplateProject.LondYear.MAIN Lond Year LondYear.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(VUUWVWVQ ( TemplateProject.LondMonth.MAIN Lond MonthLondMonth.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( "TemplateProject.LondBookmarks.MAINLond BookmarksLondBookmarks.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(? ( "TemplateProject.LondonNothing.MAINLondon NothingLondonNothing.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( "TemplateProject.LondPageSetup.MAINLond Page SetupLondPageSetup.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(ckhwj(uukIU{"( "TemplateProject.LondIntroMenu.MAINLond Intro MenuLondIntroMenu.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(ZRBJX ( "TemplateProject.LondonNothing.MAINLondon NothingLondonNothing.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( 'TemplateProject.LondIntroPersonnel.MAINLond Intro PersonnelLondIntroPersonnel.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp("(Indent00 Lond Indent00LondIndent00.Main(0000000000003333330p(@@@@o (Indent25 Lond Indent25LondIndent25.Main(0000000000000333300p(@@@x} ( $TemplateProject.LondPhrasesSwap.MAINLond Phrases SwapLondPhrasesSwap.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@__`k _"( TemplateProject.LondIndex.MAIN Lond IndexLondIndex.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(YRBJYiuJu u*qi ( TemplateProject.LondIndexW.MAIN Lond Index WLondIndexW.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(YRBJYVVvp ( !TemplateProject.LondIndexGen.MAINLond Index GenLondIndexGen.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(YRBJY-a-"( TemplateProject.SomeText.MAIN Some Text SomeText.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(HmhqwSu'qLondon SpecialCharsLondon SpecialCharsTZZZZ0( TemplateProject.LondTbars.MAIN Lond TbarsLondTbars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(!! zz  Chars:London NothingLondonNothing.MAIN( "TemplateProject.LondSpecNonSp.MAINLond Spec Non SpLondSpecNonSp.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( !TemplateProject.LondSpecEnSp.MAINLond Spec En SpLondSpecEnSp.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ia%m( !TemplateProject.LondSpecEmSp.MAINLond Spec Em SpLondSpecEmSp.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(j`$n( #TemplateProject.LondSpecEnDash.MAINLond Spec En DashLondSpecEnDash.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ia%m( #TemplateProject.LondSpecEmDash.MAINLond Spec Em DashLondSpecEmDash.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(j`$n( $TemplateProject.LondSpecElipses.MAINLond Spec ElipsesLondSpecElipses.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( %TemplateProject.LondSpecElipsesP.MAINLond Spec Elipses PLondSpecElipsesP.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(3333( $TemplateProject.LondSpecDDaggar.MAINLond Spec DDaggarLondSpecDDaggar.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( %TemplateProject.LondSpecSterling.MAINLond Spec SterlingLondSpecSterling.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( $TemplateProject.LondSpecLaAcute.MAINLond Spec La AcuteLondSpecLaAcute.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(9?(  TemplateProject.LondSpecUae.MAIN Lond Spec UaeLondSpecUae.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(޿޿(  TemplateProject.LondSpecLae.MAIN Lond Spec LaeLondSpecLae.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(?( &TemplateProject.LondSpecLcCedilla.MAINLond Spec Lc CedillaLondSpecLcCedilla.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(???( $TemplateProject.LondSpecUeAcute.MAINLond Spec Ue AcuteLondSpecUeAcute.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( $TemplateProject.LondSpecLeGrave.MAINLond Spec Le GraveLondSpecLeGrave.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(?( $TemplateProject.LondSpecLeAcute.MAINLond Spec Le AcuteLondSpecLeAcute.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(?( %TemplateProject.LondSpecLeCircum.MAINLond Spec Le CircumLondSpecLeCircum.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(?( %TemplateProject.LondSpecLiCircum.MAINLond Spec Li CircumLondSpecLiCircum.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(?( $TemplateProject.LondSpecLoGrave.MAINLond Spec Lo GraveLondSpecLoGrave.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(??(  TemplateProject.LondSpecLoe.MAIN Lond Spec LoeLondSpecLoe.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(ݻ}}ݻ( %TemplateProject.LondSpecLuCircum.MAINLond Spec Lu CircumLondSpecLuCircum.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(9( %TemplateProject.LondSpecLuUmlaut.MAINLond Spec Lu UmlautLondSpecLuUmlaut.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(9 London Play  London Play ) ) ) ) )0 ( TemplateProject.LondTbars.MAIN Lond TbarsLondTbars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(!! zz  (Play:London NothingLondonNothing.MAIN"( #TemplateProject.LondCreateFile.MAINLond Create FileLondCreateFile.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( TemplateProject.LondMonth.MAIN Lond MonthLondMonth.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp("( "TemplateProject.LondPlayTable.MAINLond Play TableLondPlayTable.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( !TemplateProject.LondPlayMenu.MAINLond Play MenuLondPlayMenu.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( qmwmWj (  TemplateProject.LondColDate.MAIN Lond Col DateLondColDate.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( (  TemplateProject.LondColPlay.MAIN Lond Col PlayLondColPlay.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp("( #TemplateProject.LondNewspapers.MAINLond NewspapersLondNewspapers.MAIN((gʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( (  TemplateProject.LondColCast.MAIN Lond Col CastLondColCast.MAIN((ggʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( !TemplateProject.LondColOther.MAINLond Col OtherLondColOther.MAIN((gʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(7# ( !TemplateProject.LondColSmall.MAINLond Col SmallLondColSmall.MAIN((gʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(7#"(Indent00 Lond Indent00LondIndent00.Main(0000000000003333330p(@@@@o (Indent25 Lond Indent25LondIndent25.Main(0000000000000333300p(@@@x}"(PrevLond Prev PlayLondPrevPlay.Main((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( (NextLond Next PlayLondNextPlay.Main((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp("( $TemplateProject.LondPhrasesSwap.MAINLond Phrases SwapLondPhrasesSwap.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@__`k _ ("TemplateProject.LondShortCuts.MainLond Short CutsLondShortCuts.Main(iii                  p(R6RFvFR*S~~>~V6VFVFCustom Popup 1 Custom Popup 10   *`# Between Plays LondonPlaySep((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^^^^^^  *`#Between Plays 1ptLondonPlaySep1pt((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^^^^^^" *`#Play Annote Even StyleLondonPlayAnnoteEven((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(kk  kk??  *`#Play Annote Odd StyleLondonPlayAnnoteOdd((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(p00p" *`#Month Even PageLondonMonthEven((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(kk  kk??  *`#Month Odd PageLondonMonthOdd((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(p00p" *`# QuoteOn StyleQuoteOn( ""!" p(`  `" *@#London IntroHead StyleLondonIntroHead  *@#LondSeasonIntroHEven StyleLondSeasonIntroHEven  *@# LondSeasonIntroHOdd StyleLondSeasonIntroHOdd London Temp London Temp1V1V1V1V1V0(Find Blank-XE RedFind Blank XERedFormatting.FindBlankXERed(Remove Blank from Blank-XERemove Find Blank XERedFormatting.RemoveFindBlankXERedCustom Popup 2 Custom Popup 29M9M9M9M9M0(Make Section ContinueMake Section ContinueJune00.MakeSectionContinue(Fix Italic (Plays) in IndexLond Fix Italic Plays in IndexLondFixItalicPlaysInIndex.Main( p(w7?????'LondStepLondStep````` 0 Custom Popup 3 Custom Popup 3iiiii 0 ( Hyphenate w/0.25 (8pt) Hyphenate25Formatting.Hyphenate25(3333303330 ""!" 330333330p(`  ` ( Hyphenate w/0.30 (9pt) Hyphenate30Formatting.Hyphenate30(3333303330 ""!" 330333330p(`  ` (Hyphenate Word ListHyphen Word ListFormatting.HyphenWordList"( Change XEs to RedChange XEs to RedFormatting.ChangeXEsToRed(      30003300p(}"( #Generate Index of Plays into a File Index Gen1Formatting.IndexGen1(""" " """ " """ " ""p(???? ( "Generate General Index into a File Index Gen2Formatting.IndexGen2(""" " """ " """ " ""p(????London FormattingLondon Formatting &y&y&y&y&y 0  (  Formatting: Lond TbarsLondTbars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(!! zz  ( TemplateProject.LondYear.MAIN Lond Year LondYear.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(VUUWVWVQ" (@StylesCustom Popup 1" (@ToolboxCustom Popup 3 (@LinesCustom Popup 7" (@TablesCustom Popup 8 (@ Page BreaksCustom Popup 5" (@GotoCustom Popup 6"(  My Show HideFormatting.MyShowHidewCustom Popup 4 Custom Popup 4 0Custom Popup 5 Custom Popup 5hhhhh 0( !Find Prev Page Break Before (PBB)Page Break Before PrevFormatting.PageBreakBeforePrev(3"""""3"!0""""""!""""!"""""""""0"""""3333333333333333333"""""3"""""3"""""3"""""p(``dhx(  Find Next PBBPage Break Before NextFormatting.PageBreakBeforeNext(3"""""3"!0""""""!""""!"""""""""0"""""3333333333333333333"""""3"""""3"""""3"""""p(xhd````( Force Play Table Page BreakForce Playto Next PageFormatting.ForcePlaytoNextPage((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@@ @@( UnForce Play Table Page BreakUn Force Playto Next Page Formatting.UnForcePlaytoNextPage((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@@@@( Do Paragraph PBBDo Page Break BeforeFormatting.DoPageBreakBefore((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ( Undo Paragraph PBBUn Do Page Break BeforeFormatting.UnDoPageBreakBefore((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( London Goto  London GotoVVVVV0 "( Specific MonthGoto Specific MonthMonths.GotoSpecificMonth((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(x{^{^{^xoddlxx@x@x@ (  Prev MonthPrev Month Go ToGotoMacros.PrevMonthGoTo((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(xx@x@x@xod^^^ (  Next Month Next Month Go ToGotoMacros.NextMonthGoTo((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^dlxx@x@x@x"(  Prev TableGoto Prev TableFormatting.GotoPrevTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^ ^{^xXH@@@ (  Next TableGoto Next TableFormatting.GotoNextTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@@H@Xx{^ ^^"(  BeforeTableGo Before TableFormatting.GoBeforeTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^{^x_O^^^ (  AfterTableGo After TableFormatting.GoAfterTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^H_x{^^^"( Prev PgBrBeforePage Break Before PrevFormatting.PageBreakBeforePrev(3"""""3"!0""""""!""""!"""""""""0"""""3333333333333333333"""""3"""""3"""""3"""""p(``dhx ( Next PgBrBeforePage Break Before NextFormatting.PageBreakBeforeNext(3"""""3"!0""""""!""""!"""""""""0"""""3333333333333333333"""""3"""""3"""""3"""""p(xhd````Custom Popup 6 Custom Popup 6222220 (  Toolbar GotoToolbars Goto OnGotoMacros.ToolbarsGotoOn(330330p(oooo( Goto Specific MonthGoto Specific MonthMonths.GotoSpecificMonth((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(x{^{^{^xoddlxx@x@x@(  Prev MonthPrev Month Go ToGotoMacros.PrevMonthGoTo((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(xx@x@x@xod^^^(  Next Month Next Month Go ToGotoMacros.NextMonthGoTo((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^dlxx@x@x@x(  GotoPrevTableGoto Prev TableFormatting.GotoPrevTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^ ^{^xXH@@@(  GotoNextTableGoto Next TableFormatting.GotoNextTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@@H@Xx{^ ^^(  GoBeforeTableGo Before TableFormatting.GoBeforeTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^{^x_O^^^(  GoAfterTableGo After TableFormatting.GoAfterTable((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^H_x{^^^( Prev PgBrBeforePage Break Before PrevFormatting.PageBreakBeforePrev(3"""""3"!0""""""!""""!"""""""""0"""""3333333333333333333"""""3"""""3"""""3"""""p(``dhx( Next PgBrBeforePage Break Before NextFormatting.PageBreakBeforeNext(3"""""3"!0""""""!""""!"""""""""0"""""3333333333333333333"""""3"""""3"""""3"""""p(xhd````Custom Popup 7 Custom Popup 7BBBBB0 ( Toolbars LinesToolbars Lines OnGotoMacros.ToolbarsLinesOn(330330p(oooo( Select Current LineSelect The Current LineLineEditor.SelectTheCurrentLine(DDDDDDD@@@@@333330333330p(!!( Selection -0.05Selection Font Condenser05#LineEditor.SelectionFontCondenser05(ff36ffPPUPUUUPUUUPUPPPDDDDDDD@@@@@333330333330p(???!!( Selection 0.05+Selection Font Expander05"LineEditor.SelectionFontExpander05(cf36cfPffPPUUUUPUUUPPUPPDDDDDDD@@@@@333330333330p(???7!!(  Blanks -0.05Blank Condenser05LineEditor.BlankCondenser05(ff36ffPPUPUUUPUUUPUPPP@@@@@@@@333330333330p(???(  Blanks 0.05+Blank Expander05LineEditor.BlankExpander05(cf36cfPff`PPUUUUPUUUPPUPP@@@@@@@@333330333330p(???(  Blanks -0.10Blank Condenser10LineEditor.BlankCondenser10(ff36ffPPUPUUUPUUUPUPPP@@@@@@@@333330333330p(???(  Blanks 0.10+Blank Expander10LineEditor.BlankExpander10(cf36cfPff`PPUUUUPUUUPPUPP@@@@@@@@333330333330p(???(  Blanks -0.20Blank Condenser20LineEditor.BlankCondenser20(ff36ffPPUPUUUPUUUPUPPP@@@@@@@@333330333330p(???(  Blanks 0.20+Blank Expander20LineEditor.BlankExpander20(cf36cfPff`PPUUUUPUUUPPUPP@@@@@@@@333330333330p(???(  Blanks Reset Blanks ResetLineEditor.BlanksReset(ffffVVPPPPUUPUUPUUPP@@@@@@@@333330333330p(???Custom Popup 8 Custom Popup 80 ( Split Table at Current LineSplit The Table At Current Line%Formatting.SplitTheTableAtCurrentLine((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(~~~~m~??m~~~~~~ ( Join Table with PrevJoin Table With PrevFormatting.JoinTableWithPrev((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(~~~~m~-~ ~-~m~~~~~~ ( Join Table with NextJoin Table With NextFormatting.JoinTableWithNext((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(~~~~m~-~ ~-~m~~~~~~"( Force Play Table Page BreakForce Playto Next PageFormatting.ForcePlaytoNextPage((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@@ @@ ( UnForce Play Table Page BreakUn Force Playto Next Page Formatting.UnForcePlaytoNextPage((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(@@@@"( Before Play 1ptBefore Play1ptFormatting.BeforePlay1pt((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^^^^^^ ( Before Play 12ptBefore Play12ptFormatting.BeforePlay12pt((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(^^^^^^^^"( Generate Table OnlyOnlyLondPlayTable.TableOnly((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp( ~-~` London Index London Index"     0( Index: Lond TbarsLondTbars.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(!! zz  (@ {XE's ...}Custom Popup 10 (@{XE's see ...}Custom Popup 12 (@TheIndexCustom Popup 9(AAAAAAFormatting.AAACustom Popup 9 Custom Popup 94V4V4V4V4V0 ( ConvertTheIndexToAFileConvert The Index to AFile!IndexTools.ConvertTheIndexToAFile(p(#( Goto Top of FileGoto Top of FileIndexTools.GotoTopOfFile(p(#( Convert Level1 Text to BoldConvert Level1 Text to Bold"IndexTools.ConvertLevel1TextToBold(""" " """ ! ! " """ " ""p(????( Convert XEs w/SeeConvert XEs With SeeIndexTools.ConvertXEsWithSee(""" " """ ! ! " """ " ""p(????( Convert Level3 Text to RuninConvert Level3 Text to Runin#IndexTools.ConvertLevel3TextToRunin(""" " """ ! ! " """ " ""p(????( Replace Index Page SeparatorReplace Index Page Separator$IndexTools.ReplaceIndexPageSeparator(""" " """ ! ! " """ " ""p(????( #Convert File to 2-Col General Index"Convert File To2 Col General Index(IndexTools.ConvertFileTo2ColGeneralIndex("""DB $DD $DD "DB """ ! ! " """ " ""p(????( $Convert File to 2-Col Index of Plays#Convert File To2 Col Index of Plays(IndexTools.ConvertFileTo2ColIndexOfPlays("""DB $DD $DD "DB """ ! ! " """ " ""p(????(Bold To Html <b>IXBold to HtmlIndexTools.IXBoldToHtml(Italic To Html <i>IXItalic to HtmlIndexTools.IXItalicToHtml(<b> Html To BoldIXHtml to BoldIndexTools.IXHtmlToBold(<i> Html To ItalicIXHtml to ItalicIndexTools.IXHtmlToItalic London Lines  London Linesmmmmm0  ( Select Cur LineSelect The Current LineLineEditor.SelectTheCurrentLine(DDDDDDD@@@@@333330333330p(!! ( Selection -0.05Selection Font Condenser05#LineEditor.SelectionFontCondenser05(ff36ffPPUPUUUPUUUPUPPPDDDDDDD@@@@@333330333330p(???!! ( Selection 0.05+Selection Font Expander05"LineEditor.SelectionFontExpander05(cf36cfPffPPUUUUPUUUPPUPPDDDDDDD@@@@@333330333330p(???7!!"(  Blanks -0.05Blank Condenser05LineEditor.BlankCondenser05(ff36ffPPUPUUUPUUUPUPPP@@@@@@@@333330333330p(??? (  Blanks 0.05+Blank Expander05LineEditor.BlankExpander05(cf36cfPff`PPUUUUPUUUPPUPP@@@@@@@@333330333330p(???"(  Blanks -0.10Blank Condenser10LineEditor.BlankCondenser10(ff36ffPPUPUUUPUUUPUPPP@@@@@@@@333330333330p(??? (  Blanks 0.10+Blank Expander10LineEditor.BlankExpander10(cf36cfPff`PPUUUUPUUUPPUPP@@@@@@@@333330333330p(???"(  Blanks -0.20Blank Condenser20LineEditor.BlankCondenser20(ff36ffPPUPUUUPUUUPUPPP@@@@@@@@333330333330p(??? (  Blanks 0.20+Blank Expander20LineEditor.BlankExpander20(cf36cfPff`PPUUUUPUUUPPUPP@@@@@@@@333330333330p(???"(  Blanks Reset Blanks ResetLineEditor.BlanksReset(ffffVVPPPPUUPUUPUUPP@@@@@@@@333330333330p(???Custom Popup 10 Custom Popup 10b(mb(mb(mb(mb(m0 (  Toolbar XEsToolbars XEs OnGotoMacros.ToolbarsXEsOn(330330p(oooo"(Find Phrase In An XEFind Phrase in An XEIndexTools.FindPhraseInAnXE (Find Phrase AgainFind Phrase AgainIndexTools.FindPhraseAgain"({XE \f 1 Level2} Next XEF1 With Level2 Not Italic#XEFixer.NextXEF1WithLevel2NotItalic (Make Level2 ItalicMake It ItalicXEFixer.MakeItItalic London XEs London XEsXjXjXjXjXj0 (Find Phrase In An XEFind Phrase in An XEIndexTools.FindPhraseInAnXE (Find Phrase AgainFind Phrase AgainIndexTools.FindPhraseAgain"({XE \f 1 Level2} Next XEF1 With Level2 Not Italic#XEFixer.NextXEF1WithLevel2NotItalic (Make Level2 ItalicMake It ItalicXEFixer.MakeItItalicCustom Popup 11 Custom Popup 11SoSoSoSoSo0(Generate XE Play: see PersonGen Play See PersonIndexTools.GenPlaySeePerson()Move/Sort XE Play: see Person to New FileMove Play See Person to End!IndexTools.MovePlaySeePersonToEnd(Add Para after See XEsPara Add After See XEsIndexTools.ParaAddAfterSeeXEs(Remove Para after See XEsPara Remove After See XEs IndexTools.ParaRemoveAfterSeeXEsCustom Popup 12 Custom Popup 120  ( Generate XE Play: see PersonGen Play See PersonIndexTools.GenPlaySeePerson(""" " """ " """32 #33 #33 "32 ""p(????"( Move/Sort XE Play to New FileMove Play See Person to End!IndexTools.MovePlaySeePersonToEnd(""" " """ " """32 #33 #33 "32 ""p(????"( Mark Duplicate 'see' XEs GreenMark Dup See XEs GreenIndexTools.MarkDupSeeXEsGreen(""" " """ ! ! " """32 #33 #33 "32 ""p(???? (  Remove Green Duplicate 'see' XEsRemove Green Dup XEsIndexTools.RemoveGreenDupXEs(""" " """ ! ! " """32 #33 #33 "32 ""p(????"( "Find Next Multi-Author 'see' EntryFind Next Multiple See Entry#IndexTools.FindNextMultipleSeeEntry("""DB $DD $DD "DB """ ! ! " """32 #33 #33 "32 ""p(???? ( $Append Next 'see' Author to this one%Append Xe See Next Author to This One)IndexTools.AppendXeSeeNextAuthorToThisOne("""DB $DD $DD "DB """ ! ! " """32 #33 #33 "32 ""p(????"(Sort the See XEsSort The See XesIndexTools.SortTheSeeXes (Add Para after See XEsPara Add After See XEsIndexTools.ParaAddAfterSeeXEs (Remove Para after See XEsPara Remove After See XEs IndexTools.ParaRemoveAfterSeeXEs%!TemplateProject.LondIndent25.Main!TemplateProject.LondIndent00.Main!TemplateProject.LondMonth.ClearPg!TemplateProject.LondSwapCon1.Main"TemplateProject.AutoNewUnused.Main!TemplateProject.LondNextPlay.Main!TemplateProject.LondPrevPlay.Main"TemplateProject.LondShortCuts.MainLondonMonthEvenLondonMonthOddLondonPlaySep1TemplateProject.LondColCast.ItalicizeAbbreviation.TemplateProject.LondFixItalicPlaysInIndex.Main*TemplateProject.June00.FindNextLeftBracketQuoteOnLondonPlayAnnoteEvenLondonPlayAnnoteOdd(TemplateProject.GotoMacros.NextMonthGoTo*TemplateProject.June00.MakeSectionContinue%TemplateProject.Formatting.MyShowHide$TemplateProject.Formatting.IndexGen1$TemplateProject.Formatting.IndexGen2'TemplateProject.Formatting.GoAfterTable(TemplateProject.Formatting.GoBeforeTable(TemplateProject.Formatting.GotoNextTable(TemplateProject.Formatting.GotoPrevTable,TemplateProject.Formatting.DoPageBreakBefore.TemplateProject.Formatting.UnDoPageBreakBefore.TemplateProject.Formatting.ForcePlaytoNextPage0TemplateProject.Formatting.UnForcePlaytoNextPage.TemplateProject.Formatting.PageBreakBeforeNext.TemplateProject.Formatting.PageBreakBeforePrev(TemplateProject.GotoMacros.PrevMonthGoTo5TemplateProject.Formatting.SplitTheTableAtCurrentLine"TemplateProject.LondPlayTable.Main'TemplateProject.LondPlayTable.TableOnly)TemplateProject.Formatting.ChangeXEsToRed)TemplateProject.GotoMacros.ToolbarsGotoOn3TemplateProject.LineEditor.SelectionFontCondenser052TemplateProject.LineEditor.SelectionFontExpander05+TemplateProject.LineEditor.BlankCondenser05+TemplateProject.LineEditor.BlankCondenser10*TemplateProject.LineEditor.BlankExpander05*TemplateProject.LineEditor.BlankExpander10/TemplateProject.LineEditor.SelectTheCurrentLine%TemplateProject.LineEditor.FindABlankLondonPlaySep1pt,TemplateProject.Formatting.JoinTableWithNext,TemplateProject.LineEditor.HyphenateAtCursor(TemplateProject.LineEditor.Move1stWordUp)TemplateProject.LineEditor.PlaceHolderSet*TemplateProject.LineEditor.PlaceHolderGoto,TemplateProject.LineEditor.PlaceHolderDelete0TemplateProject.Formatting.SelectTextInRightCell,TemplateProject.LineEditor.SetTheViewingMode'TemplateProject.LineEditor.GoDown5Lines3TemplateProject.Formatting.GotoEndOfTextInRightCell,TemplateProject.Formatting.JoinTableWithPrev(TemplateProject.Formatting.BeforePlay1pt7TemplateProject.LineEditor.SelectTextPartOfNumberedLine)TemplateProject.Formatting.BeforePlay12pt(TemplateProject.Months.FixMonthBookMarks"TemplateProject.DocVars.SetTheYear(TemplateProject.Months.GotoSpecificMonthLondonIntroHeadLondSeasonIntroHEvenLondSeasonIntroHOdd'TemplateProject.IndexTools.IXBoldToHtml1TemplateProject.IndexTools.ConvertTheIndexToAFile)TemplateProject.IndexTools.IXHtmlToStyles)TemplateProject.IndexTools.IXStylesToHtml)TemplateProject.IndexTools.IXItalicToHtml/TemplateProject.IndexTools.IXCutAndPasteInPlace'TemplateProject.IndexTools.IXHtmlToBold)TemplateProject.IndexTools.IXHtmlToItalic+TemplateProject.LineEditor.BlankCondenser20*TemplateProject.LineEditor.BlankExpander20*TemplateProject.GotoMacros.ToolbarsLinesOn&TemplateProject.Formatting.Hyphenate25&TemplateProject.Formatting.Hyphenate30&TemplateProject.LineEditor.BlanksReset)TemplateProject.Formatting.HyphenWordList+TemplateProject.IndexTools.FindPhraseInAnXE3TemplateProject.XEFixer.NextXEF1WithLevel2NotItalic$TemplateProject.XEFixer.MakeItItalic(TemplateProject.GotoMacros.ToolbarsXEsOn*TemplateProject.IndexTools.FindPhraseAgain2TemplateProject.IndexTools.ConvertLevel1TextToBold3TemplateProject.IndexTools.ConvertLevel3TextToRunin(TemplateProject.IndexTools.GotoTopOfFile+TemplateProject.IndexTools.GenPlaySeePerson1TemplateProject.IndexTools.MovePlaySeePersonToEnd0TemplateProject.IndexTools.ParaRemoveAfterSeeXEs-TemplateProject.IndexTools.ParaAddAfterSeeXEs(TemplateProject.IndexTools.SortTheSeeXes,TemplateProject.IndexTools.ConvertXEsWithSee,TemplateProject.LondIndexer.MakeIndexTermRed'TemplateProject.LondIntroPersonnel.MAIN&TemplateProject.LondSpecLcCedilla.MAIN&TemplateProject.LondSeasonHeaders.MAIN%TemplateProject.LondSpecSterling.MAIN%TemplateProject.LondSpecLuUmlaut.MAIN%TemplateProject.LondSpecLuCircum.MAIN%TemplateProject.LondSpecLiCircum.MAIN%TemplateProject.LondSpecLeCircum.MAIN%TemplateProject.LondSpecElipsesP.MAIN$TemplateProject.LondSpecUeAcute.MAIN$TemplateProject.LondSpecLoGrave.MAIN$TemplateProject.LondSpecLeGrave.MAIN$TemplateProject.LondSpecLeAcute.MAIN$TemplateProject.LondSpecLaAcute.MAIN$TemplateProject.LondSpecialSyms.MAIN$TemplateProject.LondSpecElipses.MAIN$TemplateProject.LondSpecDDaggar.MAIN$TemplateProject.LondPhrasesSwap.MAIN#TemplateProject.LondSpecEnDash.MAIN#TemplateProject.LondSpecEmDash.MAIN#TemplateProject.LondonSetFonts.MAIN#TemplateProject.LondNotNewPara.MAIN#TemplateProject.LondNewspapers.MAIN#TemplateProject.LondCreateFile.MAIN#TemplateProject.LondAttachStys.MAIN"TemplateProject.LondSwapWidth.MAIN"TemplateProject.LondSwapCells.MAIN"TemplateProject.LondSpecNonSp.MAIN-TemplateProject.IndexTools.MarkDupSeeXEsGreen8TemplateProject.IndexTools.ConvertFileTo2ColIndexOfPlays"TemplateProject.LondonNothing.MAIN"TemplateProject.LondIntroMenu.MAIN"TemplateProject.LondBookmarks.MAIN!TemplateProject.LondSpecEnSp.MAIN!TemplateProject.LondSpecEmSp.MAIN!TemplateProject.LondPlayMenu.MAIN!TemplateProject.LondIndexGen.MAIN,TemplateProject.IndexTools.RemoveGreenDupXEs9TemplateProject.IndexTools.AppendXeSeeNextAuthorToThisOne4TemplateProject.IndexTools.ReplaceIndexPageSeparator$TemplateProject.IndexTools.AskForTop!TemplateProject.LondColSmall.MAIN!TemplateProject.LondColOther.MAIN TemplateProject.LondSpecUae.MAIN TemplateProject.LondSpecLoe.MAIN TemplateProject.LondSpecLae.MAIN TemplateProject.LondPhrases.MAIN TemplateProject.LondonFuncs.MAIN TemplateProject.LondHeaders.MAIN TemplateProject.LondDocVars.MAIN TemplateProject.LondColPlay.MAIN TemplateProject.LondColDate.MAIN TemplateProject.LondColCast.MAINTemplateProject.LondonLeft.MAINTemplateProject.LondIndexW.MAINTemplateProject.LondTbars.MAINTemplateProject.LondMonth.MAINTemplateProject.LondIndex.MAINTemplateProject.DateField.MAINTemplateProject.SomeText.MAINTemplateProject.LondYear.MAINTemplateProject.London.MAIN8TemplateProject.IndexTools.ConvertFileTo2ColGeneralIndex"TemplateProject.LondPageSetup.Main3TemplateProject.IndexTools.FindNextMultipleSeeEntry)TemplateProject.Formatting.FindBlankXERed/TemplateProject.Formatting.RemoveFindBlankXERedTemplateProject.Formatting.AAA5TEMPLATEPROJECT.LONDON.MAIN6TEMPLATEPROJECT.LONDYEAR.MAIN7TEMPLATEPROJECT.SOMETEXT.MAIN8TEMPLATEPROJECT.DATEFIELD.MAINTEMPLATEPROJECT.FORMATTING.AAA9TEMPLATEPROJECT.LONDINDEX.MAIN:TEMPLATEPROJECT.LONDMONTH.MAIN;TEMPLATEPROJECT.LONDTBARS.MAIN<TEMPLATEPROJECT.LONDINDEXW.MAIN=TEMPLATEPROJECT.LONDONLEFT.MAIN> TEMPLATEPROJECT.LONDCOLCAST.MAIN? TEMPLATEPROJECT.LONDCOLDATE.MAIN@ TEMPLATEPROJECT.LONDCOLPLAY.MAINA TEMPLATEPROJECT.LONDDOCVARS.MAINB TEMPLATEPROJECT.LONDHEADERS.MAINC TEMPLATEPROJECT.LONDONFUNCS.MAIND TEMPLATEPROJECT.LONDPHRASES.MAINE TEMPLATEPROJECT.LONDSPECLAE.MAINF TEMPLATEPROJECT.LONDSPECLOE.MAING TEMPLATEPROJECT.LONDSPECUAE.MAINH!TEMPLATEPROJECT.LONDCOLOTHER.MAINI!TEMPLATEPROJECT.LONDCOLSMALL.MAINJ!TEMPLATEPROJECT.LONDINDENT00.MAINK!TEMPLATEPROJECT.LONDINDENT25.MAINL!TEMPLATEPROJECT.LONDINDEXGEN.MAINM!TEMPLATEPROJECT.LONDMONTH.CLEARPGN!TEMPLATEPROJECT.LONDNEXTPLAY.MAINO!TEMPLATEPROJECT.LONDPLAYMENU.MAINP!TEMPLATEPROJECT.LONDPREVPLAY.MAINQ!TEMPLATEPROJECT.LONDSPECEMSP.MAINR!TEMPLATEPROJECT.LONDSPECENSP.MAINS!TEMPLATEPROJECT.LONDSWAPCON1.MAINT"TEMPLATEPROJECT.AUTONEWUNUSED.MAINU"TEMPLATEPROJECT.DOCVARS.SETTHEYEARV"TEMPLATEPROJECT.LONDBOOKMARKS.MAINW"TEMPLATEPROJECT.LONDINTROMENU.MAINX"TEMPLATEPROJECT.LONDONNOTHING.MAINY"TEMPLATEPROJECT.LONDPAGESETUP.MAINZ"TEMPLATEPROJECT.LONDPLAYTABLE.MAIN["TEMPLATEPROJECT.LONDSHORTCUTS.MAIN\"TEMPLATEPROJECT.LONDSPECNONSP.MAIN]"TEMPLATEPROJECT.LONDSWAPCELLS.MAIN^"TEMPLATEPROJECT.LONDSWAPWIDTH.MAIN_#TEMPLATEPROJECT.LONDATTACHSTYS.MAIN`#TEMPLATEPROJECT.LONDCREATEFILE.MAINa#TEMPLATEPROJECT.LONDNEWSPAPERS.MAINb#TEMPLATEPROJECT.LONDNOTNEWPARA.MAINc#TEMPLATEPROJECT.LONDONSETFONTS.MAINd#TEMPLATEPROJECT.LONDSPECEMDASH.MAINe#TEMPLATEPROJECT.LONDSPECENDASH.MAINf$TEMPLATEPROJECT.FORMATTING.INDEXGEN1g$TEMPLATEPROJECT.FORMATTING.INDEXGEN2h$TEMPLATEPROJECT.INDEXTOOLS.ASKFORTOPi$TEMPLATEPROJECT.LONDPHRASESSWAP.MAINj$TEMPLATEPROJECT.LONDSPECDDAGGAR.MAINk$TEMPLATEPROJECT.LONDSPECELIPSES.MAINl$TEMPLATEPROJECT.LONDSPECIALSYMS.MAINm$TEMPLATEPROJECT.LONDSPECLAACUTE.MAINn$TEMPLATEPROJECT.LONDSPECLEACUTE.MAINo$TEMPLATEPROJECT.LONDSPECLEGRAVE.MAINp$TEMPLATEPROJECT.LONDSPECLOGRAVE.MAINq$TEMPLATEPROJECT.LONDSPECUEACUTE.MAINr$TEMPLATEPROJECT.XEFIXER.MAKEITITALICs%TEMPLATEPROJECT.FORMATTING.MYSHOWHIDEt%TEMPLATEPROJECT.LINEEDITOR.FINDABLANKu%TEMPLATEPROJECT.LONDSPECELIPSESP.MAINv%TEMPLATEPROJECT.LONDSPECLECIRCUM.MAINw%TEMPLATEPROJECT.LONDSPECLICIRCUM.MAINx%TEMPLATEPROJECT.LONDSPECLUCIRCUM.MAINy%TEMPLATEPROJECT.LONDSPECLUUMLAUT.MAINz%TEMPLATEPROJECT.LONDSPECSTERLING.MAIN{&TEMPLATEPROJECT.FORMATTING.HYPHENATE25|&TEMPLATEPROJECT.FORMATTING.HYPHENATE30}&TEMPLATEPROJECT.LINEEDITOR.BLANKSRESET~&TEMPLATEPROJECT.LONDSEASONHEADERS.MAIN&TEMPLATEPROJECT.LONDSPECLCCEDILLA.MAIN'TEMPLATEPROJECT.FORMATTING.GOAFTERTABLE'TEMPLATEPROJECT.INDEXTOOLS.IXBOLDTOHTML'TEMPLATEPROJECT.INDEXTOOLS.IXHTMLTOBOLD'TEMPLATEPROJECT.LINEEDITOR.GODOWN5LINES'TEMPLATEPROJECT.LONDINTROPERSONNEL.MAIN'TEMPLATEPROJECT.LONDPLAYTABLE.TABLEONLY(TEMPLATEPROJECT.FORMATTING.BEFOREPLAY1PT(TEMPLATEPROJECT.FORMATTING.GOBEFORETABLE(TEMPLATEPROJECT.FORMATTING.GOTONEXTTABLE(TEMPLATEPROJECT.FORMATTING.GOTOPREVTABLE(TEMPLATEPROJECT.GOTOMACROS.NEXTMONTHGOTO(TEMPLATEPROJECT.GOTOMACROS.PREVMONTHGOTO(TEMPLATEPROJECT.GOTOMACROS.TOOLBARSXESON(TEMPLATEPROJECT.INDEXTOOLS.GOTOTOPOFFILE(TEMPLATEPROJECT.INDEXTOOLS.SORTTHESEEXES(TEMPLATEPROJECT.LINEEDITOR.MOVE1STWORDUP(TEMPLATEPROJECT.MONTHS.FIXMONTHBOOKMARKS(TEMPLATEPROJECT.MONTHS.GOTOSPECIFICMONTH)TEMPLATEPROJECT.FORMATTING.BEFOREPLAY12PT)TEMPLATEPROJECT.FORMATTING.CHANGEXESTORED)TEMPLATEPROJECT.FORMATTING.FINDBLANKXERED)TEMPLATEPROJECT.FORMATTING.HYPHENWORDLIST)TEMPLATEPROJECT.GOTOMACROS.TOOLBARSGOTOON)TEMPLATEPROJECT.INDEXTOOLS.IXHTMLTOITALIC)TEMPLATEPROJECT.INDEXTOOLS.IXHTMLTOSTYLES)TEMPLATEPROJECT.INDEXTOOLS.IXITALICTOHTML)TEMPLATEPROJECT.INDEXTOOLS.IXSTYLESTOHTML)TEMPLATEPROJECT.LINEEDITOR.PLACEHOLDERSET*TEMPLATEPROJECT.GOTOMACROS.TOOLBARSLINESON*TEMPLATEPROJECT.INDEXTOOLS.FINDPHRASEAGAIN*TEMPLATEPROJECT.JUNE00.FINDNEXTLEFTBRACKET*TEMPLATEPROJECT.JUNE00.MAKESECTIONCONTINUE*TEMPLATEPROJECT.LINEEDITOR.BLANKEXPANDER05*TEMPLATEPROJECT.LINEEDITOR.BLANKEXPANDER10*TEMPLATEPROJECT.LINEEDITOR.BLANKEXPANDER20*TEMPLATEPROJECT.LINEEDITOR.PLACEHOLDERGOTO+TEMPLATEPROJECT.INDEXTOOLS.FINDPHRASEINANXE+TEMPLATEPROJECT.INDEXTOOLS.GENPLAYSEEPERSON+TEMPLATEPROJECT.LINEEDITOR.BLANKCONDENSER05+TEMPLATEPROJECT.LINEEDITOR.BLANKCONDENSER10+TEMPLATEPROJECT.LINEEDITOR.BLANKCONDENSER20,TEMPLATEPROJECT.FORMATTING.DOPAGEBREAKBEFORE,TEMPLATEPROJECT.FORMATTING.JOINTABLEWITHNEXT,TEMPLATEPROJECT.FORMATTING.JOINTABLEWITHPREV,TEMPLATEPROJECT.INDEXTOOLS.CONVERTXESWITHSEE,TEMPLATEPROJECT.INDEXTOOLS.REMOVEGREENDUPXES,TEMPLATEPROJECT.LINEEDITOR.HYPHENATEATCURSOR,TEMPLATEPROJECT.LINEEDITOR.PLACEHOLDERDELETE,TEMPLATEPROJECT.LINEEDITOR.SETTHEVIEWINGMODE,TEMPLATEPROJECT.LONDINDEXER.MAKEINDEXTERMRED-TEMPLATEPROJECT.INDEXTOOLS.MARKDUPSEEXESGREEN-TEMPLATEPROJECT.INDEXTOOLS.PARAADDAFTERSEEXES.TEMPLATEPROJECT.FORMATTING.FORCEPLAYTONEXTPAGE.TEMPLATEPROJECT.FORMATTING.PAGEBREAKBEFORENEXT.TEMPLATEPROJECT.FORMATTING.PAGEBREAKBEFOREPREV.TEMPLATEPROJECT.FORMATTING.UNDOPAGEBREAKBEFORE.TEMPLATEPROJECT.LONDFIXITALICPLAYSININDEX.MAIN/TEMPLATEPROJECT.FORMATTING.REMOVEFINDBLANKXERED/TEMPLATEPROJECT.INDEXTOOLS.IXCUTANDPASTEINPLACE/TEMPLATEPROJECT.LINEEDITOR.SELECTTHECURRENTLINE0TEMPLATEPROJECT.FORMATTING.SELECTTEXTINRIGHTCELL0TEMPLATEPROJECT.FORMATTING.UNFORCEPLAYTONEXTPAGE0TEMPLATEPROJECT.INDEXTOOLS.PARAREMOVEAFTERSEEXES1TEMPLATEPROJECT.INDEXTOOLS.CONVERTTHEINDEXTOAFILE1TEMPLATEPROJECT.INDEXTOOLS.MOVEPLAYSEEPERSONTOEND1TEMPLATEPROJECT.LONDCOLCAST.ITALICIZEABBREVIATION2TEMPLATEPROJECT.INDEXTOOLS.CONVERTLEVEL1TEXTTOBOLD2TEMPLATEPROJECT.LINEEDITOR.SELECTIONFONTEXPANDER053TEMPLATEPROJECT.FORMATTING.GOTOENDOFTEXTINRIGHTCELL3TEMPLATEPROJECT.INDEXTOOLS.CONVERTLEVEL3TEXTTORUNIN3TEMPLATEPROJECT.INDEXTOOLS.FINDNEXTMULTIPLESEEENTRY3TEMPLATEPROJECT.LINEEDITOR.SELECTIONFONTCONDENSER053TEMPLATEPROJECT.XEFIXER.NEXTXEF1WITHLEVEL2NOTITALIC4TEMPLATEPROJECT.INDEXTOOLS.REPLACEINDEXPAGESEPARATOR5TEMPLATEPROJECT.FORMATTING.SPLITTHETABLEATCURRENTLINE7TEMPLATEPROJECT.LINEEDITOR.SELECTTEXTPARTOFNUMBEREDLINE8TEMPLATEPROJECT.INDEXTOOLS.CONVERTFILETO2COLGENERALINDEX8TEMPLATEPROJECT.INDEXTOOLS.CONVERTFILETO2COLINDEXOFPLAYS9TEMPLATEPROJECT.INDEXTOOLS.APPENDXESEENEXTAUTHORTOTHISONE@@UnknownG:Times New Roman5Symbol3& :ArialMCentury SchoolbookG MS Mincho-3 fg"hr*fV$0%1Thomas MinskerThomas Minsker iD@DNormal#CJ OJQJ_HmHnHsH tH u<A@< Default Paragraph Font  @$@UnknownG:Times New Roman5Symbol3& Oh+'0x  4 @ LX`hpssThomas Minskerhomhom London.dotkThomas Minsker199Microsoft Word 9.0@@@ i ՜.+,0  px  Penn State Universityen  Title  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~   Z10*!"#$%&'()+,-./W234F6A89:;<=>?@BCDEQHIJKLMNOP5RSTUVXbY[k\]^_`acodefghijl~mnp{qrstuvwxyz}Root EntryeGeGeGeGeGeGeGeGeGe=e FhGe`Ge D)j@S8Ge1TableeGeGeGeGeFeFeFeX eFeFe<=eFeFeFeFeP eFeFe eFeFetFeWordDocumente>Fe8Fe0Fe(Fe FeFeFe Fe=eEeEeEeEeEeEeEeEeEeEeSummaryInformationlEeD e< e efEe`Ee(4Ee(Ee( e EeEe EeEeEeDeDeDocumentSummaryInformation|DetDe8XDeTDeLDeDDe>De4 e8De0De(De4=eMacroseCeCeCeCeCeCeCeCeCeCeCeCe8j` jBeBeBeVBA\BeLBe?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijkmnpqrstuvwxyz{|}~Lz#<⍛YPʖ F⍛YPʖx⍛YPʖ⍛YPʖME(SLSS6"N0{00020906-0000-0000-C000-000000000046}(%H` % %`h8@1t<$*\Rffff*273c5ff25f4xAttribute VB_Name = "ThisDocument" Bas0{00020P906-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2rU qY 4a`rU @n__SRP_4__SRP_5BLondIntroPersonnel&R  /__SRP_4a X7f   ( + " (   ( 0 8 (H  h   x    "   $ &R "     (  (H   h p *1x  X     "   K "8 B~`(H (` "x ( *?       0 "H p "      .e 0 8 @ H P B X ` h $      :HP]@h]  8 X]`' DL+ LIF+ King's+ Queen's+ ^2Personnel InputLondIntroPersonnel.DTest &B@(@C Personnel &B@*<. Name:Role &B@dvRoleI &B@,+W Index Name:IndexT &B@dv(IndexI &B@, ?d Index Theater:IxTh &B@dv<IxThI &B@,QTH &B@.#\0DLTH1 &B@0Z\2LIFTH2 &B@0\GKing'sTH3 &B@0\VQueen'sTH4 &B@0uvm Add PersonAdd &B@2\F CanButton &B@4\IF // MF &B@2\FPhrasesPhrase &B@2\-FTheatersTheater &B@2K@$ Phrases &B@68T Pick Lists &B@* &B@8 LondSet.MAINI$  &B@( LondSet.MAINT$  &B@(' ]xF &!<!>.: : &!@%>'$o &B@F D &B@H &B@F: &B@Ho LKT" DlgVisible "CanButton", 1 CanButton &B@NPhrases &B@PKTPhrases$  &B@RPhrases &B@PKTPhrases$  &B@RPhrases &B@PSnoPIxThI member of V  company &B@XIxThI &B@No(]P]h]# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KT CanButtonClose &B@XPhrases$  &B@RPhrases &B@PQTH &B@fKT \PhraseKT ' Phrases &B@PPhrases$  &B@RdAdd &B@NPhrases &B@P' kTheaterKT ' Phrases &B@PPhrases$  &B@RdAdd &B@NPhrases &B@P' kPhrasesKTPhrases &%f'b b KT b$ A@BAdd &B@NKT b$  --'D b$  D &%hA@TIxThI &B@NSn DlgFocus "Add"Phrases &B@P' kTH1KTH2KTH3KTH4KT \ &%l &%j'b b$ A@TMFKT // &B@HAddKTRoleI &%n &B@H; &B@HRoleI &B@XIndexI &B@XRoleI &B@NPhrase &B@p dtvxF &B@r CanButtonKT'ZSn Case 3 Select Case ID$ Case "RoleI" DlgEnable "PhN&xME (> L< %  &P@\ x@X "`pk++ @@$l `: B` .YD JP` 05IL  T` EYV Z`H $k YYJY\I^ 0I` @b\ @D L Pd0Hz`  Y|@~ @0@hh@@€  @h@P0h@Ph@Ph@PHh@Ph@Ph@P h@Phh@P`x p8@(H @@8 @X( @p @ @ @ @ @ @ @ @0 @ hP0 h  ( P @Zl @ @ 8 @ ( ( & BTz@ $ @  @  @H @P  @x @ h  %@ @` @ @ @ @ @ x @ h @ X @H @8 8 @( @$ P P` (1t<$*\Rffff*503c6397ed*\R1*#17b*\R1*#c1 " (8HX `hx J@(:,@8$:h4@$:4@$:("P(@h*@,@.@0@  (:P(@x0@2@,C(:8 ` &1p&1  01  "   0@P "  X`h &p @`hp " x6 B  (  (0"(8+`((     ( +0 "8 (P  px rase", 0 Case "IndexI" DlgEnable "Phrase", 0 Case Else End SelectKT \IndexIKTIndexIRoleI &%n$ z &B@XSnSnxip] ~ | | ~$ Gj ~'~ ~ | ~ $, ' zd | ~ $, | ~ $ ' zkxiph\f 2 IndexI &%n : IxThI &%n ' d)Attribute VB_Name = "LondIntroPersonnel" Dim ItalicList__$(), TheatLQ^Ring  Pubp Sub Main() Re20 Y14 b4*A0CC g0 & 9!1)DL2LIF J3 KT's 4A Queen WordBasic.BeginDialog 350, 426, 231, " Input" .DTest 9 -GroupBox 8, 32142*Text 6CU4C1":a=Role1 12199,* " I24, 487 "Index T4 B T16@10 At@7IxThF7 Option^ "QTHDf ButtonQ}, 9e4O1GABiTH193215@A7Be323q8o\"4$GRPush11?D10E2]Add #^M K'CancelE'b&2 7!b37@ //z MAz+15, PhrasesAC4Odk715a%3 6@/n"&f5!5{2 8"Pick g5EndCcallSet.MAINaIɜT ĽCC As Objectd: ` CCurValues.User%C((C `á!PrivЂDoc(T$AI# 1-,Int8 T$": =9(WhiDchDSel@! zCN C R embDlgVisible "?bCa)FoxcusI M, R,Arraym3#T OEB2 c.0 O:'//*ElseSr?%`DoCompany(InX_%w"CeSmember of` " + 0P" c3>BUi?% Funci (Id$, Ac4t,0/p%aPtrS7TcSxerm`-%MsgHStr$()Surш0:` *< !'I*"Clos߆/#$PZ+kE{, -p &9 p W%IfUMqn1 PEqo A<66s,%%xqO K DA%q*IfS9ooh@ oEp JOOZ**eOO" =s"s(Ff+> 0O+@xhgr*quu (:)1 "O(lTtIn0J(^U --" FZ [Left$](n - 1PY 5 7cF|a $$st45$ TH2"TH3cս Ptr = WordBasi@c.Val(h[Right$](Id$, 1)) DoCompany (TheaQ__$(LCase "MF"jInsert " //  /Add0@DlgTex"RoleI"h;fIndex Term$~"\f 2D+[.. + ":"ÀAIxThA& S, "q8Focus'A%EnablPhr" B ^MarkBE ntry B:=BF, Range:="Bold:=0, ItalicRmCanButtonH6DTestX0( ElseEnd Select Rem =3ID$ RG =A8I)eo.E /45-d-Pb@. "D', Last$ @?V',FunctionA9Pri`vate eLW$@kDim WAcFor W;Len( To 1 Step -1CIf Mibd!, W@"Cmn GoLeavAN@y a 6: `  G $@ g `t1)VQG# 19 -'If (__SRP_4bkLondSpecLcCedilla$ vLondSeasonHeaders$G __SRP_3eK+4 rU J $J`(J`1 0(J`/(J`00!J` 0//(IJ`0noxME(<<< <h "`@h#London: Insert a non-breaking blank&TemplateProject.LondSpecLcCedilla.MAIN`H%H X1t< ",8H (normal text)231 &B@o@8Attribute VB_Name = "LondSpecLcCedilla" Public Sub Main() ".Descri ptionon: Insert a non-breaking `blank[FProcDataRInvoke_FuncRTemplate"ject..MAINUWordBasic.}Symbol Font:="(normal text)", CharNu"m 231Endu rU~| ?>:y)  2 '!3Y(Q3'#>3)> 4a0i44!54a5@A@ EditGoTo .Destination = "s+" EditGoTo .Destination = "s-" &B@ IKTA@ &B@A@ &B@A@MKTA@ &B@A@Sn &B@o]2 MsgBox Str$(SelInfo(2)) + " " + Str$(SelInfo(33))-- Header is not even or odd! &%KKKTS@ &B@ &% G &B@jn--Not first section &% G &B@j &B@ &B@' ! &%KT &%LondonIntroHead &B@d0LondSeasonMonthHEven &B@ ' k &B@ &B@ $ &B@H  &B@H  &B@ &B@H ZapfDingbats93 &B@  &B@H &B@k(KT &% j! ( In j!rU~| KJL!IaIII Y ѨIby!qbQ Ycc9٩9YyF !eeH I!I) 9!!1""" i###JyJ# '$q=oIy{ hg_aIJP (\ ;;;;@(\^%(82%(%(%:%:%X$ @X X:(\%(8%(C%(%: %X$ @X X@(\<%(8%(.%( %: %: %X$ @XX:(\v%(8%(%(%:%X$ @XX@(\%(8+%(W%(%:%:%X$ @XX:(\v%(8(%(%(%:%X$ @XX@(\ %(8?%(d%( %:%:%X$ @XX:(\v%(8<%(%(%:%X$ @XX":\%X$ @XX@(\#%(8\%(0%(%:%:%X$ @XX@(\Z%(8\%(2%(%:%:%X$ @XX@(\%(8\%(G%(%:%:%X$ @XX@(\%(8\%(V%(%:%:%X$ @XX@(\u%(8v%(m%(%:%:%X$ @X X:(\\%(8%(F%(%:!%X$ @X"X@(\\%(8I%(F%(%:#%:$%X$ @X X@(\\%(8%(F%(%:%%:&%X$ @X X@(\\%(8-%(F%(%:'%:(%X$ @X XC(\K%(8%(%(@%`:%%X$ @X)X:(\8%(8%(%(T%:*%X$ @X XX$ @X+X1:\,%:8-%`X$ @X.X1:\,%:8/%`X$ @X.X (\ .X$ @XW0A14X61 @X$ @XW2B1lX5P,blX0   0   0 P   (8l8(((8]3(:8!%:3%$$ @$4$+:8%%`$$ @$5$(:8%%(%$$ @$6$(:8%(%$$ @$7$((8]3C l&0 (8]3i (8 (:8%%(%$$ @$6$+:8%%`$$ @$5$":8%$$ @$8$(:8%%(%$$ @$6$ (8  l(0 (8]3I (8 (:8%%(%$$ @$6$+:8%%`$$ @$5$":8%$$ @$8$(:8%%(%$$ @$6$ (8  l%00(:8%%$$ @$7\$\(8]t+ (8]3G\"C 9/":8%$$ @$8$(8]3$\":i8LR:;%\"F%L(8%$$ @$` </$5":8%$$ @$8$(:8%%(%$$ @$6$ (8 .l0^l0^l0^l0X:=%l@(%$$ @$%$ @>\)$5\"C </ l$0":8#%$$ @$?$ l0K:@%:8%$$ @$%$ @?)$5":8A%$$ @$?$~:B:@%:8%$$ @$:C:X@%:x%$ @8(`1H)$6 8((:8%:D%$$ @$4$(:8%:D%$$ @$4$":8%$$ @$8$(:8&%(%$$ @$E$?H@:D%(%(%$$ @$ FGHIJ$ l!0 (8l((8]3C$ l$0e:%:@%:8%$$ @$` KF%$ @4/)$6XDpb,l$(HL\,$8(0   R ( dLondSeasonMonthHOdd &B@ ' k  &B@  &B@H ZapfDingbats93 &B@ &B@H &B@k  &B@H $ &B@H &B@ &B@KT First page &B@HSno(s+ &B@s- &B@ &% LondonSeasonKT Season$ = LondYear.GetYr$/ NextYear$ = LTrim$(Str$(Val(Season$) + 1))2 MsgBox "Season: " + Season$ + "-" + NextYear$I'  LondonMonthKT &B@ &%'  &B@ &B@ , &% '  MsgBox "Month: " + S$M' S' n &B@ &B@ &B@oxp $ &B@H $ &B@HXLondonIntroHead &B@0 Attribute VB_Name = "LondSeasonHeaders" Dim T$, MonthThisYeaBrNextHType$ Public Sub Main() / W|k \afk  SWordBasic.c0all(.GetYr$"HIfk$# Then2000N G3 :N!;Val() + 1 b[LTrim$](Str{)R#Q "(H+ "(Right(7, 2& i Rem EditGoTo .DestinationAs+>[-@ GViewwlect `Case E"I@ TDo@[ aShowA.CFooterO? !&M?! Else End=IECloseFE3 ubPri 1#nToggle>Link K+bNfirst sL`V O 6!cSe9All Cut!7@3aeI#](["=D" ,tyleConIntro$_Y#P# ".(.(ToPreviousFaVAa ͲHEF CTZIfg InsertPageFielNARese0tCha| Chr(9# D<> """Ok=Capxs 0 mSymbol F :="ZapfDingbats", arNum93)#zLʅ.da_Lr;/&/&n/&/&c.S/&`HOdd&R&q!pt ?03ut#*E'{ $37602 ?4299%4 ' FWp<3+c#AI\uoJoWWW7_xbCZ[)Ѱ@F t0!1x0Tah#!vA$(]1ze}":#}/$"-!vc7QI 3,Cur!#5 [d#a BaRXvj7,M40ѝ'K@(y&Cance~1ii(tartOf`u-5!'56A6666 (617Y773 8i'q88!90Q9y999A:9:::1ѳH T T T T T.:X%h$ @h8`h580{ T T7@h$ @h8(H(lh58C:H%l8 8h$ @h { xMEP> LLLLX` Ҁ@Ҁ@  "`k$$@l (`kCC&Px `kiҀ@Ҁ@Ҁ( @((px%((px((px((px@((px ((px((px((px ((px0&@h @X p@H @8 @x( @H @ @` @ @ @ p&@@x @h @X @@H @8 @(( @ @h @ H@X(&j@ t @pd @T @D @4  @@ $ @ @ @ @ xp((P 1t<$*\Rffff*223c638de1*\R0*#f*\R0*#10*\R1*#c1*\R1*#17b*\R1*#c1*\R1*#129*\R1*#139  " ( 0 8 @ H P ".X 7C2_  " "@  h x       " ( 60 "h(, $N $N   H X h(p2",""   0 0%8 H"X"h(.x* "2","" @H P"`*p(.""%00   "@PX` "h &p&  * " 4 6( `p 0( F    (0  8(H `p]p(x]' ' ' ' ' LondYear.GetYr$ &%('  G2000' j '   &%j ' $ &%' Season    &%l ' (` h68(_ *# *F8: % @(H%h$ @h(`/h68( h$ @hhC l0 h$ @hh h$ @hh & l0$ h$ @hh &h$ @hhH,bl h8(\(d!%t$ @tD"4t,4(d]3V4(T]3V4($]3Yt$ @tt2(d%t$ @tD"($]tt5Dt$ @t#t2(d%t$ @tD"($]tt5Dt$ @t#tt$ @t$tt$ @t%tCx(d!%t$ @tD"t(d]32(d%t$ @tD"($]3t5D":d7%t$ @t't>,t$ <t 8 D9)t":d(%t$ @t't Cxt$ @t)tt$ @t*t0 D +Dt$ @t,t5D0 D +Dt$ @t,t5D%@t$ @t,t lx="(d%t$ @t-t":d.%t$ @t,t.:d/%:$0%t$ @t123t*.lx*FD%t$ @t,t5D"(d%t$ @t-tT(d]32(d%t$ @tD"($]3t5D4":d7%t$ @t't,t$ <t 8 D9)t":d5%t$ @t't Cx lx=["(d%t$ @t-t*lx.*FD%t$ @t,t5D.:d/%:$0%t$ @t123t":d.%t$ @t,t"(d%t$ @t-t%@t$ @t,t0 D +Dt$ @t,t5D0 D +Dt$ @t,t5Dt$ @t)tt$ @t*tT(d]3R":d.%t$ @t,tT\0Lb4xtDD&:h%x$ @xx&:h%x$ @xx:h%x$ @xH8x8:h]3 T8:h]3x$ @xx0:h%x$ @xH`x5H((h%((%x$ @xxx$ @xxF*FH:h%x$ @x`x6H T Tx$ @xx((h%((%x$ @x xx$ @x!x(Db8xHFarU >$>`$>`$>`n{__SRP_3flLondSpecSterling" orLondSpecLuUmlaut"uLondSpecLuCircum"uxME(<<< <h "`@hLondon: Insert pound sterling@j%TemplateProject.LondSpecSterling.MAIN`H%H X1t< ", 8H (normal text)163 &B@Str$o@8Attribute VB_Name = "LondSpecSterling" Public Sub Mai`n() ".Descriptionon: Insert pound sProcDataLInvoke _FuncLTe@mplate"ject. .MAINWordB asic.vSymbol Font:="(normal text)", CharNum 163tEQr oxME(<<< <h "`@h#London: Insert a non-breaking blank%TemplateProject.LondSpecLuUmlaut.MAIN`H%H X1t< ",8H (normal text)252 &B@Ho@8Attribute VB_Name = "LondSpecLuUmlaut" Public Sub Mai`n() ".Descriptionon: Insert a non-breaking b0lank[FPr@ocDataRInvoke_FuncRTemplate"ject. .MAINTWordBasic.|Symbol Font:="(normal text)", CharNum 252Endt oxME(<<< <h "`@h#London: Insert a non-breaking blank%TemplateProject.LondSpecLuCircum.MAIN`H%H X1t< ",8H (normal text)251 &B@o@8Attribute VB_Name = "LondSpecLuCircum" Public Sub Mai`n() ".Descriptionon: Insert a non-breaking b0lank[FPr@ocDataRInvoke_FuncRTemplate"ject. .MAINTWordBasic.|Symbol Font:="(normal text)", CharNum 251Endt oxME(<<< <h LondSpecLiCircum"uLondSpecLeCircum"uLondSpecElipsesP"sLondSpecUeAcute k"`@h#London: Insert a non-breaking blank%TemplateProject.LondSpecLiCircum.MAIN`H%H X1t< ",8H (normal text)238 &B@o@8Attribute VB_Name = "LondSpecLiCircum" Public Sub Mai`n() ".Descriptionon: Insert a non-breaking b0lank[FPr@ocDataRInvoke_FuncRTemplate"ject. .MAINTWordBasic.|Symbol Font:="(normal text)", CharNum 238Endt oxME(<<< <h "`@h#London: Insert a non-breaking blank%TemplateProject.LondSpecLeCircum.MAIN`H%H X1t< ",8H (normal text)234 &B@o@8Attribute VB_Name = "LondSpecLeCircum" Public Sub Mai`n() ".Descriptionon: Insert a non-breaking b0lank[FPr@ocDataRInvoke_FuncRTemplate"ject. .MAINTWordBasic.|Symbol Font:="(normal text)", CharNum 234Endt xME(<<< <` "`@`London: Elipsis with period%TemplateProject.LondSpecElipsesP.MAINX h@%@P1t< "X`p.$ . $ . $ . $ &B@HoڰAttribute VB_Name = "LondSpecElipsesP" Public Sub Mai`n() ".Descriptionon: is with period|ProcDataJInvok@e_FuncJTemplate" ject. .MAINTWordBasic.Insert "." + Chr(160) - End{ gxME     !"#$%&'()*+,-./012346789:;<=>?@ABCDEFGHIJLMNOPQRSTUVWXYZ[\]^_`bcdefghijklmnopqrstuwxyz{|}~(<<< <` "`@h#London: Insert a non-breaking blank$TemplateProject.LondSpecUeAcute.MAINh@%@P1t< ",8H (normal text)201 &B@o@8Attribute VB_Name = "LondSpecUeAch" Public Sub Main(), ".Descriptionon: Insert a non-breaking blankFProcDataRInvoke_FuncRTemplateA"ject. .MAINSWordBasic.{Symbol Font:="(normal text)", Ch arNum 20"1Endt gxME(<<< <` LondSpecLoGrave  lLondSpecLeGrave lLondSpecLeAcute 5kLondSpecLaAcute Kk"`@h#London: Insert a non-breaking blank$TemplateProject.LondSpecLoGrave.MAINh@%@P1t< ",8H (normal text)242 &B@o@8Attribute VB_Name = "LondSpecLoGrave" Public Sub Main() ".Descriptionon: Insert a non-breaking blankFPro cDataRInvoke_FuncRTemplate"ject.A .MAINSWordBasic.{Symbol Font:="(normal text)", CharNum 242Endt gxME(<<< <` "`@h#London: Insert a non-breaking blank$TemplateProject.LondSpecLeGrave.MAINh@%@P1t< ",8H (normal text)232 &B@o@8Attribute VB_Name = "LondSpecLeGrave" Public Sub Main() ".Descriptionon: Insert a non-breaking blankFPro cDataRInvoke_FuncRTemplate"ject.A .MAINSWordBasic.{Symbol Font:="(normal text)", CharNum 232Endt gxME(<<< <` "`@h#London: Insert a non-breaking blank$TemplateProject.LondSpecLeAcute.MAINh@%@P1t< ",8H (normal text)233 &B@o@8Attribute VB_Name = "LondSpecLeAch" Public Sub Main(), ".Descriptionon: Insert a non-breaking blankFProcDataRInvoke_FuncRTemplateA"ject. .MAINSWordBasic.{Symbol Font:="(normal text)", Ch arNum 23"3Endt gxME(<<< <` "`@h#London: Insert a non-breaking blank$TemplateProject.LondSpecLaAcute.MAINh@%@P1t< ",8H (normal text)225 &B@o@8Attribute VB_Name = "LondSpecLaAch" Public Sub Main(), ".Descriptionon: Insert a non-breaking blankFProcDataRInvoke_FuncRTemplateA"ject. .MAINSWordBasic.{Symbol Font:="(normal text)", Ch arNum 22"5Endt WxME(<<< <H LondSpecialSyms 8LondSpecElipses -a(LondSpecDDaggar vQ__SRP_1c6,F1)OB1_7T2C2_1!3Z32Ad1144 ABvuB5c5a!16]#6?b!Q7C7_18C8_)u9C9@)C8`NK010AwrST !DT1T ""T1Tc" zOKl114, 1S88{zec End#U@ As Ob: Set U@CurValues.U`EU ((U Rem ASa CHGet ScS.Tab 0# [1 e ,D .aNum S9e !aA!Prtiv@ a"¨(Id$, Act,pPtrT CasreA "+DlgFocus "3.U, -_lgTextH`TClose`23"Y P C"QWEW2cOB3c4Uc5c6c7c8c9c511"*! 1`$ (Mid#3)76b d .bp"!rElsem |"`@XLondon: Elipses $TemplateProject.LondSpecElipses.MAINp(%(81t< "8@P.$ . $ . &B@Ho80ǰAttribute VB_Name = "LondSpecElipses" Public Sub Main() ".Descriptionon: dProcData>Invok@e_Func>Template" ject. .MAINWordBasic.Insert "." + Chr(160)  End \ZxME(6 << <  "`@` London: Create Double Daggar$TemplateProject.LondSpecDDaggar.MAINp%P1t<$*\Rffff*113c638cde " , 8H (normal text)135 &B@o@8Attribute VB_Name = "Londt{/xME(<<< <88 "`x55London: Other Symbols Menu$TemplateProject.LondSpecialSyms.MAIN@ ` Z`P Y\pI^ I` @b 00@888 8@8`88%881t<L " (8HXhx R8`,,,,@ ,p,,,,0 ,`,,, &  H Xx       0@ B HPX`hp Xx ]8 ] + + + + + + + + +  +  +  +  +  + 2,London: Special CharactersLondSpecialSyms.DTest &B@( eSelect to Insert character &B@*COpt &B@.#$ OB1 &B@0F#$ OB2 &B@0x#$ OB3 &B@0-$ OB4 &B@02#$ OB5 &B@0F2#$ OB6 &B@0x2#$ OB7 &B@02#$ OB8 &B@02# $ OB9 &B@0P# $ OB10 &B@0FP# $ OB11 &B@0P# $ OB12 &B@0P# $ OB13 &B@0rtXOKButton &B@ &B@8]F &!<!>.  &!@%>' Dim S As InsertSymbol GetCurValues S S.Tab = 0 Dialog S GetCurValues S S.Tab = 1, InsertSymbol .Tab = 0, .CharNum = S.CharNumo]'Z ^KTOKButton &B@NCOpt &B@fOKButtonClose &B@XKT \OB1KOB2KOB3KOB4KOB5KOB6KOB7KOB8KOB9KOB10KOB11KOB12KOB13KT \$ &%j'b b$  &B@HOKButtonKT'ZSPnHS@n8i0(Attribute VB_Name = "LondSpecialSyms" Dim List__$() Public Sub Main$ ".Descriptionon: Other Symbols Menua=ProcDataIInvoke_FuncITem plate"ject. .MAINSRe 20!UU 0)' 23ƈ146578Ɉ91Z H d6 d WordBasic.@BeginD{og 450, 30145,An Characters"D@.DTest GroupBox 1, 2"7@101Sel@q to Insert cNOB "C@DCC Butt@2K3SpecDDaggar" Public Sub Main() ".Descriptionon: CreaDo e ~ProcDataKInvoke_FuncKTemplE" ject. .MAINWordBasic.InsertSymbol Font:="(normal text)", CharNu"m 135sEndq rU~| 0  krU $__SRP_1dt)oLondPhrasesSwap $>__SRP_2c __SRP_2d(`InrU ,($,`$,`$,`$,`$!,`$I,`(q,`1 0(,`1 0(,`1 00, `  "08HXhx P@(:2@ .@H,Cx6@ 2@.C8@H 2@*C4@ 0@ (CP2@x (:,C   (08 0@1` Bx "( "08H`x "$ "0H`x0H45$xME(> L%&P@@ \ x@X  "@` k--p@l `  `p|+1 ` |+ 8 `H |+A @`|+I `|+\  `xk bYD  @` lYD B` tYD Zp `(k LL|Y\I^  I` @b\ @L  `(k %%H0@h@0@X @€ @ (@p@@0X@0Xp@@0X@0p@@0X@0p@@0X@0p@@0X@0p@@0X@0hp@@0X@0p@@0X@0H p@@0X@0 (` pH @X H @p 8 @ ( @  @  @ @ @ @ @0 @ 8@x @ 0  X @XH@Zl  @`< @, &@( @x @ @ @ @ 0 B@ &@l @(\ @X @@H @X8 @( 0xH&@x @`h @X @H @8 @( @ @  0p(0 1t<$*\Rffff*193c638d61*\R1*#c1*\R1*#17b*\R0*#f `x "" """2C P h   "   "   (  8 H X B ` h p (x    + + + + +0  P X "(`  #   ( "+ "  (8 "+X "  ( "+ "  ( $;8 "` x " ( ( (  " (0 (P (h  " ( ( (  "(0(P(p   (     (   8@H PX` "h px(((( ((  (@(`(x("((  ((0(P(p (( (((("(8(`  ]]0]X0     ]'yPredefined Text PhrasesLondPhrasesSwap.Dtest &B@(X CanButton &B@4l Insert ParaPara &B@2All CapsGAll &B@*!}U$ AllCaps &B@6+mXInsert InsertAllCaps &B@2 Small CapsGSmall &B@*!}U$  SmallCaps &B@6+mXInsertInsertSmallCaps &B@2ItalicsGItalic &B@*}U$ Italic &B@6mXInsert InsertItalic &B@2NormalGNormal &B@*}U$ Norm &B@6mXInsert InsertNorm &B@2* Switch To &B@*l.$ Switcher &B@ &B@8A@A@A@A@A@](F &!<!>.   &!@%>'> If SelInfo(13) = - 1 Then Call InNormal Else Call InTableo8@ +  Introduction+ Calendar+ + o +  Repertory+  Personnel+ + op + Advertisement Details+ Comment+ + o + Actors+  Actresses+ Dancer+ Dancers+ Manager+ Managers+ Musician+  Musicians+ Other Employees +  Proprietor +  Proprietors + Singer + Singers + Comment+ + op@ + Cast not advertised+ + oLondNotNewPara.MAIN &B@(LondAllCaps.MAIN $ D. &B@( AllCaps 1 Insert UCase$(T$) AllCaps Insert "."oH &B@ D$ &B@H &B@. &B@Ho@ &B@F D &B@H &B@F: &B@Ho]@]X# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KTAllCaps$  &B@R SmallCaps$  &B@RItalic$  &B@RNorm$  &B@RSwitcher$  &B@R'A@ CanButtonClose &B@XKT \ &B@ \ InsertAllCapsKTAllCaps &%f'b b G b$ A@ j CanButton &B@NInsertSmallCapsKT SmallCaps &%f'b b G b$ A@j CanButton &B@N InsertItalicKTItalic &%f'b b G b$ A@Bj CanButton &B@N InsertNormKTNorm &%f'b b G b$  &B@Hj CanButton &B@NAllCapsKT InsertAllCaps &B@NItalic &B@f SmallCaps &B@fNorm &B@f SmallCapsKTInsertSmallCaps &B@NAllCaps &B@fItalic &B@fNorm &B@fItalicKT InsertItalic &B@NAllCaps &B@f SmallCaps &B@fNorm &B@fNormKT InsertNorm &B@NAllCaps &B@f SmallCaps &B@fItalic &B@fParaKT &B@SwitcherKTSwitcher &%f'  'A@Switcher &B@fk CanButtonKT'ZSnSnip KTIntroGAll &B@PGItalic &B@PAllCaps &B@PItalic &B@P InsertAllCaps &B@P InsertItalic &B@P SmallCaps &B@PNorm &B@PGSmall &B@PGNormal &B@PInsertSmallCaps &B@P InsertNorm &B@P'KTCalendarGAll &B@PGItalic &B@PAllCaps &B@PItalic &B@P InsertAllCaps &B@P InsertItalic &B@P SmallCaps &B@PNorm &B@PGSmall &B@PGNormal &B@PInsertSmallCaps &B@P InsertNorm &B@P'Sp nh o` X 'Attribute VB_Name = "LondPhrasesSwap" Dim AllCapList__$(), Sma $NItalicNNormFDisplayingFwitch Pub@ Sub Main() Re10  23 %F51C0Cs!X1B1g2 2"x330@E@TBeüCe321*3qKT32AC;3KatalKDL rtKD7\14\)k42'S TbonDroBk4az5 s4t)#er GEnd##wSet$` o`G#0sb!alB #P As Objectd: ` P(urValues.vU`%P((Pਡma If lInfo(13) - 1 Thenpll In ElseETable Á Priva!B-s (0 " 0k1bIntrod@uction2Calenda0 "4kRepq`oryDkCPersonnelrq}~# Adv isement DetailEQ)|om = t.4 c8torE # ActresD ;# D{5" 4b$o5Manag> 6OA7#uia-8* oa92Other Employ|ee@s(Tn$pTYc03N otNewA.MAINndc, Chr(9)T$j.!RReZ 1[3U e$ ". [DoE> A3# Lc. { )PDo"9c. T$2":mFunh DT`8(IdG0up tr{SP1Msg1 +@ Str$(0)}S:Ql~vv  Dlg/Array &,E5..tَQ7`7]PHp8Bk/g"6Close29(ntStatu`sBar SeF"'4;@21!@`2("AllCaps") If Ptr > 0 Then Do ( List_(_$()WordBasic.DlgFocus "CanButton"Case "InserptSma{x= IValue("-& ( DItaliccϗUT (QNormPOG`j  )l k}( d, 0# F" BFF ë=.^ %8$.-[$? Q.brt }Td %fEPara[#CcJwitcherHGSx+x"Ŷ aDisplaying = Set$1SbEnd  ;? ;- ;H$b xH*;+;,;-;H$b xH*;.;/;-;H$b 8*;0;1;2;3;4;5;6;7;8 ;9 ;: ;; ;< ;/;-;$b h8* ;= ;- ;8$b l":hM%x$ @xNxC:hO% H PHl @:Q%x$ @xNx5Htl$b xH0   0 @  z$ (<l<,,(<]3?+:<%`($ @(@(+:<%`($ @(@(+:<%`($ @(@(+:<% `($ @(@(+:<% `($ @(@( (< A(:<%:B%($ @(C(,(<]3#l@($ @(D(C l0(:<%($ @(E\(\(<]t\"C F/":<%($ @(G( l0(:<%($ @(E\(\(<]t_\"C H/":<%($ @(G( l0 (:<%($ @(E\(\(<]t\"C I/":<%($ @(G( l0(:<%($ @(E\(\(<]ty+\" @@($ @(J(":<%($ @(G( l0H":<%($ @(G((:<%(%($ @(E((:<%(%($ @(E((:<%(%($ @(E( l0":<%($ @(G((:<%(%($ @(E((:<%(%($ @(E((:<%(%($ @(E( l0":<%($ @<<< <X "`@`London: Insert an En-Dash#TemplateProject.LondSpecEnDash.MAINp8%8H1t< " 0$ &B@HoXPðAttribute VB_Name = "LondSpecEnDash" Public Sub Main(X) ".~Descriptionon: Insert an0 En-xPr@ocDataHInvoke_FuncHTemplate"ject. .MAINWordBasic.pChr(1D50End GxME(<<< <X "`@`London: Insert an Em-Dash#TemplateProject.LondSpecEmDash.MAINp8%8H1t< " 0$ &B@HoXPðAttribute VB_Name = "LondSpecEmDash" Public Sub Main(X) ".~Descriptionon: Insert an0 Em-xPr@ocDataHInvoke_FuncHTemplate"ject. .MAINWordBasic.pChr(1D51End ls_xME(<<< <0 "@` "`Y$@& @( @ P* `, @@ @8@P@h@@@ %@@1t< "  ( "08@HPX`px" <$H "p   Century SchoolbookA@"oP@]]]]] &B@.'& &%0'( ($ &B@2  (  &%' * *Default Paragraph Font * &%hLond * &%hPlayalicUpdating Style: * &B@B@f *68 &B@4 &!:%<., , &!<B@< Inse $ &B@<AllCkk Smal &B@.o;Attribute VB_Name = "LondonSetFonts" Public Sub Main()PAllStyles "Century Schoolbook1rEndlriva v(Th ej$UDim HCurT  Nlum  F$dsf As Object  WordBasic.ScreenUpdating (0`!`=02Count4n(1, MsgBox Str(, For F#1 To 0;[ 1[/$](F,N 3If0y$ <> "Default Paragraph 遘" n0S`[Left.=, 4)?" Or PlayG PriAGatusBar "Y4: " +/}A%GImaW ?:=(AddTo Templ:=cC=ineQe(t F}=H0DialogRec.#J(Fa8lsei#ValuesSB1f:=Ŵ AÌIfNex6wͰ1@0A ,  xME(> L "@`Xk@`$kIF B`h$kIH @@@ @@@`@@@>(%@      !"#$%&'(*+,-./012345678:;<>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnoqrsuvwxyz{|}~(@B&@l @@\ @XL @p< @, @( @ @ @  P@x&@t @d @8T @D @P4 @$ Xp@ PBx0&@t @d @T @D @4 @$ p81t<$*\Rffff*1:3c638d68*\R0*#f*\R1*#17b*\R1*#c1 ".. 8 @(Php.x  @"  B &-0(@X B `&h-($ @ $$ B $d@ &B@,@ &B@D( kd$ B $ &B@dX &B@ 1***NOTE***: Paragraph inserted in middle of text. &B@kko@ F &B@D &%' @ &B@i H &B@ &%' B &B@DiPH\Attribute VB_Name = "LondNotNewPara" Public Sub Main() If LeftChar$(1)pChr(13) Then FRighaHElse.2WordBasic.Insertw 1, 0 End If  P":NPrintStatusBar "***NOTE: hgraph iped middle of text.KimnrivaFunction}Nҋm, 1 $p_ [Sele$]{v_*!&ȁNR'B '1(6'rU~| /. .0.  9A6 (D.(\ F<] L L36\.   &!@%>'  ( &B@H &B@F !P &B@H &B@F) &B@Hko(Pick From List)+ LBRAP -- British Apollo+ LCOUR -- Daily Courant+ LDJNL -- Daily Journal+ LPOST -- Daily Post+ LDAWK -- Dawks's News Letter+ LDIVP -- Diverting Post+ LENGP -- English Post+ LEVEP -- Evening Post+ LFEMT -- Female Tatler + LFLYP -- Flying Post + LLGAZ -- London Gazette + LLJNL -- London Journal + LLONP -- London Post + LMIST -- Mist's Weekly Journal+ LNSEU -- New State of Europe+ LOBSE -- Observator+ LPBOY -- Post Boy+ LPMAN -- Post Man+ LREVW -- Review+ LSPEC -- Spectator+ LSUPP -- Supplement+ LTATL -- Tatler+ L#WEEK -- Weekly Journal [Applebee's]+ L,BGAZ -- Weekly Journal; or British Gazetteer+ LPACK -- Weekly Packet+ L+ Lo]]]# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KT PaperOpts &B@f" WordBasic.DlgFocus "CanButton"KT Print Id$ \ CanButtonKOKButtonKT'Z PaperNoneKTNewsI &B@XNewsI &B@N PaperCourKT Daily CourantA@T PaperPostKT Daily PostA@T PaperSpecKT SpectatorA@T PaperListKT PaperList &%f'b b b$ L' D D --  'R D R$' DNewsI D &B@X PaperList &B@fNewsI &B@NkSnSniNewsI V &B@XNewsI &B@No Attribute VB_Name = "LondNewspapers" Dim P8__$() Public Sub Main$Re J,30N$PSet WordBasic.BeginDialog 376, 154,on[3]: "@.DTest YGroupB$oxQ, X3425]02AV C`hoiceText 71, R2473:?=5281X160"IOptionQ "GF HButton 25+5-22LDaily CourantP&:&149, 0@I"PoT=^ WY&A<91SpectatorF%AB\5\*7\6L1\From List]4GxDrop^7^73 ¬2 3OKWiD12#8""-Cancele @EndA As ObjJ: P CurValues.UsterP H(P If B -1 ThenpIn t " (K 0zT$sрInStrT(T+">"!(41rMidRT!q K1/|*r , "%?bQ9AbElse ;b343_<=E($f*Q T ub D  xME(> L % "`k$$x@l `   N`8|+& Z`kH ))DY\hI^  &I` Spec@b\ &PDX @RH pers T`Hk0mYV  &L0@8X8X8X8X8X8X 8XH8XpJ8XLN&@h @X @H @08 @H( @` @x @ @ @ @ @ @ @  @ LhHp@Zl @(8 @( &TL@$ @@ @X @ @ p @ @ @ x0 &@P@x @ h @ X @H 8XX1t<$*\Rffff*3:3c639514*\R0*#f*\R1*#c1*\R1*#17bq " ( F40 *:x,@$:":@6@X6@2@.C &:0(:X  01 ""( " 0 8 "@H$h$$ *$0"X"$"$$ "H,p* 0 P p2:$(P` B hpx (  ( ( ( 0 PX(p"  0 (H  h  x  "  (  )  (  "     ( 0 "8 )@ "X p  ]X8 L]A@NxLondon[Paper]: NewspaperLondNewspapers.DTest &B@(Yf Paper Choice &B@*G/ Paper:News &B@dNewsI &B@, PaperOpts &B@.2z Daily Courant PaperCour &B@0( 2d Daily Post PaperPost &B@0N2` Spectator PaperSpec RSQSSSOGO TyJy !!!!1"ATaTTTTaUU1VVWW XqXX9YYZyZ[[ \a\\ ]a]]^^y_y# `"#DA`h$ 4(Xx%(8%:%:%h$ @hh:(X%(8%(Y%(f%:%h$ @hh@(XG%(8%(/%( %: %: %h$ @h h:(X%(8%(%(%: %h$ @h h":X%h$ @hh@(X%(82%(z%(%:%:%h$ @hh@(X%(82%(d%(%:%:%h$ @hh@(X%(82%(`%(%:%:%h$ @hh@(X3%(8K%(D%( %:%:%h$ @h hC(X%(8J%(%(F%`:%h$ @hh:(X%(8y%(X%(%:%h$ @hh:(X%(8y%(X%(%:%h$ @hhh$ @hh.h$ @hW A!4h61 @h$ @hW"B!lh5l(X]3":X#%h$ @h$h"(X%h$ @h%h(W&%h$ @h$h5h$ @h%h":X'%h$ @h$h$,blh(;);*;+;,;-;.;/;0;1 ;2 ;3 ;4 ;5 ;6;7;8;9;:;;;<;=;>;?;@;A;B;$b  (8l8(((8]3T(:8%(%$$ @$C$u((8]3sCl0l0 (8ln lD0(:8 %:B%$$ @$E$":8 %$$ @$F$n l0C G/n l02C G/n l0UC G/n l0l(:8%$$ @$C\$\(8]tg\"CX"lXHi8H('H"XM8@ I`1X6):8 %X@$$ @$E$(:8%(%$$ @$C$":8 %$$ @$F$nu<Xb$l(HX\$ hP):h %l @x$ @xEx":h %x$ @xFx4P$b x\__SRP_45pLondCreateFile5%__SRP_46,>t~__SRP_47rU D$D`$D`0D` 0//(D` 0nrU~| GF0i 1a )yQI 1  .Forward = True .MatchWildcards = False End With9- Selection.MoveDown Unit:=wdLine, Count:=1 B@" B@"oH](Just to test Page Headers' Tempsdf &B@bl &B@`  &B@H &B@l &B@`  &B@HTempedf &B@b1 EditBookmark .Name = "Temps", .SortBy = 0, .Goto GLondSeasonHeaders.Main &B@(j1 EditBookmark .Name = "Temps", .SortBy = 0, .Goto ExtendSelection EditGoTo "Tempe" EditCutTempsd &B@bTemped &B@bo ! WordBasic.InsertBreak Type:=3  jB@Break  jB@ge l l jB@`   jB@  j!(  jB@" Selection.Find.ClearFormatting With Selection.Find .Replacement.Text = ""3332 .Wrap = wdFindContinue+ .Format = FalseD .MatchCase = False .MatchWholeWord = Falsem .MatchSoundsLike = False" .MatchAllWordForms = False Selection.Find.Execute2 Selection.MoveLeft Unit:=wdCharacter, Count:=1HAttribute VB_Name = "LondCreateFile" Public Sub Main(X) ".~Descriptionon:  a Seas4f with Intro and Calend@ar sec?su`ProcDatalInvok@e_FunclTempl"jB. .MAINRDim$ WordBasic.uNew $:=on.d`ot",  0Rem! ScreenUpdating(0 !-callYearE$`(=GetYrd$"*If_z" Then Ex,itJ' =In sertBk Type:=3|(Sel.wdS NextPage CharLeft 1, D ParaMMenu.DoL@dOEditBookmark @s" +P, SoFy:=0, A`dd:=1C0 "Cstarts here .A?Q6AVSetupB66"IHeaders (1Month.@ September, w Cl ^Pg e%*+Il }n)("Mg ?g*B*"1GFGoToG +s'_PK@,|S!&OfDocumenta,{MovebtUnit:=w"dvactCCoun`_kRight ,ta Ex!)D@G8D`fఁM DownaDgraph,2  "(Find.UFormatW+$a,.T@^m\ Re@ce1F  ward@TruGW wdCzin CC@FalsJMatchCasAWholeKWildc s .S#dsLiko $AllA }E~1D<Exec,`g,B!Line ClayTable`in%qColU 0A6q0rivw0etZ(DoItZMesssp"Just to tep, 0"/D="sYČUiZX' V+R o ya eo x[.E.`|.Gotop1S7C}0??:RRP6(w#o ab CuZCUBg'oj ,)FA1q 91111I2i:L.:d.%(D%t$ @tt":d%t$ @tt+:d %t$ @t$`1xt5$ lx 0&$t$ <t #t5$((d%(D%t$ @t tt$ @tt((d%(D%t$ @t t):d%x@t$     +&P$ !"#%'()*,ME./0123>56789:;<=-?@ABCDFGHIJKLNpOQhSTUVWXcZ[\]^_`abRdefgijklmnorstuvwz{|}~ ( {xME8> L*LLLL<<< "`@k??=London: Create a Season file with Intro and Calendar sectionsx#TemplateProject.LondCreateFile.MAINPx h`(k@I SeasPxIntrX%8&l jh@t @d @T @ D @P4 @h$ @ @ @ @ @ @ 8(@ @ @ @  @| l @\ L @<  , @ P @  @  @  @  @ @ (& @@t @(d  @@T @XD @p4 @$ @ @ X1t<$*\Rffff*3;3c639541$*\Rffff*0>3c638cc2$*\Rffff*0=3c638cc2*\R1*#1e*\R1*#b5*\R1*#d7*\R1*#d6*\R1*#129*\R1*#c1*\R1*#17b*\R1*#4b*\R1*#a4*\R1*#82*\R1*#125T "$. 8"X"+x (&(( ( ().> ,"P *( 40FE "P 8p  (  ,>.>8"h $x 7"<@2/h7x  (   $  $ 0 P &p & & (   8 4   X hx " "(6&# &#0(6@ 6h45 6  ( @(6P(6x H ] London.dot\^ &B@Z ScreenUpdating(0) LondYear.MAIN &B@(LondYear.GetYr$ &%(' n file G|jlendar &B@D &B@ &B@DLondIntroMenu.DoSeason  &B@(Intro  df &B@bSeason Intro starts here . . . &B@H &B@LondPageSetup.DoSetupI &B@(A@hLondMonth.SetMon September,  &B@(LondMonth.DoMonth September  Sep  &B@(LondMonth.ClearPg &B@(3 Insert "Season Calendar starts here . . ." InsertPara$ Call LondPageSetup.DoSetup("M") Call SetHeaders(1)Sep  d &B@bMonths  df &B@b &B@. WordBasic.StartOfDocument .Text = "^m" @tt>lx*F$%(T%(4%t$ @t t5$":d%t$ @ttt$ @tt(:d%:D%t$ @tt($ 5$0:d%lx*F$%t$ @tt5$E:d%lx*F$%lx*F%(%t$ @tt6$":d%t$ @tt>lx*F$%(T%(4%t$ @t  t5$>!lx*F$%(T%(4%t$ @t t5$"(d%t$ @t"t7'($t$ <t #t6$<($t$ <t #t6$2($t$ <t #t6$/t$ <t # /)t7'($t$ <t #t6$ ' (L(bx t$)Cx6:d*%(D%($%t$ @t t&(d%t$ @t  t#x@t$ @ttt$ @tt&(d%t$ @t  t#x@t$ @tt6:d+%(D%($%t$ @t t T(d]3Y":d,%t$ @tt6:d*%(D%($%t$ @t -t6:d+%(D%($%t$ @t -tx(bxtfrU F$F` (F`Y/nxME(<<< <` LondAttachStysLondSwapWidth20LondSwapCells__SRP_38"`@hLondon: Attaches London Styles#TemplateProject.LondAttachStys.MAINh@%@P1t< " B P` C:\MSOffice\Templates\LONDON.DOT\ &B@&o( Attribute VB_Name = "LondachStys" Public Sub Main()  ".~Description!on: es 4leProcDataMInvoke_FuncMTem plate"ject. .MAINWordBasic.File5s Store :=0, :="C:\MSOf fice\\LONDON.DOT", LinkX:=1End DKxME(<< << "`@h8@$London: Swap the widths of the cells"TemplateProject.LondSwapWidth.MAINh%ppx @h @X @H @8 X1t< ""(0@ LondSwap.MAINW &B@(oH@ѰAttribute VB_Name = "LondSwapWidth" Public Sub Main(), ".|DescriptioBnon:  the ws ofcellsGProcDataSInvok@e_FuncSTemplate" ject. .M(AINQ WordBasic.0call#, D"W(End xME (6 L<` "`@h8kLondon: Swap Contents of Cells"TemplateProject.LondSwapCells.MAINh%& @@x @h X@ X @@H @8 1t<$*\Rffff*1?3c638db0*\R1*#c1*\R1*#17b ""(0@ LondSwap.MAINC &B@(oH@ʰAttribute VB_Name = "LondSwapCells" Public Sub Main(), ".|DescriptioBnon:  Contents0 of Pr@ocDataMInvoke_FuncMTemplate"ject. .MAIN WordBasic.callC#, "C(End rU~| 98I0  d0(:h%:H%x$ @xxD0$b xkrU 8$8__SRP_393BoLondSpecNonSp91*LondPlayTableOg __SRP_12L ` Y nOxME(<<< <` "`@h#London: Insert a non-breaking blank"TemplateProject.LondSpecNonSp.MAINh@%@P1t< " 0$ &B@HoXPѰAttribute VB_Name = "LondSpecNonSp" Public Sub Main(), ".|Descriptionon: Insert a non-breaking blankFProcDataRInvoke_FuncRTemplateA"ject. .MAINQWordBasic.yChr(160End rU~| .>1>Q>q>y>9)      !"#$%&')*,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgijkmnopqrstuvwxyz{|}~8 ]]]]0.7' pN0.2' 4.4' 0.0' NA@31Auto0167 &B@ &B@ndon: Normal % j(T1df &B@b &B@- &B@!8Normal % j(2T2df &B@bT1d &B@bi &% ''  "$  "$ 0 &B@ "$  "$ 0 &B@ "$  "$ 0 &B@dP "$  "$ 0 &B@ "$  "$ 0 &B@ "$  "$ 0 &B@kx LineUp 1  jB@ Selection.EndKey Unit:=wdRowWordBasic.PrevCell B@"o &%[ WordBasic.MsgBox "You are in a table already! New one will be added after current one." WordBasic.EndOfRow WordBasic.EndOfColumn WordBasic.ParaDown 1, 0 WordBasic.LineDown 1 WordBasic.InsertPara  jB@  jB@  jB@ Selection.EndKey Unit:=wdRow# Selection.EndKey Unit:=wdColumn2 Selection.MoveDown Unit:=wdParagraph, Count:=1- Selection.MoveDown Unit:=wdLine, Count:=1 jB@ LondonPlaySep % j(dp &B@D &% &B@ jB@@ Selection.Style = ActiveDocument.Styles("LondonPlaySep")d &B@kko]]]]0.7' &B0.2' P4.4' &B0.0' '31Auto0167 &B@ &B@A "$  "$ 0 &B@b$ "$  "$ 0 &B@&B@ "$  "$ 0 &B@@  jB@ CaseohPXAttribute VB_Name = "LondPlayTable" Public Sub Main(), ".|Descriptionon: Creaa New  Pro cDataNInvoke_FuncNTemplHA"ject. .MAINDim NarrowC ol$ GutterWid"e Remhdepr 90.7* " 2 #& 4.4 Be`tween20 2WhereA0reWe/WordBasic.Insert ConvFrom:="", Num,umnsE3Row1InitialMthAuto Format0Apply916E8 @Height AllowSpli10CSelb| .StylActiveDocuments("2Nl";EditBookmark@nme$T1 SortB@(0, Add:=G)NextCell"?((2@P("!7GoToB7@G3/Info(1) Mod 2  0 If J Then "Bwlh^+ Chr(34), SpaceYKZRuler?`7aK"3o 6[l_l__"@„ |Els}א}2?l2l!j (j >xME> <,< LLLL<0<4<8<<<8 "`@hHk**London: Create a New Play Table"TemplateProject.LondPlayTable.MAINPxPtPp@`  `Hk?p%PxhPtPp@` L`TJ+  Ph08P\&j@X @H @8 0@( @ @@ p@ @ @( @@ @X @p @ @ @ @ @| @l @\ @L @H p &j @x @8h @XX @ H @8 @( @$ @ @ @ @ @  ( @| @l @\ @L @H Hj 0x @h @X @H @ (8 @( @$  @ @ @ @ H 8Hh1t<$*\Rffff*0=3c638cc2$*\Rffff*0>3c638cc2*\R1*#1e*\R0*#f*\R1*#129*\R1*#106*\R1*#c6*\R1*#c1*\R1*#17b\ "  ( 8 H X h HNp& ^$6  (^8$6X $64  DsDs <kh DsDs<k@  0 &  " px     HN& Ds8Ds<k 0  "2 b(   "  085P7h  & * 8 4 P$^`(2(  F0(8PX`2!2@__VU_gU End Ifj LineUp g`oHomeKey BU`:=wd | 'a9g OyPxrevǕ@e>.JbeOnly_m %FH'`_'msum  ltll"ll="a-l,llPQ_RcA~O0TR_Rk_RX }8[?A]tidth[F"_R%??ےcŐSF7w2Privѥg2q ct3)

-1dr2Na= 7Ty|pe MdPl&ep^onQSepoc.CharLeft4+A+1"" 2DQ  W  "wyo> )>  @>)?a???;@Y@= @ AI 1)AYA170qByAAB9BB (hCxCtCpC\ N:H%:(%:%:%: %: %X $ @ XX&(H%X $ @ XX^:HNX $ 4 X  0Qol| $ < | P)X|6l6:H%((%(%X $ @ X XX $ @ X XX $ @ X X^:HNX $ 4 X  0Qol| $ < | P)X|6l6:H!%((%(%X $ @ X X6:H%((%(%X $ @ X "X4(H%X $ @ X#((l`X5 (H``(H]3slxFH" $l%l\F8"\ $\L%: %(%X $ @ X %&'()X6\lLsltFH" $l%l\F8"\ $\L%: %(%X $ @ X %&'()X6\lLklpFH" $l%l\F8"\ $\L%: %X $ @ X %&'(X6\lL)slpFH" $l%l\F8"\ $\L%: %(%X $ @ X %&'()X6\lLsltFH" $l%l\F8"\ $\L%: %(%X $ @ X %&'()X6\lLklxFH" $l%l\F8"\ $\L%: %X $ @ X %&'(X6\lL0H'l X $ < X X6l *4h8b \`ptx,X|l\L0   l 2(h %x $ @ x8#(H]@x58L0$'(8 x $ < x x68(5$''(8x $ < x x68(7$'((8x $ < x x68(x $ < x $x^ :h+N88x $ 4 x  0Q o( $ <  P)x68(((h%(H%x $ @ x,x2(h %x $ @ x8#(H]@x58((h%(H%x $ @ x-xx $ < x $x((h%(H%x $ @ x-x $b (x 8(a__SRP_13q:(LondPageSetup=64A/__SRP_19d+2__SRP_18hrU $`q$`$`nrU~| +1 Aaq !F!!!1"!3Y(%      & $( H8%X%p%%%%% (0 8 @H P X `hp  x $ %%%%%0%H%`x      "   l(  l  l@     ]@ Microsoft Word &B@( Page Setup for: &B@*POpt &B@.o Front MatterOB0 &B@0(Season Introduction SectionOB1 &B@07Season Calendar SectionOB2 &B@0FSeason Calendar 1st MonthOB3 &B@0UiX &B@urrentX &B@4 Show Current SetupPush1 &B@2( &B@8@%>]XF &!<!>.  (  &!@%>' KT !$ &%A@KTA@Snop]]F &!:%.~' ~ &!<B@0 ~(bK ~ &!@%'Ko 0KFKT j!`5( 9?$`9"$S?$`9$?$`9@$`9$`9I +?$`9 T㥛 ?$`9!@$`9 $`9 9 9 999 9999 9q1KIKT j!5(9 9?$`9S?$`9?$`9`@$`9`$`9I +?$`9 T㥛 ?$`9!@$`9 $`9 9 9 999 9999 9q8CKMK2KT j! 985(9?$`9S?$`91.5?$`9?$`9$`9I +?$`9 T㥛 ?$`9!@$`9 $`9 9 9 999 9999 9q`3KT j!5($` 9?$`9$`9S?$`9?$`9?$`91.I +?$`9 T㥛 ?$`9!@$`9 $`9 9 9 999 9999 9qSno  0KFKT0b11.5"$ 2"$ 1.75"$ 2.25"$ 0"$ 8.5"$ 11"$ ,5%xME@> @@@@44:@  001@  X `Pp " "0 "8@ H $` p%%%%%%%(@PX` h px     $ %%%%0H%X%p 1.2"$ 1.8"$ 0  &B@1KIKT0b11.5"$ 2"$ 1.75"$ 2.25"$ 0"$ 8.5"$ 11"$  1.2"$ 1.8"$ 0  &B@CKMK2KT0b11.5"$ 2"$ 1.60"$ 1.60"$ 0"$ 8.5"$ 11"$  1.2"$ 1.8"$ 0  &B@SnoAttribute VB_Name = "LondPageSetup" Public Sub Main() Dim PP WordBasic.BeginDialog 266, 164, "Micro`soft T jGroupBox 10, 42441289  for::@Option@ <"P ! `%Bu@tton 2d22511dFrontjtter"OB0##4%22#Seas/IntroducL]*1*5N*2R1"*Ca@lendar(2(7S(1s?5@@hC)3gOKUN8M08f21 YCanc el B~137,  Push b A 1T@"Show Curre@ff Q&End£ As O@bject:Jt P Values.UserYP. -4P'K  (P Sel CaseDDoì[LTrim$@](Str()B R;B BElse 92ubBrivaWWWDWD8RecAx.File~(Fa'* @ W.Tab "gWq W B'(Area$i-b$ BFEVith$%.U3.LineNumbering.:Asv"Or i Oabx= wdPortraitTopMar InchesToPointsp(1.5`"Bom833PLeft7J Righ2.2RGer0Headcstazq"0FooDi6 3Wid64= '8 '!He A1FirsBtTrayw dP<efau ltBiniW9w;1fI;;;i;@;q<;.;;;K>;8A;;2;pmo85I;;JL;e;O;e;t;&8;.O;?o>;; .O;er;.;>y>o;o;opo;o; o;Eo;2o;9Poso;a;"C;MAŧ=_wu _w;;_w ;_w~.;;HcP61.6fOwk3/;;xI;;;"!6;; ;; 0?werD?w 6;/; :>wCinuous; ;!;J!owowwdows',ow owow ;;;%owowݗijion.PageSetup .LineNumbering.Active =@ FalseOrientat :wdPortraitPTop@MarginLInchesToPoints(1.5))Botto"m,833 .Left,6 *Righ%+GutterV0 (HeaderDistancl0 VFoo* 6 WidthD8 Hep 11ZFirsBtTrayw dPy%efau ltBincOt(herA s SeonStartcNew ddAndEvenBRHTruəDiffer/ VerticalAlignm?#B#SuppressEn4dnis Miprror(TwoB2OnOnɃPowdF! With Case FEہSelV B ub lvate Sub DoBOld(Area${ B"0", "F"WordBasic.FileB Tab:=BPaperSize1@y.5" + Chr(34), Iw2u"7Khs!.2% 0j c anb11jȖ:=0, JG^EGApplyPropcFac@!s:=1, Se|an. !8ih:=2, OKe /bDWb"r@9FromTextCoun8tByCMo2d@>-1G?"IGdGGJG2Gb G! Gcb,GGǴ.GOiG`+#um#"###C@"MA2#oGoGoG#oPoG#[6 DkG1.oG#P.(X %(8%:%h$ @hh:(X %(8%(%(%:%h$ @hh":X%h$ @hh@(X%(8%(o%(%: %: %h$ @h h@(X%(8(%(%(%: %: %h$ @h h@(X%(87%(%(%:%:%h$ @h h@(X%(8F%(%(%:%:%h$ @h h4(XU%(8i%(X%(%h$ @hh4(X%(8%(X%(%h$ @hh@(X %(8%(%(%:%:%h$ @hhh$ @hh.h$ @hWA4h6(X%1 @h$ @hWBlh5ltt(X]3,P:H%W h$ @hd`` /`h6dHt(X]3F HP0btl `hd0 p  X   Cxlx 0"lx!0G$pt$ <t "Qplttl #t L$tl d#%h?7$ lhl ,#%hS?7$ lhl 4#%h?7$ lhl <#%h@7$ lhl D#h7$ lhl L#%hI +?7$ lhl #%hT㥛 ?7$ lhl #%h!@7$ lhl T#h 7$ lhl \#l l#l t#l # l # l #l |# l # l # l #l #cl lx%0_lx&0$pt$ <t "Qpdttd #t L$td d#%h?7$ lhd ,#%hS?7$ lhd 4#%h?7$ lhd <#%h@7$ lhd D#h7$ lhd L#%hI +?7$ lhd #%hT㥛 ?7$ lhd #%h!@7$ lhd T#h 7$ lhd \#d l#d t#d # d # d #d |# d # d # d #d #cd #lx'0lx(0lx)0$pt$ <t "Qp`tt` #t L$t` d#%h?7$ lh` ,#%hS?7$ lh` 4#%h?7$ lh` <#%h?7$ lh` D#h7$ lh` L#%hI +?7$ lh` #%hT㥛 ?7$ lh` #%h!@7$ lh` T#h 7$ lh` \#` l#` t#` # ` # ` #` |# ` # ` # ` #` #c` lx*0$pt$ <t "Qp\tt\ #t L$t\ d#%h?7$ lh\ ,#%hS?7$ lh\ 4#%h?7$ lh\ <#%h?7$ lh\ D#h7$ lh\ L#%hI +?7$ lh\ #%hT㥛 ?7$ lh\ #%h!@7$ lh\ T#h 7$ lh\ \#\ l#\ t#\ # \ # \ #\ |# \ # \ # \ #\ #c\   8Lb xld`\tp0   \rU $`$`(`0(`0nxMELondonNothingl+LondIntroMenu<Y+__SRP_48/?__SRP_49s(<<< < "`|88"%0`0X1t< "  0 This is nothingoXPZAttribute VB_Name = "LondonNothing" Public Sub Main() Rem Th(is nT EndH rU~| IHQ  '!'i'''#Y( (9H piaqqrirrys !s[Q y !!!@X,x    "   P(x$$  $0  X h  x     "  4  L( x  B     1 ( " (  7  8 0pH (x "( !       x ]`8 &]]A@*London: Introduction MenuLondIntroMenu.DTest &B@(Opts &B@.jec XSeasonPush1 &B@0XNotePush2 &B@02XHeadingPush3 &B@0FXPhrasePush4 &B@0 XPlayPush5 &B@0X PersonnelPush6 &B@02XDrop CapPush7 &B@0bX CanButton &B@4 L Description &B@*8Desc &B@,bXOKButton &B@ &B@8]F &!<!>., , &!@%>'( (G|j ,!.KTLondYear.GetYr$ &%('   LondYear.MAIN &B@(LondYear.GetYr$ &%(' k` A@0KT46 &B@2KTA@8KTLondPhrasesSwap.Main &B@(KTA@:KTLondIntroPersonnel.MAIN &B@(KTA@<Sno((Select option above for description here+ &Season Opening to a File+ &Footnote within Introduction+ &Introduction Theater Heading+ &Special Phrases+ &'For a Bold, Small-cap, Play Sub-heading+ &#To enter multiple Theater Personnel+ &;Drop Cap the 1st Character of the Season, if it is selected+ &oh]  &%j ' &B@ &B@D LondonSeason &B@ Season of   $ &%l &B@H &B@oLondonFuncs.ParaIfNeeded &B@( &B@ &B@DLondonIntroHead &B@Type Theater Heading Here Now &B@H &B@> &B@ &B@o  ]` On Error Goto Leave &%@ &%BL I$ = InputBox$("Enter Play Phrase", "London Introduction Play", "")Type Play Title Now' , PlayTitle &B@TSdf &B@b , &B@HTEdf &B@b &B@H &B@TSd &B@b &B@>TE &B@ &B@dp PlayTitle &B@kP Leave:o8x &%@ &%B&Select text first, then do 'Drop Cap'! &B@2dFTimes New Roman2H0.05"$ J &B@Dkox'Z ^KTDesc$ & &B@XOpts &B@f CanButton &B@NOKButton &B@pl^#xMEP> L<<< %  "(`xlk44London Seson Intro Options"TemplateProject.LondIntroMenu.MAIN@(l 'KPh`, *h` |+ 6 0`kAY @l 8 `  O :x` ZP, <` q Z` k yY\I^ 8I` &0@(h x`8$(h x`8(h x`8(h x`8H(h x`8 (h x`8(h x`8(h x`8 (h x`8& @xh @X @H @8 @H( @ @0 @ @ @` @ @ @  h  P&*&08:<@d @T @D @4 @$ @ @  @( @@ @X @p @ @ @ @ @p @l &8X ` X p @Zl  X @ \ @x L &&@ H @ 8 @0 ( @H  @  @ @ x @ @ @ @ X8`` p1t<$*\Rffff*403c6395b6*\R0*#10*\R1*#c1*\R1*#17b*\R0*#f " (0 P@8".@,@0@.@0,@`2@0@ (:*: &@P&:x  01  "+ @"P"+p ."" (&"0X`hp x "6&**H6h2J( "085@ X(h"@z  "0   "P ( " & 0KT \ &%hPushKTDesc \$ &%j$ & &B@XOKButton &B@pOKButtonPerform &B@XCanBKOKBuKT'ZSnSni &B@ &B@Season LondonSeason1 &B@ LondonSeason2 &B@ CAttribute VB_Name = "LondIntroMenu" Dim Desc__$() Public Sub Main$".^riptionSes i O8sa=ProcDataIInvoke_FuncITemplate"ject. .MAINQRe 10DIISea$` SetTrWordBasic.BeginDialog 500(, 2628B,on: cd|ucq .DTestG 0|Group "ButtA31, 1>8U>2"_"6Push1/3PNote25Heading37Phras4[14=Play5 =Per|nel E6` ?DropP Cap7  nCancel^15@k9@mFnGBBoxBz134@35, 76@y TextS 14@ 2A5˅ *1(OK'% UEndaEI As Obɡo: h IrCurValue@s.UserEI'((I`tIf 0 Then` ExitS el}/se IB.fS CI 0Dz*call(Year.GetYr$" a6` g"""C +:c~aa)H If Do (@bN6In@)@tFootnw @Refere M: =" BDoabove for d@Eh&@1A€en to a File21within* 3"E`[yr "a4Spec 2 5bF`a Bold, Sm`]-cap, 5%,-h 6bTo enter multiple/7R wR{7r5P the 1st C haracofB,, if ;is s;ed0 ?R_u0h0zNe|xtZ>F + 33P` cJ Left `ZdD1StyPConT7c9 '#"$"[Right$`](Str4 )O^TIo c. n? Pqoa 8DoD,9 IEons.IfNeed 18ra_ar_R6 2 "QR. p8re Now^ExtendcIp StartOfLinL p~`oLaDoA:1RRem OPo$rr=Go HLeavjlP Pos(9t AI$3Inpu$("E@ F et/;!%tsTit`31 $KEdi okm0ark QPnTSSortByPn, Add:=>{49I@=x"TE" o `Resetq3s"Bo? 8 GoToO "ɟ(0WW7_ Q.E? 0 u)w1?9@$r):-`xzDoD~uA}+l+-+_ M\sgaWBtPb @first,Qhn do 'j'!/ߐtmat$  p3i1ݰ, Font'imes New Roman#He\2istFrom 0.05_Chr(34]E?q@1R2(Id$P.c Sup?Rp;0/IAcq0wDlg| "Q dBasic.DlgValue "Opts", -1 WorFocus "CanButton"Enab lKF, 0 Case 2\Select $[Left$](Id$, 4)*#"PushjText "De sc__$(CQ(MidQ5))S |4Oi"PerformKTE"XDTest =jElseEnd   Function 1"W) yH)YHѭ!H9IHv! 1"##{  @(T%(4%(%(%:%:%d$ @dd":T%d$ @dd@(T%(4 %(X%(%:%:%d$ @dd@(T%(4%(X%(%:%:%d$ @dd@(T%(42%(X%(%:%:%d$ @dd@(T%(4F%(X%(%:%:%d$ @dd@(T%(4 %(X%(%:%: %d$ @dd@(T%(4%(X%(%:!%:"%d$ @dd@(T%(42%(X%(%:#%:$%d$ @dd:(T%(4b%(X%(%:%%d$ @d&d:(T %(4%(%(L%:'%d$ @d(d@(T%(4%(%(8%:)%(%d$ @d*d:(T%(4b%(X%(%:+%d$ @d,dd$ @d-d.d$ @dW.A/4d61 @d$ @dW0B/ld5l(T]3W1pp(T]3+:T2%d$ @d3`1hd5 lh40g":T5%d$ @d3d+:T2%d$ @d3`1hd5lhCll 6/lzp(T]3.:T4%(4%d$ @d789dzp(T]3 :zp(T]3":T;%d$ @d3dzp(T]3) <zp(T]3^":T=%d$ @d3dzp(T]3x >z4Pbphlld?;@;A;B;C;D;E;F;$b 5l @h$ @h8(H(lh58h$ @hh((X%(%h$ @hh":X%h$ @hhz *# *F(: %l8 8(H%h$ @h%$ @ /)h68(h$ @hh":X%h$ @hhh$ @hh":X%h$ @hh((X%(%h$ @h h00(bl(h8(0   0   0 x  ~( (\l\LL(\]31:\)%@@H$ @HGH(:\%((%H$ @HHH":\%%H$ @HIH(:\+%((%H$ @HJHL(\]3:K%l@(8%H$ @HH:\L]3p:)%'lM\@ MH$ @H"@@$ @G)H6(:\+%((%H$ @HJH(:\+%:(N%H$ @HGH:\O]3:8P]3 (\l(0PblL H8MrU H$H`!a$H`(H`0$H`$!H`$IH`0qH` 0//nrU :D$:` A $:`0:` 0//nGLondBookmarksy2__SRP_3a__SRP_3bAvLondSpecEnSp'@ P  `  h x  B    :  ( 8 @ B H P X (`       + ( ( ( (8 X `  h +x (   + (     (  8  H X  ` p "7x ( )    (( *(@"p((     ( ( (0 "P (h (        ( ( "( (@ (Xx ]D](Px* N P R] ]8'T'V' X'Z &%` PsuMsg.MAINNo Active Document &B@(|kA@bb Begin Dialog UserDialog 357, 161, 414, 190, "London: Current BookMarks=" + LTrim$(BookN$), .Dtestk ! Text 10, 9, 53, 13, "Go To:"th6 ListBox 12, 26, 290, 119, VaryingList$(), .MyList' OKButton 317, 9, 88, 21, .OKButton- CancelButton 317, 49, 88, 21, .CanButton3 PushButton 317, 95, 88, 21, "Add New", .AddNew' TextBox 12, 170, 330, 18, .AddName- Text 12, 170, 400, 18, "Show", .ShowName. Text 12, 145, 61, 18, "Sort By:", .SortBy OptionGroup .Sort5 OptionButton 90, 143, 95, 16, "Name", .Sort1: OptionButton 180, 143, 95, 16, "Location", .Sort2 End DialogQ Begin Dialog UserDialog 250, 150, 322, 238, "London: Current BookMarks=", .Dtest! Text 10, 9, 48, 13, "Go To:"6 ListBox 12, 26, 290, 119, VaryingList$(), .MyList) OKButton 121, 203, 88, 21, .OKButton. CancelButton 226, 203, 88, 21, .CanButton3 PushButton 12, 203, 88, 21, "Add New", .AddNew' TextBox 12, 170, 292, 18, .AddName, Text 12, 170, 38, 18, "Show", .ShowName. Text 12, 145, 55, 18, "Sort By:", .SortBy OptionGroup .Sort5 OptionButton 90, 143, 95, 16, "Name", .Sort1: OptionButton 180, 143, 95, 16, "Location", .Sort2 End Dialog#London: Current BookMarks= X &% LondBookmarks.Dtest &B@( 0 Go To: &B@d h$ RMyList &B@6eXOKButton &B@X CanButton &B@4XAdd NewAddNew &B@2 AddName &B@, &ShowShowName &B@d 7Sort By:SortBy &B@dSort &B@.OFNameSort1 &B@0XLocationSort2 &B@0 &B@8]PF &!<!>.d d &!@%>'\ d!f'^ T d!hdf &B@bkj]hF &!:%b.lAtCurrentPointer l( l &!@%b'\ \ lqKd)@xME(> L( %x NPRTVXZ&P@L x ҀXx,@L "`Hp  V & :@ . 2 8 ,  0P 2  : > X`yh$:*C&: (:H0@p&:.@0@"(,@@0@p  01  &< 0 8 "7@ h 1  &<    "  !    0 !df &B@bk jo] &%n'V V + N+ N + P+ P'V 0' Xd  V  &%p + N $ N + P  V + N$ P V &B@r V + P V$' Xko]x]# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KT't'T'ZMyList$ P &B@RAddName &B@pAddName &B@PShowName &B@PShowName &B@XKT \Sort1KTMyList$ P &B@RShowName &B@X'ZSort2KTMyList$ N &B@RShowName &B@X'ZMyListKT ` Z `$ P' d `$ N' k d &B@bShowName &B@PShowName  &B@XkAddNewKT'TAddName &B@PAddName &B@pAddNameNewBookMarkName &B@XAddName &B@NAddNew &B@pOKButtonAdd &B@X CanButtonKT T'TAddName &B@pAddName &B@XAddName &B@POKButton &B@NAddNew &B@pOKButtonOK &B@XdX't'Zk@OKButtonKT T'TAddName &B@pAddName &B@XOKButton &B@NAddNew &B@pOKButtonOK &B@Xk'ZSpnhS`nXiPH׶Attribute VB_Name = "LondBookmarks" Dim DList__$(),8Varyingc@fAdd(Xsf$, SortIs Public Sub Main() .Descr@iptionPSUthesi: Display Menu for auto created b by >jProcData;Invoke_Func;HTem5teject..MA$IN(Re 200j 1E#XSel8edF0 sN$"A If WordBasic.Wi@ndow() Then call "P suMsg4, "No Active Document Exitn End IfAGetM Re@egin@ialog UserDi357, 161, 4d14@90@Ton: CurruB=" + L@Trim$(A=N$@.Dtest #Text 19, 53"Go To:,E ABox 12, 26A11 `B.My OKButt31/@ 88 0.E Cancel 4 G Push 95, " New", .@ =I417?331?& B> 40 "Shob S]145! "AL By:aByGOtGroup .g4D/4 511" 21818JLocaa2SNeBtR25! 32C3`(tR1XPz41_P_Pi\FP1r2N20 PV2]*P"dPjK29@(P, ,cJP1P5Q@ȟP}P P AWWPtoPBQD4ZO2^9;O@ []ǣKi+S710[kY"S+0+"gN`*T190//"f,8U8['Uq-UpU[16A1kU/-bVMkq.SVWB~yV2*W7 b)W1 15{GWR2P#XWqdlg As Ob: Set !=؊PValues.w Xc(PЖ!.mylP oА`p1E8dit:=Pc=b0:=jeďoThesBMM9 Rec0.@(False BM. "AtPointer0og{BM@pݑ-?a?=Tw:ӟPrivQ ! !BCouns (1H0" a.1/!.`c 0@VE ;FBC$obE B[%$Zi5 bwsN1{~sa wAArrtUpZ7AVO "Strfs0 p q rDTк(IdĐ%up!RC3$#1S@ $(0)S'1 > Case Dpa`;@I8WDlEmD`%@ ajE@nable vb, ZVisiofչ୤ g7f20aiCase "Sor@t1" WordBasic.DlgListBoxArray "My<", BookName __$()tTexthowRh " Is = 1>C20q@2 Fw If Sup > 0 Then  f B$r #Else& j nd If#Ediok mark :=B$, By:=0, GoTo:=5 {Visxiblm NwB:$$E'CuAd0dNewuingG~ D xEna*[ ("{!bMG¤(JFocus " Pc5, 0 OKButton@@ CECanCc G \GY $4R FDB() *(O+OKojPSURCgN aDTest#W44dj\ a4%4ȶ.&Y.", ".L+)g3!-Selepct HaF@unctio xME(<<< <X "`@`London: Insert an En-Space!TemplateProject.LondSpecEnSp.MAINpv8%8H1t< " 0-150 &B@oXPְAttribute VB_Name = "LondSpecEnSp" Public Sub Main()  ".zDescriptionon: Insert an En-SpacezProcDataIInvoke _FuncITe@mplate"ject. .MAINPWordB asic.oSymbol CharNum:="-150'End GxMELondSpecEmSpEC'LondPlayMenuILD __SRP_242 __SRP_25_"(<<< <X "`@`London: Insert an Em-Space!TemplateProject.LondSpecEmSp.MAINpx8%8H1t< " 0-151 &B@oXPְAttribute VB_Name = "LondSpecEmSp" Public Sub Main()  ".zDescriptionon: Insert an Em-SpacezProcDataIInvoke _FuncITe@mplate"ject. .MAINPWordB asrU~| ;:@y )i :!3Iy! y !1aFQ !Y9!!!1"aI 1 y9QqY( {i#"Q#  (L (L T, (L0)H$ @HW8(L]3H58(:L%:%H$ @HH y(%(%(#%(%: : %,@H$ @H8(%:T %$ @ )H68(:(L %( %(0%( %: %H$ @HHC(L %(%(%(h%`:%H$ @HH:(Le%(%(X%(%:%H$ @HH:(L%(%(X%(%:%H$ @HH@(L%(%(X%(%:%:%H$ @HH:(L %(%(%(%:%H$ @HH@(L %(%(&%(%:%:%H$ @HH@(L %(%(7%(%:%:%H$ @HH":L%H$ @HH@(LO%(%(F%(%: %:!%H$ @H"H@(L%(%(X%(%:#%:$%H$ @H"HH$ @H%H.H$ @HW8&A('4@H68(1@ @H$ @HW8(B('lH58@W8)\ (L]3<@W8*%(%(%H$ @H +,-.H585fL%H$ @HW8/B(+4<H68(:L0%<,1< @H$ @HW8(B(+lH58l(L]3<%4$ @4:4= l0= (H]3  (H (:H%(%4$ @484(:H%:%4$ @4:4(:H%(%4$ @494":H%4$ @4=4(:H%(%4$ @484(:H%:?%4$ @4:48 (H\ (Hl= l0; (H]3+ (H (:H%(%4$ @484(:H%:%4$ @4:4":H%4$ @4=4(:H%(%4$ @484(:H%:?%4$ @4:4 (Hl=DL8Lb l8X\47aic.oSymbol CharNum:="-151'End rU~| %$D$ pap pp!qaqqqqrArirrrsysfss[Q y !!!!1"W t ittuyuu)vg      !#$%'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOQRSTUVWXZ\]^_`abcdefghijklmnopqrstuvwxyz{|}~. '^ (Gj ^KTLondPlayTable.Main &B@(KTLondColDate.Main &B@(KTLondColPlay.Main &B@(KTLondNewspapers.Main &B@(KTLondColCast.Main &B@(KTLondColOther.Main &B@(KTLondColSmall.Main &B@(KTCast not advertised. &B@HS '|n |G~jo`(Select option above for description here+ &'Create 2-Column Table to start new Play+ &LDate and theater input for a play with the option to enter Other information+ &|For Play, Abbreviation, and Author including indexing. Options available for non-standard entries like REPORT, DOCUMENT ...+ &+Pick from Newspaper list or quick selection+ &/Enter members of Play Cast with indexing option+ &TEnter a 7pt All-Caps Phrase (e.g. FIRST EDITION) and then 9pt Text for the paragraph+ &\Enter a 6pt All-Caps Phrase (e.g. ADVERTISEMENT DETAILS) and then 8pt Text for the paragraph+ &Cast not advertised.+ &o'Z ^KTDesc$ & &B@XOpts &B@f CanButton &B@NOKButton &B@pKT \ &%hPushKTDesc \$ &%j$ & &B@XOKButton &B@pOKButtonPerform &B@XCanBKOKBuKT'ZSnSnixpAttribute VB_Name = "LondPlayMenu" Dim Desc__$() Public Sub pMain$".^riptionon: CreaNew p Table and prompt for irnma;[ProcDatagInvoke_FuncgTemWte"ject.A .MAINPR2e 10iLo opingwIISel#ed Seti7H1 _: WordBasic.BeginDialog 4 70, 230q46,  .DTesZtV +OG@roup "saButt:1):13<11NEW 1"Push1DATE Input 25 PLAY3QG!PapTer 4_9 CvaV@5P62PPhrase 7pt/9@TexB6 S 68 7 VhCNAD8ŒBox 1153퀤8@4a"u24,@`2 Oa` TKP8 1P88 'OD Cancel18 ǃ bEndl#pyI As Ob: v I u'CurValue@s.UserI((I I.oS + If 0 Then GoTo DoneAC N>e` &callǯB.F2,Col e34sp!ns*5 @ t6Other7Sm%8In LH %(" "``xTk;;8London: Create New play Table and prompt for information!TemplateProject.LondPlayMenu.MAIN@|l @(\ @^L `, *`@|+ = Z`k IY\`I^  I` &0@H8`H8`pH8`H8`H8`H8`H8`8H8``zH8`H0(&*&|@< @8 @( je@  @8 Y@P @h U@ @ @ @ @ @ @t @d @T & (@Zl @@\ @L I&&@ H @X8 @p( @ @(  @ @  @ @ @ @ 8HH1t<$*\Rffff*153c638d44*\R0*#f*\R1*#c1*\R1*#17b_ " (08  @H F@P"0@2@2@.@P,@<@<@,@0*:`&@ &:(:  018Ph   """""0"8X "` """   "6 6XZ:>bjh" B    1((H"`(x7 0p("( !@  X ` h p x   ]H8 &]]]0A@*'|~0,London: Play MenuLondPlayMenu.DTest &B@(blOpts &B@.nforma NEW PlayPush1 &B@0 DATE InputPush2 &B@02 PLAY InputPush3 &B@0FPaperPush4 &B@0ZCastPush5 &B@0 Phrase 7pt/9pt TextPush6 &B@0Phrase 6pt/8pt TextPush7 &B@02<CNAPush8 &B@0P Description &B@*<Desc &B@,SxXOKButton &B@xX CanButton &B@4 &B@8]HF &!<!>., , &!@%>'( ,!v9w xQy ||} "##{ 'X  (<l@(<%(%(,%(%:%:%8$ @88":<%8$ @88@(<%( %(%(%: %: %8$ @8 8@(<%(%(%(%: %: %8$ @8 8@(<%(2%(%(%:%:%8$ @8 8@(<%(F%(%(%:%:%8$ @8 8@(<%(Z%(%(%:%:%8$ @8 8@(<%( %(%(%:%:%8$ @8 8@(<%(%(%(%:%:%8$ @8 8@(<%(2%(<%(%:%:%8$ @8 8:(<%(%(%(P%:%8$ @88@(<%(%(%(<%:%(%8$ @88:(]3p:%'lM\@ ?H$ @H@"@@$ @9)H6(:\%((%H$ @H<H(:\%:(A%H$ @H9H:\B]3:8C]3 (\l(0PblL H8arU $$$`i$$`0$` 0//n(v 9LondIndexGenTDLondNextPlay&\ __SRP_36P__SRP_37N4YgxME$6 L*LLL<(<,<0<4<8<<< "`k88HXhx%jv@x @h @(X nt@@H @X8 @p( @ @ @ @ ` %H1t<$*\Rffff*1>3c638da5*\R1*#b5*\R1*#d7*\R1*#d6*\R1*#129*\R1*#c1*\R1*#17b*\R1*#20*\R1*#1f "*Mf8* $           ( 8  L jB@KnW Selection.GoTo What:=wdGoToTable, Which:=wdGoToPrevious, Count:=1, Name:= "" j!lB@n j!l^m9d5p(d9r v9t99x9z9|9~9qoPAttribute VB_Name = "LondNextPlay" Sub Main()  Selection.GoTo What:=wdTableb,$ich&, CounL1, :="'0MPreviousyQ _T] \Find.ClearFormattingWith i$.T^mX).Replacement1ward!True'Wr$ap wd3ConCNFals MatchC asҒ WholeWo:ild*cJs.ShdsLikAllA)LEnd R rU~| 76y 4M:N(8Xx$ <x )x6X8*x$ <x  )x$x$ <x Qx  x x Dx  ,     H  `  P  X  @c4(b$xX8krU 6$6`n(v9xME$LondPrevPlay[R __SRP_34__SRP_35QJgLondShortCuts wxMEP<<<<< <<<PH "p`@@l `\  `@Y IxYY@l B@8pp0pHp`pxppp%ppPXh @X @H @8 @( @ @ @ @ @ @ @ @ p @ @ @| @x PP}}}}h }@X }@H }((8 }@( x}@ t}@ }@ } }p@1t<0 " ,.2:@0@x6@44   001P h Fx 6  4  "3 "78J<`   68(0"7H(p  8]@London: Generate index &B@(XCheck Indexes Wanted &B@*'TGeneralIxGen &B@',~Index of PlaysIxPlay &B@FFX &B@FiX &B@4 &B@8]XF &!<!>.\6 \ &!@%>'G @ If X.IxGen = 1 Then GenIndex "fg", "IndexGeneral", "General" B IndexG BGenerak \!kkop]  &% d &B@b  Index exists, Ok to Replace Replace Index$ &%2' Gj &B@d &B@kINDEX \   \* MERGEFORMAT  &B@ &B@D df &B@b &B@ &B@ o \!/ GenIndex " ", "IndexGeneral", "General". GenIndex "fp", "IndexOfPlays", "Plays";Attribute VB_Name = "LondIndexGen" Public Sub Main() Dim xxpWordBasic.BeginDialog 248, 136,on: erami =GroupBox 24<91, 8"Check es Wanted>$>39,;}:4wl"I y 4A1: of Pplays!?OKButton 70,\21 5ancel8105rEndX As Object: Set XԇCurValue@s.UserxNx  (X  Ifr@ -1 Then'-|X.LqD"fgCĉ@vBX[>yP    Call Formattinlg.B@2CM A mark()8n+Q dit := , SortBy:= VGoTo:=c  (Msgk(d +$ "cr es, Ok to Replace*D36  a`CQ <>   `LeavehkCutC#Else# ndOfDo cumenEnd'"CGInetF ield :="INDEX \"4B\* MERGEFORMATЏarLef.  &!@%>'oȱAttribute VB_Name = "LondShortCuts" Sub Main() WordBasic.BeginDialog 424, 210,xon Alt hKey| lGroupBox AZ6, 39516 "j +Text 218(b[+K -- f:45 :F:New File:6MMon\th8 ;TPlay Tab>10>D DaנInput?1P= ]AgCCas \N \spaperkAO]8C8-Pt Phr\asl^99M>OKButt59, 14 88 Canc$el 12 17G  ǺEnd Dim tb As Objec@t: SetA= CurValues.User=t I (tRb@   ArU~| 32K y Ly!iLL1MMNyNN1O P !!!!1".(h%(H%:(%x$ @xx:(h %(H%((%(%:%x$ @xx:(h%(H%((%(%:%x$ @xx:(h%(H(%((__SRP_32__SRP_33mMgLondFixItalicPlaysInIndex4LondColSmall[%(%: %x$ @xx:(h%(H<%((%(%: %x$ @xx:(h%(HP%((%(%: %x$ @xx:(h%(Hd%((%(%: %x$ @xx:(h%(Hx%((%(%: %x$ @xx:(h%(H%((%(%:%x$ @xx:(h%(H(%((%(%:%x$ @xx:(h%(H<%((%(%:%x$ @xx:(h%(HP%((%(%:%x$ @xx4(h;%(H%((X%(%x$ @xx4(h~%(H%((X%(%x$ @xxx$ @xx.x$ @xWA4x61 @x$ @xWBx5,bxkrU 2$2`n:"BAttribute VB_Name = "LondColSmall" Public Sub Main()  ".zDescriptionInput: er Play side column i. 6pt AllCap phrase followed by 8text.yProcDataInvok@e_FuncTemplate" ject. .MAIN(Dim SS WordBasic.BeginDialog 430, 174,on[F] PLAY:Z-[s P[/UTU".DT(est7 '8 445,( 3088Insert Paragraph a@nd sta withbe,)GroupBox 39, 2+2610dYOqB "ŁA,CK- Butt@z7S@-A019/6/Adv/isement DetailsESB12693_CoVm2#8"9%<1CntorPary 31 f6Other#t_152@0u32AvB IlOKS8 4kr8@ 21S C ancel 19} 1 @GEnd{"` As Obduet SgCurValues.U`RENS((S@  Ifl -1 Then%Sel r Ca}S.LM"0cCDo "IA1<]2C3S.9#BElseK@,  aI&fa-ubAPriv`⪄(S$ &G/ 'Style "B$Q_aH$S$ 'd DefauliFonm " 0b(Id$, Act,@ pRem0 Msgf@ +@ Str$()eSuI=H @DlgcW, -dEjEnab!*m, QFocus ")kJiC2"!ySB2Ø03@ S=aLHN GOJtB?2ct#A3u# LondColOtherW__SRP_26__SRP_27UgLondWarning     "#$%&'()*+,-./012345689:;<=>?@ABCDEFGHIJKLNOPQRSTUWXYZ[\]^_`abcdefghijklmnopqrstuvwyz{|}xME (6 L< "`k88HXhx%&(@x @h @X en@(H @@8 @@X( @@p @@ @ 1t<$*\Rffff*163c638d55*\R1*#c1*\R1*#17b "L4XhLondColPlay.OtherOpts PlayFirstEdPlayFirstEdCaps &B@(o Attribute VB_Name = "LLS# LxME(<<< < "`__88HXhx%1t<_"   0 PX px   0H h x 8 H Xhx  . 8 8@ x     "8 0`      a19 Macro* Macro recorded 11/05/98 by Thomas Minsker !!(T  jB@ j!lB@n j!l XE 9d^&5p(d9r 9t99x9z9|9~9q j!lB@ j!l!G|j  jB@ j!lB@nH j!lroles\::9d^&5p(d9r 9t99x9z9|9~9q j!lB@ j!l!G|j  jB@K j!lB@n j!l(9dK^&5p(d9r 9t99x9z9|9~9q@ j!lB@ j!l!G|j  jB@' If Selection() <> ")" Then Exit Sub2 Selection.MoveLeft Unit:=wdCharacter, Count:=1 &B@>N j!lB@n j!l)9dN^&5p(d9r 9t99x9z9|9~9q j!lB@ j!l!G|j   jB@Italicize Selected Text?   $2'  G|jN   &B@0k( j!(F &B@obAttribute VB_Name = "LondFixItalicPlaysInIndex" Sub Mai@n() ' a19 croMa recorded 11/05/98 by Thomas MinskerX ActiveWindow. Pane.View.ShowAllTrue MyLoop: Sele=on.MoveRight Unit:=wdCharacter, Coun 1 3Fr.ClearFormatting WikgA)LEndR2j]Exe&cIf [.F%en Exit g~  B"8rWs\::?t.??@@R/@@H= b[@A@5(?)e__A .___n___d_&i() <> ")"LBۀK Lef Basic.ExteAaa?n.!'G)PP$/H23aofh0*/HW,h /HH"/Hrh#O(hh|hc!og,0!Q!SSAnsweroMsgBox("izeDrG?", vbYesNoCancel +Questionp! dvbtTht{N~o0`,GpoTo 3IfGFoc p QN a   xME(< <<<Px "`@p@##VLondon Input: Smaller Play side column input. 6pt AllCap phrase followed by 8pt text.x!TemplateProject.LondColSmall.MAIN@l `  X`X@8 $Y  Z`@ -Y\6I^ OtI` !RXXXX8XXXxXX %XpJJxh J@X J@H 0J@8 НJ@( J@ ,J@ ܟJ@ J@ lJ@ J@ J@ DJ@ أJ( J@ J@t ĥJ@Jp JPPhpl x(\ @L XpppH @8 @( @ @  8X@x @h @X hX01t<D "Z4 J:p.:"<@.@H:@x.@$:&:(:8 ` 0p1    8@PX` h "p x""# 2" B  (  (0(8(X"x #(""(  @ `hpx].London[8pt] PLAY: 6pt All-Caps Phrase/8pt TextLondColSmall.DTest &B@((,,Insert Paragraph and start with phrase below &B@dCap ph' hAll-Caps Phrase &B@*ISmall &B@.F(Advertisement DetailsSB1 &B@0(F<]CommentSB2 &B@0FPContemporary CommentSB3 &B@06FdBOtherOther &B@0dOtherI &B@,RXOKButton &B@X CanButton &B@4 &B@8]F &!<!>.  &!@%>'  !KTAdvertisement Details.A@KTComment.A@KTContemporary Comment.A@KT !A@Snko &B@ PlaySmaller &B@PlaySmallerCaps &B@  &B@H &B@HoX# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KTSmall &B@fOKButton &B@p CanButton &B@NKT \SB1KSB2KSB3KTOKButton &B@pOKButton &B@NOtherKTOtherI &B@NOKButton &B@p CanButtonKOKButtonKT'ZShn`SXnPiH@, WordBasic.Style "Default Paragraph FontondColOther" Public Sub Main()  WordBasic.callnPlay.xOpts", ""FirstEd Cap!1 End` rU~| '&Q  p<4:h%:H%:(%(%x$ @xx<$b xkrU &$&`nls'xME(<<< <0 "`@Y~Xhx% 1t< " (8 ~London Warning &B@2oPHjAttribute VB_Name = "LondWarning" Public Sub Main(W$) WordBasic.MsgBox W$,|on Endx gxMELondSpecUaebH gLondSpecLoe!gLondSpecLae[Y7gLondPhrases '(<<< <` "`@h#London: Insert a non-breaking blank TemplateProject.LondSpecUae.MAINh@%@P1t< ",8H (normal text)198 &B@o@8Attribute VB_Name = "LondSpecUae" Public Sub Main() ".xDescriptionon: Insert a non-breaking blankProcDataRInvoke _FuncRTe@mplate"ject..MAINOWordB asic.wSymbol Font:="(normal text)", CharNum 198Endr gxME(<<< <` "`@h#London: Insert a non-breaking blank TemplateProject.LondSpecLoe.MAIN܅Eh @%@P1t< ",8H (normal text)156 &B@o@8Attribute VB_Name = "LondSpecLoe" Public Sub Main() ".xDescriptionon: Insert a non-breaking blankProcDataRInvoke _FuncRTe@mplate"ject..MAINOWordB asic.wSymbol Font:="(normal text)", CharNum 156Endr gxME(<<< <` "`@h#London: Insert a non-breaking blank TemplateProject.LondSpecLae.MAIN7h @%@P1t< ",8H (normal text)230 &B@o@8Attribute VB_Name = "LondSpecLae" Public Sub Main() ".xDescriptionon: Insert a non-breaking blankProcDataRInvoke _FuncRTe@mplate"ject..MAINOWordB asic.wSymbol Font:="(normal text)", CharNum 230Endr rU H@ ` )000///0 `     L1' !"#$%&()*+,-./023456789:;<=>?@ABCDFGHIJW~NOPQRSTUVEXYZ\]^_`abwdefghijklnopqrstuv[xyz{|B@4ml Insert ParaPara &B@2All Caps &B@*!}U$ AllCaps &B@6+mXInsert InsertAllCaps &B@2 Small Caps &B@*}U$  SmallCaps &B@6mXInsertInsertSmallCaps &B@2YItalics &B@*c}U$ Italic &B@6mmXInsert InsertItalic &B@2Normal &B@*}U$ Norm &B@6 mXInsert InsertNorm &B@2 &B@8A@A@A@A@]F &!<!>.   &!@%>'> If SelInfo(13) = - 1 Then Call InNormal Else Call InTableo +  Repertory+  Personnel+ + o + Advertisement Details+ XComment+ + o P + Actors+  Actresses+ Dancer+ Dancers+ Manager+ Managers+ Musician+  Musicians+ Other Employees +  Proprietor +  Proprietors + Singer + 0Singers + Comment+ + o + Cast not advertised+  E+ o8LondNotNewPara.MAIN &B@(LondAllCaps.MAIN $ D. &B@( AllCaps 1E Insert UCase$(T$) AllCaps Insert "."!oh0 &B@ D$ &B@H &B@. &B@Ho &B@F D &B@H &B@F: &B@Ho]# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KTAllCaps$  &B@R SmallCaps$  &B@RItalic$  &B@RNorm$  &B@R CanButtonClose &B@XKT \ InsertAllCapsKTAllCaps &%f'b b G b$ A@ j CanButton &B@NInsertSmallCapsKT SmallCaps &%f'b b G b$ A@j CanButton &B@N InsertItalicKTItalic &%f'b b G b$ A@Bj CanButton &B@N InsertNormKTNorm &%f'b b G b$  &B@Hj CanButton &B@NAllCapsKT InsertAllCaps &B@NItalic &B@f SmallCaps &B@fNorm &B@f SmallCapsKTInsertSmallCaps &B@NAllCaps &B@fItalic &B@fNorm &B@fItalicKT InsertItalic &B@NAllCaps &B@f SmallCaps &B@fNorm &B@fNormKT InsertNorm &B@NAllCaps &B@f SmallCaps &B@fItalic &B@fParaKT &B@ CanButtonKT'ZSnSnixpݵAttribute VB_Name = "LondPhrases" Dim AllCapList__$()`, Sma HNI talicNNorm Pub> Sub Main() Rey`10 h l23 t/aPP WordBasic.BeginDialog 24, 79, 658, 172, "Predefined Text .Dte4st -CancelButt@on 206*45, 8.21 Push3614H0"InserFara"#P ?GroupBox 23, "3  xME(<<< <%8phPx "`'' @`@ `  K `  P` ` `  0` YD `pYD B`YD Z`0 <<Y\PlI^ pI` Adve@b + P0@h@(@ @(0P(0PP(0P(0P(0PX(0P(0P(0P`(0P (@1t< " (8HXhLp(2 & ,H6x (.8 &@*h4 $(2  X hpx  B "(@Xh "px$ "(@Xp(@Xh "px" ""2 0 H h x "  " (8 B @H (Px " 0 8 @ X "x    "  0 H "`    $    @ X x       ( H h         0 @ X ` h p x   ]]( 8 X x ]OPredefined Text PhrasesLondPhrases.Dtest &B@(X CanButton &0 s<+h 3 1B12 8~"C.4A0e҆{@2yoprie0?01C\PrUoa1Sin/39"OB+%1 0$s>$$SCast not au0dD/ ECDo A Lc.-s Do"c. T$gҶR":#cF unctiDTq(IdG@u&p ptrMsgq0 + Str$()Sa@:Aulskk q? Dlg.Array f, ॵ4-Cß6`)7lg"'0Close2 SegCTD3`*1Ptr@8 (`> 0Æ? (P)xFocus o  c.  f (  Y u Ϥ 3 (s? ? /9 &   ENormList__$(Ptr)  WordBasic.DlgFocus "CanButton"Case "AllCaps&|vInsert!VValuQItalic", 0c'Sma{*NP>3{]JqIr][-ZGA\2a- ,¸JK6ParaC4 ADTest =E! Else End Select9  Function LondonFuncs`ZSLondIndexerGE__SRP_20M,__SRP_21jM%im CurCol_ Next  We   C2)A= 0߃ @p!6G!wRight 1>,Ed_|ALef)X<> !PLeT6ߦcT:b6Is 5b4e?™65!hEM&WW7_!dGoTo DestinaS:="\a !,(Aj;XkDSo'Sh `IS(1SKDSS-\S S)d YE)p`tious cAtacter@EpP~ R tw%*9'&>t][Bec,$]()Chr(13)s}%K<8@ H P X ` h p x     H4*:&@8&@`&@&@&@&@4@( $:`$:&:,@,@,@8:@h<@<@&:(4@P (:<@ " P PX6@4@ N h 0x1.2 B  (  (+0 H+X+p%%%" (( @*H(`( 2G" ( (*:DxME > <(<<LLL<,<0<4<8<<<HҀ.@€2P @€4 , @Ҁ6@@%*,.0246 "` k99Y8  Y@Y:`I: >I< I> @(l `, % Z`8 Dk0 <<;Y\PI^ pI`  @0`8kwY Y,IF  Dp `Pkp@@Y8 YY:#?xME(<<< < "@` ` `  `  p` @" --@$ if C `  ` @" @& ` p @(p @hp @p @p @(p @hp @p @%0p @` h 1t<X " > X"x  > $P"x  > "B @H` >h 4B  " (@Xp   > *"(0H`x > *B  "08Ph   > *B 8@H&`A@oh8----------------------------------------------------------Do Paragraph if needed@    G &B@jkHd@ G &B@jk d G &B@jko8----------------------------------------------------------No Paragraph at end if Cell  A@k` G &B@ j-e d8k0o(8----------------------------------------------------------See if we in a Word Table &%'i8-----------------------------------------------------------Are we at the end of a cell in a Word Table]@]X Are We at the End of a cell' &%'" &B@ &%'$ &B@D " $'kPiH8--------------------------------------------------------#--Is the cell empty in a Word Tablep\cell &B@ &B@ &B@Do8--------------------------------------------------------#--Is the cell empty in a Word Table]] Are We at the End of a cell' &%'" &B@D &%'& &B@ " &'k@i88--------------------------------------------------------#--Is previous character a paragraph ' &B@D &% $G'j &B@iXP Attribute VB_Name = "LondonFuncs" Public Sub Main()  ParaIfNeeded EndB^'-4D :Do Ygraph if n`Priva zIf InATable ThenAtOfCell!Not Is`Empty PrevChar; WordBasic.Insea <EH   A )    "0.@&6`(00(  *d#(*d8h  p"*d#*d  "*d(#X*dh F &6#&6 " J8 , :  " 338X "`(h(((((( ( (8"Xp B x$    :(hp](P x]' *' ,' .'0'2'4' ' 6 8' * ' , :' . :'0 <'2 >'4 8' London[Lond/Index]: IndexerLondIndexer.DTest &B@( Index Terms &B@*)BB1 &B@>)II1 &B@ABB2 &B@>AII2 &B@[BB3 &B@>[II3 &B@pS Bold/ItalicText5 &B@df'AuthI &B@,f@AbbrI &B@,fYPerform &B@,H) (1)Text1 &B@d(HB (2)Text2 &B@dH[ (3)Text3 &B@daz Initial Term ValueText4 &B@d a2xSelected Text ...Selected &B@2aNxLast , First ... LastFirst &B@2xXOKButton &B@>X Clear AllClearAll &B@2X CanButton &B@45Goto MS Word IndexGotoWord &B@2HWhichIX &B@.J WordBasic.OptionButton 290, 112, 150, 16, "General Index", "GenIX"I WordBasic.OptionButton 290, 132, 150, 16, "Plays Index", "PlayIX"ds General IndexGenIX &B@0i Plays IndexPlayIX &B@0H WordBasic.Text 105, 20, 200, 13, "! implies 'Plays index'", "TextEx" &B@8]F &!<!>., , &!@%>'( (GLondIndexW.Main &B@(jo# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KTAuthI * &B@XAuthI' 6AbbrI , &B@XPerform . &B@XB1I1 0A@@B2I2 2A@@B3I3 4A@@AuthI &B@N Selected &B@p LastFirst &B@pk $!WhichIX &B@fdxWhichIX &B@fkPKT \ClearAllKTA@BB1KI1KB2KI2KB3KI3KTOKButton &B@NOKButtonKT'ZAuthI &%nAbbrI &%nPerform &%nA@DSelectedK LastFirstKT 6AuthIKAbbrIKPerformKT \SelectedKT 6  &B@X LastFirstKT 6 $ z &B@XSn 6 &B@NSn CanButtonKGotoWordKT'ZShn`KT \AuthIKAbbrIKPerformKT \' 6 \ &%nG \  &B@XjSnSni FKT  &B@f , &B@fKT  &B@f , &B@fKT  &B@f , &B@fKT  &B@f , &B@fSno0]]]]]0B1 &%fI1 &%f 'HB2 &%fI2 &%f 'JB3 &%fI3 &%f 'LWhichIX &%f'R RG 8$!G 8$' 8jj RG 8$!G! 8 ' 8jj' N 8Gj 8 &%h! 8$' 8d ISwitch$ = "\fg "\f 2 ' Nk &%T'P &B@TXE N  &B@EndXdf &B@b &B@D"$ &B@H"$ &B@H &B@D 8B1 &%fI1 &%fA@V 8 &B@HB1 &%fI1 &%fA@Vk : &B@HB2 &%fI2 &%fA@V  &B@HB2 &%fI2 &%fA@VGk :: &B@HB3 &%fI3 &%fA@V : &B@HB3 &%fI3 &%fA@VkPEndXd &B@b P &B@TEndXd &B@boH XG \ &B@xj ZG \ &B@FjoB1 &B@fI1 &B@fB2 &B@fI2 &B@fB3 &B@fI3 &B@fAuthI &B@XAuthI' 6AbbrI &B@XPerform &B@XAuthI &B@Nox (] ~ | | ~$ G^j ~'~^ ~ | ~ $, ' zd | ~ $, | ~ $ ' zk ix p \f 1 ' N ISwitch$ = " " ISwitch$ = "\fp "p oA@J EndX jB@ Selection.Font.ResetD Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend% Selection.Font.Color = wdColorRed3 Selection.MoveRight Unit:=wdCharacter, Count:=1|Attribute VB_Name = "LondIndexer" Dim I1$, I23Opt1, 2 3, S el8l_$ Public Sub Main(A8BCOtp3)I `{pe 3$ o 0 s 3 { "< 1@ATB TC TO1*O2+0O3 + WordBasic.BeginDialog 488, 206,(on[/]: .DTe4stV +GroupBox & 7, 4715" TermsCheck 2430, 1HB";B16J IA IX 65, 2J X 913J O Text T11>81"Bold/Ita@@A 5@ gZ1039}2Z"Auth&I( 64 bb r 8JPerform 32!Ar1 4(1)2s% 6Dg2fo3g!-g3f-3j5@,2AY2&InitgZ Va(luee4PushButton " 5A..8" t`ected@ ;.\.. ~ 7&1f Last , FirD an OK18%BWn"eao1hClear AllaaPCanhcel6+afn30!E1!)Goto MS !#!! #o@ion "WhichIX'!#29a& ap19Generalen B 3K PlaysG b 10yB11\ 2B 0E %A,m"m12Af! implies '# ia'a4AEx/EndC6" As Obje:t ICur8s.UserIKcD(I |If r4` Then# callsqlW.P PrivaFunct$" q(IdpActpup Rem0 MsgW +@ Str$()}Srp }S@ Case  wDlg$\@112 _]q\2"[P3TSetP1s "0zzpw”$ 2!IQ 3Q@Focu@9 ; "BnEnable fV aS,  If#Left(`)"!?? R)E@Else. l1c"%"8X!1%i"B"B b?d- DoR*x7[)$](d-),t+U+ 81  ed' rQ$ #(@/A31dt31R>4=  3a$-ߕ*RPe'j;tw/ ""Ā| X%!|94#efT"Q ?7bfO*A*@rBcB8d. N ihYiV(IOe4FHlg1B iU?772tM 1c.DlgValue I$, 0 Case 3 WordPBasiB1t:Else End Selectub Private Sub DoIndexTe0rm(A^bC$) Dim HighQ 2ISwitch$ShowAl0lWas> = ("B1") + I  2 2  3 3 #  WIXWhichIX"If 0 Then Left1)!"!" DA$Mid 2ō1<> A+ A^+du"f GoTo Leav/A.[-$]- /'A 0\fp   1éTgA 2IfA ǦB(a Insert@Field B:="XE "?J EditBookmark Name @'X", SortBy:=0, Add:B= Chara2 1q Chr(<34N# @@;!MUDoxsvx,Vx,e'rEW (("A! LN9bbsaf 1q_dQ 0 Y0%(8)%(%(%: %: %X$ @X X@(\%(8A%(%(%: %:%X$ @X X@(\>%(8A%(%(%: %:%X$ @X X@(\%(8[%(%(%: %:%X$ @X X@(\>%(8[%(%(%: %:%X$ @X X@(\%(8p%(S%( %:%:%X$ @XX:(\f%(8'%(%(%:%X$ @XX:(\f%(8@%(%(%:%X$ @XX:(\f%(8Y%(%(%:%X$ @XX@(\H%(8)%(%( %:%:%X$ @XX@(\H%(8B%(%( %:%:%X$ @XX@(\H%(8[%(%( %:%:%X$ @XX@(\a%(8%(z%( %:%: %X$ @XX@(\a%(82%(x%(%:!%:"%X$ @X#X@(\a%(8N%(x%(%:$%:%%X$ @X#X:(\%(8x%(X%(%:&%X$ @X'X@(\>%(8%(X%(%:(%:)%X$ @X#X:(\%(8%(X%(%:*%X$ @X+X@(\5%(8%(%(%:,%:-%X$ @X#X":\.%X$ @X/X@(\d%(8%(s%(%:0%:1%X$ @X2X@(\%(8%(i%(%:3%:4%X$ @X2XX$ @X5X.X$ @XW6A74X61 @X$ @XW8B7lX5l(\]3N":\9%X$ @X:XT,blX (\l\LL(\]3*+:\%@H$ @H;H T@+:\%@H$ @H;H+:\%@H$ @H;H%  C   C$$ < 2$ %C  C$$ < 2$ %,C  C$$ < 2$ ":\%H$ @H=H<0(:\"%((%H$ @H>H(:\%%((%H$ @H>H*<M\@ ? :8@]35(:\.%((%H$ @HAH%(:\.%((%H$ @HAHvL(\]3C l)0Y BDl 0l 0l0l0l0l0":\&%H$ @H=H l&0 (\l:(C%:\%H$ @H:C%:%$ @:tC%:%$ @T`P` `$ D 2$ P)H6Tl"0l%0@CL#lL0lL0lL0CH lH"0.@@<@H$ @H;H` lH%0^6@@< EF%H$ @H;H5`%@@H$ @H=Hl*0l-0 (\lvL(\]3tCD#lD0lD0lD0m T@;:8C%l@H$ @H:]3H5j,l@<@H$ @H;Hov8<lb$lLHDL0 $ PHTil\\(l]3s)l @(H%X$ @XAX)l@(H%X$ @XAX\(l]3)l @(H%X$ @XAX)l@(H%X$ @XAX\(l]3=)l @(H%X$ @XAX)l@(H%X$ @XAX\(l]3)l @(H%X$ @XAX)l@(H%X$ @XAXD(8b\X4V:$ %4$ @4A: %$ @Al)46V:$%4$ @4A:%$ @A\)46V:$%4$ @4A:%$ @AL)46(:$.%4$ @4A4($]3xME(<<< <X "`PPPxp`8%8H1t< "  8  P`"x(*  0PX  `p ]@]X]ps+ &B@s- &B@F &% LondonSeasonKTLondYear.GetYr$ &%('   &%j $ &%' Season:  -  &B@2 LondonMonthKT &B@ &%' Month:  &B@2 Sn &B@ &B@& &B@o`XAttribute VB_Name = "LondHeaders" Public Sub Main() Dim Season$NextPYearS WordBasic.WW7_EditGoTo Destination:="s+ d#)-Select Case 7[Styleœ$]on=< .   &!@%>' KT PlayNormal &B@ PlayTitle &B@& WordBasic.Insert P.PlayI + " " !$+x B@" !$ (kP ! &B@HDefault Paragraph Font &B@ !G ! &B@HjD If P.AuthI <> "" Then WordBasic.Insert "[" + P.AuthI + "]. " ! !$[ !. &B@H ! ! $ (d( ! ). &B@Hkk !GLondAbbr.SetAbbr ! &B@(jLondIndexer.MAIN! ! , ! performance &B@( WordBasic.InsertParaDKT PlayNormal &B@ PlayTitle &B@ ! &B@HDefault Paragraph Font &B@ ! ! &B@HkH anonymous ( !G[ ! ]. &B@Hj !GLondAbbr.SetAbbr ! &B@(jLondIndexer.MAIN! ! (anonymous), performance &B@( &B@Case 2/ OtherOpts "PlayNormal", "PlayNormalCaps", 1Snox] LondSet.MAINO$ ~ &B@(/London[9pt] PLAY: 7pt All-Caps Phrase/9pt Text &B@(R tAll-Caps Phrase &B@*_T$ ~OOpt &B@6xX &B@X &B@4 &B@8]0F &!<!>.F F &!@%>'  F! G F!$ ~   A@jk0o(H Call LondNotNewPara.MAIN  &B@  &B@ F &B@H &B@. &B@Ho]h]  ' PlayNormal'   G   &%h' j ~  ~$ G PlayWeekDate' xME(<<< <h8H% @ "`FFx@f IF@h Pj@ pP8Pl`\ d0@8H`8Hx8H8H8H8H8Hb8H88H8H P1t<H " (08@HP`x&   0(,X046(4`,   & 8@ HX `dp  d"0 n"h     $ 8 @X]H8 d]]]]]] &%n'f h f h &%p' j j= j &%r h+ d h f(none)+ d d + dk f + d@Active Document Variables &B@( "b$ dListBox1 &B@6?#lsX &B@I0 -Set File Variable &B@*SetVar &B@.>Year OptionButton1 &B@0^FMonth OptionButton2 &B@0>Abbr OptionButton3 &B@0'<Set Push1 &B@2 &B@8](F &!<!>.\ \ &!@%>'! MsgBox Str$(xx) + Str$(x.setvar) KT \!tKT@F6Enter 'Year' to be stored in the file variable LondYr$London: Set Year1700 &%v' 8 LondYear.SetYr 8 &B@(FKT@F8Enter 'Month' to be stored in the file variable LondMon$London: Set Month &%v' 8LondYear.GetYr$ &%(' lLondMonth.Setmon 8, l &B@(FKT@FAEnter 'Abbreviations' to be stored in the file variable LondAbbr$London: Set Abbrev &%v' 8LondAbbr.SetAbbr 8 &B@(2FS`XnPSHn@ x(zo( Sub SetVarVal(P$,T$,D$),N On Error  ans$ = InputBox$(P$,T$,D$) End Sub'Attribute VB_Name = "LondDocVars" Dim <__$() Public Sub Main$Re L20P&4VsV_$xxAY" DVsWordBasic. Countum8entr(For V*1 To 5 Df1 E[Ge D$]<(VS{sV)"+ "=" |+ H %#%N0ext w+IfL&0 Then P606"(none)Els e nd If+ 1+  ]BeginDialog 320, 196, "ActivezY Oiable#ListBox 1@2998,ʈ 1*OKBu0tton@ 115, 821C1A GroupB1@)4287, 4 "Set Fdilar)ption 4[3O $2A6@62EYea#J0cA6On Err Go-1: !+LeavhoA$j[Inpu`~"Enter 'D' to be stored in the faTbT AYr$3a.Aon#)eL17x00"@a+call#aY!@ᦅB:#`4BZe߀!Y-A(B`!($ $mon @8`,aE!"S&2?EeG?E-EAweviaas_'C'n'# 'QF!a!!a2g$g0Ap?8 (i 5.NumbP1= 07ub;a>S 9B(P$,T$,D$E* ans!V7\fdZ&xMEP> < L<< %,LXM +NL~&N$O(OP "x`kHH+London Input: Normal Play side column Input TemplateProject.LondColPlay.MAIN(@l ( `  H` kKY Y I p@l `F  `XJ ]YF  Y7Yay I ` H gY@ B@d@~  Z`k rY\ &I^ I` ,Lh0@~h@@Hphx|@Hphx@Hphx@Hphx@Hphx@HphxH`x8@h @X @H @8 @( @ @  @8 @P @h @ @ @X @ @ P@t @d @(T @@D @4 @p$ @ @ @  x @ X @Zl h @  @ \ @L 8 H  @H & @@D (@P 4   @h $ @  @ @ @ 0 p ~&@h @ X @ H @ 8 @ ( @  @0  @H @` @x @ @ @ @ @  X@x @h @X p@h  1t<$*\Rffff*0?3c638cc3$*\Rffff*113c638cde*\R0*#f*\R1*#c1*\R1*#17b "(8 J4@*:,@2@$:(.@P":.@":.@8@0$:h&:0@ (: J0@` 01   "" , 1P p">5$".M J(x 15*N $@ (0:F8Zix """ 58$"j ~i'Z ^KTKT \ShowMeKTShowMe &%nShow MePlayIThe Jovial Crew, &B@XAndIor, The Merry Beggars &B@XAbbI Jovial Crew &B@XAuthIBrome &B@XShowMeClear &B@XdPlayI &B@XAndI &B@XAbbI &B@XAuthI &B@XPlayI &B@NShowMeShow Me &B@Xk CanButtonKOKButtonKAnonKT'ZSnSniAttribute VB_Name = "LondColPlay" Dim Papers__$(), Oth0 Public Sub Main() ".Descri`ptionInput: No rmal q side colu8mn NPr@ocDataZInvoke_FuncZTemplate"ject..MAINORe 30Y l1 PWordBasic.BeginDialog 420, 194, "[_$]:Zitize a newk" DDTest D ,Grou`pBox *)3 8.6"Title/AuthorText 55, 23, 6Հ1"G:<30 or + ,PlusY)101*8 ayI15 47L(... and(AndR }45 TA7@CAAbbrevbb72@10@492CfCi [ 9U"[[]jBrack)1m] O*OKBut"t@132@)26, 72a" Push4b.7`Show |MeA !ckXCancel%2=18b@N'Ki16@`11"s OBsA2a13-AnonymouoEnd z  As Ob: Set PCurValues.UsterP((P` Sel Case Pa-1 A""Style y`b+k In@.zI + " If LefXt(PF)!+" Theng!SpecDDaggar.!A + Mid' 2Ǡ- IfG+D#Defaularagraph Fonū P.a <> " B"'ŀzI"[") "].l+egg/z/ /aaj=d2 1ALen0) - YElse Q"(,)ng=bbwcalla].@9q?@ @7 'Inpdexe*Qj! ,vЎfaLc`P, 0N_5.*P' <2c.<_Zu<ro<11ASndY 792!1'"aWs2+95z%S?#?#?# 7?#7#S(v )#"{#"###b@#'#"&mns_ `CaplPc'S:!e uba+PrivPb(P"$, CcIn_YoOO r nd7CpO SA'J33bcon[9pt] PLAY: 7pt All- Phrq/ 2ig8@Kj2Ү1Ђ"LLhistѤ94 88 Q Q, ڏ2ÆO͆OtÈφg OKφO1r-1h|A.O > 0rH Do (O")ߎ"%{O&B&(O%o& R4em0C!]q!NotNew0"& *`B,DO$ResetChar"""F $4 Week$(S$t3DW`InStr`% "eDS$[A$]rDy1FpWP o 7# @ DayR9` E; Focusr^4DAg AIfCCanButtonAOKAnG0X D$ @DFD":\ %D$ @DKD(:\%:$%D$ @DFDz#lH0jlH0jlH"0x (\lzh0HblHLD>tW__SRP_17g;xjLondColDatel__SRP_14F)__SRP_15fc~}rU  $`90` 00/8`000/(`00!` 0//nrU $` a(`*\R1*#1e*\R1*#c1*\R1*#17b| " (8HXhpx P4 *:8@$:P4@x$:4@$:&:80@` ":"*@(@(@((@P(@x(@(@(@ &:"@(@X*@,@.@,C *:@.Cp (:  01   ,0@0p .q<(  &0 "X (x "((9MUxME > <$<< LL<(<,<0<4<8<<<(% L&P@ ` x@p P  "X` P`kSS&London Input: Date column side of play TemplateProject.LondColDate.MAINBFxrU~| Tq Qy!kgwQ c[WoSOK Iy 1FaFF !!!!1"i' Aay9yy )Aay i Aa$"IQ#I Y{L  4(X%(8%:%:%h$ @hh:(X%(8%(|%(%:%h$ @hh@(X7%(8%(A%( %:%: %h$ @h h@(X,%(8%(A%( %: %: %h$ @h h:(Xi%(8%(%(%: %h$ @hh@(X%(80%(/%( %:%:%h$ @h h:(Xi%(8-%(%(%:%h$ @hh@(X/%(8I%(7%( %:%:%h$ @h h:(Xi%(8F%(%(%:%h$ @hh@(X/%(8g%(1%( %:%:%h$ @h h@(X,%(8g%(Z%( %:%:%h$ @h h:(Xi%(8d%(%(%:%h$ @hh:(X%(8~%(F%(%:%h$ @hh@(X(%(8%(K%(%:%:%h$ @hh:(X%(8%(X%(%:%h$ @h h@(X%(8%(Z%(%:!%:"%h$ @hhh$ @h#h.h$ @hW$A%4h61 @h$ @hW&B%lh5ltt(X]3":X'%h$ @h(h":X)%h$ @h(h1W* + :X,]36R ->W*:H.'d /dT%*6dT5W*:X.%h$ @h0h6":X1%h$ @h(hW2:X3]@55W2:X.%h$ @h0h6W4:X3]@5 1W4 + :X5]365W4:X6%h$ @h0h6NWT4W4(XdDDT4 /446TD4 @:X7W4:H8d%h$ @h0h6dW9:X3]@5S.:X:%W9%h$ @h;h5i:8<%:X=W4:H>d%WT9%:?%(%(%($%h$ @h;h6dT t(X]3 ":X'%h$ @h(h":X)%h$ @h(h5W*:X.%h$ @h0h6":X1%h$ @h(hW2:X3]@55W2:X.%h$ @h0h6:X@%4W4:X3]@5 @:X5W4:HAd%h$ @h0h6dW9:X3]@5f .:X:%W9%h$ @h;h5d:8<%:X=W*:HBd%:?%:3%(%(%(%h$ @h;h6dh$ @hCh x 0Xbtl(hdTD4ll$1:XL%:8M%`h$ @h;h.(X%(8%:N%h$ @hh:(XR%(8%( %(t%:O%h$ @hhC(X_%(8%(%(T%`:P%h$ @hQh4(Xx%(8%(X%(%h$ @hh4(X%(8%(X%(%h$ @h hh$ @h#h.h$ @hW$A%4h61 @h$ @hW&B%lh5l(X]3WR(X]t51WRlll "C S/5$,blh0 H  0    (\l\LL(\]3,L(\]3CH lH0G::$D%:\%D$ @D:]3D5V(:\ %:$E%D$ @DFD(:\%:$G%D$ @DFD(:\%:$H%D$ @DFD(:\%:$I%D$ @DFD(:\%:$J%D$ @DFDB(:\ %:$3%D$ @DFD(:\%:$3%D$ @DFD(:\%:$3%D$ @DFD(:\%:$3%@l PhPd`  `HkUY `$kY`J8]Y: @h PdP`@~8P ` |+ p`k8 |Y @h ]@~X A@ ` |+ Z`H k PPY\(nI^ HDaI` Ph@bX ) THPhTdPD P@R@ $ ` |+P0@xh@@ @PX(xPX(xPX(xPX(xPX(xPX(x@( px @ @ @ 0 @ @  @ @ @ |@0 @H @` @ @ @ | 8j|@x @t @d @`  x  0 H (Hhh( P@Zl @@0 @ (&@8 @ @ @ @ @P @  @ @ @ @  p X8PxH  &p8@t @d @T @D @4 @$ 8Xp Px@8H @8 & @4 @P$ @h @ @ @ @ p@ &,@x @h @X @H @ @ @ @      (1t<$*\Rffff*0>3c638cc2$*\Rffff*0?3c638cc3*\R1*#129 "(  (8 *`0  " ) B 3  B ( 0 8 @ H P A` 3 J8     0 8 @ P ,Zh  "      ( @ X p  B     ,R  *  @ P "X `        ( @ X p       B  ( (0 X `h(p(  ()" ( 0$:@ $(h ( ( ( ( (8 (@ (X (p ( " ( (HR X` &8 "  ? )  ( "8*1P X 1 "(   ( A@ ` ) ( "(  &  1H (h "    "(@ X&x224 H,h0$*$ $H"p ( &$("P&x&$*,  P4p"&( @2`&"$""8*` 00,0&`($.  ((H"p4( 8$X&2..0"`"(*&  0  P "p  "    !, !(P!x! !"!!*"*0"$`""&""," #(@#&h#&#0#$#"$8$:X$6$"$ $%$8%$`%.%$%"%"&20&$h&*&*&2&&('&P'x'&' ','$(08("h(&(B(&)$()"P)(x)"))0)$* @*&`*"*** **](PxMHM    ]]](A@A@A@\#[DATE]: 7pt Italic Date/8pt TheaterLondColDate.DTest &B@( ) Date Column &B@*n (7pt Ital.) DATE:Date &B@dDateI &B@,BF0p (8pt) THEATER:Thea &B@d-TheaI &B@,$I] (8pt) OTHER:Other &B@dFOtherI &B@,dXOKButton &B@cKShow MeShowMe &B@2= 2Day &B@*WeekDays &B@.J<NEXTNext &B@0/SuDB1 &B@0/MoDB2 &B@09TuDB3 &B@0J2WeDB4 &B@04ThDB5 &B@0+FrDB6 &B@09SaDB7 &B@0<7 9Theaters &B@*Theaters &B@.FF/DLTB1 &B@0vF/LIFTB2 &B@0FGKing'sTB3 &B@0FVQueen'sTB4 &B@0MXZ$ TheaList &B@>s 1 Other Things &B@*N2$  OtherList &B@X CanButton &B@4 &B@8]@F &!<!>.   &!@%>'  Call LondPlayTableLondSwap.GetColWidths   &B@(  jB@ WordBasic.PrevCell  &%j  &%j G &B@j ! !$  &B@ ! &B@Hd ! WordBasic.InsertPara PlayWeekDateo &B@ ! &B@Hkhk` ! &B@PlayWeekNormal &B@ ! &B@Hk WordBasic.InsertPara !A@! Selection.HomeKey Unit:=wdRow$ Selection.MoveRight Unit:=wdCell  jB@ |B@"k@o8X LondLastDate$  &B@o LondLastDate$ &%r' i]X]p]] : ' :  &%h'  :  $'  31G-Warning: Use New Month if starting new month.A@2j ~  ~$ GFj ~'~ ~ '~ ~G'~j ~$   &%j $ ' i`(Pick from List)+ Sunday+ Monday+ Tuesday+  Wednesday+ Thursday+ Friday+ Saturday+ + ox]X]p  ' PlayNormal'   G   &%h' j ~  ~$ G PlayWeekDate' j ~i(Pick from List)+ ca.+  ca. early+ ca. late+ January+ February+ March+ April+ May+ June + July + August +  September + October + November+ December+ + o]h]]]]# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KTWeekDays &B@fTheaters &B@f '  Next &B@pdDateI  &B@XkDateI &B@NKT \ShowMeKTShowMe &%nShow MeDateI Wednesday 20 &B@XTheaIDL &B@XWeekDays &B@fTheaters &B@fShowMeClear &B@X$ DlgEnable "OKButton", 0dDateI &B@XTheaI &B@XWeekDays &B@fTheaters &B@fDateI &B@NShowMeShow Me &B@X$ DlgEnable "OKButton", 1kDB1KDB2KDB3KDB4KDB5KDB6KDB7KT \ &%l &%j'bDateI b$  &B@XDateI &B@NNextKTDateI &%n$ ' DateI  &B@X A@WeekDays &B@fOKButton &B@NTB1KTB2KTB3KTB4KT \ &%l &%j'bTheaI b$  &B@XTheaI &B@NTheaListKTTheaList &%f'b b b$ ' D D --'R D R &%h' D Print T$TheaI D &B@XTheaList &B@fTheaI &B@Nk( OtherListKT OtherList &%f'b b " Print OtherList$(Ptr)OtherI b$  &B@X OtherList &B@fOtherI &B@NkX CanButtonKOKButtonKT'ZS( n S n i DL+ LIF+ King's+ Queen's+ (Pick from List)+ DL -- Drury Lane Theatre+ #LIF -- Lincoln's Inn Fields Theatre+ #King's -- King's Theatre, Haymarket+ %Queen's -- Queen's Theatre, Haymarket+ AC -- Angel Court+ AVT -- Anchor and Vine Tavern+ "B+S -- Barber's and Surgeon's hall+ BCA -- Bird Cage Alley+ BDR -- Barker's Dancing Room + BELH -- Bellsize House + BF -- Bartholomew Fair + BH -- Boman's House + BHT -- Bull Tavern + B-L -- Bullock-Leigh Booth+ BOS -- Bow Street+ BPT -- Blue Posts Tavern+ BR -- Beverdige's Room+ BT -- Buffler Tavern+ BUH -- Buckingham House+ CA -- Caverley's Academy+ CC -- Chelsea College+ CDR -- Couch's Dancing Room+ CDS -- Clark's Dancing School+ CH -- Charterhouse+ %CH H -- Cheshunt-House, Hartfordshire+ CL -- Chancery Lane+ CLA -- Clafton+ CLAR -- Clare's Academy.+ CLH -- Clothworkers' Hall+ CLK -- Clerkenwell+ $CLK CS -- Clerkenwell Charity School+ COH -- Coachmakers' Hall + CORH -- Corner House!+ CR -- Crown and Anchor"+ CRT -- Crown Tavern#+ CT -- Castle Tavern$+ DG -- Dorset Garden Theatre%+ DR -- Dancing Room&+ "DS -- Dancing School, Queen Street'+ DT -- Dog Tavern(+ !EBH -- Earl of Burlington's House)+ EEH -- Exchequer Eating House*+ EGR -- Epsom Great Room++ EHL -- Epsom Hudson's Lane,+ ENW -- Epsom New Wells-+ Falcon -- Falcon Inn, Southwark.+ FE -- Mr Fearnly's/+ GB -- Golden Balls0+ GBS -- Great Booth Stepney1+ GH -- Girdlers Hall2+ %Globe -- Globe and Marlborough's Head3+  GO -- Godwins4+ GOLD H -- Goldsmiths Hall5+ GR -- Greenwich6+ GRT -- Great Room7+ GT -- Greyhound Tavern8+ HA -- Hampstead9+ HA W -- Hampstead Wells:+ #HW GR -- Hampstead Wells Great Room;+ HAY -- Little Haymarket Theatre<+ HAY GR -- Great Room, Haymarket=+ H&P -- Hand and Pen>+ HC -- Hampton Court?+ HDR -- Hill's Dancing Room@+ HDS -- Home's Dancing SchoolA+ ;HH -- Haberdashers' HallB+ HIC -- Hickford'sC+ HR -- Holt's RoomD+ Horn -- Horn TavernE+ HOUN -- HounslowF+ HT -- Horshoe TavernG+ IH -- India HouseH+ IT -- Inner TempleI+ JSH -- James Street, HaymarketJ+ KAT -- King's Arms TavernK+ LR -- Long RoomL+ LS -- Loe's SchoolM+ LW -- Lambeth WellsN+ MA -- Mr Mayor'sO+ MBS -- Mrs Bellamy's SchoolP+ MDS -- Mrs Defenne's SchoolQ+ MEG -- Mile End GreenR+ MF -- May FairS+ MH -- Harlborough HouseT+ MO -- MoorfieldsU+ MTH -- Merchant Taylor's HallV+ NH -- North HallW+ NWE -- New Wells at EpsomX+ OS -- Orlibeer's SchoolY+ OSG -- Old Spring GardenZ+ "PC GR -- Great Room, Peter's Court[+ PH -- Pewterers' Hall\+ PR -- Powlet's Room]+ PT -- Pye Tavern^+ ,Pun SML -- Punch's Theatre, St Martin's Lane_+ (Pun CG -- Punch's Theatre, Covent Garden`+ PW -- Pancras Wellsa+ PY -- Palace Yardb+ RI -- Richmondc+ RI W -- Richmond Wellsd+ Romer -- Romer Taverne+ RDS -- Roussau's Dancing Schoolf+ Sa H -- Sadler's Hallg+ SF -- Southwark Fairh+ SG -- Spring Gardeni+ #SGR -- Symond's Great Room, Enfieldj+ SH -- Stationer's Hallk+ SHG -- Somerset House Gardenl+ St Alb -- St Albans' Streetm+ #St F -- Sturbridge Fair (Cambridge)n+ SJP -- St James's Palaceo+ SML -- St Martin's Lanep+ SOU -- Southwarkq+ SPS -- St Paul's Schoolr+ SS -- Seven Starss+ ST G -- Ship Tavern, Greenwicht+ TC -- Tottenham Courtu+ "TCJS -- Tennis Court, James Streetv+ TEC -- Tennis Courtw+ TGB -- Two Golden Ballsx+ 3TH SOU -- Town Hall, St. Margaret's Hill, Southwarky+ TTT -- Three Tuns Tavernz+ UM -- Upper Moorfields{+ VH -- Vintner's Hall|+ WCH -- Wax Chandler's Hall}+ Wey's -- Wey's Home~+ WH -- Whitehead+ !Win -- Winstanley's Water Theatre+ WINH -- Windmill Hill+ Windsor -- Windsor+ WS -- Westminster School+ YB -- York Buildings+  York -- York+ + o*DAttribute VB_Name = "LondColDate" Dim WeekDays__$(), (Thetr 8ButOtherListZ Public Sub Main()  .}Description Input:  column side of playIPProc0aUInvoke_FuDncUTem6te"ject. .MAIN'Re9w10X {15ۋ 52-PPLeftCell$Rig"hSet /9&sWordBasic.BeginDialog 604, 192, "[DATE]: 7pt Ital/8a"~DTest? GGroupB@ox 9, 2d9731@A d K Text 23 $10 E ($.) (:A!A136U68IS1)411*1"(<) THEDR?45+ &7@9HOl76S OOKt13&0 892aCPush 35 9F7@ Show Me_A gJk8&?31`>a?65@ "S OBw "Ņ #Ea1.="NE4XTN`H39+`41SuDB145 ()Mo251U5%T$33/a)W1DB>4b\aTh5b4VFr6b"-Za7v3!5Y526P%"jtersdWFHeH2if@DLnTf@ 7 LIF#@442` !7@(King\'s@98?Queen%@Drop!33619@a$_cB+;2¤B24`"G} o+ 1a 1Q;!,AE_.Cancel5P 14PM7EndnJrt As Obq|: r P~CurValues.UserNPKc(P{ If -1@n RemAL Call qsPЇTableM/c2Swap.Get0rWidth!F, Sel .HomeKey Unit:=wdRow '1 Prevу/ `(v) > wqhenN WG.zI <> ""1Style P_$(PCɯInt $ QElsR$?r1CPara "iteo&A50 H nd If%b 9!  Normal } B -4Last  '))7Move&V,%W@=.a. rqA@PrivPr 8(D$$'DocumentVar͡Q-$ZD_ !<$a7 F[PX$]("@w` AU bN8$(CQ 1NBW! NWcB InStr "D$ @ C$, B - 1dNaMid8B +0,"3B1? Msgg"Warna: 0U Ne0onth if starRt nPmQ.*For W Txo 7*P W$IGoToxa:# !AWQ ~8K(@cW))#TN$qA (&sA"I0)"(Pick from 1r)I1BSund2Mo(3Tno4Wedne s5hur?sday" WeekDays__$(6) = P"Fri7hSaturp88End Sub Private Function Sty$(S$) Dim DWw InStr, 8" "!/PlayNormaldIf D > 0 TheV$ WordBasic.[Left$]GD - 1I For W%1 To 7 DSW))TM"<te=Next Xtlvw SetOt`hers(>L(ist0(Pick fromZ  ),1ca. 2 earlߊ3l 4Janua r5FebrQMarchMAprif#M 9C"unTJ1HJu71CE@AugustM!1CFSeptemb erFOctocQFNovGD|ecCGDTest(Id$@, Act,pLastD$CPtrNTTP Rem MsgBox  +r$(@)SuA Select Case B1#aggDlgV@alue "#^ys", -pLrCGetam&""l*Enabl@0ElseT$ "DI' IfFocus$"2c%@,B&"ShowMVa[ (%"] jK0dne 20Ke1! "DL/<4R =2d$ClAV$<OKButtonG==!$C*f#Y/#e_O#ME g(!aG?(u_WDBB1-"DB23Uc4c5c6c7_@I =7([RighAw2,wPMy  :uFq0L(}_SM"B!D1~H$) :)_ $?7F G (#?VF$W2sTTTBTB4.F4q;rg " h|ea p(WƠ;TAt&,P`-T`y" --?R TPMnt A{:s0#,, ?X%"@OW= /J$(_"lr oU5AI'Can&j"\8ab`$D9kSŠqe7~iLIF` y#King'sQueen u3OAI 4 Drury Laneatr& Lincol Inn FieldsF)  , Haymarke ACAAngel 0Cour]AVRTcchaЧVi!avern#5cB+SBa"rP's 1SurgeohalG1Չ #BCAbirdog@lleG!ݩCBDRkerDanc Room" Theaters__$(10) = "BELH -- Bellsize@ House 1FRartholomew Fa4ir V2VomPan's3(TUull Tav(ern P4'-L'ock-Leigh Booth% /5/OS/ow Street  6P?lue PostsB7 R)eSdigeilRo8kfPfler*9Uuckingham2CAA"Cley@Academy o2CChelsea Colleg%Mw2ClCD7CouchDanc@# 82CnCDBX Clark School#qC:DCherhP2o D eshunDt-B, Hfordshir1 tCncer`y Lan rCLCRlafto ~2pE8A{Z.KM7qCClwork@',l C23DrLKgkelnw3p C-Ze@ QitTy [3tOCQo`achma9ORrn V38"rown and An`> 3D9R`C|37astlee37DG&Dorset Gardenv "NB38[Z37Y+, QuVe r49D"Dog48EB+Earl of Burlk@O`gq-4c8EExchequ2EatrR9EG3Eps`om Gr`x4c9EHfHud,sof49ENW/N`W!,W4C:Falcon$Inn, Southw;FEMr Feparnl@:G"BGol?Ba:GBbg ơepneM59G-Girds@ 5:Glob.ebaM;borougAHea&dM:GOcdwinsM8GOL D C@smit>h8C> icum5c7G8](5cG,Py Z=+_;5HBTHampst5@B#f O#$(5xHW ,6HAYQLitDHaym0& BA6CAat2qf6H&PMH!1Pec6=CHw p>wurm6H3JHillt/(6HJHP#K= CH$HaberdasVhic6dI ickv'M*6F0HoltP (6$orR@Hq$$"7$OUNounslow 74c)shobҭ7IBIndiaw?acIIUTPempl-7SJSJamesTK"U)7KAK0[0Arm cBLLong?[$(7LMLo!?q LR7Lampbeth?7MR<0WMayor8MTMrs\am`8MS*Defenn p(88ME}Mi End!?5:83M O$(8M@lDYO M2YMoorfield/8MT2MerchantylPNNo`_PNWrou HBv<08Orlpibeea9 OSbOld Sprуc9S PCXwb, Pep-,>L9PrPewEE9PR.PowleC09Pyo>SPun SMrϠD_Іt Py _(9cCBCove#*9Pr6Pra.s6CPjPalace Y)RIAPRp|mon-10C@bep103Romer -- RTavern" Theaters__$(102) = "RDSussau's Dancing Schoo lj3jSa HlSadlerjHalV4+F)outhwark FairV5*G*prGarTde6)R*ymondGrom, Enfield17\@tation]8Hset House L9`t AlbNans' StredetH10turbridgeA (Cam)%1JP4JamesPalacezSML @Martin LanO xOUB n wPSt Paul1Dx evenEarsNwT C^hip , yenwich vTC,Tottenham Cour]CvTCJ"Tennis , QUkw\TEC #2uTGB#wo Gol B@N<2rTH SC\Town ,@". j garetVHi,llUd2yTT Th`N TunNs(Wey`HnN=W# hite@.}2C%(0s%( %(1%::%`$ @` `C(PN%(0%(%(2% `:;%`$ @`9`:(P%(0%(X%(%:<%`$ @`=``$ @`>`.`$ @`W?A|@4`6|1 @`$ @`WAB|@l`5l(P]3 0:PB%h@d@`$ @`C`0x'| `$ <` D`6|Uh@`$ @`Ed@t$ @t|Et)`t6|`$ @`F`WG:PH]@5h <WG`` IF|%`$ @`J/``6|(WG%`$ @`K`5 WL:PH]@5 ":PM%`$ @`J`(WL%`$ @`K`5WN:PH]@5N `$ @`O`":PP%`$ @`J`(WN%`$ @`K`5WG`` Q/`50x'| `$ <` D`6| R 4bldh$``t|dd0):h%l @x$ @xx40$b xt83:D%:d%t$ @t$`1xt5$0;2;4;6;S;[;\;];^;_;`;a;b;c ;d ;e ;f ;g ;h;i;j;k;l;m;n;o;p;q;r;s;t;u;v;w;x;y;z ;{!;|";}#;~$;%;&;';(;);*;+;,;-;.;/;0;1;2;3;4;5;6;7;8;9;:;;;<;=;>;?;@;A;B;C;D;E;F;G;H;I;J;K;L;M;N;O;P;Q;R;S;T;U;V;W;X;Y;Z;[;\;];^;_;`;a;b;c;d;e;f;g;h;i;j;k;l;m;n;o;p;q;r;s;t;u;v;w;x;y;z;{;|;};~;;;;;;;;H;$b C0$`(`0$!`(I`0$q`0` 0//$`nrU "$"` 0"` LondColCastkeB:__SRP_22__SRP_23iF'LondAllCaps& "`@*:p,@$:.@$:(0@P$:2@$:2@$:@0@h0@0@0@ (:((@P*@x :  01 0 B 8@H (P x "( ( (  $:  "(H (p *( ( &( (( (0 (H (` (x ( (  *"" *"  8*KH 4h&Xlx #(((0(H"`(x/xME@>   <  $+ >E ` $+p >u        (8 P (` x     (  D    ( 0 "8 @ H 0X  9 7 "< / 7 J( x * $        {"<  -H7X x " 6 8X$`( B $ 0@HPh]V5,London[Cast]: PLAY Cast Input: Role -- ActorLondColCast.DTest &B@(K Cast Member &B@*"& Role:Role &B@dZRoleI &B@,0) Actor:Actor &B@dZ-ActorI &B@,I7Index-1:IndexT &B@dZFIndexI &B@,db7 Index-2:IndexT2 &B@dZ_Index2 &B@,{7 Index-3:IndexT3 &B@dZxIndex3 &B@,sm ADD MemberAdd &B@2 FShow MeShowMe &B@2F(Abbr)AddAbbr &B@2kFUn-RoleUnRole &B@2^_< CanButton &B@4^=< // MF &B@2^<CNACNA &B@25 PushButton 120, 112, 109, 21, "Add Member", .Add &B@8]F &!<!>.: : &!@%>'$o]h]# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KT CanButtonClose &B@X" WordBasic.DlgFocus "CanButton"Index2roles\: &B@XKT \ShowMeKTShowMe &%nShow MeRoleI Ned Blunt &B@XActorIEstcourt &B@XIndexIEstcourt, Richard &B@XIndex2roles\: &B@XIndex3 Blunt (Rover) &B@XShowMeClear &B@XdRoleI &B@XActorI &B@XIndexI &B@XIndex2roles\: &B@XIndex3 &B@XShowMeShow Me &B@Xk(CNAKTCast not advertised. &B@HMFKT // &B@HAddKTRoleI &%n &B@H   &B@HActorI &%n; &B@H d &B@% (B@J  j!B@ j!B@In j!B@ RoleI &B@XActorI &B@XIndexI &B@XIndex3 &B@XRoleI &B@NCNA &B@pShowMeShow Me &B@X dtvxF &B@r !!!T' !!(T5WordBasic.EditBookmark Name:="ixg", SortBy:=0, Add:=1WordBasic.EditFind Find:="XE ", Direction:=1, MatchCase:=0, WholeWord:=0, PatternMatch:=0, SoundsLike:=0, Format:=0, Wrap:=2, FindAllWordForms:=0WordBasic.CharRight 1, 0WordBasic.Insert "\fg "WordBasic.Insert " "06WordBasic.EditBookmark Name:="ixg", SortBy:=0, GoTo:=18WordBasic.EditBookmark Name:="ixg", SortBy:=0, Delete:=1A@  !!(TUnRoleKTLondAbbr.GetAbbr$ &%(' 8Index3unspecified role ( 8 ) &B@XAddAbbrKTLondAbbr.GetAbbr$ &%(' 8`Index3Index3 &%n ( 8 ) &B@X CanButtonKT'ZSnKT \ActorIKRoleIKTCNA &B@pIndexIKTCNA &B@pShn`KT \IndexIKTCNA &B@pA@? DlgText "IndexI", Lastword$(DlgText$("ActorI")) + ", "0SnSni a17 Macro* Macro recorded 11/04/98 by Thomas Minsker !!(T  jB@'   jB@$j)G|j  jB@D Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend &B@> j!lB@n j!l(9d^&5p(dF9r 9t99x9z9|9~9q j!lB@   jB@ j!(F  jB@@oh]]0]HIndexIActorI &%n$ z, &B@XRoleI &%n'   &%l] ['   $'    &%h' kLondAbbr.GetAbbr$ &%(' 8 8G ( 8 ) ' 8jIndex3  8 &B@Xo`] ~ | | ~$ Gj ~'~ | ~ $' zixp  \f 2 IndexI &%n : Index2 &%n : Index3 &%n ' d0жAttribute VB_Name = "LondColCast" Public Sub Main() ".xDescriptionInput: Dialog for  mem0bersHPr@ocDataTInvoke_FuncTTemplate"ject..MAINODim CC WordBasic.Begin86, 53, 419, 185",on[K]:` PLAYQ\Role -- A`ctor".hDTe 8GroupBox 65331575}M}UText 34, 28"?:;349016I1G4>4K169 O&E41G AX75B NIndex-1T373 X94B4 -2H29 5B h323125O Pu@shButt@1V1A']02@m"0ADD VAdd 2ATpShowMe25Ae3(Abbr)@Ca07, Un-Y`Un[N@Canceld 35&4[BcY 6& // iMF2 J N AC Remd j,:1!-44dd4. %EndCb As Ob: Set CgCurValues.UsterEC((rC@ A Priv !BB(Id$,A,p`!`Termh$ AAM sg@ + SPtr$()eSu1 S,el@ae! e Dlg ""';CClosS'Focus  H y r`s\:@?b2C o$ B"cIf 2[ $](%)bl Then aa!`IKNed Bl|unt$E@stcour"! e, Richard 0U_ 2a gq/#3!R (Rov~eCzT Clear Else_ 4wn&G>Ifk,K/.Font.Reset InFtA6st not adtised.4 S2Tq2YR 9!M%O " L"R0$qP";R#bTA\f 2_7AD$&Q_A ": _V2"_ _cVV3"HqbntStatusBar w 57 S7"C12K Fs'c / c.Enab"2@_Rsj/8!7' MarkR Entry R:= Wange:="RBold:=0ItagreA=!tiveWindow.@'Pane.View.1 All`)xTruXU e@r.Make RDed ''EditBookm ixg SortBy=:=|F A0XEADirPJ, MatchABWh|Pattern"SoundsL ik@FormatWrap:=p1s C`qRigh, 0K\fg> &M@( |GoToDt$$izepeviaa e^Pane.View.ShowAll = Current  Case "UnRole"H XA$WordBasic.call("LondAbbr.Get1$")bXDlgText "Index3", "unspeci@fied ri + " ("i ){AdgVEU[V$](W)MCanButtonNDTest 0bElseEnd Select  3 Ń  Id$ "ActorI I5 EnablCNA>f0-4-|+ Fields xRemKCLastw$(n(K)nRX3fFunction Sub ItalicizBeAevia(' ' a17 Macroa rec'11/04/98 by Thomas Minsker (xiveWindow.xTruđ C(.MoveLeft Unit:=wdCharacter, Coun`*Mb1, ExtendA ## IfX () < > ")"enit &1a(`>5d/ !F 0.ClearForm@attingcWithG.SB.b= "(s.Replacem3^&) wadrdFaF WHrapwd Askh #pMatdchb= bWh!Wild*csS@IdsLike5! ?Aj(C;!.Execut[gZpRighZvT ont.xgi h5aB\ Private!^ !Dim R`L ADa$$(ilR y;hoR$, 1)`"]c<(LP@InStr(A"F[~BMidL}r1T ILen ) -@Ifr HH g[q +  ` !gA$(LW6$!WC / W  To 1 Step -M1 , W5ThSGo@Leav0NeP}:#`GTa u $ <x 5t R)xt$tx$ <x 5Qtx S RTx Rx DUx  ,R R  R  HR  `R  PR  XR  @Rc{''''''$'D'd''''''0'Ptx$ <x 5t R)xt6P0dD$< (0Px$ <x 5x6P0-tx$ <x <5t 86)xt7 '(0Px$ <x 5x6P00(bXxtpP0dD$0   0 `  W0//$"`$"`(!"`0n3oxME(6 L "`pHk@Y `d0OY OYXP%P`@(p@&"""@x  @Xh 3 @X H@H P(`1t<$*\Rffff*1;3c638d68*\R1*#17b*\R1*#c1*\R0*#f "0"(38 P0` G  &B@Hj &B@e $ &B@Hnd &B@st. G  &B@Hj@oxpAttribute VB_Name = "LondAllCaps" Public Sub Main(Before$,  fter$) " If < <> "" Then WordBasic.Inse?@ABCEH[IJKVMNOPQRSTUDWXYZx]_`abcmefghijkl\nopqrtuvw{|}~rU~| #"V`a a!bIby!qbQ bbb!cYcccC d9dqdddF1FaFeAeqee !eef!!!1"""9f$ifff9gQy gy9'q=oI9#{ hg_a)! "Qh hATT" a \@(XV%(85%(%(%:%:%h$ @hh:(X%(8%(K%(%:%h$ @hh@(X"%(8%(&%( %:%: %h$ @h h:(XZ%(8%(%(%: %h$ @h h@(X%(80%()%( %: %:%h$ @h h:(XZ%(8-%(%(%:%h$ @h h@(X%(8I%(7%(%:%:%h$ @h h:(XZ%(8F%(%(%:%h$ @h h@(X%(8b%(7%( %:%:%h$ @h h:(XZ%(8_%(%(%:%h$ @h h@(X%(8{%(7%( %:%:%h$ @h h:(XZ%(8x%(%(%:%h$ @h h@(Xs%(8%(m%(%:%:%h$ @hh@(X %(8%(F%(%:%:%h$ @hh@(X%(8%(F%(%:%:%h$ @hh@(X%(8k%(F%(%: %:!%h$ @hh:(X^%(8_%(<%(%:"%h$ @h#h@(X^%(8=%(<%(%:$%:%%h$ @hh@(X^%(8%(<%(%:&%:&%h$ @hhh$ @h'h.h$ @hW(A)4h61 @h$ @hW*B)lh5,blhb  (TlTDD(T]3|(:T"%: +%@$ @@,@(:T%: -%@$ @@,@ D(T]3C l 0:: .%:T%@$ @@:]3@5(:T %: /%@$ @@,@(:T%: 0%@$ @@,@(:T%: 1%@$ @@,@(:T%: -%@$ @@,@(:T%: 2%@$ @@,@(:T%: 3%@$ @@,@(:T %: 4%@$ @@,@(:T%: 4%@$ @@,@(:T%: 4%@$ @@,@(:T%: -%@$ @@,@(:T%: 4%@$ @@,@(:T%: %@$ @@,@ l &0!*@$ <@ <5 6)@":T7%@$ @@8@ l %0}*@$ <@ <5 6)@":T$%@$ @@8@ l 0*@$ <@ <5 6)@K: .%:T %@$ @@%$ @8)@549:*#9*F%@$ @@8/@5X: .%:T%@$ @@:;%$ @8)@6:<: .%:T%@$ @@:=:.%:%$ @dT:D=4:.%: %0$ @0`1h)@06dT4#h@@$ @@>@(:T %: 4%@$ @@,@(:T%: 4%@$ @@,@(:T%: 4%@$ @@,@(:T%: 4%@$ @@,@":T %@$ @@?@(:T&%( %@$ @@@@(:T%: %@$ @@,@?h@:04%(%(%@$ @@ ABCDE@E0@$ 8@ (F HG0 @HkT)@090@$ 8@ (F HG0 DH)@0 I J<V0@$ 8@ (F HG0 DH)@0 l !0+:TK%@$ @@L`1d@5E:T%MN*#ld*#O*F%@$ @@,2@5 l 0+:TK%@$ @@L`1d@5u:%: .%:T%@$ @@:NldF:Od%$ @,)@6d l "0 (Tl D(T]3p Cl0 l 01 (:T&%( %@$ @@@@k l0i (:T&%( %@$ @@@@k  D(T]3 IC l0 (:T&%( %@$ @@@@ P   Db,l Ddh@ @0dT4E 09ptx$ 8x (Ft HGp DH)xtp7 '(0Px$ <x 5x6P0< (0Px$ <x 5x6P0,x$ <x 5lO=/x7 '(0Px$ <x 5x6P0x$ @xQx*tx__SRP_30__SRP_31lPLondonLeftxhLondIndexWrU~| 10y Q9 =2#l @x$ @xx"(h%x$ @xx3lMh@H Hx$ @xx5Hx$ @xx =#l@x$ @xx""4$b xHkrU 000` Yq000nLS/xME(<<< < "` 88HXhx%1t< "   8 P LX D  TableSelectRow TableSelectColumn TableInsertColumn(4.38"$ 0.15"$ 0 &B@4.38"$ 0.15"$ 0 &B@oװAttribute VB_Name = "LondonLeft" Public Sub Main() Rem TableSelectRow&Column,Insert,WordBasic.NWidth  :="4.38" + Chr(34), SpaceBetPween*s#0.15 #Nexp:=1, RulerStyle,G[8End  "xME (6 L<x "`@$k@l `\h hx % @X@&@d @(T @D @X4 ` @$ 4 01t<$*\Rffff*083c638b22*\R1*#c1*\R1*#17b ""7-81Phx]@]XF &!:%r.\ \ &!<B@rn \ &!@%r'roAttribute VB_Name = "LondIndexW" Public Sub Main() D im xxX As Object: Set XWordBasic.DialogRec".MarkEntry(FalseN-CurValues * X xxX RXNEnd rU~| __SRP_ep__SRP_f~|gLondTbarsu__SRP_a   h!1"5fT%d$ @dW4B$4hd64$-h @d$ @dW$d5$1h @d$ @dW4B$ld54ttX,blhd4$krU $`nrU~|  5+ London Formatting+ $ $ (N + (z FormattingCB5 &B@<zGotoCB6 &B@fPzIndexCB7 &B@3 London Goto+ 333f$ $ (P 3f$ $ (R 3 !N $ A@f3 !P $ A@f !R $ A@ff3߳Attribute VB_Name = "LondTbars" Dim D@onToolX__$() Public Sub Main$".Descri ptionon: Activa@te/dea ^uGProcDataSInvoke_FuncS`TemplK"ject..MAINMRe7ă yttb {0)c Conv`erter21A Intro2(alenda(3SpeciaXlCh?4P(lay>5I FormattingE 6 Got37I IndexP7WordBasic.BeginD4og 224, 250, `"(de)Ŋ GroupBPox 1 60}0@²ȖCPheck21*69 1Sy stem"@!CB000A09,& B{duonM192DCŀB2\4A2{J3DsB &SideC4o(H5-1׆BJ68jcL7OKBut*t538:88D1 9anc$eld1221gMEndTĄb As      !"#%&'()*+,-./0123456789:;<=>?@ABCDEFGHJKLMNOPQSUVWXYZ[\]^_`abcdefghijklnopqrstuvwxyz{|}~ Ob!: Set tb[CurValues.UserEtb.JB((/x0)) B1\1G2\2G3\3G4\4G5\5G6\6Gz7\7C/-H/(tb`*Rem Msg~Str$(ွ) + cB3@2@ =B7 >9, S8 18 `z0 7 32 7 0 50p2(`7@a`05aPrrR(T, T_$@If ӗ54]St("-1 Then=5T00"ViLewaEe:=,$ H`O:=AEl|seZ_\ShowSnd If  ыR@NTq ar$av X P !i iq aYQq!1Qy !!!! AYq)AY1" I;;;;;;;; (Ll.(L%((%:%H $ @ H H:(L %((%(%(%: %H $ @ HH@(L%((%(`%(%:%:%H $ @ HH@(L%((d%(m%(%:%:%H $ @ HH@(L%((%(\%(%:%:%H $ @ HH@(L%((%(z%(%:%:%H $ @ HH@(L%((x%(z%(%:%:%H $ @ HH@(L%(((%(z%(%:%:%H $ @ HH@(L%((<%(z%(%:%:%H $ @ HH@(L%((P%(z%(%:%:%H $ @ HH4(L;%((%(X%(%H $ @ H H4(L~%((%(X%(%H $ @ H!HH $ @ H"H.H $ @ HW#At$4H6t,Cpp %&/p5,Cpp %'/p5,Cpp %(/p5,Cpp %)/p5,Cpp %*/p5,Cpp %+/p5,Cpp %,/p5,Cpp %-/p51 @H $ @ HW.Bt$\H5+W&Cpp //p5+W'Cpp //p5+W(Cpp //p5+W)Cpp //p5+W*Cpp //p5+W+Cpp //p5+W,Cpp //p5+W-Cpp //p5 0b\lpHt3l@x $ @ xH0(X]3x5Hz X(h]3w/l@(X%x $ @ x123x X(h]3/l@(X%x $ @ x124x T$b xH8T (\l3l@X $ @ X80(H]3X58K  Z xMEP> <<L<<<%P8M\0]8 ]]London Converter+  London Intro+ London Calendar+ eaLondon SpecialChars+ t.Lond London Play+ '(de)Activate Toolbars &B@( London Toolbars &B@*`SystemCB0 &B@dm IntroductionCB1 &B@\CalendarCB2 &B@z SpecialCharsCB3 &B@@xz Plays on SideCB4 &B@;X &B@~X &B@4 &B@8]F &!<!>.$ $ ($ $ ($ $ ($ $ ($ $ (  &!@%>'> MsgBox Str$(ttb) + Str$(tb.CB0) + Str$(tb.CB1) + Str$(tb.CB2) !$ A@ !$ A@ !$ A@ !$ A@ !$ A@o0  &% DG  &B@jdH DG  &B@jko' D &%G'ji London Index+ (\l TT(blX8(arU $ `  , `1 A /0( `1 0nrU < $<`$<` Q__SRP_b8LondMonth)9__SRP_3cwL__SRP_3dk*#d6*\R1*#129*\R1*#4b*\R0*#10*\R0*#f*\R0*#14*\R1*#c1*\R1*#17b*\R1*#c1*\R1*#129*\R1*#b6*\R1*#75*\R1*#c0*\R1*#105*\R1*#d6*\R1*#d7 "* $( 8 H X` h p x   {7 4"<   "( 08H`x 8P  h N4p (:"<@:@@8@&:(: 0:|,/xMET@> L*LLLLLLL*LL.   &!@%>' KT ! $ ,  A@O ! ! &%h  !A@Use '[New Play]' when ready.A@2Snop]Just to test Page Headers.'  KTs+ &B@ KTKT &B@S8n0 l jB@`! WordBasic.InsertBreak Type:=3 &B@ &B@ &B@D df &B@b  &B@H WordBasic.InsertParaB@ WordBasic.InsertPara! WordBasic.InsertBreak Type:=0 WordBasic.InsertPara WordBasic.Insert Message$LondPageSetup.DoSetupM &B@(DoSetu j% o((]'Z ^KTMonthI &B@NWeekDays &B@fLoc &B@fOKButton &B@pKT \LB1KLB2KLB3KT) WordBasic.DlgEnable "OKButton", 1DB1KDB2KDB3KDB4KDB5KDB6KDB7KDB8KDB9KDB10KDB11KDB12KTOKButton &B@p \$ &%j'bLondYear.GetYr$ &%('  ?' d  b G  &%j $ &%' jkMonthI b$   &B@XMonthI &B@N CanButtonKOKButtonKT'ZShn`SXnPiH,--This is actually: "Month, Year" for header LondMon$  &B@ o@LondMon$ &%r' NiLondonMonthEven &B@+ WordBasic.Call "LondSeasonHeaders.MAIN"@ ClearPg WordBasic.CharLeft 1, 0 WordBasic.InsertPara WordBasic.Style "Normal". WordBasic.Insert "Month starts here . . ." WordBasic.Insert Message$! WordBasic.InsertBreak Type:=0 $ !( !B@ Pa  jB@@ k  - Selection.MoveDown Unit:=wdLine, Count:=1^Attribute VB_Name = "LondMonth" Dim 4s__$(), Season$ Sub ClearPg()  Selection.Find.:FormattingFWith P@.Text^m}Replacem8ent! cward8TrueNWrapwdrCin NFals Matc0hCas Wh`oleWo:i(ldcJs.SoundsLik18All0R"End u Exec MoveLeft Unit:=wdCharacter, C"1 '\! Down Li ne 4, ExtendAC )xCutA7P@ublic AMainA.Descrip[oníly Calar O BsProcDataInvoke_FuncTemte j.F.MAIN@Re12PP T0) 1J@anuaryJ2BFebr3Marc4April5 6June*7l8AuPgust9Septemberj1COctoN#N`TcDe * dBasic.BeginDialog 350, 252,on[New/a"$]: I`i4ze#E".DTeB#T GroupBox 21 , 13786, 9"Pc#ObacPButtW3@11168` @ "Afu currg`BB1  6V5a q1 t Locag 2 86 wof Docu 3 !K6940f8!*"ODnCancel2~2  68264"y#@-YbҁH1e 4'13@ED:O!"D10!0U@11""I/@"7"P8ickTKWeekDayK9L 1 4+ pG D$5c9I#a915K'" on215 0N4&33yMay5q{S6Hl}7rwuzg8S! z5yPZ9qP\10^K"`&EG_x As Obq{: St PPwCurValues.UserPKc(P}AhQ`~-@ASetP>L (>³P.9d9 + 1))PO1 `6Do" DP.rI, [$](+p }2,0p\Dc!MsgH"P 'Qp jy]' when readyv.` E\s  ub Pr8ivaјt (Mp$, B0dMessageA !J0 to tv P0 HerscsU;c 0WW7_EditGo8To l:=x"s+*IfInf(wdInTablea TcAppr.Brow $.Targe1wd#BivvNexQ5cQUp6PpghIf2POfUzu4IntB`#@k TypeSǓBous(34!wPE c.#"Bookmark :=!,SortBy:=9AdPʴ"wStyleŤ9Even%g M/ Right / N*AC9ert starts ٲ@here ." ' WordBasic.InsertParahtBreak Type:=0F Messaga|-^  Ecall "LondPSet up.Do",( "MCSeasonHeaders.MAIN End Sub Private Function DTest(Id$@, Act,p) Dim P tr = 1 Select Case  _DlgFocusUonthI@Value "WeekDa4ysk-#LocEnabl@OKButton t&2VI-@9a"LB1 23*“++CDCDBBDB3QDB456U78910B$2M" lk@P(Midyw3)@vA $ J (Year.GetYr$" If Len() <> 4 0ThenU"?1Else A,(< 9B %[LTrim$](Str(K6+ 1si]IfK 'TTextS, MU s__$() + " +]#BCan&R"SG n/U&#vm#dmaEy{}Et(M$8'--This @actuy: , =" for h"c&`D zmentVarc $@VM@H!(dHN[ ="P +@ S8$ @8T\86.:LU%8$ @8V`85JC WT\(L ]gs:X%@8$ @8T(( Y$ @`)86D:L'%\"*#*F%8$ @8Z/85":L'%8$ @8P8[l!0Kl0Y (Ll[bl4\bl<\(8Ud0):h[%l @x$ @x\x40$b x0 @  R0<` 00/0<` 0//(!<`0$I<`n* xME LondIndexyr$ __SRP_4c {I__SRP_4dRgDateFieldzT((6 L< "`(pk Pxon M P`p"%@X&PÆ @t Proj@p @(` @@P Æ@@ H@p0 @ @ @ @ '@ @ @ @0 @H @` @x @p 1t<$*\Rffff*=>3c63a544*\R1*#c1*\R1*#17b "A (H PpWx(6G]@ &%@ &%B SelectCurWord'  CharRight 1, 0d &% &%$'  &B@lB@kPLondIndexer.MAIN  &B@(OoAttribute VB_Name = "LondIndex" Public Sub Main() Dim S$ If WordBasic.GetSelStart`Pos() 8End4Then p RemE:ectCur3]S$ +CharRight 1, 0,Else 6}[RTrim$](pion} )kB3n0d If4caller.MAINrU~| =<zyy9)QyQii i)jIjjj1kQkky ! lally!lQ lF1GQGq+ HIHHH)mqImimmm!!!1"m6!<n9n<<Qn##{ ') n!3Y(" <%A<4!54<I 15i'=1=a0= (9h*tx$ <x bt s)xt$tx$ <x bQtpx tp sxp sx Dux p ,sp s p s p Hs p `s p Ps p Xs p @scp{''''''0'P'p''''''0'Ptx$ <x bt s)xt6P0pP07'(0Px$ <x bx6P0<(0Px$ <x bx6P0x$ <x |bx(bpPxtP0pP0`  T;;;;;;;; ; ; ; ; ; T4(X^%(8%:%:%h$ @hh:(X%(8%(%(a%:%h$ @hh":X%h$ @hh@(X%(8%(%(%:%:%h$ @hh@(X%(8%(%(%:%:%h$ @hh@(X%(8%(%(%:%:%h$ @hh:(XE%(8%(X%(%:%h$ @h h:(X%(8%(X%(%:!%h$ @h"h:(X%(8T%(%(1%:#%h$ @hh@(X4%(8i%(.%( %:$%:%%h$ @h&h:(Xj%(8g%(%(%:'%h$ @h(h:(X%(8%(%(J%:)%h$ @hh":X*%h$ @hh@(X#%(8%(/%(%:+%:,%h$ @hh@(X_%(8%(/%(%:-%:.%h$ @hh@(X%(8%(/%(%:/%:0%h$ @hh@(X%(8%(9%(%:1%:2%h$ @hh@(X#%(8'%(/%(%:%:3%h$ @hh@(X_%(8'%(/%(%:4%:5%h$ @hh@(X%(8'%(/%(%:6%:7%h$ @hh@(X%(8'%(9%(%:8%:9%h$ @hh@(X#%(8;%(/%(%::%:;%h$ @hh@(X_%(8;%(/%(%:<%:=%h$ @hh@(X%(8;%(/%(%:>%:?%h$ @hh@(X%(8;%(9%(%:@%:A%h$ @hhh$ @hBh.h$ @hWCAD4h61 @h$ @hWEBDlh5ltt(X]3V?WF(X"G*#p*l H2pl6~WLI:(J%WI%(H%h$ @hWUntil he is dead, do not yet call a man happy, but only lucky.' *Solon' ,KTPThe scholar who cherishes the love of comfort is not fit to be deemed a scholar.' *Confucius, 551-479 b.c.' ,KTSI will have nought to do with a man who can blow hot and cold with the same breath.' *8%Aesop, 550 b.c.' ,KT^Knowledge must come through action; you can have no test which is not fanciful, save by trial.' *Sophocles, 495-405 b.c.' ,KT\Bad men live that they may eat and drink, whereas good men eat and drink that they may live.' *Socrates, 469-399 b.c.' , KTFI have hardly ever known a mathematician who was capable of reasoning.' *Plato, 428- 348 b.c.' ,8 KTqTo enjoy the things we ought and to hate the things we ought has the greatest bearing on excellence of character.' *Aristotle, 384-322 b.c.' , KT^Kingdoms are but cares, state is devoid of stay; riches are ready snares, and hasten to decay.' *Henry VI, 1421-1471' , KT6Let the street be as wide as the height of the houses.' * Leonardo Da Vinci, 1452-1519' , KTqSee! how she leans her cheek upon her hand: O! that I were a glove upon that hand, that I might touch that cheek.' *William Shakespeare, 1564-1616' ,KT]O thou invisible spirit of wine! if thou hast no name to be known by, let us call thee devil!' *William Shakespeare, 1564-1616' ,KT,Thou canst not touch the freedom of my mind.' *John Milton, 1608-1674' ,KT^Truth often suffers more by the heat of its defenders than from the arguments of its opposers.' *William Penn, 1644-1718' ,KTTPolitics, like religion, hold up the torches of martyrdom to the reformers of error.' *Thomas Jefferson, 1743-1826' ,KTwLet us live in as small a circle as we will, we are either debtors or creditors before we have had time to look around.' *%Johann Wolfgang von Goethe, 1749-1832' ,KTI think this is the most extraordiary collection of talent, of human knowledge, that has ever be gathered together at the White House, with the possible exception of when Thomas Jefferson dined alone.' *"John Fitzgerald Kennedy, 1917-1963' ,KTFThere is nothing so powerful as truth -- and often nothing so strange.' *Daniel Webster, 1782-1852' ,KTIn composing, as a general rule, run your pen through every other word you have written; you have no idea what vigor it will give your style.' *Sydney Smith, 1771-1845' ,Sno]] *'<  zxMEP<<<<< <<<0h€. @%8.02&N "`X@Generate some textTemplateProject.SomeText.MAIN 4 `@ 0`@`cc!I6 @8l c! 2`@ @<l @\ Ҁ*8@Ҁ,@H 8((H 8H 8H 8H 8(H 8H 8H 8H 8  @  @ 0 @ x(  @  @  X&@L @< @,  PX @  @ H 1t< "  ( 0 8 :H : <  ( H >X >%"   ( 8 HXp    "   0Z    (0^ 8  f   8. @ p F   X  H h\ p  f  X xd   N  ` z   (f 0  > & ( z 0 &  f & H p 4 x   f  @ ` \ h $   . x   *  N "  0 8   "  0 H `Cp "]8,LH' *' ,'.A@0wN6 EditBookmark .Name = "SRandom", .SortBy = 0, .AddxA@26 EditBookmark .Name = "ERandom", .SortBy = 0, .Add7 EditBookmark .Name = "SRandom", .SortBy = 0, .Goto ExtendSelection  < For w = 1 To 1 Next w * $ &B@H  &B@HoH@Attribute VB_Name = "SomeText" @ Dim 0_$, Author NQuotes Public Sub Main() ".Descri ptionGePneras th5ProcDataAInvoke_FuncA`TemplA"ject..MAIN)   0 F%faN(0`Rem EditBookmark .Random", ;rtBy#%Add(DoTheInserht %E%3CGoto;xtenpdSelGG`oTo " C`ancel ADyte]U>E`WordBasic.PrintStatusBar` EndrivAAllCAMzFor Mp1 CA= MA%xParag + " @Bolxd 1> C N= @<GG5(M:ezd@$Q_ gd2If ] `[n# )t(Rnd() * ((- 14) +  lsD!gC IfV Case  '|Not being a true power typist, I have "`ed to gŏ! as if`e it.Minsker, 199F3@2 How chere is nevenough ti`do the job righ  al ways oit o?Anonymousd3iA smalDl k hIs back $gr`eat w@"LH@700 b.c 4 Until dea(d, n 0yet cAa man`.ppy, Aonly lucky,Solonc<5 L sc@}who c*ishes'l`" of-fort-f%@,be deem=aeLConfucius, 551-4796iI wni)H9tHwxith`*bbl@h` yUA>sb/hAesopAm/7Knowledg`e mus-cMr Kac; you0/`^no `whichf$i@ful, sbb"y@3ial So@phocle4@95-405 8 Bad men liPth&y y &d\0k, w1 7go~o#~ ca 69-39}9i ?hard (8k0n" m0,ci@wP ca`pable%`s,onPE P`o, 428- 34:8\10AeenLjo3ths w@t A*`G4.;ePHbea0g 0exylePzB0$er ArPotle, 384-322 zTK ps aK;cs`wLdevoid y;K@9dy sn hasr2eca?Henry VIU421-1471L1jULE stre=0wide[heOaTa @Qes Leo ;Da Vinci52`-1519:TSHee!Sw PG leanspOrHek up`,`nd: O!+Bq_a gJR0h0,5m touP9pek< W Giam Shakespp1564-1616H YO0 @invisBi,spir1df]0Ln nu%t BnAI3S1b`[lusDPO@Tvil!@  }{1|]J-acEe\ f'qmCind John @Milton6d0874:[T$ruYofA(suffers mo-8hGdits]bf@nom`&rgu`Moppo`%(Pen 40718 z\Politic5like relig,z%tor58tyrp1.re @om erro!?ThomP2Jer743-182#*\a6 \iRsa cir`6KpP\0oHdeb s cPredib1 eNbshbl @Fou/op2n Wolfgang 2v@6Go %74r9 32h^!Vk mop&$raia0GcovlCaPT phua|102v:`L cpGga @Mg1 r j WhiHG1"#8Z7`pn0 dinъe. X6R/FitzgerJaЄK0&ed0:1917-196騏gvTg soS2-- and often nothing so strange." Author$ = "Daniel Webster, 1782-1852L Case 21 Text_`In compos, as a general rule, n your pthrough every er word! have writ;no idea what vigor it will gi1\styl Sydney Smithd71d45dcElse ESel`ect ubPrivate Sub DoTheInsert() Dim Length ( FVL 1 ToaRem w N w WBasic.> Mid/8, Lk2L 2 " vF4*YOpt &B@.~c'YSet YearY1 &B@0(1ZGet YearY2 &B@0HFSYear &B@,tion@OXOKButton &B@ wX CanButton &B@4OMsg &B@d &B@8ark .N]XF &!<!>.l.D l &!@%>'@ @KTLH l!BKT1700A@DKT F &B@2SnSnopLondYr$ l &B@ohLondYr$ &%r' Fi8]# MsgBox Id$ + Str$(Act) + Str$(Sup)'Z ^KT CanButtonClose &B@X CanButton &B@NSYear1700 &B@XOKButtonSet &B@XEOKButton &B@PMsg &B@XYOpt &B@fKT \Y1KY2KTYOpt &%fKTSYear &B@N Msg &B@XOKButton &B@PNKTSYear F &B@XOKButton &B@PMsgYear above retrieved from file. &B@XSYear &B@NSnOKButtonKTSYear &%n' l lA@D CanButtonCreate &B@X CanButton &B@NMsgYear l  saved in file. &B@X CanButtonKT'ZSnSniAttribute VB_Name = "LondYear" Public Sub Main() Dim YY WordBasic.BeginDialog 344, 1on[New/File]:  Funct@ions",.DTestr YGroupBox 10, 6, 20]019KSeason S tarts=OpgC "Y ! c!Butt$39+2481"SLet[VY1 4T49 G 2 pTextp325, 78pSp WKU6758:2O  Cancel127}1 N' v115BACMsg G2EndÀ As Object: Q CurValues.UserYY H(Y Sel Case-1J .~ 0H$Yr "1700>BDP@;i@sYr$Elseσ?@9% I Bubr8ivaB"(Y$6DocumentVa*tr$_Y@!PE C*ACV[h $](C A e )f v(Id$@, Act,p@b?Rem &@ +tr$()eSuA@.)7)2GGDlg S"WfClose9jF (s 6 Sbn` hBm  4qVisible "hDO $Aj adė, A\K2c &,"}YE@q(c 8aa fa$+SDe5&?a ,d`"A4 above reeved from f."&'AB| BJg Y${ddz!:`V獁o5reJH  dext " "@ + " sain G@*OYTNQ y !yY!y!!!!1"Y"y" """#I#i## $$$%)%%y%%d4(XX%(8%:%:%h$ @hh:(X %(8%(%(e%:%h$ @hh":X%h$ @h h@(X'%(8%(Y%(%: %: %h$ @h h@(X(%(81%(Z%(%: %:%hs*%b @ xxMEP> LLL<<<` "p` `k@@l N`l p}O D`X Hk Yl \DFF`$k$ Z`kP ***Y\pn I^ I` k .NPlh<!0p>%pppppppp@X@X&DF@h @X @ H @88 @P( @h @ @ @ @@ @ @ @ @( @ @ht @ @d h@` pPH`8H`@Zl pH @X (@xH P &FD @D @4 @ $ @ @ 8@ @ x@ X XpPFxX & @@t @d @T @ D @4 @$ &H (  8 @x @( h @@ X @H P1t<$*\Rffff*363c5ff564*\R1*#c1*\R1*#17b*\R1*#c1*\R1*#c1T "H40:X",@,@$: &:((:P&@x  01    ((0@HPX ` "h)p B3 B  (  "("@(X(x((((( "0 (H (` . ( 6( " 30 H"(X"8:   ]@X London[New/File]: Year FunctionsLondYear.DTest &B@( eYear Season Starts &B@$ @h h:(X%(8%(F%(%:%h$ @hh:(X@%(8O%(X%(%:%h$ @hh:(X%(8w%(X%(%:%h$ @hh@(X%(8O%(%(%:%:%h$ @hhh$ @hh.h$ @hWA4h61 @h$ @hWBlh5ltt(X]3 qWdd(X]3C`` /`d(X]3( F%h$ @h h54btdl`hd0):h-%l @x$ @x.x40$b xt83:D,%:d-%t$ @t$`1xt5$X8(bxt$4 (XlXHH(X]3>(:X%:$!%D$ @D"D":X%D$ @D#D(:X%:$%D$ @D"D(:X%:$$%D$ @D"D(:X%($%D$ @D%D(:X%:$%D$ @D"D(:X%($%D$ @D&DH(X]3Cl 0nl0:X%D$ @D&D(X]3":X%D$ @D#D(:X%:$%D$ @D"D(:X%($%D$ @D%D(X]3.:X% F%D$ @D"D5(:X%($%D$ @D%D(:X%:$'%D$ @D"D":X%D$ @D#D l03:$(%:X%D$ @D`1hD5lhC /(:X%:$)%D$ @D"D":X%D$ @D#D::X%*lh*#+*F%D$ @D"/D5 l0 (Xl8Pb lHhDb~\rU $ `( `0$ `0 ` 0//nrU~|  qB!yAy917a"I 9)I0ɨ3Iqq)0  T LondSwap}"__SRP_1aR __SRP_1bLondSet _1  jB@ &B@ A@X  jB@ &B@V jB@ jB@Z?$` b j!\B@^$` j!d(f WordBasic.EditCut' WordBasic.EditPaste SetColWidth (RightCell$) WordBasic.CharLeft 1, 0 WordBasic.EditPasteVK2KT  jB@ jB@h jB@j?$` b j!\B@^$` j!d(fSPnHo@]XColIn = WordBasic.SelInfo(16)%If ColIn <> 1 Then WordBasic.PrevCell  jB@]pF &!:%.l l &!<B@ l!'    &%h'   jB@WordBasic.NextCell &!:%.l l &!<B@ l!'    &%h' o$ MsgBox leftCell$ + " " + Rightcell$ "$  &B@WordBasic.PrevCell  jB@ "$  &B@ &B@ &B@Do ~"$  &B@oHAttribute VB_Name = "LondSwap" Dim LeftCell$, Righ, Public Sub Main(fping$)l Rows_ColIn qiX ' This Vs the 2 row cs con tentsWordBasic.ScreenUpdat (0T%elInfpo(15M8If  -1He] &MsgBoxon: Not in a stage t@able (\s ).tExit Else1 <> "V"@ And (<> 1 Or S43)8CcC S&InC6CE%If]Get @WidthsU'F{+ "@+ʑSelection.Key Unit:=wdA \%'PG2G hNexA- Case«"W", |"1hd8EC@0JTAx umNEditCut  :HomeN:`APasteS]@fCQA-0H!s.B&U@!b:=Inche@sToPoi`v(0.2)`ulerStyle:= awdAdjustNon Ab.SpaceBetw`}#.s Vm "' )'d",Char\ 1, `C(8+N{L2L-?_;!)M#Inserr@/@ 44! 44sb!a t Priva`!Ɏ~( >$'JHPre>v&)wcw As ObjT: H =h DialogRec.b@Ee(Fa @VCurVaplues c\w.h k [&$"]'Len) X- 1 )dJ'7ggVO.OO OBڂ]'e,pkn('':a( Remj 4nlE :nъ$ R-PChr(34PH)(Ool:=YN2$N! Gk(W'  W$)  T"(8%H$ @H H((8%H$ @H lH((8%H$ @H \Hl(8]3":8 %H$ @H HJ8 =l(8]p\((]<'5 ":8%H$ @H HJ((8%H$ @H LH 0' H$ <H H6((8%H$ @H LH Cl0l0 l0l#0/H$ @HHH$ @HH0' H$ <H H6H$ @HHC /0' H$ <H H6H$ @HHH$ <H |HH$ <H HJ?7$ lH$ <H p h)H?7$ lH$ <H  @)Hl0l00' H$ <H H6H$ <H 4HH (| ~xME$> LLLL<(<,<0<4<8<<< 00X% "`xkp@@YJ @Ll @N\ @PL R`kBY 8Not YB@2@Pl `l hO T`J V X`8kaY~ ҀX@Ҁ@H(00X00X00X00X00X00X00X00XXp8j&@h @X @H @08 @( @$ @H @` @ p00xHH` &RjTX@xH @`8 @( @ @ @ @ @ @ @ @ @ `b@ H`0&@xl @\ @L @H @8 0H @8 00X  1t<$*\Rffff*103c638cde*\R0*#f*\R1*#e9*\R1*#eb*\R1*#2a*\R1*#129*\R1*#c1*\R1*#17b*\R1*#1ed " ( 0 8 *@ "p((2"(;2"(`h(p  * 0( , 08P"X h x0  0    2J?@ X x & "   0  8 H2JX?  " $ , 0("7@-h D 0 5- D @ " H (PDx 0D(( " B(HX]0X0]]]' ' $ This Swaps the 2 row cells contents &B@. &%'L6  &%'Ne = "E LBy$London: Not in a stage table (rows). &B@2| JV L Ne$London: Not in a stage table (cols). &B@2NN|d &%'POhOkp  A@RE#MsgBox LeftCell$ + " " + RightCell$EN  jB@FtN &%'PG$G%If ColIn <> 2 Then WordBasic.NextCell JWK1KTA@TCKKT &B@V &B@$ <H dHJ?7$ lH$ <H p h)H?7$ lH$ <H  @)H4\bL\l(H0$'(H h$ <h h6H(5fX%h$ @hWHB(4 h6H(- @h$ @hW(h5( WH`' 5HD:%l @ Ji8%h$ @hH`' h5H0$'(H h$ <h h6H(5fX%h$ @hWHB(4 h6H(- @h$ @hW(h5( WH`'5HD:%l@Ji8%h$ @hH`'h5H ,bl hH(0   HB F\"l lL%H$ @HH6lLDH$b HlL\rU  (`0,`00$`(`90nrU~| )()y{{ Aqф AyɅ IyBHT -- Bull Tavern + rB-L -- Bullock-Leigh Booth+ rBOS -- Bow Street+ rBPT -- Blue Posts Tavern+ rBR -- Beverdige's Room+ rBT -- Buffler Tavern+ rBUH -- Buckingham House+ rCA -- Caverley's Academy+ rCC -- Chelsea College+ rCDR -- Couch's Dancing Room+ rCDS -- Clark's Dancing School+ rCH -- Charterhouse+ r%CH H -- Cheshunt-House, Hartfordshire+ rCL -- Chancery Lane+ rCLA -- Clafton+ rCLAR -- Clare's Academy.+ rCLH -- Clothworkers' Hall+ rCLK -- Clerkenwell+ r$CLK CS -- Clerkenwell Charity School+ rCOH -- Coachmakers' Hall + rCORH -- Corner House!+ rCR -- Crown and Anchor"+ rCRT -- Crown Tavern#+ rCT -- Castle Tavern$+ rDG -- Dorset Garden Theatre%+ rDR -- Dancing Room&+ r"DS -- Dancing School, Queen Street'+ rDT -- Dog Tavern(+ r!EBH -- Earl of Burlington's House)+ rEEH -- Exchequer Eating House*+ rEGR -- Epsom Great Room++ rEHL -- Epsom Hudson's Lane,+ rENW -- Epsom New Wells-+ rFalcon -- Falcon Inn, Southwark.+ rFE -- Mr Fearnly's/+ rGB -- Golden Balls0+ rGBS -- Great Booth Stepney1+ rGH -- Girdlers Hall2+ r%Globe -- Globe and Marlborough's Head3+ r GO -- Godwins4+ rGOLD H -- Goldsmiths Hall5+ rGR -- Greenwich6+ rGRT -- Great Room7+ rGT -- Greyhound Tavern8+ rHA -- Hampstead9+ rHA W -- Hampstead Wells:+ r#HW GR -- Hampstead Wells Great Room;+ rHAY -- Little Haymarket Theatre<+ rHAY GR -- Great Room, Haymarket=+ rH&P -- Hand and Pen>+ rHC -- Hampton Court?+ rHDR -- Hill's Dancing Room@+ rHDS -- Home's Dancing SchoolA+ rHH -- Haberdashers' HallB+ rHIC -- Hickford'sC+ rHR -- Holt's RoomD+ rHorn -- Horn TavernE+ rHOUN -- HounslowF+ rHT -- Horshoe TavernG+ rIH -- India HouseH+ rIT -- Inner TempleI+ rJSH -- James Street, HaymarketJ+ rKAT -- King's Arms TavernK+ rLR -- Long RoomL+ rLS -- Loe's SchoolM+ rLW -- Lambeth WellsN+ rMA -- Mr Mayor'sO+ rMBS -- Mrs Bellamy's SchoolP+ rMDS -- Mrs Defenne's SchoolQ+ rMEG -- Mile End GreenR+ rMF -- May FairS+ rMH -- Harlborough HouseT+ rMO -- MoorfieldsU+ rMTH -- Merchant Taylor's HallV+ rNH -- North HallW+ rNWE -- New Wells at EpsomX+ rOS -- Orlibeer's SchoolY+ rOSG -- Old Spring GardenZ+ r"PC GR -- Great Room, Peter's Court[+ rPH -- Pewterers' Hall\+ rPR -- Powlet's Room]+ rPT -- Pye Tavern^+ r,Pun SML -- Punch's Theatre, St Martin's Lane_+ r(Pun CG -- Punch's Theatre, Covent Garden`+ rPW -- Pancras Wellsa+ rPY -- Palace Yardb+ rRI -- Richmondc+ rRI W -- Richmond Wellsd+ rRomer -- Romer Taverne+ rRDS -- Roussauf%|xME(6 << <` "`x+@Yp `r 8(np%p@`0H@x $0#tH1t<$*\Rffff*173c638d55 "   0Ph0Hh   "(Ph  &2204h ,0$ *H$x$" ( 8&X$"&&$ *H,x 4"(&H(p 2&"$@"h"* 0 8 0X , & ( $ .0  `   ( " 4 ( (H p   $  & 2 .X . " " ( *0 &`     "  " 8 X,x( "8*X*$&(,Hx(&&0$@"h:6"( Pp$$.$"8"`2$**2H&&& ,8$h0"&B&X$"(" 0@$p &"(8@HX r pIKT(Pick from List) + rActors+ r Actresses+ rDancer+ r[Dancers+ rManager+ rManagers+ rMusician+ r  Musicians+ rOther Employees + r Proprietor + r Proprietors + r Singer + r Singers + rComment+ r+ rOKT0(Pick from List) + r Advertisement+ rComment+ rContemporary Comment+ rDocument+ r First Edition+ rReport+ rTKT(Pick from List)+ rDL -- Drury Lane Theatre+ r#LIF -- Lincoln's Inn Fields Theatre+ r#King's -- King's Theatre, Haymarket+ r%Queen's -- Queen's Theatre, Haymarket+ rAC -- Angel Court+ rAVT -- Anchor and Vine Tavern+ r"B+S -- Barber's and Surgeon's hall+ rBCA -- Bird Cage Alley+ rBDR -- Barker's Dancing Room + rBELH -- Bellsize House + rBF -- Bartholomew Fair + rBH -- Boman's House + r's Dancing Schoolf+ rSa H -- Sadler's Hallg+ rSF -- Southwark Fairh+ rSG -- Spring Gardeni+ r#SGR -- Symond's Great Room, Enfieldj+ rSH -- Stationer's Hallk+ rSHG -- Somerset House Gardenl+ rSt Alb -- St Albans' Streetm+ r#St F -- Sturbridge Fair (Cambridge)n+ rSJP -- St James's Palaceo+ rSML -- St Martin's Lanep+ rSOU -- Southwarkq+ rSPS -- St Paul's Schoolr+ rSS -- Seven Starss+ rST G -- Ship Tavern, Greenwicht+ rTC -- Tottenham Courtu+ r"TCJS -- Tennis Court, James Streetv+ rTEC -- Tennis Courtw+ rTGB -- Two Golden Ballsx+ r3TH SOU -- Town Hall, St. Margaret's Hill, Southwarky+ rTTT -- Three Tuns Tavernz+ rUM -- Upper Moorfields{+ rVH -- Vintner's Hall|+ rWCH -- Wax Chandler's Hall}+ rWey's -- Wey's Home~+ rWH -- Whitehead+ r!Win -- Winstanley's Water Theatre+ rWINH -- Windmill Hill+ rWindsor -- Windsor+ rWS -- Westminster School+ rYB -- York Buildings+ r York -- York+ r+ rSnoAttribute VB_Name = "LondSet" Public Sub Main(\_$, Array__$()) ReDim$135(Select Case h "I& 0)t(Pick from List) &1&Actors 2resse3DanceZr :4 5Manag6 7usiciaZn:89Other EmpPloyej1Proprie 2.131Sizn71MNC`omment17CN@$}OM'}dvertise1T"1Contemporary T 1Docu4First EditiouRe=T@>ImDL -- Dru+Lane The0atreI =LIF Lincoln's Inn Fields C>K@| $ , HaymarkæC#Quee Ec&ACA@Lrl@/ura#& c&AVTcchor @and Viaa>,jB+SBarber@Surgeohall$cmBCAbirdge `AlleynBtDRd kb % 0RoomoBELHellsize Hous4 pB4@tholomew FaifqB oma' 8BH"&BuPll T$16B-Hock-Leigh BooLth*4BO*oXw SM @14BPlue Post Lod4(e 8dige4.(3fflp2U"uck1ham/-v2C=C <Academj=2lCBSChelsevaS@BgKldBCouch uB2c3dCD")ClhSU[o*S24C"CharterhG23eshunt-"CurtfordshiC6CB@ y a?22CL1 ftMV)2SA -4.C1Clp&woDrs'`EK93LK3Ckenw@4 3T@C$er Pity o3DOoachma4SEEExcheqbuEat@=4EGBEps,Gr@qY4EHâ/Hudsa 0b4ENWaN-YW]4CFaplconv, Southw>FEMr Fearnly'K54sGBAGtolBlKsGBR0Sr\epn{l5GrGn5 s85#Glob.etMborougNHeaJdI 5cGO d(win 5cGOLD 0 smith?5P @ici5G4}d5G) y Tnd_*(5HNHampst W 6 5HlW  6HAYLitǑ?o=$(6cfat"/6hH&P1H1PJe6cHCCmVpP:ߙ6HSEHXilll}6HEH0CF$6cHB"Hadas_Z(6I o{46AHolNt DorB12SWe}H3KW3hiteYM2CWin ` stanlrWa0d \{3WIctiPdm 3SsoRQ[Wb$WestmiLnsO/13SY b!YoMBuildpSK!3qG;s0Caslse Selectub __SRP_28__SRP_29V#{LondonLondAbbrEyن! 9LN1O PPQQQ1RRAS TyTTIUU)VVViW XyXXYYYaZZi[ \Y\\I]]Q^^1__ `i``IaaAbbac dddeeIff)g hQhhiqii1jjAk lllYmmann1oo papp!qqrrr9ss tt uquu1vvwiw xyxxyyYzz ||!}y}}9~~1y{ !9 yфaɅiɆ aщ9i9 8 l Cx lx0;;;;;;;; ; ; ; ; ; ;;; lx0;;;;;;; lx0;;;;;;;; ;! ;" ;# ;$ ;% ;&;';(;);*;+;,;-;.;/;0;1;2;3;4;5;6;7;8 ;9!;:";;#;<$;=%;>&;?';@(;A);B*;C+;D,;E-;F.;G/;H0;I1;J2;K3;L4;M5;N6;O7;P8;Q9;R:;S;;T<;U=;V>;W?;X@;YA;ZB;;\D;]E;^F;_G;`H;aI;bJ;cK;dL;eM;fN;gO;hP;iQ;jR;kS;lT;mU;nV;oW;pX;qY;rZ;s[;t\;u];v^;w_;x`;ya;zb;{c;|d;}e;~f;g;h;i;j;k;l;m;n;o;p;q;r;s;t;u;v;w;x;y;z;{;|;};~;;;;;;;;;  (4bx krU (0(      !"#$%&'()*+,-./012345689:;=>@ABCDEFGHIJKLMNOPQRSTUWXYZ[\]^_`abcdefghijklmnopqrsuvwxz|}~`9Q0pnLSKrxME(<<< < "`88HXhxt%1t< " ( HX London.dot &B@v London.dot &B@xo0(qAttribute VB_Name = "London" Public Sub Main()PWordBasic.AddInf.dot" , 1 FIn8StaJ End] ,PxME (6 L< |``Hk@Y~ `DJX`z%````````&@x @h @X @H x @h`0pPpXt @d @T D p`X1t<$*\Rffff*123c638ce7*\R1*#c1*\R1*#17b ")( B 0+8X h LondAbbr$ ~ &B@y#oP` LondAbbr$ &%' i Attribute VB_Name = "LondAbbr" Public Sub SetX($) WordBasic.8DocumentVar$", ` E ndFunc@tion GR$~(OYY(y$"4TMYrU~| __SRP_1e7"__SRP_1f^<LondIndent25?LondIndent00SV{ %d0):h%l @x$ @xx40$b x0 `  frU (`0$`nLSxME(<<< < "` 88HXhx%1t< "   0 P Xh  l1 Macro* Macro recorded 09/30/98 by Thomas Minsker j!|?$`9qxophٰAttribute VB_Name = "LondIndent25" Sub Main() "' l1xME(<<< < "`88H%(p1t<"  ( XB@"M,Lo`XZAttribute VB_Name = "AutoNewUnused" Sub Main()  LondCreateFile.4 End P lsC9xMEP<<<<< <<<  "`@PxP@tPpx@` X%x\jHX @H 2@8 @( 2@ p( @ @ @ \H@ @ @ @ 81t<"  ( 8 H X "(h 0DsDs<k80x ]@]X]p]0.7' \oh`FAttribute VB_Name = "LondSwapCon1" Public Sub Main() Dim Narro wCol$GutterWid"eRemvdepr xp0.7gD2#L4.4Be`tweene.0dWordBasic.call.MAIN", "V .Selection.HomeKey Unit:=wdRoBw(TabloumnMth B:=o+ Chr(34), SpaceYs:= `RulerStyle:="0TNext0:=1+E}Eq?"nlEnd LS xMEJune00 GotoMacrosFormatting&p__SRP_2 P<<<<< <<<80% `@@@@@@@0`@x@x @t p8`  ic@( ct XA@ ,G@ _A (`@{2DP Q @ wE @  0@ lsE @| Hl @\ LzExL @< , @ xE @  @ rE8 @ h < @  @ ` `p@X@1t<"  7 *0 $@ P ` px      {" $    @  jB@ j!lB@n j!l {9d\5p(d9r 9t99x9z9|9~9qH j!lB@o0(o j! 999q8@Attribute VB_Name = "June00" Sub FindNextLeftBracket() ` ' Selection.MoveRight Unit:@=wdChajter, Coun &1th.ClearFormatting)Wit _ cXE ` 9*\R1*#c1*\R1*#17b" X `0h7"  (/0*@7P"  /*"  /* "  $&: H PX *p` &F      !"$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`acdefghijkmnoqrstuvwxyz{|}~ "  (0!,W\q"  " ! 7,W( $FX7 $F  "   (0!,W\qh"  " ! 7 ,W@ $Fp7 $F        !"#$&'()+_,-V/?123456789:;<=>.@ABCDEFGHIJKLMNOPQRSTUWXYZ[\]^`jac5defghiklm1opqstuvwxyz}~ " ( 0 $8 HPX" ` h $p "  0,Wh $F$F"  0,W $F@$F "   *(38 HP $X hp , [9xME> <<<< <<<<< <$<(<,<0<4<8<<<@`@ j`d@% X`d@)x `d@-XxXhdPx @h  d $ @ C @ H @ TCx @  P@ C @t d @T 8D @4 %h$ @  @  @ 0 @ 8 @  @ Xd @x @h d j8 $ @ ( @ X @  @  @  @t d @T HD @4 x$ @  @  @   @ 8  @  @ @h xXH1t<2" **k $8 HP `h p x    {" **k $  08 HP X ` h p x { "  2"  28"H P2`X  j!lB@n j!l9d^p5p(d9r v9t99x9z9|9~9qH j!lB@o0(LondonMonthEven % j!l( Ix j!lB@nLondonMonthEven % j!l( j!l9d^p5p(d9r v9t99x9z9|9~9q( j!lB@o London Goto$f(ho London Lines$f(hoXo London XEs$f(hAttribute VB_Name = "GotoMacros" Sub PrevMonthGoTo() ' Selection.Find.ClearFormattingFStylAnveDocu ment.s("Londonk`Even"khWLL<<<<<<<<@  ` k   p%  P `J8 .`tJ &`J (`J 88 `J c ,`tJ  4`pJT :  `J m (`JGj2  x`J# < `J  `J `J+I  H `J VV ` k& d``J%p 6x `J Z x`J9 `\J@x @t  `dJBB `zJHyY h8YPxP 8 @8x`8 x  `J]@d @ T @D 0@4 @ $ 8 `|J  `Jr`x8(P  @8 x 8Pxh@  @  @ @x @  @` k!@ H x ` 0 jl@x @ h @ X @ H @ 8 @( @ @ jR@x @P h 0`pJN 8 8  @h X @ H @ 8  @4 @$ @ hx( j @x @t p`@` @ \ @Z @8T @PP @L x@< @, @ 0@ @ @ @  @L @< @,  @  @  Hjj0x @h X @H (8 @( X @ pRx L@h pX @H 8 @4 ($   ` kp @ (  @   8p4PXx @h X @H 8 @4 0 @, @( @$ @ ` @   xh @x @t p` P`\J @ (8H,`1t<$*\Rffff*093c74cf4e*\R1*#1f*\R1*#158*\R1*#d2*\R1*#d0*\R1*#6c*\R1*#cb*\R1*#c6*\R1*#1e*\R0*#14*\R1*#12      {"  *3  $  08 HP X ` h p x { " 0 8,W`  0 *  (0@*WX  <  @ "<H Lp 7  77 ( "0*W   "F(  P  ` 6 `Wp X  ` X $`p 4x0   / $^   0 5 5@ W  $F  @ @ 8  <`   ?  / * 5 5  8 7H 7h   N & @  B@  5(&^0 "< 2   " Xx`" hp"   E 7 "< 0    %     "  "<XA2  h p    8  (<<0 H PX" "055"70 "  77 De070P&^7<8" X `77 Deh070p$^p7P< x"  9 *<7I $ (# 8@ H P X ` h px" # (#*@#<P# $h# x## ## # # # # # ##{#6h$7#$$" 0# 8#7 $2@$$`$ "  6?`  8 X*7 $ `  @H P  ` h p x X" (9H!<`!x!/!!9! & $ & 8 , & &  , (( h $ *  p " ( P    " 0& X&  0  "  `" & ,  @  & $  $ @ h " " ! * 0 & ` ,   & ( @ h &    0"$ )$$ )$ 5$ $$ ! j!vv CurShowHideC@f 99q  !!!T !!(T  CurShowHide jB@o@8 j!vv Index1Top !B@f$  jB@  j!vv Index1Bot !B@f  Index1Top jB@   jB@F j( &B@  Index1Bot jB@k Frox j!vv Index2Top !B@fL  jB@L j!vv Index2Bot !B@f  Index2Top jB@  jB@L j(MT --  Index2Bot jB@ -- oh j(L j(AZ -- @ $ !( !B@ o8  jB@L,  jB@@toXP $ !( !B@ o  $ !( !B@*o8P  j!92qo j!92qo  jB@opA@0x  jB@A@4o0 j!vv PageBreak !B@f  PageBreak jB@ j!vv PageBreak !B@f  PageBreak jB@x  PageBreak jB@  PageBreak jB@8 j!lB@n j!l!92q8 j!l9d 5p(d9r 9t99x9z9|9~9q j!lB@o  j!lB@n j!l!92qp j!l 9d 5p(d9r 9t99x9z9|9~9q j!lB@o" Selection.EndKey Unit:=wdStory" Selection.EndKey Unit:=wdStory  jB@@  jB@ j!vvTabTbeg !B@f j!' B jB@h  jB@  jB@ j!vvTabTend !B@f j( TabTbeg jB@ j( jB@ B % j(  jB@ jB@ j!Normalk LondonPlaySep % j( R jB@( jB@Zo B@L R jB@d jB@( H   jB@@f   jB@333 9Z9\9`q B@bf3̙o j! j!fkh ` '   jB@ j $G'j  jB@ k $` j!( j!B@ !B@* R jB@ R jB@ jB@  jB@  jB@    jB@  jB@ End IfdH k@ $ !((  Selection.Font.Reset Selection.SelectCell j!vv TabCursor !B@f  TabCursor jB@2 Selection.MoveLeft Unit:=wdCharacter, Count:=1) get para style and move to start of line5see if start of a paragraph and then get rest of cell build new table and paste in: take care of style, first line indent, and paragraph mark  If Selection = " " Then ElsejB@ $d jB@A@&LondonPlaySep1pt % j( A@&- Selection.MoveDown Unit:=wdLine, Count:=1 j!'   % j(x0 Selection.Delete Unit:=wdCharacter, Count:=1 Selection.TypeParagraphk5 Selection.Style = ActiveDocument.Styles(ParaSty$)H Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend: Selection.MoveLeft Unit:=wdCharacter, Count:=1; Selection.MoveRight Unit:=wdCharacter, Count:=1` j $rod0k( jB@/01 by8 oA@A@@A@. jB@jB@A@,A@A@.o jB@Z jB@   jB@  jB@o@  jB@ R jB@ R jB@ j%B@HA@  jB@ j%B@A@,A@A@ jB@ jB@oA@,A@ j! LondonPlaySep j! LondonPlaySepd   jB@  jB@kdkoLondonPlaySep1pt % j(  jB@oh j! LondonPlaySep j! LondonPlaySep  jB@  jB@  jB@ LondonPlaySep % j(  jB@5-8191  jB@ThisDo  jB@LondIn  jB@pecLcC j%B@Heaso j%B@HdSpeoPo?Ad333333?Ad $`9^x j!lB@n t j!l!(r j!l!pB@n  j!l!p!(r j!l^d9d9r v9t99x9z9|9~9q  j!lB@o`X !!(TH j!lB@n j!l!pB@n j!l 5p(de9 9xod9r v9t9k9z9|9~9q  j!lB@'' afterpiece after^-pieceA beginning be^-gin^-ningA Betterton Bet^-ter^-tonA biographicalbio^-graph^-ic^-alAo 9d Bracegirdle Brace^-girdleABicknell Bick^-nellA Centlivre Cent^-livreAA chamberlaincham^-ber^-lainABradshaw Brad^-shawAcomedies com^-ed^-iesAcompany com^-panyACherrier Cher^-rierAcomedycom^-edyACourant Cour^-antADanchin Dan^-chinAdancing danc^-ingAdanceing dance^-ingADecember De^-cem^-berA decorationdec^-or^-ationA discussiondis^-cus^-sionAor entertainmenten^-ter^-tain^-mentADrydenDry^-denAEtherege Eth^-er^-egeAmentAepilogue epi^-logueAItalian Ital^-ianAextantex^-tantA instrumentalin^-stru^-men^-talAgJanuary Janu^-aryAJohnson John^-sonA Leveridge Lev^-er^-idgeA Lincoln's Lin^-coln'sA mainpiece main^-pieceAemajesty maj^-estyAperform per^-formALondonLon^-donANovember No^-vem^-berAPurcell Pur^-cellAMonsieur Mon^-sieurA performanceper^-form^-anceAr presumablypre^-su^-mablyArm publicationpub^-li^-ca^-tionApersonper^-sonAquality qual^-ityAprologue pro^-logueA September Sep^-tem^-berA Shakespeare Shake^-speareAtragedy trag^-edyA VerbruggenVer^-brug^-genAWilliam Wil^-liamAVanbrugh Van^-brughA advertise ad^-ver^-tiseAviolinvio^-linA appearanceap^-pear^-anceAABCDEFGHIJKLMNOPQRSTUVWXYZ $ BartholomewBar^-thol^-o^-mewAFebruary Feb^-ru^-aryA following fol^-low^-ingAOctober Oc^-to^-berA !!   !!(ld!  !(lk! !!(T!  jB@  jB@|@"|0" j!vv l#INDEX \f 1 \c "1" \e "{ " \z "1033"d j!B@f" j!vv l#INDEX \f 2 \c "1" \e "{ " \z "1033"d j!B@f" LB@bL"" LB@bH#^&5p(d#(  j!lB@n  j!l!(r j!l ^d9d^&5p(d9r v9t99x9z9|9~9q(" j!lB@  jB@k(o!  jB@  jB@o j!l!!A@ $o$A   A@2 j!' j!'@$Attribute VB_Name = "Formatting" Sub GoBeforeTable() ' Selection.HomeKey Unit:=wdRow DMoveUpBParagraph, Coun51 End puAfter tApplicavBrowser.@Targetwd4/Next@toPrevCQP+ioust>o]Q9DF``MyShowHid}@With A~veDocument.Bookmark@,A.Add Range:&=G, :=p"CurFDefaultSorAuBy n#BdenFalseA1A)CC,Window.Pane.View.All@Not6 _ CG:GoTo WhaHT?^IndexGen1'F@ StoryM '?Oo6="1T op$6'FielDdszTypAwdBEmpty,$ Tq:=*"INDEX \f 1 \c ""1"" \e{` \z1033`""", `e`veǖ:=TruDAc"bTools.ConvertTheAFilExitÐA.*ᘐLeft&Ch@~c )!,cb1Bot,-KQ4Righ :ExtendModG+?a# hxLa2aawdh?5<52aҠ7a%a2aa )a'0 !00sOcB{b 20(Vfon./1=a_+/1/1r_= *1L1DoPageBreak1 Rz7cRq.,0p;'>d tUng @cePlay Ho(o(gk(oScG --\ )&lo#two &7b 4Ѱ%F.Cleardl/_7!70_7 _7.3")2Replalce  wardpGWكPndAsk/MatchC(0.25v!i30_n_.3OHyZo|ne(o=}w.a 2g$UpVy y5|?qd s j q.AutoP5-vCap\V!2Consaivemi2  '߼vManualh$q J]YN6 GotoOf8InBRTT111 JT>_kTk33Qɴ Selection.TypeParagraph En0d If,GotoNextTableHPOfT.InRightCell:87pCopyKPrev0Past Backsp|ac4usp(1). D:8 m(Sub  JoinWith()'n HomeKey Unit:=wdRowMove QU %|%ܑPhcter, Coun21HCVBeforePlay1pt'9 GLeftF# If Style = "L ondon'Sep" Or _ C  ThenElsD_+<A+/a:%A veDocument.s(0"[;:=`;BfJxj(?2_?`C_?%Ec3_?_?NE_?_??ƿ_?]?>wd 0.> ngeXEsToRedH~ISWi`nw.Pane.View.ShowAllrTruȧTF@.ClearFormattingc 0lE'ے9C /`? Z<YdSYeY%Ho:Q .o:o:b:/T TR::OZ :=::/2OZd3Z*Lisa)zÃplitSpec$iawdqNone(wdNls *9.View.Type = wdN ormal  End If,ActiveW@indow.0PaneShowAllFalse CaOptionHyphenWords("advertise", ^-^-)5fterpiec36 ^-5ppearan5p2^-7BartholomewRP^-o^- beginningbe^2-^-8etpton7et7ericknell3biographica@(A^-ic@Fl"rac7rdlaB8 dshaSrad^-BX Centlivfr^- chamberlaiBQ^-YherrierQC^-Bdy com^-e] ies [ pan Cou@ttrdb V58 D hc+@^-c  {8ADgce +7`ecorad:e@Xof#yis0cussisu"DrydeK ^-a7X`Om  en{Anz4epilogu``Y8EtWeg"` S!xta9exaFebruarS`@eu`Mxfoll\owdAwAi`nstruA'ci'!&zItaliaB5A x8JanA~JoxhnsA@{LeidC3C3Lincoln'BTyo`Lo@&dm(uu>|majest"  6MonsieuUNove@N@w\@OctoB,Op@t`Cperf 9^-_ V S:"1"resumabl"prP~sP6x@BprCublTpub9iP&a6QPur>cć0qu9S#9SeptF  a)Shakespp?BP'tr*&Ask 0&A0?GG-(G&x &= h &&SWq߆?"SY <> M RighaType"iAuk eP|asx[U¶ ޴on.TypeText @:="-" Selecti@Extend TGoTo What:=wdBookmark, NameStartNumLineEnd Sub  Move1stWordU@p() 'atTheViewi@ngModePlaceHold`erSet*HomeKey Unir #}"I Right$Character, Coun.1, { If = Chr(11) fn ' new l c( is a numbered V "GEls!Goto IfFind9iOfi"N (True@dC tZMInStr(F(), " ")P0OC "G!AFLefi ЀU&/Uf1R Kp.ClearFo`rmatṫ=With. .~,- Repamment`w8ardE,Wr$ap wdStopsMat@chCaseFa*[Wholeildc` sS{dsLik All  =K - u1!"~zA0_z zs^szW{K{{ s|"L_|q|҄|ϡ'!Z}O3O3O3ococODq I V[` a`S="Wow.Pane..WShowAll = False  If ActiveWindow.View.SplitSpeciawdPaneNone Thenpx rR!TypewdNormal9E|C}8nd If ESub  GoDown5Line@s() 'dSeleon.-Key Unit0:=wd Mo ve" , Co4un5PlaceHolderSet Goto .CLeftCCharacterE1~ 1TextPartOfNumbe retHomeD-83Righ3, Exten>dfCCN() <> Chr(11) .q Ki_BGF.@ClearFttingWith .z@"^t^t"Repment ward`CB WrapwdaAsk cpMatchCasa| bWhole Woildcs SodsLikv ! !/(C.Execut$g!H:- V(g#BJuheCurr5xiHP> <<< "@8% `|J  H`JY  Y `xk@@H@H@x X`X @H @8 ( @ p X @ @ @ @H 1t<$*\Rffff*253c638f92*\R0*#1d*\R0*#1e$*\Rffff*263c638f92+"   "$"$@"$h"$ 8 H"$"$"$X"$"$"$"$0"$X" A"W? "(@Xp    @Dec  Dec  A170' v1701701' Mar  Mar  ADeoh   jB@# 2 j!vv  !B@f  %B@o170' 1700' Sep  Sep  AOct  Oct  ANov  Nov  AFeb  Feb  AApr  Apr  AMay  May  AJun  Jun  AJul  Jul  AAug  Aug  AJan  Jan  APHo] D A@<( B@January+ February+ April+ <May+ June+ July+ August+  September + November + March+  @December + October + [$Attribute VB_Name = "Months" Pu blic  <LLLL<( `p`k@Y `{DY(`XkY % h`tk  `tkh(jh(h( P xh@t h8Pxp @`@t @Pp @` @\ @X @(Season Openi t@Xx @t oduc@`(X multiple Thte@@x @pt 1st@d ason@` h1t<$*\Rffff*3;3c5ff860*\R1*#cc*\R1*#cd*\R1*#c6*\R1*#c1*\R1*#17b" B B(0H8PX`h " xB     %(@oXH  %!' z( ' iLondYr$1700A@(oHhi8LondYr$$ ' Attribute VB_Name = "DocVars" Public Su b Set\umentp(Dvar$, DVal`$)  ActiveT.V@iablesb) lur E$nd^ lFuBnBon G q$@eOn Error GoTo An  6" Exit @ u,:,"`  TheYea r( "LondYr$", `"1700# &"$#n {l u(*: K rU~|  y%  yy"HB`l Md@tx$ 4x t 0` 0)xt` H$b xt``KRHX\l M`@pt$ 4t p 0\ ,>X1x)tp\Cx$`(bxXtp\`(  CttCxx 2xt($b xtTCtt 1x/t(bxt\rU ,`  00(` 0$`$`nrU CXIqI qI4`BfrmGotoMorG__SRP_42__SRP_43IndexTools|8`IB <q ` B_BWBBPlx$ x$b xl 1x dt! t dTtT(D]M?'T"@MD@d  d`1@5dcl@C<.l<0l<0l<0l<0(lx kd, ,`1x6d,El@lx*F,'' dt $ < t )t6d, 4b<T@x$td, x83M( N'8'Xx! x <x6X8d8$(b xX8<84HrU BH$B`$AB`$B`nrU $ `$ `$ `$ `,! `  00$I `,q `  00$ `*#5c*\R1*#cb*\R1*#c6*\R1*#d7*\R1*#e3*\R1*#d6*\R1*#129*\R1*#158*\R1*#d2*\R1*#d0*\R1*#c1*\R1*#d7*\R1*#d6*\R1*#129*\R1*#d2*\R1*#d0*\R1*#c1*\R1*#127*\R1*#125*\R1*#d4*\R1*#71*\R1*#d2*\R1*#d3*\R1*#73*\R1*#158*\R1*#d0*\R1*#4b$*\Rffff*293c5ff27a*\R0*#10*\R0*#f*\R1*#6c*\R1*#cb*\R0*#2*\R0*#14*\R0*#1*\R1*#9e*\R1*#a6*\R1*#106*\R1*#c6*\R1*#d7*\R1*#e3*\R1*#d6*\R1*#c5*\R1*#129*\R1*#c1$*\Rffff*3;3c5ff860*\R1*#be*\R1*#19f*\R1*#a4*\R1*#1f*\R1*#cb*\R1*#c6*\R1*#1e*\R1*#b5*\R1*#d7*\R1*#e3*\R1*#d6*\R1*#129*\R1*#c1*\R1*#17b" 3 "<   2D(   "< 3     "   ("  &`*: 78 $P `h         H"(  &0*X:h7 $         x ty +30D$[Pʖ$[Pʖ$[Pʖ$[Pʖx$[Pʖ$[PʖMEH@SPSSS6" LL LL o@ A@rmeo $!0'"  %$' B B G|jSepKOctKNovKDecKT0S $j $' n  B   jB@Attribute VB_Name = "frmGotoMo" " Bas0{DB2DE355-661D-11D5-8191-00500487 CA96}J42J dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustohmizDP Sub CommandButton1_Click () Un@load MLEnd ListBoxGY$iGetTheYear$(L .Index6If L <= 1 n pExit8A"MoLeft(Months.@(L), 3-Select C B"Sep"@, "OctNovDec@y= Es3Trim(Val() + 1ECion.GoTo What:=wdBook@mark, :r=A3+ UWUserForm_Initiali|zeR^QUMD$ not xxME<> xk00@: @: @: @: @: @ ; @ %h&;@ @ @| x:`h; d `LkLH=<<x=p<=2 @<l @<\ @<L @=< @=, @0= @`= @ @ @ @ x=X>>p>>@>j @x @>h @>X @H @8 @4 ???C`@?x@jv@?x @@t @@d @H@T @@P @0@L @H @@8 (C4:`;@C`@@@$ @@ @@ @A @A @0A @HA @`A @xA @A @A @At @Ad @AT @BD @ B4 @8B$ @PB @hB @B @B @B @B @B @B @ @ @ PC|;` pC(CxhC`%PC!8DDhDGGD DE j@PDx @Dt @(Ed @DT @DP @DL @H @XE8 G4E`%HD@@E$ @pE @E @E @E @E @E @@F @F @0F @HF @`Ft @xFd @FT @FD @F4 @F$ @F @G @ G @8G @PG @hG @G @G @ @ @ @| xG`%GHHj v @x  jjPxx@@Ih -(IHJ JJIIJKKK@JX @8JH @PJ8 @pK4 @J$ @hJ @J G@ @J @ P @(K @K Hl p @@K @XK @ @K @ @ K`%KK`2hFLMLPMLMjv@Lx @Mt @ Md @8MT @PMD @hM4 @M$ @M @M @N @ M`%M@(N @@N @XN @pN @N @N @N| @Nl @N\ @OL @O< @0O, @HO @`O @xO @O @O @O @O @O @ @ @ GP@Q(Q@TQQTQj@Px @Qt @XTp @XQ` @pQP @Q@ @Q0 @, T(Q`x%TQ @R @R @0R @HR @`R @xR @R @R @R @R @Rx @Sh @ SX @8SH @PS8 @hS( @S @S @S @S @S @S @T @(T @ @ @ @pT @0U| TxT`x%TTPT`UtT`x% UT=pU`x%U\@l VV0VVxYxVVZVjv2@Vx @HVh @`VX @WH @ W8 @4 @< $ @V @Y YV`x%YV@8W @PW @hW @W @W @W @W @W @W @Xx @(Xh @@XX @XXH @pX8 @X( @X @X @X @X @Y @Y @0Y @HY @`Y @ Z @8Zx @v @Yp @Yl @h ZdY`P%[Y)U  & . 2 @PZT @hZD @Z4 @Z$ @Z @Z @ @ Z0 Z`[`x%Z;[p\X\(_@_(\[H\j@[x @\t @p l@\`x%(\ @\\ @\L @\< @\, @\ @] @] @0] @H] @`] @x] @] @] @] @]| @]l @^\ @ ^L @8^< @P^, @h^ @^ @^ @^ @^ @^ @^ @_ @ @ @ @ ```XcpcX`_x`j@(`x @@`t @p lp``x%X` @`\ @`L @`< @a, @a @0a @Ha @`a @xa @a @a @a @a @a @b| @ bl @8b\ @PbL @hb< @b, @b @b @b @b @b @c @(c @@c @ @ @ @ gg@dddpggpd(ddjvZ @Xdx @t gpd`x%gpd@d` @dP @e@ @e0 @0e @He @`e @xe @e @e @e @e @e @f @ f @8fp @Pf` @hfP @f@ @f0 @f @f @f @f @g @(g @@g @Xg @ @ @ PV @ @ |g`x%gH88.x1t<$*\Rffff*2;3c610d09*\R1*#5b*\R1*#54*\R1*#58*\R1*#56*\R1*#fe*\R1*#c5*\R1*#fd*\R1*#c7*\R1*#103*\R1("P X `*xd7 $ %      ( 08@X"    " *7q $0 @H P X ` h p x "8 @ H/X h.Mx0 "  *h7xG $         ( *@7P $h x         *7 $  0 @ PX ` h p x   "  *7G $ ( 8@ H P X `     *0 7@  $X  h  x           * 7  $   0  @ H  P  X  `  h  p  x    "  E 7 "< >u 0 $8 4Cp *@ <P  $h  x           { 9  " P X *`  "h p 5x * "k  $             {(98 "<P<x7* $                 (0{87H5h-7-7  " @5 *("k8 $` p x       {9 7 $":(P X`h7p/  "4>;4 5 5(50555854" 0( "8 @9H008  `*< $       ( 0 8@{H9X  &p7&W(W * $ ( 8 HP X ` h p x { 7*W  "<0<X"Fp  7*W  &*@ $P ` p       {7(W    F0 P 0`<7"F 7 &W@*h $x         { 7&W 7H&Wh F F  .W0 Fx `F  ,W  "F8 Rr` 7"<2(W  $FH p F * 7"<2 (W@ &Fh  F0!    x)"F)"<)/P! 7) `! " 0 % *<( $@ P X hp x     {;  , %R0 8 %:+%%% $H)6D# 0P @*W Ah;  "F5"<8 7  8(8 ()*X(7h(G( $( (( (( ( ( ( ( ( ))) " " %8$ 7x%""p! x! 2# (0$ 8" x" # *!7! $! !! !! ! ! ! " " "" " 7$ """ " 2X$ ($ `" P" " *"7" $# # (# 8#@# H# P# X# `# h# p#x## 7"# "(& 0&*8&"kH&7p& $& && && & & & & & &''  $ ' 0'@' P'X' `' h' p' x' ' '''  $' ' ' '' ' ' ( ( ( ( (((@( "*  **(* $8* H*X* h*p* x* * * * * **{*$* *7*** $+ + + 0+8+ @+ H+ P+ X+ `+ h+p+{x+9+  ,+$+++/+++ +"+ + *,<,7(, $@, P, `, p,x, , , , , , ,,, *,<,7, $- - 0- @-H- P- X- `- h- p- x---- "- -7-*- $- . . .(. 0. 8. @. H. P. X.`.{h.7x.  .*. $. . . .. . / / / / /(/{0/"<@/ h/  x/7/7// / 7/"<0 80"<H0p0 "0 0C0*070 $0 00 11 1 1 1 (1 01 81@1H1`1 "343" 3`43"p1 x1 36j(4013  171&1 (^1&<4 725(29H2<`2x2F2<22 82A2333 (3 03%83%P3h30p34+73 "P5 X5*`5:p5 $5 5 5 55 5 5 5 5 5 55{596$ 6*W87 (6706*P6:`6 $x6 6 6 66 6 6 6 6 6 66{696  ,7"F777 *Wh7$ 7(707 P8@ j!lB@n j!l!(F쒪 j!l!pB@n j!l9d ^&5p(d9r v9t99x9z9|9~9q8  j!lB@A@lIndex 1APIndex 2APIndex 3APo@ Mark the Styles5/ j!lB@n * % j!l( j!l!pB@n j!l^p9d R^p5p(d9r v9t99x9z9|9~9q  j!lB@o Change bold and italic to html@ j!lB@n j!l!pB@n \^p9d8oooA@j j!lA@h^p5p(d9r v9t99x9z9|9~9q`  j!lB@o@Index 1AZIndex 2AZIndex 3AZD * % j!l!p( Change bold and italic to html j!lB@n j!l!(x j!l!pB@nLD j!l9d ^&5p(d9r v9t99x9z9|9~9q  j!lB@o( jB@p t j!(r jB@ x |z ~ jB@v  jB@oA@nA@ j!lB@n j!l!pB@n j!lp!9d5p(d9r v9t99x9z9|9~9q  j!lB@ j!lB@n j!l!pB@n j!l!p!(F j!ld \*\9d^&5p(d9r v9t99x9z9 j!lB@n j!l!pB@n j!l!p!(x j!l \*\9d^&5p(d9r v9t99x9z99~9|q  j!lB@ j!lB@n j!l!pB@n j!l9d5p(d9r v9t99x9z9|9~9q  j!lB@o9~9|q  j!lB@ j!lB@n j!l!pB@n j!l9d5p(d9r v9t99x9z9|9~9q  j!lB@ j!lB@n j!l!pB@n j!l9d5p(d9r v9t99x9z9|9~9qH  j!lB@o(A@A@@ j! j!  jB@   jB@kH j'  j!lB@n  j!l!(r j!l 9d 5p(d9r 9t99x9z9|9~9q j!lB@ j!l!G|jox j$ G   jB@j0  !B@ \Find Phrase in XE? London Stage $' o   jB@ jB@ jB@Z   jB@  London.dot\^ B@f P j!lB@nIndex 1 % j!l( j!l9d5p(d9r 9t99x9z9|9~9q j!lB@ j!l!G|j   jB@ j{  jB@ j!lB@n j!l{ 9d5p(d9r 9t99x9z9|9~9q j!lB@  jB@   jB@ j!(x  jB@d  j!(x  jB@k  o  j!lB@nIndex 3 % j!l( j!l9d5p(d9r 9t99x9z9|9~9qP j!lB@ j!l!G|j  jB@ ! j!vvSLevel3C@f 99q  jB@ j!Index 3 jB@; d jB@Hd@8k0o(   jB@o !!(T find performance in red  Find performance j!lB@n  j!l!(r j!l :performance9d5p(d9r 9t99x9z9|9~9q( j!lB@ j!l!G|j set bookmark in front of colon  jB@ j!vvXE2e !B@f j!vvXE12e !B@f j!lB@n j!l"9d5p(d9r 9t99x9z9|9~9q j!lB@ set bookmark after XEn  jB@ j!vvXEafter !B@f see if correct index   jB@j j\f 1 XEafter jB@9k set bookmark before XE  jB@ j!vvXEbefore !B@fv find quote in front of XE text j!lB@n1e j!l"9d5p(drson9r 9t99x9z9|9~9q j!lB@E  jB@ j!vvXE12s !B@f j( XE12e jB@ j(9)make sure there are at least 2 more terms j:B@  jB@SeeBac XEafter jB@ Msxkp Now get person and play X  jB@jB@ j!vvXE1s !B@f j!lB@n j!lDele:9ddChara5p(d=19r 9t99x9z9|9~9q j!lB@  jB@ j j!vvXE1e !B@fSe  jB@ j!vvXE2s !B@fct bookmark the two pieces XE1s jB@e  j( XE1e jB@B@ j(  PersonIs$ = Selection j!vv XESeePerson !B@f j(X XE2s jB@ XE2e jB@ry j(Select PlayIs$ = Selection N j!vv XESeePlay !B@f Add See XEj!v XEafter jB@d  j!vv lXE \f 1 "[" \t "]"d j!B@f !   jB@n.Move   jB@H  jB@=wdCha j!vvXESee !B@f  XESeePlay jB@dd R jB@ction. XESee jB@ jB@Z8 j!B@To*d jB@k, N  jB@Select   jB@e:="XE  jB@ j!vvXESee !B@f  XESeePerson jB@! jB@( XESee jB@ jB@Zj@  jB@ j!lB@n  j!l!(r j!l9d5p(d9r v9t99x9z9|9~9q j!lB@ j!l!Gj% Selection.Font.Color = wdColorRed j!vv ! B@  jB@v  jB@Spike %  j!v  C@HC@qho8 XESeeEnd jB@   jB@   jB@ %-8 Paragraphs             " & $ ( * . , jB@   jB@h! j!vvXESeeEnd !B@f!!\: see d jB@  j!(ro! j!lB@n j!l!pB@n j!l^d9d^&^p5p(d9r 9t99x9z9|9~9q!  j!lB@ Exit Sub End If Exit Sub End If jB@p2  jB@jB@8oo0  j!lB@n j!l!pB@n j!l^p9d5p(d9r 9t99x9z9|9~9q  j!lB@o  London.dot\^ B@f# jB@p+ If Selection.Start = Selection.End Then" MsgBox "Select XEs first!"+ If Selection.Start = Selection.End Then" MsgBox "Select XEs first!"  jB@ %-8 Paragraphs             " & $ ( * . , jB@   jB@ jB@ph"'< '< k < |%0File not created: No blue XE entries were found!A@2% : j!lB@nIndex 1 % j!l( j!l!pB@n j!l. : see9d, see5p(d9r v9t99x9z9|9~9qx%  j!lB@ j!l{ :9d:5p(d9r v9t99x9z9|9~9q$  j!lB@ j!l*9d5p(d9r v9t99x9z9|9~9qX$  j!lB@o8$0$ j!lB@n j!l!pB@n j!l!p!(L  j!l^p9d^p5p(d9r v9t99x9z9|9~9q'  j!lB@ hide the para marks create entries as a new file' Move See XE to endy Unit) XEafter jB@   jB@  jB@x)H j!lB@n j!l^d9d^p5p(d9r v9t99x9z9|9~9q) j!lB@ j' V X )  jB@ j!lB@n j!l^d9d^p5p(d9r 9t99x9z9|9~9q( j!lB@ j!l!G|j j V  j' V X (d( Z j!(rX (kx(op( j!lB@n Z j!l!(r j!l!pB@n j!l^d9d5p(d9r v9t99x9z9|9~9q'  j!lB@ j!lB@n Z j!l!(r j!l!pB@n j!l^p9d5p(d9r v9t99x9z9|9~9q&  j!lB@o&&@  jB@ j!lB@n j!l"\: see 9d5p(d9r v9t99x9z9|9~9q(- j!lB@  jB@ j( j!lB@n j!l"9d5p(d9r 9t99x9z9|9~9q`, j!lB@   jB@ j( jB@  jB@@  jB@ or d jB@ jB@Z  jB@   jB@ jB@   jB@@o++;h !B@f  j!lB@n j!l!pB@n j!l{ 9d 5p(d9r v9t99x9z9|9~9q/  j!lB@o//  jB@ jB@  jB@@ l l jB@` London Index Title % j(  jB@   jB@ !!  %n B@Bkh0 !!!l p  p !!(lk00 l j! j! %vB@` j! j( j!!r C@t 9v 9x p= ף@$`9p= ף?$`9vq  jB@oX/P/M B3$ ' A@$ ' 3o`oIndex of Plays for Aj 300 $ $j$$' General Index for Aj  - d jB@04@o4Go to Top of File?   Index Converter$2'SA@  KTA@ KTnP4A@ @4 j!lB@n j!l!(F j!l9d5p(d9r 9t99x9z9|9~9q4 j!lB@ j!l!G|j j' V 4  jB@ j!lB@n j!l!(F j!l9d5p(d9r 9t99x9z9|9~9q3 j!lB@ j!l!G|j|k j' V 3o3 j!vvXEItalic !B@f j!vvXEItalic !B@f(3 j V  XEItalic jB@7)Don't forget to update the running heads!A@27A@2 A@0  jB@P8Attribute VB_Name = "IndexTools" Sub ConvertThehAFile() GY$jGe>Year$0" 2 2" 3 3 L) LA)' ' nge bW a@5iBU to hZ|Find.ClFormat0tingCHFont.@TruRe@ceWith AA.Text"^& @00ward'BWrap@wd({CMatchCasBi(bWholeWobildc`s SoundsLikv All! aA)5Execᜤ'D #JsJJ~J J/ ?Ja<#b;?J#N*\" U" ward9True!8WrapwdCon fFals Mat@chCase WholeWo:WildcJs SoundsLi>k1ǁ0R"End uExecvov/?w?w?w?w?wSub  IXHtmlToItalic() '?|QIwFp.C&GuF"\0*\ 0 ThenNVD.MoveRi gh8Find.ClearFormatting'With e,.Text = Repla@cement"C9ward FalseWrap wd;AskXMatchCaseWho0leWo@"WildcRs$S dsLik7AllAAZPEnd \9K^.Exec|utHI]H@omeKeyLineUKFouBoloTruV%hE?G@C A\IfGoTo` AgaiSub nvertLevel3ToRunin() 'C@@uTop =:hllStylHA`veDocu"hs("Index 3"@1tn.r.Dr:.qStA!aCqlp.k7po9o#n<'n 1mF!~Eit F"-@_t=1c:?BookmarksC.Add Range:=, Ndam"SV.DefaultSLora wdaByA ShowHidden& L3s]!DownզPghc *%_f\TypeBacksp# " "Ӂ:="; ( "}d ) ;F~Answer%MsgBox("@Go to @A of File?", vbYesNoCancel +Quest~=CoFerU> lSs QGotLpOfj#7 ;gV[:x <\ "\1 \H@\0\ ? \\x \)<\.b\\' set bW#frpma nMatchCaseaRemLAfJ qXEsc AAdd!hide the  |-"ClearCgrI dJFHidd`= zC7B?h"^phZz. ςςςyς .ςς߄chWς "ς2ςEWPł (%bo@bAv%es(Z?BfnA0RK, X=@=*hKtKKKKG"KasQQKR0G0oF2KK7QYK! KrtKeKKQK 3) OoK &Ja&'J@ڬStap=)`ҫQ C `sprstF"a -RnRPJR@oOt ^doO^&QO .O;p @RlRG/B/_O_O_O_Ogb$_OeROw,,3-a~yO-O-O- O-O-VO-O-.O*@DcO-O- | .Replacement.Text = "" .Fo rwardXTrue`Wrap*wdFindSt$op hmaFals hMatch0Caser6Wh`oleWop i(ldcsASoundsLikcXAllam"End WitheSelection.q.Execute :=wd(MoveLeft UnitCharacter, CS 1 :Sub0  nv@ertXEsESee() ' -AIClearca ttingStylAeveDocu s("Index 1"|<8B (  C!. : seeɕIŝ, 6 Con@? D WAןd{ :c 1AR1CC1wb `1T"*=111e11?1111LMa`rkDup`Greeng99^d9^p?:j_k#B.?:?:ovx_oNQ5av1$#C A@ch:4fzvRighvvq Lm@dm l BlH"1<4TI>f\pR Then Exit  <> ~S#b?$a GoTo $Eʪ .ColorwdCGsIf16HRem0HPHH\) <F r ?or%ONȯ/ooğ./N~nğ///= `ȟ1/h/j/Nğe43Sߜ < o 6ۿ hs lI/ / b Cj_P_P_ 13_P_PZCAppendXeNextAuthorToThisOnCqAqDown6P gh, Count:=1 Selection.Find.ClearFormattingWith 0.Text = """\: see "8Replacem8entPjward?TrueWrapwdxCon !Fals 8Matc hCaseWh`oleWo:WPildcJs SAdsLik1All0R"End uExec utf MoveRight UniwdCharacter, +ExtendMo>dUz}{ .{Ask1—zہz z AzHLefz, u:x=wdC}L- CopymUpMP`MgqhM+T4 Typeb:=" orE Pasa1Downk}+Cut% Sub ( IndexPageSep.tor()( 'CAve"Wow.Pane.SmallScroll !:=-$b ߂ƣ{ `|~dBn!eB}32 ,G"vertFileTo2ColbHOfPlaysG!C D%@n0(" of " f8P'v)^Genera_(" Oub (Ix@Title$0GY$yGetTheY$GYP1r("00" & Trim(0Val(S, 2) + 1))+0HomeKteyES`8DRrLond3:tup.DoSep("M" NFTV0LineV5InsBreak Q!SBN CStylqC0Docurbs("a on AH[@!& "-R?Qb?(?UIf tRView.SplitSpecial <> wneNonez $nUsh(2)Po5A1Izfd+YRrXint1i]e.= c)S Range(Star`nd:=\). _A_&wdY&@ous39?6W4A%Kum6nD.5 Num:=2EvenlySp 0O.4Between@ Widp=/chesToPo@.58<3Inp0.13!_n.DorDMsgBox "Don't1Wget to update the runnheads!paX1S!{1?M@ultiplPeEntryPD/}?}@<F.ItalicPWȪbAq8ل .!WpH]ta! Q./  x 2C, Lup=#2D@it ! SRoV3lABookmarks.Add Range:=Selection., NamX"XEItali c" Again:4hMoveRight Unit:=wdCharacter, Cou n&1 hFind.ClearFormattingA#Font. @= True&With O.Text."ReplacemePDward2Wrap wd2Stop4^MatchCase FalsZ' Whole Wo7ildcGs SdsLik1All0Q"End APC2Q.ExecutD,dIfLY.F% Then Exit SubC @ S1$ AGGoTo WhaBookma?@ABC3EFGPIJKLMNO9QRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~rU~|  g  y! 98y i::  I   A! i @q  ) I     <ѝq G9GaGIaCA=q=Q 6Iia0)Q)!I y9?q;q7ɗ/7; @;)A@yC B1BEYBBBB y AD< 1x<(4Tt$ <t t6T4t$ <t |tD'(f4:dNTTt$ ,t D)t6T4t$ <t t<(4Tt$ <t t6T4        <(bx$tT4h CttCxx 2xt  Ctt!Cxx 2xt "Ctt#Cxx 2xtte h$b xtT*tx$ <x t )xt:ptx$ <x t 0p 8)xtp7ptx$ <x t p d)xtp$tx$ <x Qtlx l xl x Dx l ,l  l  l H l ` l P l X l @cl''''L' ','L'l''''' ',tx$ <x t )xt6L, lL, (blTxtpL, lL, T*tx$ <x t )xt:ptx$ <x t 0p 0)xtp7ptx$ <x t p d)xtp$tx$ <x Qtlx l xl x Dx l ,l  l  l H l ` l P l X l @cl''''L' ','L'l''''' ',tx$ <x t )xt6L, lL, (blTxtpL, lL,  *tx$ <x t )xtd`l Md@tx$ 4x t 0$Q`oHX\$ <\ X )xt\X5H7`tx$ <x t ` d)xt`$tx$ <x QtDx D %*#@xD x D/@x D ,D  D  D H D ` D P D X D @cD~''''H'' '@'`'''''' tx$ <x t )xt6H `@   (bD`@xt`\XH `@ h CttCxx %2xt  Ctt!Cxx %2xt "Ctt#Cxx %2xth$b xt*tx$ <x t )xt7ptx$ <x t p d)xtpqpl M`@tx$ 4x t 0$QpoDTX\$ <\ X T <) xt\XT5D$tx$ <x Qt@x*#<@ /<x@ x Dx @ ,@  @  @ H @ ` @ P @ X @ @c@z'|'''D'''<'\'|'''''tx$ <x t )xt6D|\<| (b@d''''''(tx$ <x t )xt6H(hH(0bh|XxtplH(hH(0 @  0   X -*tx$ <x t )xtkP:dNTTtx$ 4x t 0$QPo8HL$ <L H )xtLH6T8$tx$ <x Qt4x 4 x4 x Dx 4 ,4  4  4 H 4 ` 4 P 4 X 4 @c4{''''''$'D'd''''''8'Ttx$ <x t )xt6T8dD$6tx$ <x t 8k)xt <|(8Tx$ <x x6T8<x$ <QxoT:d.8($]t6T87|'(8Tx$ <x x6T8*tx$ <x t )xt$tx$ <x Qtxx .x xx x Dx x ,x  x  x H x ` x P x X x @cx{''''''$'D'd''''''8'Ttx$ <x t )xt6T8dD$7|'(8Tx$ <x x6T85|8Tx$ <x x6T8-tx$ <x <t 0)xt7|'(8Tx$ <x x6T8M-tx$ <x <t 0)xt7|'(8Tx$ <x x6T8 X,b4x\xtPLHT8dD$t -*tx$ <x t )xtkP:d#NTTtx$ 4x t 0$QPo8HL$ <L H )xtLH6T8$tx$ <x Qt4x 4 x4 x Dx 4 ,4  4  4 H 4 ` 4 P 4 X 4 @c4{''''''$'D'd''''''8'Ttx$ <x t )xt6T8dD$6tx$ <x t 8k)xt 7|'(8Tx$ <x x6T8$tx$ 4x 8 Qtxx:tx$ <x PQtoT8x D )xP5Tx ( x 0 cx7|'(8Tx$ <x x6T8/Tx$ <x LT:d#]3x5Thx$ <x (x9x$ <x xo t,b4x\xtPLHT8dD$;'':L/N<<#:l0N\\^1i6\<Bl]3c 2l]3},b\<t804'8Xx$ <x x6X8H8$b xX8T9ptx$ 8x (Dt HGp DE)xtp0,'0Px$ <x x6P0*tx$ <x t )xt<ptx$ <x t 0p $)xtp$tx$ <x Qt(x M( x( x Dx ( ,(  (  ( H ( ` ( P ( X ( @c({''''''('H'h''''''0'Ptx$ <x t )xt6P0hH(6tx$ <x t 8k)xt<7,'(0Px$ <x x6P0Wtx$ <x |QtoPNp$ 4p 8  D )xp|5PWtx$ <x |QtoPOp$ 4p 8  D )xp|5P*tx$ <x t )xt$tx$ <x Qtxx  x xx x Dx x ,x  x  x H x ` x P x X x @cx{''''''('H'h''''''0'Ptx$ <x t )xt6P0hH(7,'(0Px$ <x x6P0Wtx$ <x |QtoPPp$ 4p 8  D )xp|5P<,(0Px$ <x x6P0<x$ <QxoP:`Q0(@]36P0Ft:@PN00''Px$ <x )xt6P0k7,'(0Px$ <x x6P0Wtx$ <x |QtoPRp$ 4p 8  D )xp|5P*tx$ <x t )xt$tx$ <x Qttx  t xt x Dx t ,t  t  t H t ` t P t X t @ct{''''''('H'h''''''0'Ptx$ <x t )xt6P0hH(7,'(0Px$ <x x6P0Wtx$ <x |QtoPSp$ 4p 8  D )xp|5Px$ <x xFt:@ON00''Px$ <x )xt6P0x$ <x x<x$ <QxoP:`60(@]36P0 7,'(0Px$ <x x6P0Ft:@PN00''Px$ <x )xt6P0k7,'(0Px$ <x x6P0Wtx$ <x |QtoPTp$ 4p 8  D )xp|5P*tx$ <x t )xt$tx$ <x Qtpx 6p xp x Dx p ,p  p  p H p ` p P p X p @cp{''''''('H'h''''''0'Ptx$ <x t )xt6P0hH(7,'(0Px$ <x x6P0Wtx$ <x |QtoPUp$ 4p 8  D )xp|5P7,'(0Px$ <x x6P0Wtx$ <x |QtoPVp$ 4p 8  D )xp|5PFt:@TN00''Px$ <x )xt6P0x$ <x xFt:@UN00''Px$ <x )xt6P0x$ <x xWtx$ <x |QtoPWp$ 4p 8  D )xp|5PFt:@VN00''Px$ <x )xt6P0x$ <x xFt:@NN00''Px$ <x )xt6P0x$ <x xWtx$ <x |QtoPXp$ 4p 8  D )xp|5PFt:@PN00''Px$ <x )xt6P0rtx$ <x lf:@YN00PQt[|p$ <p  LZ) xp|l6P07,'(0 Px$ <x x6P0<,(0Px$ <x x6P02,(0Px$ <x x6P0Wtx$ <x |QtoP[p$ 4p 8  D )xp|5PFt:@XN00''Px$ <x )xt6P0x$ <x xFt:@[N00''Px$ <x )xt6P0x$ <x x*tx$ <x <t )xt7x$ <x x7,'(0Px$ <x x6P0<,(0Px$ <x x6P02,(0Px$ <x x6P0Wtx$ <x |QtoP[p$ 4p 8  D )xp|5PFt:@WN00''Px$ <x )xt6P0x$ <x xFt:@[N00''Px$ <x )xt6P0\x$ <x xx$ <x xFt:@PN00''Px$ <x )xt6P0<,(0Px$ <x x6P0/tx$ <x <t $)xt7,'(0Px$ <x x6P0kT4b(xtp`xtp|lP0hH(h04'8Xx$ <x x6X8 (h$* x$ <x  )x < x$ <x  0 $)x $ x$ <x Q x  x x Dx  ,     H  `  P  X  @c{v'x''''''8'X'x'''''8'X x$ <x  )x 6X8xX8x6v x$ <x  8kv)x r (h$Rh x$ <x Q [lp$ P 0]p 8^) xlph=$(h]3+'''8:h_NXX 16X8D '(f8:hNXXx$ ,x D)x 6X804'8Xx$ <x x6X8x$ <x $xW x$ <x lQ oX`p$ 4 8 p D )xpl5XA:haNXX x$ Px 0] 0^Qd)x 5X; x$ <x pcXQ [d Db)xp5X d @bcdF :H`N88''Xx$ <x )x 6X8548Xx$ <x x6X8<4(8Xx$ <x x6X8 '''$'D'xff8:hNXXx:N:HcN88fXx$ <x x6&X8xX8xD$74'(8Xx$ <x x6X8 d e* x$ <x  )x 7 x$ <x   d)x Gp x$ <x   (p @)x p$ x$ <x Q x  x x Dx  ,     H  `  P  X  @cv'x'''X'''8'X'x'''''8 x$ <x  )x 6X8xX8x4bd$px plhX8xX8xD$0 8  lx$ <x Tx*tx$ <x t )xt7ptx$ <x t p d)xtp$tx$ <x Qtlx l fxl x Dx l ,l  l  l H l ` l P l X l @cl''''L' ','L'l''''' ',tx$ <x t )xt6L, lL, 7' (,Lx$ <x x6L, (blTxtpL, lL, lx$ <x Tx*tx$ <x t )xt7ptx$ <x t p d)xtp$tx$ <x Qtlx l xl x Dx l ,l  l  l H l ` l P l X l @cl''''L' ','L'l''''' ',tx$ <x t )xt6L, lL, 7' (,Lx$ <x x6L, (blTxtpL, lL, x*tx$ <x t )xtkP:dNTTtx$ 4x t 0$QPo8HL$ <L H )xtLH6T87Ptx$ <x t P d)xtP$tx$ <x Qt4x 34 4x4 x Dx 4 ,4  4  4 H 4 ` 4 P 4 X 4 @c4''''T''$'D'd''''''8tx$ <x t )xt6T8dD$$tx$ <x Qt|x 5| 6x| x Dx | ,|  |  | H | ` | P | X | @c|''''T''$'D'd''''''8tx$ <x t )xt6T8dD$$tx$ <x Qtxx 7x xx x Dx x ,x  x  x H x ` x P x X x @cx''''T''$'D'd''''''8tx$ <x t )xt6T8dD$x0b4|x\xtPLHT8dD$h*tx$ <x t )xt$tx$ <x Qtpx p xp x Dx p ,p  p  p H p ` p P p X p @cp{''''''0'P'p''''''0'Ptx$ <x t )xt6P0pP0$x$ <x >1x7'(0Px$ <x x6P0*tx$ <x t )xt$tx$ <x Qt|x | x| x Dx | ,|  |  | H | ` | P | X | @c|{''''''0'P'p''''''0'Ptx$ <x t )xt6P0pP06tx$ <x t 8k)xtN,x$ <x ll=/x$x$ <x >1x/tx$ <x <t $)xt0bp|TxtP0pP00*tx$ <x t )xt<ptx$ <x t 0p $)xtp7ptx$ <x t p d)xtp$tx$ <x Qtlx l xl x Dx l ,l  l  l H l ` l P l X l @cl''''L' ','L'l''''' ',tx$ <x t )xt6L, lL, *tx$ <x t )xt<ptx$ <x t 0p $)xtp7ptx$ <x t p d)xtp$tx$ <x Qtx  x x Dx  ,     H  `  P  X  @c''''L' ','L'l''''' ',tx$ <x t )xt6L, lL, (G=,blTxtpL, lL, 07'(8Xx$ <x x6X8*x$ <x  )x$x$ <x Q x   x x Dx  ,     H  `  P  X  @c {''''' ','L'l''''''8'Xx$ <x  )x6X8lL, 7'(8Xx$ <x x6X8x$ <x x*x$ <x  )x$x$ <x Qx   x x Dx  ,     H  `  P  X  @c{''''' ','L'l''''''8'Xx$ <x  )x6X8lL, <(8Xx$ <x x6X8x$ <x xx$ <x x7'(8Xx$ <x x6X87'(8Xx$ <x x6X8 x$ <x xx$ <x x7'(8Xx$ <x x6X8<(8Xx$ <x x6X8x$ <x |x<(8Xx$ <x x6X80,b PxX8lL, \C'''4(Ttx$ 8x (Dt G)xt6T4*tx$ <x t )xt7tx$ <x t  d)xt$tx$ <x Qtx . Lx x Dx  ,     H  `  P  X  @c''''T' ','L'l''''''4tx$ <x t )xt6T4lL, (bTxtT4lL, L:Cxx ;/x$b x0   p 1xjxMh@X < X(H84 =k >:? < `1/46 X80'8X$ < 6X8@C44 A/4$ < $7'(8X$ < 6X8&X$ < 5X^:hBNXX$ 4  0$Qo8$ < P)6X8< lx*#4C*#l*#$ < 247'(8X$ < 6X858X$ < 6X89$ 8 D El)<$ 8 0D 0F |G)F$ 8 (D HG (El)0<$ 8 (D HG ,E)$ < ,$ < ,li8liX$ 4   H)6X8A$ < ,l$ < 0)3$ <  IQ) XJ  4J  <J%p= ף@7$ l DJ%p= ף?7$ l LJc0'8X$ < 6X8+'''8:hKNXX 16X80bx@ 4X8L*tx$ <x t )xt:ptx$ <x t 0p 8)xtp$tx$ <x Qtlx l xl x Dx l ,l  l  l H l ` l P l X l @cl{''''' ','L'l''''' ','Ltx$ <x t )xt6L, lL, 6tx$ <x t 8k)xt$x$ <x >1xWtx$ <x xQtoL|p$ 4p 8 | D )xp|x5L7t' (,Lx$ <x x6L, *tx$ <x t )xt:ptx$ <x t 0p 8)xtp$tx$ <x Qtpx p xp x Dx p ,p  p  p H p ` p P p X p @cp{''''' ','L'l''''' ','Ltx$ <x t )xt6L, lL, 6tx$ <x t 8k)xtR,x$ <x ll0/xFt:<N,,'' Lx$ <x )xt6L, Wtx$ <x xQtoL|p$ 4p 8 | D )xp|x5L$x$ <x >1xL L0blp`xtp|xL, lL,      W$ `$ `$ `$9 `$a `$ `$ `$ `$ `$) `$Q `$y `$ `$ `$  `$1 `$Y `$ `$ `$ `( `0$! `rU~~~~~~~~~~k  K ?9q0 j!lB@  jB@]3 j!vvXESelS !B@f j(H@ XESelE jB@ j(X j!vvXESel !B@f j'  '8':H : :': < :Gj8  : $\Gj : ': : Gj : ' : :': :  ':Hk@  : $\Gj : ': :  Gj : '    ' XESel jB@  jB@    jB@    jB@ j!!FGj MsgBox Mid(S$, L2S, L2E)o !!(T !!   !!(ld  !(lk)Attribute VB_Name = "                      ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F G H I J L XEFixer" Sub NextD1WithLevel2NotItalic() ' ActiveWindow.Pane.View.ShowAllTrue` If 9.plitSpec$ia3wdINone Then8sTypwdN`ormalX9End If A gain:'Sele}on.MoveRight Unit:=wdCharacter, Coun 1 F.ClearFVtting 1 ^.T́^d Replacement10ward Wr$ap@wdAsNkH%FaO.MatchCas[WholeWoildc# sUSNdsLikA)LEmP2 R.ExecF%ž Exit @ņ @InStr(, "\f 1") 0 GoTo B :Y '( hLef2 rDocu"HBookmarks.Add Range:&= , a:=@ EMdd 1,2tendanEx!Qm`rhr""nrrrdStopH rW"vrrunr~rFB.r A߫?X0XS 7#&KMod}WhaB%gc4 H#qqP\S$`Ac L@Len(S$|+cC`0 ~1tnC1NC + 7S$NpK#SR?Oa1Mid`p -A1) <>R"Ӆ'>= ~L  2q L2S ca   w 1L'2DP#gтo 2awU1EL22EW),rk,%jV_ hmaa g /b|Fo1>&'MsgBox 5- , L2E@4a@ MakeI#   20eLondSpecEmDashM LondonSetFonts=23c5ff20e LondonSetFontse LondNotNewPara1:3c638d68>LondNotNewPara QLondNewspapers3:3c639514JLondNewspapers(GLondCreateFile3;3c639541XLondCreateFile@LondAttachStys493c5127fbLondAttachStysXLondSwapWidth4:3c5127fbLondSwapWidthp LondSwapCells1?3c638db0LondSwapCells6LondSpecNonSp4<3c5127fbLondSpecNonSpULondPlayTable0=3c638cc2LondPlayTabled k QNxME@3c638da5LondNextPlay9 LondPrevPlay1=3c638da3LondPrevPlay9 5LondShortCuts1<3c638d79LondShortCuts= L A2LondFixItalicPlaysInIndex>83c5ff20e2LondFixItalicPlaysInIndexL ) #LondColSmall>:3c5ff20eLondColSmallLondColOther163c638d55LondColOther$LondWarning>=3c5ff20eLondWarning -LondSpecUae>>3c5ff20eLondSpecUae8mLondSpecLoe>?3c5ff20e LondSpecLoePmLondSpecLae?03c5ff20e LondSpecLaehmLondPhrases?13c5ff20eLondPhrases LondonFuncs?23c5ff20eLondonFuncsE LondIam  *\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:\MSOffice\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{E92C3FA3-FD83-11D2-8191-00500487CA96}#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 LibraryR  1t<B+$-=*MO ;K%0CF2DP<(NH&RThisDocument273c5ff25fThisDocument/$LondIntroPersonnel503c6397ed$LondIntroPersonnelT&"LondSpecLcCedilla;83c5ff20e"LondSpecLcCedilla0u"LondSeasonHeaders223c638de1"LondSeasonHeadersH8 LondSpecSterling;;3c5ff20e LondSpecSterling` LondSpecLuUmlaut;<3c5ff20e LondSpecLuUmlautxu LondSpecLuCircum;=3c5ff20e LondSpecLuCircumu LondSpecLiCircum;>3c5ff20e LondSpecLiCircumu LondSpecLeCircum;?3c5ff20e LondSpecLeCircumu LondSpecElipsesP<03c5ff20e LondSpecElipsesPLondSpecUeAcute<13c5ff20eLondSpecUeAcutemLondSpecLoGrave<23c5ff20eLondSpecLoGravemLondSpecLeGrave<33c5ff20eLondSpecLeGrave mLondSpecLeAcute<43c5ff20eLondSpecLeAcute8mLondSpecLaAcute<53c5ff20eLondSpecLaAcutePmLondSpecialSyms<63c5ff20eLondSpecialSymsh5LondSpecElipses<73c5ff20eLondSpecElipses]LondSpecDDaggar113c638cdeLondSpecDDaggar`"LondPhrasesSwap193c638d61LondPhrasesSwap5LondSpecEnDash=03c5ff20eLondSpecEnDashMLondSpecEmDash=13c5ffndexer133c638ce7(LondIndexer0:LondHeaders?63c5ff20e`LondHeadersLondDocVars?73c5ff20ebLondDocVars)LondColPlay0?3c638cc3|LondColPlay`&JLondColDate0>3c638cc2LondColDateSU@LondColCast143c638d25LondColCast( /:LondAllCaps1;3c638d68LondAllCaps@uLondonLeft?<3c5ff20eLondonLeftX5LondIndexW083c638b22LondIndexWp(9LondTbars273c610c89LondTbars LondMonth213c638ddcLondMonth/'LondIndex=>3c63a544"LondIndexDateField053c5ff20e&DateFieldiSomeText063c5ff20e(SomeTextz LondYear363c5ff564>LondYearxELondSwap103c638cdeHLondSwap~?LondSet173c638d55nLondSet|0l%7 London0=3c5ff20et LondonrHQLondAbbr123c638ce7zLondAbbrP`LLondIndent25103c5ff20eLondIndent25xLondIndent00183c638d5bLondIndent00AutoNewUnused123c5ff20eAutoNewUnused%>.LondSwapCon1133c5ff20eLondSwapCon19I June00143c5ff20e June00 GotoMacros163c5ff20eGotoMacroske>Formatting093c74cf4e Formatting9[LineEditor1:3c5ff20elLineEditoruA Months253c638f92 Months6 @ f DocVars3;3c5ff860DocVars6` IfrmGotoMo263c638f92frmGotoMo30@ ` 1IndexTools2;3c610d09LIndexTools x`  !XEFixer243c5ff20eXEFixerQN 4 `H0 pX@(hP8 `  x`H0@  pX@(hP8 x6qPʖ8qPʖ:qPʖ<qPʖ>qPʖ@qPʖBqPʖDqPʖFqPʖHqPʖJqPʖLqPʖNqPʖPqPʖRqPʖTqPʖVqPʖXqPʖZqPʖ\qPʖ^qPʖ`qPʖbqPʖdqPʖfqPʖhqPʖjqPʖlqPʖnqPʖpqPʖrqPʖtqPʖvqPʖxqPʖzqPʖ|qPʖ~qPʖqPʖXnTGPʖmNPʖCPʖPt yDPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖqPʖ0qPʖHqPʖ`qPʖxqPʖqPʖqPʖqPʖqPʖqPʖqPʖ ï|CHPʖ ï|CHPʖ@ Fů|CHPʖ ` Q)NPʖ *6PPʖ  BcallQF_IfSubthen Wordk VBAWin16~Win32MacVBA6# TemplateProjectEstdole`MSFormsCOfficeu ThisDocument< _Evaluate LondIntroPersonnel@ ItalicList__h Theaters__MTheaQ__ChListing hMain,CC\ WordBasic BeginDialogFGroupBoxTTextBoxQ OptionGroupN OptionButton PushButtona CancelButtonListBox EndDialogmPCZ CurValuesȤ UserDialogDialogfDoItalic!TkItalic!Insertr DoPhrases5WhichDlgFocusk DlgVisibleUDlgListBoxArrayM DoCompanyIX]DlgTexthtDTestId]ActrSupPtr IndexTermzDlgValueLeft$7ValRight$y1DlgText$_ DlgEnableMarkIndexEntryo?EntryRange BoldLastWordmLW'^WmLeavet LondSpecLcCedilla) InsertSymbolFontUCharNum  LondSeasonHeadersSeasonʘ SeasonMonthXThisYearNextYearHTypeD, SeasonNextlLTrim$'qStr HeaderTypex ViewHeaderܪ DoTheHeadereShowNextHeaderFooterCloseViewHeaderFooteruMYK^SelInfo&ToggleHeaderFooterLinkW EditSelectAllVEditCutStylepInsertPageField9 ResetCharChrK~AllCapss_ WW7_EditGoTod Destinationл StyleName$j SelectCurWord Selection$ WordRightCancel CharRightP StartOfLineM LondSpecSterlingʮ LondSpecLuUmlautiY LondSpecLuCircum& LondSpecLiCircum{8 LondSpecLeCircumx9 LondSpecElipsesPP LondSpecUeAcutem LondSpecLoGrave LondSpecLeGrave LondSpecLeAcute7 LondSpecLaAcute LondSpecialSyms3List__X/UUs_OKButton|Ul LondSpecElipses' LondSpecDDaggar LondPhrasesSwapV AllCapList__pSmallCapList__ NormList__ DisplayingX SwitchList__IPP^ DropListBox0P SetAllCaps SetSmallCaps SetItalics{ SetNormal  SetSwitchsgPg DoAllCapsk DoSmallCaps U SmallCaps~cLCase:SPtrM  SetDisplay߳PrintStatusBar= InsertPara, LondSpecEnDashw LondSpecEmDash. LondonSetFonts SetAllStylesTheFontf7CurStyle>NumStyStyFdsflScreenUpdating!  CountStyles^MsgBoxR FormatStyleL AddToTemplate#DefineK DialogRecordFormatDefineStyleFont LondNotNewPara>1LeftCharb RightChar\CharLeftNLefttNRightq| LondNewspapersPapers__ SetPapersFNewsIcTPI_DefPaperAPap LondCreateFileFileNew!Template NewTemplate InsertBreakѺ EditBookmarkfSortByoAddr SetHeaders SelectionZFindnClearFormatting) ReplacementForwardWrapWywdFindContinueBP MatchCaseMatchWholeWordXMatchWildcardsMatchSoundsLike0MatchAllWordFormsExecuteYMoveLeftvUnit wdCharacterCount0vMoveDown̝wdLine LondPlayTable G LondColDateDoIt`MessageDeletex LondAttachStysiP FileTemplatesuyStoreQ LinkStyles-m LondSwapWidth LondSwapCellso LondSpecNonSpu NarrowCol0 GutterColWideCol6 Remainder^ BetweenCola WhereAreWey}TableInsertTable| ConvertFromT NumColumns}NumRowsInitialColWidthOApply,TableRowHeight"X AllowRowSplit{ActiveDocument\Styles pNextCellTableColumnWidth} ColumnWidthSpaceBetweenCols" RulerStylea NextColumnAHomeKeywdRowFEndKey5 MoveRightwdItem3| wdParagraphH TypeParagraph  LondPageSetup9POpt(DoSetupI CurrentSetupfWW_ FilePageSetupAreaB PaperSize TopMargini BottomMarginu LeftMargin] RightMargin[GutterV PageWidth! PageHeight  Orientationw FirstPage OtherPages| VertAlignĽ ApplyPropsToH> FacingPagesOHeaderDistanceSFooterDistancek SectionStarthOddAndEvenPageshPDifferentFirstPageoEndnotes~LineNumֶ StartingNumFromTextKvCountByNumMode LondonNothingu LondIntroMenu Desc__II]SetDescI`OptS DoSeason&InsertFootnoteie ReferenceeNoteType DoHeading.DoPlay7e DoDropCapExtendSelectionGetSelStartPos  GetSelEndPos& FormatDropCapPosition DropHeightL DistFromTextE LondBookmarks/ BookList__ BookName__rF VaryingList__AddingBooksBookNSortIspXoSelectedYWindow6GetMarksZdlg-mylistxAddNameTheEnd0BM\CountBookmarks#I BookmarkName$< SortArrayPSURCZ LondSpecEnSp0 LondSpecEmSpR+ LondPlayMenuLoopingj3Loop_wDone  LondIndexGenKxx_CheckBoxi{IxGenGenIndexHIxPlayTypeIxfBookIxName]3Answer,ExistingBookmarkLeave1L EndOfDocument InsertFieldField3 LondConvert3Self PausePlay)DateO1ConMode9 GetNextTag\>Demark( CreateTblCleanUpCPause} ExtendModejEditFind Direction& WholeWorde PatternMatch SoundsLike1FindAllWordForms}( EditFindFoundParaBStSStEParaABS\BE\ Underline DoFootnote& EditPaste ClosePaneFillCellWSjE\EditCopy. DelBookMarkn LondConvert2StartOfDocument EditReplaceReplacef ReplaceAll) LondConvert1 LondConvert0ff9] InsertFileXFirstFixDoSaveAsf FileSaveAs LondColSmallSS'_SmallGDoSmalluOtherI LondColOther LondWarning } LondSpecUaep LondSpecLoeB LondSpecLae@ LondPhrasesX LondonFuncsu ParaIfNeededAInATable^{ AtEndOfCell CellIsEmptyoQ PrevCharPara!NoParaAtCellEnd GetToEndOfCell EditClearCurCol_bQNextCol3PrevCol 6 LondIndexerI1]I2]I3]Opt1u Opt2v Opt3w Index_AXO1q^O2r^O3s^SetOptsAAClearAll  DoIndexTermOfHigh1aHigh2aHigh3aISwitch ShowAllWasAWIXShowAllIDoHighsqBVal$IvalModevLLeaveݮ LondHeadersf LondDocVars DocVars__DVsVmDVar_yYlCountDocumentVarsZ$GetDocumentVarName$rGetDocumentVar$(SetVarR InputBox$DErroNumber- LondColPlay'TOthers__~PlayI $AndI*-AuthIEAbbI OtherOptsBPStyCStyIn_LOO^OOptDoOtherUStyWeekDRD[ WeekDays__  TheaButs__`_ OtherList__RLeftCellT RightCell\NSetDaysrSetThea SetOthersMDateI1TheaIgSetLast (NSetDocumentVarGetLastGetNextSNeNextDayLastD%NextD5 LondColCast* CurrentShow ActiveWindow+ ActivePane_ViewI(7ItalicizeAbbreviation IndexFieldsExtend?wdExtendd wdFindAsktRiLc LondAllCaps6NBeforeAll'tAfterXUCase5  LondonLeftR LondIndexW{R LondTbars2LondonToolbars__LondonToolbars_pttbtb;_CB0K}CurTbarslCB1L}CB2M}CB3N}CB4O}SetTbarsˬT_X_ ToolbarState ViewToolbars|Toolbar2Hide9zShow LondMonthZMonths__`(<ClearPgCut.SetMonj$WeekdaysDoMonthwMonthILoc`MdLocation-wdSectionBreakContinuousEGetMon! LondIndexqRTrim$k DateFieldG SomeTextGText_~AuthorNQuotes GenQuotationF\ DoTheInsert AllQuotes7MethodRandom_oRndRLengthY LondYear=YYs_YOptݥSetYrGetYr LondSwap SwappingRows_Cols_FColInPE GetColWidths SwapColWidthsTableSelectColumn  SetColWidthPasteCellsSetWidthHInchesToPointsI wdAdjustNone~RowsUSpaceBetweenColumns SelectColumnR InsertColumnscw\ LondSetSet_Array__8% LondonfAddAddIn AddInState LondAbbrg(DSetAbbrg$Abbr(DGetAbbr6(NGetDocumentVar LondIndent25ParagraphFormatFirstLineIndent_ LondIndent00R AutoNewUnused LondSwapCon1& LondNextPlayHWhatC wdGoToTable  wdGoToNextw LondPrevPlaywdGoToPrevious LondShortCuts LondFixItalicPlaysInIndexnMyLoopD wdFindStop'fFound+ vbYesNoCancelq vbQuestionvbCancel'vbNo%Documentj _B_var_Str _B_var_Chr\;_B_str_BetweenColqItemz _B_var_LeftQ _B_var_Midp _B_var_WIX"Module1b June00Macro2N(IFindNextLeftBracket/ GotoMacros (JNextMonthGoTo(IMakeSectionContinue3 PageSetup LineNumbering)ActiveSwdOrientPortrait FirstPageTray[wdPrinterDefaultBinOtherPagesTraywdSectionContinuous4OddAndEvenPagesHeaderFooteriDifferentFirstPageHeaderFooterj9VerticalAlignmentʡwdAlignVerticalTop)SuppressEndnotes[f MirrorMargins*" TwoPagesOnOne> GutterPos?wdGutterPosLeftMhwdSectionNewPage4'gothereړFinalbMacro62(wdStory& Application*BrowserTargetFwdBrowseSection7WStartAgainsDoSectionPageSetup'l_B_var_DoSetup=_B_var_S FormattingM (KMyShowHideʬ Bookmarks?nDefaultSortingz wdSortByName\ ShowHiddenqswdGoToBookmarkJ (KIndexGen1Fields7 wdFieldEmptyPreserveFormatting= (KIndexGen2Macro14q  wdBrowseTableP= (KGoAfterTablḛ (KGoBeforeTable5Previous:b (KGotoPrevTable( (KGotoNextTable(KDoPageBreakBeforePageBreakBefore(KUnDoPageBreakBeforeŏ(KForcePlaytoNextPageR(KUnForcePlaytoNextPage(KPageBreakBeforeNextkp(KPageBreakBeforePrevo> (JPrevMonthGoTo5 MoveUpParaStyKSplitTheTableAtThe _B_var_Sub(KSplitTheTableAtCurrentLineR_B_str_ParaSty (TableOnlynLondPOlayTableX_B_var_LondPOlayTable)WwdCell  _B_var_Unit _B_var_IfPMacro15r AutoHyphenation,b HyphenateCapsݟHyphenationZoneConsecutiveHyphensLimit,?ManualHyphenation(KHyphenateCurrentParagraph CommandBars Visible(JToolbarsGotoOn{ LineEditorz(LSelectionFontCondenser05`(LSetTheViewingMode IncrementIcur,SpacingS StatusBarʜ(LSelectionFontExpander05(LBlankCondenser05D\(LDoBlankSpacing(LBlankCondenser10d\(LBlankExpander05(LBlankExpander10 (LFindABlankcursp(LDoBlankReplace8 wdReplaceAllu#PutNumberOnLineEnd(LFindStartOfNumberedLine`LTypeTextvbTabc9ProseTypeTheLineNumberC(LHyphenateAtCursor[Reset> (LMove1stWordUp/Y(LPlaceHolderSet_B_str_EndOfCellSty _B_var_WhatM TypeBackspaceaMacro13p (KJoinTableWithNext(KSelectTextInRightCell|(KGotoEndOfTextInRightCellICopyƿTables(KJoinTableWithPrev (KBeforePlay1pt[(KBeforePlay12pt'a MonthsOldMNewMj  (MChaBookMsr(MFixMonthBookMarks&lFrYˏ _B_str_FrY4ToY: _B_str_ToY\ DocVars DvarDValValueKAnErroro (NSetTheYearX6 (NGetTheYearђ _B_str_GetYrModul UserForm1) (MMonthListL_B_str_MonthListb (MGotoSpecificMonth6UGYm] _B_str_GY5 _B_var_Select'E frmGotoMo_B_var_frmGotoMO]UserFormNListBox1CommandButton1|UserForm_ClickUserForm_Initialize5cClick InitializeN ListIndexQ MonthList1 MonthList4_B_var_MonthList4qCommandButton1_ClickListBox1_Click _B_var_L List*_B_str_MMoE^ _B_var_CaseOct _B_var_TrimmT _B_str_Mo  IndexTools6>IXHighlightAndStyles(PIXMarkTheStylesgMrk0Macro16s BordersC"Shadow(PIXUnmarkTheStylesUnMrkIXUnMarkStylesNConvertTheIndextoN(PConvertTheIndexToAFile$IXDoBoldAndItalic IXMarkStyles S (PIXBoldToHtmll(PIXStylesToHtmli(PIXItalicToHtmlZ(PIXCutAndPasteInPlace WholeStoryColor2FwdColorAutomatic PasteSpecialKLinkhDataType%? wdPasteText PlacementIwdInLine DisplayAsIcon(PIXHtmlToStyles (PIXHtmlToBoldm(PIXHtmlToItalicL(LBlankCondenser20\(LBlankExpander20(JToolbarsLinesOn  (KHyphenate25F (KHyphenate30G _B_var_CallHyZone&Macro18u  wdColorRedo((KChangeXEsToRed@TheWordƒHyWord CaseMatchQ(KOptionHyphenWords.(KHyphenWordListR_B_var_CaseMatch (LBlanksResetkMacro19v wdWordmFindPhraseInXE(PFindPhraseInAnXEK _B_str_SelxRight  _B_var_Right9 XEFixerLevel1Level2L2S?Level2aL2E1L2L8(QNextXEF1WithLevel2NotItalicMakeit6 (QMakeItItalic_B_str_S _B_var_C _B_var_L2SPh _B_var_L2EBh _B_var_L2LIh (JToolbarsXEsOn FindItAgainE(PFindPhraseAgainK Documents DocumentTypeMacro21 ConvertLevel1sToBoldNu(PConvertLevel1TextToBoldPL3Again(PConvertLevel3TextToRuninq (PGotoTopOfFileFXEAgain$(PGenPlaySeePersonwdColorBrightGreen wdColorBlue Selecftion _B_var_Selecftion|Macro23 PasteIt=NormalTemplateqAutoTextEntries AppendToSpikeWhere֍RichTextN(PMovePlaySeePersonToEndSort ExcludeHeader FieldNumber SortFieldType0lwdSortFieldAlphanumeric1  SortOrder4wdSortOrderAscending5K FieldNumber282SortFieldType2R SortOrder2 FieldNumber392SortFieldType3S SortOrder3 Separator^wdSortSeparateByTabs SortColumng CaseSensitiveu LanguageID wdEnglishUS(PParaAddAfterSeeXEsF(PParaRemoveAfterSeeXEsQExitSub*_B_var_ExitSub>. _B_var_Exit (PSortTheSeeXes$ ThereAreSome*~_B_var_ThereAreSome FixXEsWithSeeq>(PConvertXEsWithSee? _B_var_ttb_B_var_CurrentShowcMaokeIndexTermRed(2MakeIndexTermRedtHidden]CB5P}CB6Q}CB7R}(PMarkDupSeeXEsGreen߆S1_Amatch@ wdColorGreen(PRemoveGreenDupXEsH _B_str_S1̓Macro24 (PAppendXeSeeNextAuthorToThisOneb(PReplaceIndexPageSeparator!4 SmallScrolltmDown;(PConvertFileTo2ColIndexwwdSectionBreakNextPagexPanes wdPrintView( TextColumnsKSetCountIp EvenlySpacedߠ LineBetweenl DoSetupOld/P1^ _B_var_P1>GYP1o _B_str_GYP1CONV}ConvertFileTo2ColIndexOfPlayV=IxTitle(PConvertFileTo2ColGeneralIndex(PConvertFileTo2ColIndexOfPlays# (PAskForTopu _B_var_AnswerՐvbYesNovbYesa?Macro27 FIndNextMultipleSeeO(PFindNextMultipleSeeEntryݠ _B_var_UCasea Information wdWithInTableT HeaderFooterLinkToPrevious4]m1'^(KFindBlankXERed(KRemoveFindBlankXERed(KAAAr_B_var_E #%       MP KM!7w"y#+{$,-.!/80%192:3;4Q?5 <EK?mLDYF#=L'>R)?S TZ?@\IA_d6hi*mnqr+s,t -u .v /w0x1yoBzuC{{D|E})2FGH&M'()NOa3c4IJ}5= @@ @   I1@@ F@dir__SRP_0__SRP_1 frmGotoMo@{j@{jqa PA1Qi 1 a 1yLL AQ a   !AYq a "IAi`` a 0I  a Ih a & Qq a <;A;Y;Aq;;1 a LI(Q q  a IxA a y 1Y a (I  a I8ɚ! A a *Ii   ia IXi!QQ y  Y)a!IQ Y  1ya @ѥIaa I)Qya BQ!Aa I8 yq Y9  q a6A:<=Q=y?A)EC DG 9i !97a A! TemplateProject ThisDocumentLondIntroPersonnelLondSpecLcCedillaLondSeasonHeadersLondSpecSterlingLondSpecLuUmlautLondSpecLuCircumLondSpecLiCircumLondSpecLeCircumLondSpecElipsesPLondSpecUeAcuteLondSpecLoGraveLondSpecLeGraveLondSpecLeAcuteLondSpecLaAcuteLondSpecialSymsLondSpecElipsesLondSpecDDaggarK*mPKKNNPP;;@@::6655AADD2277$$++BBFF88((''&&!!<<MMOO  ==rU7~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~0* pHdTemplateProjectQH@  = | 1t< 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#j0 rAE92C3FA3-FD83-11D2-8191@5W87CA9FXc:\windows\WP\VBE\DO.exd`7.E .`M COfficDO@ficBz p,2DF8D04C -5BFAcB-BDE5,AA- 42cOFFI`CE97\,O 97c 8.0cR­ThisDocumentG Th@,sDcuQen@ 2E HB1B,!"B+BLondIntroPersonnelGV$@$n@I#rUP*r\o n`l42?`&ewT&! SpecLcCedillaG"LSp@cLAC d,lva2/uK--5ea,Head--ea+H a/e.|&-/*o,,h,SterlingG L,SUl@,ng,q2`o+xLuUmlaukqL`lUll@-ulie/smo1AzCir* C`*r@X!kcwi ;yi doe6i E2: ze L0 L e e    Eli`psesP? EQ5p`Ae0P5 P 5 AuUeAcuteGeU`gU0KA*tҠ2_ 2m_ _ oG8rav_ P `oGPUav^ L?_ e_ _ _ W e_ 4e_ o_ S _ _ |_ X Z nd"?"_ U _ _ _ W a_ X a_ T _ S c_ _ _ V ialSyms3iil0 yis`>i7_ _ 5@c݉_ V 4E_ H;>/_ _ ]?>_ V DDaggaVr_ Dag}0r_ _ `_ _ R PhrBap]Swap[ PU r sGswpX [ a@_ 5ߝ\ YEnDashGaEpDĴashLondSpecEnD@ash2ondSpecE4FD|HJP1M#(, R!+  miGimi 55#ДOonSetFontsOEStFt?OOOe֔ONotNewParaO"NJtNPwPrOOQ )' ''ewspaperOC&sa”rO4D 'ew@ p@3A[A 'ɀO'CreateFil"eOCrNat@FilOG 'Q 'O'AttachStyOA@&t@AcSyOG 'Q 'w@@#wapWidth^GawB4W@'dN2\/ /'8Cell'L,C:l:s)B3G/05N@.pm&pnB_&E-M/U94PlayTab ai&P$ayT`:b`eh&F+SO/D95age ul&Ag 9mCu@g&PE-aK/%/4onhing9Aéh``n@'FW+O/Ͱ94IntroMenu+ItoM 'nu9& /i d#? RCBookmark9B0:okmp&~rp9& / j) !BS=`&JCs6q12s? ?8? 3V?Em? 5 mB: ? ? ? ? 2 a?%yU?%5 ; ? ApH|? 2 IndexGenG+d.xG?.; ? } $? 2 Next; яx`q7 '; ?  ? 9;rev? Pv? P; ? 2? < nhortCuagSo tCpJC.'A/ L =@FixItalic!sInS#2AxIaqiEsPn2#(o0we2oql@dcm)P}3L ColSmall;*CXlEX7* ? _3R0Other? lOh<~rk5-? ? $j? < aWarnr~Wjn6~2r-}1Ua` fA^UP QaeHP18m FHP,$!0+ LondSpecLoeG ondSpcLhe X2X#a aeFFPhrasesPhrssF  ԘFonFuncFkFu@mcI# K# O#EO#T#IndexerFIBexFrFO K# O#0:O#T#HeaderFH@!a@ekF K# O#O#T#DocVaM#DcV@rJj K#S O#O#C@olPlay+5CAlPly(5`&bDat,| D`t`6'|)SUCastq#Cstk# /AllCapXA`4l pFuX $onLef@#!L@4f#+L255"WG gW4_#)(! !Tbbz`qTbDy2//!4@MonthGJ Mp 00? [? }< p AutoNewUnuse0H!t!N wUuPzeH.2 A/$ 8%>A7Con17!n1? I* 9; 12JuneJ0n 74}GotoMacroG`*M0Jc04oPsZe CkForm@atting3FQprmPt0bi} "gPqsg[vV@,P9D!P+( 8LineEditorG<ineEd$tor R2RH 1A u MonthsG  unths{M2of o 671DocV4ar88c8Vav92S: :: 4frmGoto`MoG7m,G>MM 2@1@30"2(BI}IndexTooVl@A}I|d@}xT!olB^OG C}Q O#!O# xOaXEFixeYXFx"?AaCa O)OQNIBB~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~~~~~~~ R-fPʖ  1R a JYAIa >2q22y 9iAia I a ,  Ɍ1QqA 1Ya .Ixa D&yPAPa FI)!Ia 8Iqa IYa I`((a H6A&Y&y&&&A9a :Q(aAaa $yA&Aa 6I a 4I a 2I1 Y a &I 1QLondPhrasesSwapLondSpecEnDashLondSpecEmDashLondonSetFontsLondNotNewParaLondNewspapersLondCreateFileLondAttachStys LondSwapWidth LondSwapCells LondSpecNonSp LondPlayTable LondPageSetup LondonNothing LondIntroMenu LondBookmarks LondSpecEnSp LondSpecEmSp LondPlayMenu LondIndexGen LondConvert3 LondConvert2 LondConvert1 LondConvert0 LondColSmallSetDays LondColOther LondWarning LondSpecUae LondSpecLoe LondSpecLae LondPhrases LondonFuncs LondIndexer LondHeaders LondDocVars LondColPlay LondColDate LondColCast LondAllCaps LondonLeft LondIndexW LondTbars LondMonth LondIndex DateFieldSomeTextLondYearLondSwapLondSetLondonLondAbbr LondIndent25 LondIndent00 AutoNewUnused LondSwapCon1 LondNextPlay LondPrevPlay LondShortCutsLondFixItalicPlaysInIndexF@C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLLVBA  Q ` Fc:\MSOffice\Office\MSWORD9.OLBWord  )p0FC:\WINDOWS\SYSTEM\STDOLE2.TLBstdole  .E .`M C:\WINDOWS\SYSTEM\FM20.DLLMSForms yy?,Pʖc:\windows\TEMP\VBE\MSForms.exd ayL-[DRC:\OFFICE97\OFFICE\MSO97.DLLOffice )Qk FqPʖ FqPʖ FDocument @Main SetHeaders  LONDON.DOT F FTemplateNewTemplateFileNew LondYear.MAINCall LondYear.GetYr$ TypeInsertBreakCharLeftInsertPara ,LondIntroMenu.DoSeason IntroName SortByAddEditBookmark F WhereAreWeSetLastGetLast <Season Intro starts here . . . Insert *LondPageSetup.DoSetup I LondMonth.SetMon September, "LondMonth.DoMonth September  Sep "LondMonth.ClearPgGoTo MonthsScreenUpdatingu F F ^mGetNextStyWeek SetOthersDTestSetThea 44  x4F ' SetYrGetYr @London[New/File]: Year Functions LondYear.DTestBeginDialog $Year Season StartsGroupBox YOptOptionGroup Set Year Y1OptionButton Get Year Y2 SYearTextBox OKButtonOKButton CanButtonCancelButton MsgTextEndDialogCurValuesUserDialog DialogYOpt 1700 MsgBox CloseDlgTextDlgFocus SetDlgVisibleDlgValue Right$ >Year above retrieved from file. DlgText$ Create Year  saved in file. LondYr$ GetDocumentVar$SetDocumentVarSetDescDoSeason DoHeadingDoPlay DoDropCap Val LondonSeason Style Season of    WeCharRightVBE6.DLL 9(e ` CurrentSetupDoSetup 0 F 1 1.5 2 1.75 2.25 8.5 11 1.2 1.8TabPaperSizeTopMarginBottomMarginLeftMarginRightMargin GutterPageWidth DB3PageHeightOrientationFirstPageOtherPagesVertAlignApplyPropsToFacingPagesHeaderDistanceFooterDistanceSectionStartOddAndEvenPages $DifferentFirstPageEndnotesLineNumStartingNumFromTextCountByNumModeFilePageSetup C M 1.60 9(`  2Just to test Page Headers Temps Tempe ,LondSeasonHeaders.Main Delete DoTheHeader HeaderType   2000 LTrim$ Season ViewHeaderEditCut Tu (ShowNextHeaderFooter *CloseViewHeaderFooter s+DestinationWW7_EditGoTo s- StyleName$ LondonMonthSelectCurWord Selection$WordRight ,  CancelStartOfLineSelInfo ,ToggleHeaderFooterLinkEditSelectAll (LondSeasonIntroHEven (LondSeasonMonthHEvenInsertPageFieldResetCharAllCaps   ZapfDingbats 93FontCharNumInsertSymbol &LondSeasonIntroHOdd &LondSeasonMonthHOddClearPgDoMonthSetMonGetMon   Apply LondMon$ 4Just to test Page Headers.EndOfDocument Normal .Month starts here . . . ,LondSeasonHeaders.MAIN 0.7 0.2 4.4 0.0 3 Auto 167ConvertFromNumColumnsNumRowsInitialColWidth Format  TableInsertTableAllowRowSplitTableRowHeight- F T1NextCell T2ColumnWidth  SpaceBetweenColsRulerStyleNextColumn  TableColumnWidth LondonPlaySep F[DATE]: 7pt Italic Date/8pt Theater "LondColDate.DTest Date Column "(7pt Ital.) DATE: Date DateI (8pt) THEATER: Thea TheaI (8pt) OTHER: Other OtherI Show Me ShowMePushButton Day WeekDays NEXT Next Su DB1 Mo DB2 DB4 Th DB5 Fr DB6 Sa DB7 Theaters DL TB1 LIF TB2 King's TB3 Queen's TB4 TheaListDropListBox Other Things OtherList *LondSwap.GetColWidths DateI OtherI Auth PlayWeekNormal TheaI OtherOptsDoOther ( (Pick from List) Sunday Monday Tuesday Wednesday Thursday Friday Saturday 0DL -- Drury Lane Theatre FLIF -- Lincoln's Inn Fields Theatre Author: FKing's -- King's Theatre, Haymarket JQueen's -- Queen's Theatre, Haymarket "AC -- Angel Court :AVT -- Anchor and Vine Tavern DB+S -- Barber's and Surgeon's hall ,BCA -- Bird Cage Alley 8BDR -- Barker's Dancing Room AbbI ,BELH -- Bellsize House ,BF -- Bartholomew Fair &BH -- Boman's House $BHT -- Bull Tavern 4B-L -- Bullock-Leigh Booth "BOS -- Bow Street 0BPT -- Blue Posts Tavern ,BR -- Beverdige's Room (BT -- Buffler Tavern Abbrev: .BUH -- Buckingham House 0CA -- Caverley's Academy *CC -- Chelsea College 6CDR -- Couch's Dancing Room :CDS -- Clark's Dancing School $CH -- Charterhouse JCH H -- Cheshunt-House, Hartfordshire &CL -- Chancery Lane AndI CLA -- Clafton 0CLAR -- Clare's Academy. 2CLH -- Clothworkers' Hall $CLK -- Clerkenwell HCLK CS -- Clerkenwell Charity School 0COH -- Coachmakers' Hall (CORH -- Corner House ,CR -- Crown and Anchor &CRT -- Crown Tavern &CT -- Castle Tavern 6DG -- Dorset Garden Theatre $DR -- Dancing Room DDS -- Dancing School, Queen Street DT -- Dog Tavern BEBH -- Earl of Burlington's House :EEH -- Exchequer Eating House .EGR -- Epsom Great Room ... and: 4EHL -- Epsom Hudson's Lane ,ENW -- Epsom New Wells >Falcon -- Falcon Inn, Southwark $FE -- Mr Fearnly's $GB -- Golden Balls 4GBS -- Great Booth Stepney &GH -- Girdlers Hall JGlobe -- Globe and Marlborough's Head PlusPlay GO -- Godwins 2GOLD H -- Goldsmiths Hall GR -- Greenwich "GRT -- Great Room ,GT -- Greyhound Tavern HA -- Hampstead .HA W -- Hampstead Wells FHW GR -- Hampstead Wells Great Room >HAY -- Little Haymarket Theatre or +Play >HAY GR -- Great Room, Haymarket &H&P -- Hand and Pen &HC -- Hampton Court 4HDR -- Hill's Dancing Room 8HDS -- Home's Dancing School 0HH -- Haberdashers' Hall "HIC -- Hickford's "HR -- Holt's Room &Horn -- Horn Tavern Abb HOUN -- Hounslow (HT -- Horshoe Tavern "IH -- India House $IT -- Inner Temple <JSH -- James Street, Haymarket 2KAT -- King's Arms Tavern LR -- Long Room $LS -- Loe's School &LW -- Lambeth Wells MA -- Mr Mayor's 6MBS -- Mrs Bellamy's School 6MDS -- Mrs Defenne's School *MEG -- Mile End Green MF -- May Fair .MH -- Harlborough House MO -- Moorfields :MTH -- Merchant Taylor's Hall NH -- North Hall 2NWE -- New Wells at Epsom PlayI .OS -- Orlibeer's School 0OSG -- Old Spring Garden DPC GR -- Great Room, Peter's Court *PH -- Pewterers' Hall &PR -- Powlet's Room PT -- Pye Tavern XPun SML -- Punch's Theatre, St Martin's Lane &SG -- Spring GardenDlgEnable PPun CG -- Punch's Theatre, Covent Garden &PW -- Pancras Wells "PY -- Palace Yard RI -- Richmond ,RI W -- Richmond Wells *Romer -- Romer Tavern >RDS -- Roussau's Dancing School *Sa H -- Sadler's Hall (SF -- Southwark Fair FSGR -- Symond's Great Room, Enfield ,SH -- Stationer's Hall 8SHG -- Somerset House Garden 6St Alb -- St Albans' Street FSt F -- Sturbridge Fair (Cambridge) 0SJP -- St James's Palace .SML -- St Martin's Lane SOU -- Southwark .SPS -- St Paul's School "SS -- Seven Stars <ST G -- Ship Tavern, Greenwich *TC -- Tottenham Court DTCJS -- Tennis Court, James Street &TEC -- Tennis Court .TGB -- Two Golden Balls *WINH -- Windmill Hill $Windsor -- Windsor fTH SOU -- Town Hall, St. Margaret's Hill, Southwark 0TTT -- Three Tuns Tavern ,UM -- Upper Moorfields (VH -- Vintner's Hall 4WCH -- Wax Chandler's Hall &Wey's -- Wey's Home WH -- Whitehead BWin -- Winstanley's Water Theatre 0WS -- Westminster School (YB -- York Buildings York -- York ca. ca. early ca. late January February March April May June July August September October November December Wednesday 20 Clear  -- Left$ LondLastDate$ GetColWidths SwapColWidths SetColWidth  DialogRecord PlayNormal PlayWeekDate :[Play]: Initialize a new Play "LondColPlay.DTest Title/Author Play: Play And or [Author] BrackAuth AuthI Anonymous Anon PlayTitle PlayI + ,Default Paragraph FontAndI AuthI [ .  ( ). AbbI LondAbbr.SetAbbr LondIndexer.MAIN ! , performance gothere anonymous ].   (anonymous), 9(i h 9(x  The Jovial Crew, *or, The Merry Beggars Jovial Crew BromeSetAbbrGetAbbr LondAbbr$SetOpts DoIndexTermDoHighsClearAllLastWord ,,H ,<@ 6London[Lond/Index]: Indexer "LondIndexer.DTest Index Terms B B1CheckBox I1 B2 I2 B3 I3 Bold/Italic Text5 AbbrI Perform (1) Text1 (2) Text2 (3) Text3 Minsker, 1993 $Initial Term Value Text4 "Selected Text ... Selected Last , First ... LastFirst Clear All ClearAll $Goto MS Word Index GotoWord WhichIX General Index GenIX Plays Index PlayIXr F LondIndexW.Main \fp ShowAll XE  FieldInsertField EndX :Bold Italic 31 ZWarning: Use New Month if starting new month. 9(S X LondSwap.MAIN V HLondon: Not in a stage table (rows). HLondon: Not in a stage table (cols). W "TableSelectColumnEditPasteJ FL F AllQuotes GenQuotation DoTheInsert PrintStatusBarInt- Not being a true power typist, I have elected to generate text as if I were typing it.1 How come there is never enough time to do the job right, but always enough time to do it over? JA small rock holds back a great wave. Homer, 700 b.c.! |Until he is dead, do not yet call a man happy, but only lucky. SolonMakeSectionContinue* The scholar who cherishes the love of comfort is not fit to be deemed a scholar. .Confucius, 551-479 b.c.+ I will have nought to do with a man who can blow hot and cold with the same breath. Aesop, 550 b.c. 9(Q 1 Knowledge must come through action; you can have no test which is not fanciful, save by trial. .Sophocles, 495-405 b.c.0 Bad men live that they may eat and drink, whereas good men eat and drink that they may live. ,Socrates, 469-399 b.c.% I have hardly ever known a mathematician who was capable of reasoning. (Plato, 428- 348 b.c.: To enjoy the things we ought and to hate the things we ought has the greatest bearing on excellence of character. .Aristotle, 384-322 b.c.1 Kingdoms are but cares, state is devoid of stay; riches are ready snares, and hasten to decay. &Henry VI, 1421-1471 lLet the street be as wide as the height of the houses. : Leonardo Da Vinci, 1452-1519 .Sydney Smith, 1771-1845q F: See! how she leans her cheek upon her hand: O! that I were a glove upon that hand, that I might touch that cheek. <William Shakespeare, 1564-16160 O thou invisible spirit of wine! if thou hast no name to be known by, let us call thee devil! XThou canst not touch the freedom of my mind. ,John Milton, 1608-16741 Truth often suffers more by the heat of its defenders than from the arguments of its opposers. .William Penn, 1644-1718 JJohann Wolfgang von Goethe, 1749-1832, Politics, like religion, hold up the torches of martyrdom to the reformers of error. 6Thomas Jefferson, 1743-1826= Let us live in as small a circle as we will, we are either debtors or creditors before we have had time to look around.POptf I think this is the most extraordiary collection of talent, of human knowledge, that has ever be gathered together at the White House, with the possible exception of when Thomas Jefferson dined alone. DJohn Fitzgerald Kennedy, 1917-1963 Push1% There is nothing so powerful as truth -- and often nothing so strange. 2Daniel Webster, 1782-1852H In composing, as a general rule, run your pen through every other word you have written; you have no idea what vigor it will give your style. PlayWeekDateoModule1June00FindNextLeftBracket { GotoMacros NextMonthGoTo ^p Microsoft Word Page Setup for: POpt Front Matter OB0 6Season Introduction Section OB1 .Season Calendar Section OB2 $Show Current Setup 2Season Calendar 1st Month OB3 hereFinalDoSectionPageSetupp F. FGetMarks ::D< ,0 Window PsuMsg.MAIN $No Active Document 4London: Current BookMarks= &LondBookmarks.Dtest Go To: MyListListBox Add New AddNew AddName Show ShowName Sort By: SortBy Sort Name Sort1 Location Sort2 mylistAddName AtCurrentPointerCountBookmarks  0 BookmarkName$SortArrayDlgListBoxArray NewBookMarkName Add OK LondonMonthEven Formatting MyShowHide CurShowHideg Fb F` F FSetTbarsCurTbars % London Converter London Intro London CalendarToolbarHide &London SpecialChars London Play *(de)Activate Toolbars London Toolbars System CB0 Introduction CB1 Calendar CB2 SpecialChars CB3 Plays on Side CB4CB0CB1CB2CB3CB4ToolbarStateViewToolbarsShow GoBeforeTable GoAfterTable IndexGen1 IndexGen2 GotoPrevTable GotoNextTable Index1Top 6INDEX \f 1 \c "1" \z "1033"0 F Index1Bot Index2Top 6INDEX \f 2 \c "1" \z "1033" Index2BotDoPageBreakBeforeUnDoPageBreakBeforeS FForcePlaytoNextPageUnForcePlaytoNextPage PageBreakPageBreakBeforeNextPageBreakBeforePrev PrevMonthGoTo 44 w SplitTheTableAtCurrentLine TabTbeg TabTend TableOnly LineEditorSelectionFontCondenser05SelectionFontExpander05BlankCondenser05BlankCondenser10BlankExpander05BlankExpander10DoBlankSpacing FindABlankDoBlankReplaceHyphenateAtCursor Move1stWordUpPlaceHolderSetPlaceHolderGotoPlaceHolderDeleteFindStartOfNumberedLineSetTheViewingMode GoDown5LinesSelectTextPartOfNumberedLine (No Text is Selected! >Select other than a blank only! CurSelR Fh FHyphenateCurrentParagraph &No Text is SelectedSelectTheCurrentLine TabCursor LondonPlaySep1ptToolbarsGotoOnJoinTableWithNextSelectTextInRightCellGotoEndOfTextInRightCellM FQ FJoinTableWithPrev BeforePlay1ptBeforePlay12pt London Goto F FMonthsFixMonthBookMarks ChaBookMs 170 Oct Nov DecUserForm 1701 Jan Feb Mar Apr Jun Jul AugDocVarsSetDocumentVarGetDocumentVar SetTheYear GetTheYeare Ff FModul UserForm1 frmGotoMoGotoSpecificMonth 88 @  Iů|CHPʖsů|CHPʖJů|CHPʖCů|CHPʖrů|CHPʖȏ[qJ eVů|CHPʖ F3Dynamic 1 "ҋB `ListBox1!-6S`  {lFWJOCommandButton1CommandButton1_ClickListBox1_ClickUserForm_Initialize H#=h8+3qG?,2qLqq #ҋB ` 88 F xů|CHPʖ~ů|CHPʖyů|CHPʖ}ů|CHPʖ|ů|CHPʖ Y 10 9(E @ 9( `  88  ů|CHPʖů|CHPʖů|CHPʖů|CHPʖů|CHPʖ  1  88 rG  Gů|CHPʖů|CHPʖů|CHPʖů|CHPʖů|CHPʖ  1 ů|CHPʖů|CHPʖů|CHPʖů|CHPʖů|CHPʖ  1  IndexToolsIXHighlightAndStylesIXMarkTheStyles <i>^&</i> <b>^&</b> Index 1 </1> Index 2 </2> Index 3 </3>IXUnMarkStylesIXUnmarkTheStylesConvertTheIndexToAFileIXStylesToHtmlIXItalicToHtml IXBoldToHtmlIXCutAndPasteInPlaceIXHtmlToStyles IXHtmlToBold \<b\>*\</b\> ^& <b> </b>IXHtmlToItalic \<i\>*\</i\> <i> </i>BlankCondenser20BlankExpander20 Hyphenate25 Hyphenate30ToolbarsLinesOn London LinesChangeXEsToRed ^d  ^&OptionHyphenWordsHyphenWordList advertise ad^-ver^-tise afterpiece after-piece appearance ap-pear-ance Bartholomew Bar-thol-o-mew beginning be-gin-ning Betterton com-edy Bet-ter-ton Bicknell Bick-nell biographical bio-graph-ic-al Bracegirdle Brace-girdle Bradshaw Brad-shaw Centlivre Cent-livre chamberlain cham-ber-lain Cherrier Cher-rier comedy comedies com-ed-ies company com-pany Courant Cour-ant danceing dance-ing Danchin Dan-chin dancing danc-ing De-cem-ber decoration dec-or-ation discussion dis-cus-sion Dryden Dry-den entertainment en-ter-tain-ment epilogue epi-logue Etherege Eth-er-ege extant ex-tant Feb-ru-ary following fol-low-ing instrumental in-stru-men-tal Italian Ital-ian Janu-ary Johnson John-son Leveridge Lev-er-idge Lincoln's Lin-coln's London Lon-don mainpiece main-piece majesty maj-esty Monsieur Mon-sieur No-vem-ber Oc-to-ber perform per-form per-form-ance person per-son presumably pre-su-mably prologue pro-logue publication pub-li-ca-tion Purcell Pur-cell quality qual-ity Sep-tem-ber Shakespeare Shake-speare tragedy trag-edy Vanbrugh Van-brugh Verbruggen Ver-brug-gen violin vio-lin William Wil-liam 4ABCDEFGHIJKLMNOPQRSTUVWXYZ\XS-PPʖ[XS-PPʖ after^-piece ap^-pear^-ance "Bar^-thol^-o^-mew be^-gin^-ning Bet^-ter^-ton Bick^-nell $bio^-graph^-ic^-al Brace^-girdle Brad^-shaw Cent^-livre cham^-ber^-lain Cher^-rier com^-edy com^-ed^-ies com^-pany Cour^-ant dance^-ing Dan^-chin danc^-ing De^-cem^-ber dec^-or^-ation dis^-cus^-sion Dry^-den &en^-ter^-tain^-ment epi^-logue Eth^-er^-ege ex^-tant Feb^-ru^-ary fol^-low^-ing $in^-stru^-men^-tal Ital^-ian Janu^-ary XE1s John^-son Lev^-er^-idge Lin^-coln's Lon^-don main^-piece maj^-esty Mon^-sieur No^-vem^-ber Oc^-to^-ber per^-form per^-form^-ance per^-son pre^-su^-mably pro^-logue "pub^-li^-ca^-tion Pur^-cell qual^-ity Sep^-tem^-ber Shake^-speare trag^-edy Van^-brugh Ver^-brug^-gen vio^-lin Wil^-liam BlanksResetFindPhraseInAnXE  9(k XEFixerNextXEF1WithLevel2NotItalic MakeItItalic \f 1 XE1e XESelE " XESelS XESel \ ToolbarsXEsOn London XEs $Find Phrase in XE? London Stage 9(T `FindPhraseAgain London.dotl F DINDEX \f 1 \c "1" \e "]" \z "1033" XE2e XE2s XESeePlay FINDEX \f 1 \c "1" \e "{ " \z "1033"ConvertLevel1TextToBold { ConvertLevel3TextToRunin SLevel3 ;  GotoTopOfFile 88 [i nqVPʖnqVPʖnqVPʖwnqVPʖnqVPʖnqVPʖ > 1GenPlaySeePerson :performance XESeePerson XESeeBack XE \f 1 \t "[]" XESee : see $XE \f 1 "[" \t "]" see  \:MovePlaySeePersonToEndj F7 F XESeeEnd Spike6 F Paragraphs *\: \:* * \: see ParaAddAfterSeeXEs IndexT2ParaRemoveAfterSeeXEs ^&^p *Select XE text first! "Select XEs first! SortTheSeeXes <No blue XE entries were found! `File not created: No blue XE entries were found! FixXEsWithSee< F . : see , see { :ConvertXEsWithSee From List: 44 @ .  GenIndex ,London: Generate index (Check Indexes Wanted General IxGen Index of Plays IxPlay IxGen IndexGeneral IxPlay fp IndexOfPlays Plays London Alt Keys &Alt+K -- Alt Keys &Alt+F -- New File (Alt+M -- New Month 2Alt+T -- New Play Table *Alt+D -- Date Input *Alt+P -- Play Input Alt+C -- Cast *Alt+N -- Newspapers ,Alt+8 -- 8-Pt Phrase PaperSpec Papers ,Alt+9 -- 9-Pt Phrase SetPapersDefPaper A 0London[Paper]: Newspaper (LondNewspapers.DTest Paper Choice Paper: News NewsI PaperOpts Daily Courant PaperCour Daily Post PaperPost Spectator PaperList  ( NewsI ) (Pick From List) ,BRAP -- British Apollo *COUR -- Daily Courant *DJNL -- Daily Journal $POST -- Daily Post 6DAWK -- Dawks's News Letter ,DIVP -- Diverting Post (ENGP -- English PostOptS (EVEP -- Evening Post *FEMT -- Female Tatler &FLYP -- Flying Post ,LGAZ -- London Gazette ,LJNL -- London Journal &LONP -- London Post :MIST -- Mist's Weekly Journal 6NSEU -- New State of Europe $OBSE -- Observator Desc PBOY -- Post Boy PMAN -- Post Man REVW -- Review "SPEC -- Spectator $SUPP -- Supplement TATL -- Tatler FWEEK -- Weekly Journal [Applebee's] XBGAZ -- Weekly Journal; or British Gazetteer *PACK -- Weekly Packet Range PaperNone  -- ItalicizeAbbreviation IndexFields XLondon[Cast]: PLAY Cast Input: Role -- Actor "LondColCast.DTest Cast Member Role: Role RoleI Actor: Actor ActorI Index-1: IndexT IndexI Index-2: Index2 Index-3: IndexT3 Index3 ADD Member (Abbr) AddAbbr Un-Role UnRole  //  MF CNA roles\: Ned Blunt Estcourt $Estcourt, Richard  Blunt (Rover) (Cast not advertised. EntryMarkIndexEntry "LondAbbr.GetAbbr$ unspecified role FLondon[New/Month]: Initialize Month LondMonth.DTest Placement Loc *After current Section LB1 &At current Location LB2 $At End of Document LB3   "Season Month-Year Month: Month MonthI Pick Month DB8 DB9 DB10 DB11 DB12Weekdays MonthILoc 8Use '[New Play]' when ready. ?GetSelStartPosGetSelEndPos RTrim$ \f 1  \f 2  "London: Play Menu $LondPlayMenu.DTest Opts NEW Play DATE Input Push2 PLAY Input Push3 Paper Push4 Cast Push5 &Phrase 7pt/9pt Text Push6 &Phrase 6pt/8pt Text Push7 Push8 Description $LondPlayTable.Main LondColDate.Main LondColPlay.Main &LondNewspapers.Main LondColCast.Main "LondColOther.Main "LondColSmall.Main PSelect option above for description here NCreate 2-Column Table to start new Play( Date and theater input for a play with the option to enter Other information@ For Play, Abbreviation, and Author including indexing. Options available for non-standard entries like REPORT, DOCUMENT ...OOpt "(Pic