WPCW  
      .           0   (     0   D     0   D           I  0   D     0   [   %  	B        0   l     0   D   	     /  M       e5   U      [K  	%      sK          yK  "   ]  gT       U;   U   J   &G  #     #L     }  pG   E      H   e      H   	       H   	      I   	      I   U   @   I     }  \I   	      J        J        J   !   `   J   !     2M   !     BO   !   `   RQ   !     Q  	)      S         S                                                                                                                                e   L a s e r W r i t e r   I I f   '3   pet   	 ^-(4  APLW2F.PRS   hhhhhhhh PUBD/DOC1                                                                                                                                          H    lSJ    (                    $           (                  3/C$       
    !    W     (                  3/C$       
    !    W    M e s s a g e                                                   U                                                                                   (                 #$           0
   
     (                 3$       
    !    W     0
   
 .                  d      (      (           3(^$       
    !    W          0
   
     (                 $$           0
   
   A    	                                                                 	                                                                 	                                                                 	                                                                 	                                                            "     	                                                            B    M a i n C o a c h                                               !    D o a n o t h e r                                               !     	                                                                 	                                                                 	                                                                 	                                                                 	                                                                 	                                                                 	                                                                 	                                                                 	                                                            
     	                                                            T	     	                                                            T	     	                                                                 	                                                                 	                                                                 	                                                            |     	                                                            |     	                                                                 	                                                                 	                                                            `     	                                                            L     	                                                            L     	                                                            `    O p e n i n g S c r e e n                                       !     	                                                            !
      - I                                                         !
      - E                                                         T      - B                                                         !
     	                                                            !      - I                                                         !      - E                                                               - B                                                         !     	                                                            B     	                                                            B    P o s i t i o n                                                 !R     	                                                                 	                                                                F o o t n o t e s                                               !    E N D n o t e s                                                 !    M e n u B a r                                                   !"     	                                                            !"     	                                                            n#     	                                                            #     	                                                            #     	                                                            #     	                                                            	X&     	                                                            \%     	                                                            	*     	                                                            	&     	                                                            	~&     	                                                            	|'     	                                                            	&     	                                                            	x(     	                                                            	'     	                                                            	'     	                                                            
(     	                                                            	(     	                                                            Z(     	                                                            	)     	                                                            	(     	                                                            	)     	                                                            	*     	                                                            -     	                                                            ,     	                                                            ,     	                                                            -     	                                                            -     	                                                            D-    N o t e s D l g F O O T                                         !T-     	                                                            !1     	                                                            0>     	                                                            1     	                                                            1     	                                                            	5     	                                                            1     	                                                            	>     	                                                            	9     	                                                            	5     	                                                            	9     	                                                            9     	                                                            9     	                                                            	>    N o t e s d l g E N D                                           !@>     	                                                            B     	                                                            \B     	                                                            B     	                                                            B     	                                                            !B     	                                                            HO     	                                                            $C     	                                                            $C     	                                                            	G     	                                                            NC     	                                                            	4O     	                                                            	J     	                                                            	*G     	                                                            	J     	                                                            	4O    T y p e i t                                                     !XO     	                                                            !$P     	                                                            NS     	                                                            Q     	                                                            Q     	                                                            
S     	                                                            R     	                                                            Q     	                                                            Q     	                                                            Q     	                                                            R     	                                                            R     	                                                            2R     	                                                            ZR     	                                                            R     	                                                            R     	                                                            
S     
                                                            T     
                                                            
T     
                                                            
T      
                                                            T     
                                                            T     
                                                            T     
                                                            T     
                                                            T                                                                    U    $  M e s s a g e    

                                                            	W     	
                                                            fU     
                                                            U     
                                                            bV     
                                                            \V     
                                                            \V     
                                                            	ft     
                                                            	Y     
                                                            	W     
                                                            	t`     
                                                            	BY     
                                                            v]     
                                                            ``     
                                                            Z`     
                                                            Z`     
                                                            	h     
                                                            	`     
                                                            	j     
                                                            	i     
                                                            	Jl     
                                                            	&j     
                                                            	n     
                                                            	nl      
                                                            	o     
                                                            	n     "
                                                            	np     !
                                                            	o     $
                                                            	hq     #
                                                            	p     &
                                                            	Rr     %
                                                            	q     (
                                                            	r     '
                                                            	vr     )
                                                            	r     *
                                                            	ft                                                                    !pt        X            7                $  G  X  j  {                    \  e  {  f          M        	  	  $	  <	  W	  	  	  	  
  T
  Z
  `
  r
  
  
  %  T  y      Y  }    "
  ]
  
  
  
    )  /  5  <  O  `  f                !      b        v                @        c        X  g  8        D  c    k    v        !      =!  l"  "  N#  #  #  K$  $  $  %  %  &  %'  '  '  e(  (  o)  )  .  .  /  }/  /  0  1  ,2  2  3  i3  3  4  n4  B5  R5  Y5  y5  5  5  5  G6  M6  _6  z6  6  6  7  )8  8  8  T:  ^;  ;  <  <  =  =   >  I>  >  >  +?  l?  ?  ?  |@  A  A  B  PC  C  D  3D  D  5E  E  'F  FF  LF  SF  jF  G  G  G  H  &H  H  I  mI  I  J  .K  iL  L  .M  gM  M  M  M  M  ZN  R  S  pT  U  yU  Z  Z  [  \  L\  \  \  ]  2]  b  c  c  vd  e  e  e  vf  f  f  g  g  g  
h  ah  h  i  j  
k  (k  k  k  l  l  l  l  l  l  m  $m  Sm  m  Fr  s  s  wt  t  &z  z  {  D|  q|  '  ߂  1    @  J  ܄    څ    "  ~      	  k    ǈ    
  ;      h      (  ̋  &  w  ͌  !  c    Í        }          <  e  j    Ϗ         6  <  B  -  K  X      ő  ʑ                    )  .  D  A  G  N            4  A  o  |                "      j        X                   '      57            "                        C       @            $      G '      X      X      d    j            $            a      a                             f                        M                               	      	      $	      W	      	      	      	       	      
      T
      Z
      `
      r
      
      T      y            }      ]
      
      
            )      /      5      <      O      [   `      f      i            -                        @      	@    @    @    A!      
A-    AL    
      A      
A*     
b            A      
A&    v      B                  -                         	       X       X      -g      8      -$      %      -n4      B5      ,R5      Y5      5      5      G6      M6      _6      7      	)8      	T:      	^;      q;       <      	=      =      J >      J)>    J I>      7>       >      >      7+?      } 1?      	 l?      ?      -?      	|@      :B      vPC      D      	3D      D      E      E      FF      LF      4SF      -jF      G      KH      KH    7iL       oL      .M      H 1M      
'?M      B BM      gM      -M      M      M      } M      	M      	U      } M      :\      L\      H O\      
']\      B `\      \      -\      ]      } D]      e      	e      -e      vf      Kg      K
g    
k       k      7k      } k      	 k      l      l      7l       "l      l      H l      
'l      B l      l      -l      m      $m      } +m      	Sm      	wt      } +m      :D|      } |      @      	J      -܄            څ           7      H       
L      	            
      ;       >                    ɉ       ͉      7      u        
h            (       +       ;       ?      7̋      u ҋ      
&      c            Í                   F             }      %                  ]       	<      e      j            ]       	            6      <      -B      )-      	K      	X            ő      ʑ                  	      	            )      .      A      G      	N      	      	4      	o      	      	      	      	      	      :            	      * 
   p`   2 A d o b e   G a r a m o n d   R e g u l a r        
   s  
   /C)     >   '                 
 x         d     >    	       Name:C:\WP60\MACROS\WPCH_FTN.WPM    c (# Page@
   
 
     
 1
   
 A
   
 Ԁof17   	           October15,1993!
   
      h (# "(   US: !  &  US  ,     (       5:17pm!
   
    BL a b e l   ( m e n u 1 )   @  @  <   9 p` + ( C o u r i e r - W P     T y p e   1      
   s  
   /C)     >   '                 
 x         d     >    	       Name:C:\WP60\MACROS\WPCH_FTN.WPM    c (# Page@
   
 
     
 1
   
 A
   
 Ԁof17   	           October15,1993!
   
      h (# "(   US: !  &  US  ,     (       5:17pm!
   
 HD    fA  #| Q   	      " B D O ??=K ' 	           < 
  9 p` (      X< 6X  9  ` +   C o u r i e r         "4  ? x x x  X    Xx   A p p l e   L a s e r W r i t e r   I I f   '3   pet   	 ^-(4  APLW2F.PRS   hhhhhhhh PUBD/DOC1                                                                                                                                          H    lSJ  "  u^28Jdd8CCNy2C2ydddddddddd22yyyYzzoCCzyi{ȅCyCyd8doYz`Cot:/o:tmxpOUAyqgodCyCyC2CC!CCC     C2LC?C  Co  dddddYz`z`z`z`C9C9C9C9tmmmmyyyyodzomomyxdddYYYYzz`z`z`z`oooooottC9C9C:C9  C oz:z:z:z:z:ttttmmȥOOOiUiUiUiU{A{A{Ayyyyyyȧoddd  zz:tOiU{Aoozmyz`C9 9mNy  2 ~d8Ydddd dCCd< d< *  dddBB  dd            yz     8d             <'yy      y           y               P  y                         y         "  u^*.>SS.88Ae*8*eSSSSSSSSSS**eeeJ}fvf]88yfeoXfxooo8e8eS.S\JfP8]a1']1a[d]BG6e^V]S8e8e8*88888     8*?848  8]  SSSSS~vJfPfPfPfP80808080a[[[[eeeeo]Sf][o][edSSSvJvJvJvJffPfPfPfP]]]]]]aa80808180  8 y]f1f1f1f1f1aaaa[[oBoBoBXGXGXGXGf6f6f6eeeeeeo]oSoSoS  ff1aoBXGf6o]o]f[efP80 0[Ne  * iS.JSSSS S88}}S2 }}S}2 #  SSS77  SS            ee     .S             2'ee      e           e               C  e                         e        " B D O ??=K ' 	             "  u^*.CSS.88Je*8*1SSSSSSSSSS**eeeJ}oxf]AAffxfoooo8e8eS.SfJfSA]f88f8f]ffAJ8f]S]S4e4e8*88888     888888  8f  SSSSSxJfSfSfSfSA8A8A8A8f]]]]ffffo]Sf]]o]]ffSSSxJxJxJxJffSfSfSfS]]]]]]ffA8A8A8A8  A ff8f8f8f8f8ffff]]xAxAxAfJfJfJfJo8o8o8ffffffo]oSoSoS  ff8fxAfJo8o]o]f]ffSA8 8]Ne  * kS.JSSSS SIQ}}S2 }}S}2 &  SSSAA  SS            ff     8S             2'ee      e           e               C  e                         f            ! " < 6X  9  ` +   C o u r i e r         "1 p 
   p`    P a l a t i n o         2 4n
   p     P a l a t i n o   B o l d       sB  ? x x x  X    Xx  qT  : a C a    / Xa T v 1 Q 8 Q    / Q n n 2 ` ` `  X    `  a w 0 S 8 S    ` S 1581;}    
      //Create*ControlIDforvalidmenuoption   	 k        funkey={8118;}    
 //Ctrl+F7validfuntionkey   	         sbox={    4 "Choose
    !    W       X X  X X      { X X *      X , (#X   X*           iCa:;           iCa:;  //*********************************************   	       ////     NAME:    `	       
  WPCH_FTN.WPM   	 @   //     PURPOSE:    `	 CoachonFootnotes/Endnotes   	 X    // //*********************************************  //RevisionHistory//// 	 %
    
 	 Global(ScrnMode;MsgAdj;DefTitle;CancelMsg)Global(w;h;tbox;hbox;helpmsg;item)Global(FakeBtns;HotElement;SaveScrn)select[0]=0DefTitle="Coach"    
 //Main"Coach"name   	 a	   ScrnMode=?ScreenHigh24Use("wpchlibr.wpm")                   < //Sharedlibraryfile   	 i   If(NotExists(Module))     ScreenSetup()     ColorScheme()EndifIf(?BlockActive)     BlockoffEndifIf(?RevealCodesActive)     RC=1     RevealCodes(Off!)Else     RC=0EndifOnCancelCall(CancelCoach)Error(off!)MsgAdj=DlgMessage()CancelMsg=0//***********************************************************	   	 	 Y#   //*********************************************////     MAINPROGRAM:Coach   	 @   ////*********************************************%
    
 LABEL(MainCoach)WindowMaximizeCancel(Off!)Message(&tbox;1100)    | (# //OpeningScreen   	 	   //IfyouneedRadioButtonsVar[1]=0Var[2]=0     steps={    4     `	 "Createa~Footnote";   	 (

                 4     `	 "Createan~Endnote";   	 
                 4 }   	 h   Call(OpeningScreen)    
           //OpeningScreen/MainMenu   	    Label(Doanother)If(Var[1])     Item="footnote"     Call(Position)   	         Call(Footnotes)   	 p        Call(MenuBar)   	 8        If(?Dialog=67)          Call(NotesDlgFOOT)   	         EndifElseIF(Var[2])     Item="endnote"     Call(Position)   	           Call(Endnotes)   	 x!        Call(MenuBar)   	 @"        If(?Dialog=67)          Call(NotesDlgEND)   	   $        EndifEndifEndif     Call(Typeit)   	 (#x'   If(Success=1)     Message(&tbox;1001)          //Correctcodeinsertedindocument   	 % *        Result=MessageBox("Coach";&tbox;3)     If(Result=1)          Go(Doanother)     Endif    4     `	    	 (#.             Message(&tbox;1003)         < //Correctcodeinsertedindocument   	 h)$/             Result=MessageBox("Coach";&tbox;1)ELSE   	 +'2        Message(&tbox;1002)          //Correctcodenotinsertedindocument,tryagain?   	            Result=MessageBox("Coach";&tbox;4)          If(Result=1)              4 Quitcoach()          Else          If(Result=1)              4 Go(MainCoach)          EndifEndifEndifIf(RC)     RevealCodes(on!)EndifIf(Exists(Module))     If(Module=1)          RETURN     EndifEndifQuitCoach()	   	    //*********************************************////     SUBROUTINE:OpeningScreen   	 @   ////*********************************************Label(OpeningScreen)   	         DlgCreate(Result;DefTitle;DlgNoOK!+DlgNoCancel!+DlgExit!;;;w;h)          DlgControl(CtrlPushButton!;;"~Quit...Esc";StyCancel!;w14;h2)        	 
@             ForNext(x;1;tbox[0])              < //AddWelcomeMessage   	 	                 4 DlgControl(CtrlLabel!;;tbox[x];;2;x;w1;1)          Endfor          Var[0]=steps[0]          ForNext(x;1;steps[0])          //AddSteps   	 
                 4 DlgControl(CtrlRadioButton!;Var[x];steps[x];;40;x+tbox[0]9;w1;2)          Endfor     DlgEnd     If(Result=1)    { (# //UserchoseQuit   	 P             QuitCoach()     EndifReturn	   	  P   //***********************************************************////     PLACECURSORWHEREYOUWANTIT...   	 @   ////************************************************************Label(Position)     If(?DocBlank)          Message(&tbox;1300)              < //Documentisblank,wanttoretrieve?   	 (
x             Result=OpenDocument(&tbox)     Endif     Message(&tbox;1205)     //PlacecursoratXXXposition   	 H
        FakeIt("Coach";&tbox;3;1;0)     keypress={8154;}      (# //F7key   	 (

        chkcode={1;}     Key=DoEdit(1;&chkcode;&keypress)    w (# //WaitforusertoF7   	 h        WindowMaximizeRETURN	   	 H
   //***************************************************************////     FOOTNOTES   	 @   ////***************************************************************Label(Footnotes)//************SetValidMenuOptionVariables     hbox1={    4 "Choose>  r [BoldOn]?
   
 Layout.";   	 (
x                 4 }     hbox2={    4 "Choose>  r [BoldOn]?
   
 Footnote.";   	 	                 4 }     hbox3={    4 "Choose>  r [BoldOn]?
   
 Create.";   	 Z
                 4 }     LayoutMenu(&valid)     allow=    4 {    `	     
 1575;}     //[Create]*MenuorSubmenuitem   	         exallow=    `	 {    
 1;     }     //Executethatitem   	         accel=    4 {    `	     
 102;}     //FforFootnoteacceleratorformenu   	 K        exaccel=    4 {    `	 1;    
 }     //Executethatitem   	 c
        subval=    4 {    `	 1575;     //Create*    < //ControlIDsforallsubmenuitems   	 +                 4     `	     
 1576;     //Edit*   	                  4     `	     
 1578;     //NewNumber   	 k                 4     `	     
 4394;     //StyleinDocument   	 3                 4     `	     
 4395;     //StyleinNote   	 K                 4     `	     
 1579;     //Options   	                  4 }    `	     
    	         subacl={    4 99;}    
 //cfor(C)reateacceleratorforthevalidsubmenuitem   	 S        exsubacl={1;    `	     
 //executethatitem   	 k                 4 }     subs={1574;}    
      //Footnote*ControlIDforvalidmenuoption   	         funkey={8118;}    
 //Ctrl+F7validfuntionkey   	 ;        sbox={    4 "Choose>  r [BoldOn]?
   
 Create.";    h      //Message   	                   4 }     HelpMsg={    `	 "Choose>  r [BoldOn]?
   
 Footnote,";   	 , |#                 4     `	     
 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 Create.";   	  M$             }     Altletter=537    
      //AltLTheAlt+lettertoaccessmenubar   	 "&        MenuLetter=108    
 //LforLayoutThemenuLetter   	 U#'        Down=14    `	     
      //#timesdownonmenu   	 $m(        DlgId=1266    `	     
 //Footnote   	 $5 )        DlgIdCreate=1423     //FootnoteCreate   	 % *        Message(&hbox;5000)     //hint   	 u&!+        Message(&tbox;1210)     //ChooseLayout,Footnote,Create   	 ='",        RETURN//***************************************************************////     ENDNOTES   	 +='2   ////***************************************************************Label(ENDnotes)//************SetValidMenuOptionVariables     hbox1={    4 "Choose>  r [BoldOn]?
   
 Layout.";   	                   4 }     hbox2={    4 "Choose>  r [BoldOn]?
   
 Endnote.";   	 i	                 4 }     hbox3={    4 "Choose>  r [BoldOn]?
   
 Create.";   	 R                 4 }     LayoutMenu(&valid)     allow=    4 {    `	     
 1581;}     //[Create]*MenuorSubmenuitem   	 c
        exallow=    `	 {    
 1;}          //Executethatitem   	 +{	        accel=    4 {    `	     
 101;}     //EforEndnoteacceleratorformenu   	 C

        exaccel=    4 {    `	 1;}    
      //Executethatitem   	         subval=    4 {    `	 1581;     //CreateControlIDsforallsubmenuitems   	                  4     `	     
      1582;         < //Edit*   	 K                 4     `	     
      1583;         < //NewNumber   	 c
                 4     `	     
      4396;         < //StyleinDocument   	 +                 4     `	     
      4397;         < //StyleinNote   	                  4     `	     
      1584;         < //Options   	 k                 4     `	     
      1584;         < //Placement   	 3                 4     `	 }    
         	 K        subacl={    4 99;}    
 //cfor(C)reateacceleratorforthevalidsubmenuitem   	         exsubacl={1;    `	     
 //executethatitem   	                  4 }     subs={1581;}    
      //Create*ControlIDforvalidmenuoption   	 k        funkey={8118;}    
 //Ctrl+F7validfuntionkey   	         sbox={    4 "Choose>  r [BoldOn]?
   
 Create.";          //Message   	 ;             }     HelpMsg={    `	 "Choose>  r [BoldOn]?
   
 Endnote,";   	 !                 4     `	 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 Create.";   	 m"             }     Altletter=537    
           //AltLTheAlt+lettertoaccessmenubar   	 !%        MenuLetter=108    
      //LforLayoutThemenuLetter   	 "&        Down=15    `	     
           //#timesdownonmenu   	 U#'        DlgID=1544    
           //Endnote   	 $m(        DlgIDCreate=1545          //EndnoteCreate   	 $5 )        Message(&hbox;5000)     //hint   	 % *        Message(&tbox;1215)     //ChooseLayout,Endnote,Create   	 u&!+        RETURN	   	 ='",   //***************************************************************////     MENUCONTROL   	 @   ////***************************************************************Label(MenuBar)RepeatIf(item="footnote")     Message(&tbox;1210)     //ChooseLayout,Footnote,Create   	 	   ELSEIf(item="endnote")     Message(&tbox;1215)     //ChooseLayout,Endnote,Create   	 `	   EndifEndif     DisplayRewrite     Result=PostIt("Coach";&tbox;45;2;0;2;0)   	 h        MenuActive=0     Show=HotSpot(0;0;62;0;altletter;&funkey;1)Switch(Show)    `	     
                    < //Creatingtable   	    //*****************************************//     UserchoosesShowMe   	 h   //******************************************     CaseOf1:    `	     
      //ShowMe   	         Result=Postit("Coach";&tbox;45;2;0;3;0)     //Coordinatesforinstructionbox   	 p   А     ShowMenu("Coach";&sbox;3;12;3;down;1;0)     //coordinatesforhelp,menuover,menudown   	 8   //*****************************************//     UserchoosesLayout               //Menubaritem   	 X   //******************************************     CaseOf1531:    
           //UserchoosesLayout   	 8   //*****************************************//     UserpressesAlt+L   	 @"   //******************************************     CaseOf537:    
           //UserpressedAltL   	   $   Ѐ          PullDownDlg   	 !%             Type("l")    
           //menubarletter   	 `"&             Result=Postit("Coach";&tbox;45;2;0;3;0)   	 (#x'   //********************************************************//     UserPressesCtrl+F7   	 % *   //********************************************************     CaseOf8118:    
 //UserpressedCtrl+F7   	 '`",             DisplayRewrite          DlgInput(on!)          NotesDlg    
 //Opencorrectdlgandtabtocorrectitem   	 0*%0             While(?Dialog<>67)   	 *H&1             Endwhile   	 +'2             While(?DialogControl<>DlgID)              4 TabKey          Endwhile          Return    `	     
    	 X   //*****************************************//     UserpressesAlt=   	 `	   //******************************************     CaseOf8085:    
                    <     h //UserpressedAlt+=   	 
@             Result=PostIt("Coach";&tbox;45;2;0;3;0)   	 	             0    4       MenuActive=MenuBarControl("Coach";&hbox1;&Helpmsg;3;12;MenuLetter;&funkey)    
 4(#4(#  //*****************************************//     NoChoice   	 (

   //******************************************     DEFAULT:    `	     
                    <     h                     //Default   	 h             PosLineDown          0    4       MenuActive=MenuBarControl("Coach";&hbox1;&Helpmsg;3;12;MenuLetter;&funkey)    H
 4(#4(#       ENDSwitch   	    If(MenuActive<>1)    
      //forintermediatedlgifmenuisused   	 h        If(Show<>8118)     //UserdidnotpressCtrl+F7   	 0             0    4       Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;&accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)  
  4(#4(#                4 DisplayRewrite              4 MenuActive=Result     EndifEndifUntil(MenuActive<>1)RETURN//*********************************************************	   	  X#   //**********************************************************////     DIALOGCONTROLFootnotes   	 @   ////**********************************************************Label(NotesDlgFOOT)Result=0    4 SaveScrn=0        	 `	   //*************************************ValuesforDlg67Display(on!)     x1={    4 10;11;    
      //HotspotCoordinatesforFootnote,Create   	 
             }     x2={    4 20;19;   	 `	             }     y1={    4 5;6;   	 
             }     y2={    4 5;6;   	 0             }     hotkey={    `	 102;     //fforfootnote   	                  4     `	 768;     //Create   	              }     hotpnt={    `	 0;1;     //RepaintthescreenwhenHotspotschosen   	 0             }     helpmsg={    `	 "Choose>  r [BoldOn]?
   
 Footnote>   [BoldOff]?
   
 ,";   	 p                 4     `	     
 "then>  r [BoldOn]?
   
 Create.";   	 A                 4     `	 }While(?Dialog=67)    
      //67Dlg   	         Message(&tbox;1220)     //MessagetoAppearinthisDlg   	 a        If(?Substructureor?Editscreen)          DisplayRewrite          Return     Endif     Switch(?DialogControl)          CaseOf1266:               //sittingonfootnote   	  a#             info={    `	 1266;          //ControlID   	  )$                 4     `	 67;          //DialogID   	 !%                 4     `	 1;    
      //don'tallowarrows   	 i"&                 4     `	 "Coach";     //title   	 1#'                 4     `	 34;    
      //xposforPostit   	 #I(                 4     `	 5;    
      //yposforPostit   	 $ )                 4     `	 0;    
      //Hintbutton   	 % *                 4     `	 "Coach";     //helpTitle   	 Q&!+                 4     `	 1;    
      //RestoreScreen   	 'i",                 4     `	 0;    
      //Reserved   	 '1#-                 4 }              4     `	 accel={     49;102;     //1orfforFootnoteValidAccelerators   	 q)$/                 4     `	 }              4 aclpnt={0;0;          //repaintscreen?   	 +Q&1                 4     `	 }    
         	 +'2   Ї          0    4 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  4(#4(#                 CaseOf1423:     ////sittingonfootnote,create   	 X             info={    `	 1423;          //ControlID   	                   4     `	 67;          //DialogID   	                  4     `	 1;    
      //don'tallowarrows   	 `	                 4     `	 "Coach";     //title   	 (
x                 4     `	 34;    
      //xposforPostit   	 
@                 4     `	 5;    
      //yposforPostit   	 	                 4     `	 0;    
      //Hintbutton   	 
                 4     `	 "Coach";     //helpTitle   	 H
                 4     `	 1;    
      //RestoreScreen   	 `	                 4     `	 1;    
      //Reserved   	 (

                 4 }              4     `	 accel={     49;99;     //1orcforCreateValidAccelerators   	 h                 4     `	 }              4 aclpnt={1;1;          //repaintscreen?   	 H
                 4     `	 }    
         	              0    4 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  4(#4(#            DEFAULT:              4 If(?Substructureor?Editscreen)              4     `	 DisplayRewrite              4     `	 Return              4 Endif              4 info={    
 ?DialogControl;    < //ControlID   	 X                 4     `	     
 67;                   < //DialogID   	  p                 4     `	     
 1;                   < //don'tallowarrows   	 8                 4     `	     
 "Coach";         < //Title   	                    4     `	     
 34;                   < //xposforPostit   	 x!                 4     `	     
 5;                   < //yposforPostit   	 @"                 4     `	     
 0;                   < //HintButton   	  X#                 4     `	     
 "Coach";         < //HelpTitle   	   $                 4     `	     
 1;                   < //RestoreScreen   	 !%                 4     `	     
 0;                   < //Reserved   	 `"&                 4     `	     
 }              4 accel={    
 102;49;          //1orfforFootnotes   	 #@(                 4     `	 }              4 aclpnt={    
 0;0;}   	 % *                 4 Allow={1266;1423;}         < //whichcontrolstoallow   	 H&!+             0    4 Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)  
  4(#4(#       ENDSwitchEndwhile    4     `	     
 //67DlgFootnote   	 0*%0   //***********************************************************RETURN	   	 +'2   //**********************************************************////     DIALOGCONTROLEndnotes   	 @   ////**********************************************************Label(NotesdlgEND)Result=0    4 SaveScrn=0        	 `	   //*************************************ValuesforDlg67Display(on!)     x1={    4 41;42;    
      //HotspotCoordinatesforEndnote,Create   	 	             }     x2={    4 51;50;   	 H
             }     y1={    4 5;6;   	 (

             }     y2={    4 5;6;   	 h             }     hotkey={    `	 101;     //eforEndnote   	 H
                 4 768;    
 //Create   	              }     hotpnt={    `	 0;1;     //RepaintthescreenwhenHotspotschosen   	 h             }     helpmsg={    `	 "Choose>  r [BoldOn]?
   
 Endnote>   [BoldOff]?
   
 ,";   	                  4     `	 "thenCreate.";   	 y             }If(?Dialog=67)     Message(&tbox;1225)     //MessagetoAppearinthisDlg   	         While(?DialogControl<>1544)         < //onEndnote   	 a             Tabkey     EndwhileEndifWhile(?Dialog=67)    
      //67Dlg    <     h //endnotes   	 I"        If(?Substructureor?Editscreen)          DisplayRewrite          Return     Endif     Switch(?DialogControl)          CaseOf1544:     //SittingonEndnote   	 $ )                 4 info={    
 1544;          //ControlID   	 % *                 4     `	 67;          //DialogID   	 Q&!+                 4     `	 1;    
      //don'tallowarrows   	 'i",                 4     `	 "Coach";     //title   	 '1#-                 4     `	 18;    
      //xposforPostit   	 (#.                 4     `	 5;    
      //yposforPostit   	 q)$/                 4     `	 0;    
      //Hintbutton   	 9*%0                 4     `	 "Coach";     //helpTitle   	 +Q&1                 4     `	 1;    
      //RestoreScreen   	 +'2                 4     `	 0;    
      //Reserved   	                     4 }              4     `	 accel={     51;101;     //3oreforendnoteValidAccelerators   	 @                 4     `	 }              4     `	 aclpnt={0;0;         < //repaintscreen?   	                   4     `	 }    
         	              0    4 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  4(#4(#            CaseOf1545:     //SittingonEndnote,Create   	 	                 4 info={    
 1545;          //ControlID   	 
                 4     `	 67;               //DialogID   	 H
                 4     `	 1;    
                //don'tallowarrows   	 `	                 4     `	 "Coach";          //title   	 (

                 4     `	 18;    
                //xposforPostit   	 
                 4     `	 5;    
                //yposforPostit   	 h                 4     `	 0;    
                //Hintbutton   	 0                 4     `	 "Coach";          //helpTitle   	 H
                 4     `	 1;    
                //RestoreScreen   	                  4     `	 1;    
                //Reserved   	                  4 }              4     `	 accel={     49;99;     //1orcforCreateValidAccelerators   	 h                 4     `	 }              4 aclpnt={1;1;          //repaintscreen?   	                  4     `	 }    
         	 p             0    4 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  4(#4(#            DEFAULT:              4 info={    
 ?DialogControl;    < //ControlID   	  p                 4     `	     
 67;                   < //DialogID   	 8                 4     `	     
 1;                   < //don'tallowarrows   	                    4     `	     
 "Coach";         < //Title   	 x!                 4     `	     
 18;                   < //xposforPostit   	 @"                 4     `	     
 5;                   < //yposforPostit   	  X#                 4     `	     
 0;                   < //HintButton   	   $                 4     `	     
 "Coach";         < //HelpTitle   	 !%                 4     `	     
 1;                   < //RestoreScreen   	 `"&                 4     `	     
 0;                   < //Reserved   	 (#x'                 4     `	     
 }              4 accel={    
 101;51;          //eor3forEndnotes   	 $ )                 4     `	 }              4 aclpnt={    
 0;0;}   	 H&!+                 4 Allow={1544;1545}         < //whichcontrolstoallow   	 '`",             0    4 Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)  
  4(#4(#       ENDSwitchEndwhile    4     `	     
 //67DlgEndnote   	 0*%0   //***********************************************************RETURN	   	 +'2   //***********************************************************////     TypethestuffforEndnote/Footnote   	 @   ////************************************************************Label(Typeit)     Cancel(off!)     CancelMsg=0  %
    
       Message(&tbox;1230)     //Typefootnote/endnotetext   	 
@        FakeIt("Coach";&tbox;3;1;0)//     keypress={8154;}      (# //F7key   	 
   //     chkcode={1;}   	 H
   //     Key=DoEdit(1;&chkcode;&keypress)    w (# //WaitforusertoF7   	 `	   //***************************************     While(?Substructure<>0)          Char(Key)          If(Key=8160)    n  (# //pressEsc   	 0                 4 CancelCoach()              4 Key=0              4 CancelMsg=0          EndIf          If(key=768)              4 If(?MouseLastY=23)    >y (# //clickoncontinue   	                  4     `	 If(?MouseLastX>=45and?MouseLastX<=59)              4     `	     
 While(?MouseLeft)              4     `	     
 EndWhile              4     `	     
 key=8154              4     `	 Else              4     `	     
 If(?MouseLastX>=62and?MouseLastX<=76)    g} (# //clickofQuit   	 X                 4     `	     
      While(?MouseLeft)              4     `	     
      EndWhile              4     `	     
      CancelCoach()              4     `	     
      CancelMsg=0              4     `	     
      key=0              4     `	     
 EndIf              4     `	 EndIf              4 EndIf          EndIf          Type(ntoc(key))     EndWhile//Return//*********************************************	   	 % *        WindowMaximize     SubstructureExit     If(Item="footnote")          If(?LeftCode=10495)              4 Success=1          Endif %
    
       ElseIf(Item="endnote")          If(?Leftcode=10493)              4 Success=1          Endif     Else          Success=0     EndifEndifReturn	   	 (

    %
     
  //***********************************************************////     PROCEDURE:Message   	 @   ////************************************************************PROCEDUREMessage(&tbox;Msg)Switch(Msg)Caseof1001:    `	 //Coachsuccessful   	 	   If(item="endnote")     x="anendnote"Elseif(item="footnote")     x="afootnote"EndifEndiftbox={     "Youhaveinserted"+x+"inyourdocument.";   	 0             "Doyouwanttoinsertanother?";          "";     }Caseof1002:    `	 //Coachnotsuccessful   	 h   tbox={     "Somehowno"+item+"wasinsertedinthedocument.";   	 0             "Wouldyouliketotryagain?";          "";     }Caseof1003:    `	 //EndnotePlacementinfo.   	    If(item="endnote")tbox={     "Eachendnoteyoucreateisplacedattheendofyourdocument.";   	  p             "IfyoucannotseetheendnotesafteryouleaveCoach,youcan";          "choose>  r [BoldOn]?
   
 File>   [BoldOff]?
   
 ,then>  r [BoldOn]?
   
 PrintPreview>   [BoldOff]?
   
 Ԁtoviewtheendnotes.";          "";          "AfteryouleaveCoach,youcanplaceahardpagebreak";          ">  r [BoldOn]?
   
 (Ctrl+Enter)>   [BoldOff]?
   
 Ԁattheendofyourdocumenttoseparatethe";          "endnotesfromtherestofyourdocument.";          "";          }ElseIf(Item="footnote")tbox={     "Eachfootnoteyoucreateisplacedatthebottomofthepage";   	 % *             "whereyoumadethereference.Ifyoucannotseethefootnotes";          "afteryouleaveCoach,youcanchoose>  r [BoldOn]?
   
 File>   [BoldOff]?
   
 ,then>  r [BoldOn]?
   
 PrintPreview";          ">   [BoldOff]?
   
 toviewthefootnotes.";          "";     }EndifEndifCaseof1100:    `	 //OpeningScreen   	 +'2   w=75h=21tbox={"";     ">  r [BoldOn]?
   
 CreatingFootnotesandEndnotes>   [BoldOff]?
   
 ";     "";     "Youcaninsertafootnotethatisplacedatthebottomofthepage";     "oryoucaninsertanendnotethatisplacedattheendofyourdocument.";     "";     "FootnotesEndnotes";           "

";   	 
@        "			1	";   	 	        "			
Choosefromthefollowingtasks:";   	 n
        "	1			2	";   	 -
}        "				
";   	 
<	        "					3	";   	 	
        "	1				1.	";   	 j
        "

	2.	";   	 )y        "		3.	";   	 8        "
	";   	         "	4.	";   	 f
        "
";   	 %u        "";     }Caseof1205:tbox={    4 "Placethecursorwhereyouwantthe"+item+".";   	 'w        "";     }Caseof1210:tbox={    4 "Tocreateafootnote,";   	 k        "";     "Choose>  r [BoldOn]?
   
 Layout>   [BoldOff]?
   
 ,";   	 	         "then>  r [BoldOn]?
   
 Footnote>   [BoldOff]?
   
 ,";     "then>  r [BoldOn]?
   
 Create>   [BoldOff]?
   
 .";     "or";     "Press>  r [BoldOn]?
   
 Ctrl+F7>   [BoldOff]?
   
 .";   	 V$        "";     }Caseof1215:tbox={    4 "Tocreateanendnote,";   	 !)        "";     "Choose>  r [BoldOn]?
   
 Layout>   [BoldOff]?
   
 ,";   	 "8+        "then>  r [BoldOn]?
   
 Endnote>   [BoldOff]?
   
 ,";     "then>  r [BoldOn]?
   
 Create>   [BoldOff]?
   
 .";     "or";     "Press>  r [BoldOn]?
   
 Ctrl+F7>   [BoldOff]?
   
 .";   	 % /        "";     }Caseof1220:tbox={    4 "Choose>  r [BoldOn]?
   
 Footnote,";   	 ($4                 4 ">   [BoldOff]?
   
 then>  r [BoldOn]?
   
 Create.";     }Caseof1225:tbox={    4 "Choose>  r [BoldOn]?
   
 Endnote,";   	 
,]'9                 4 ">   [BoldOff]?
   
 then>  r [BoldOn]?
   
 Create.";   	            }Caseof1230:tbox={    4 "Typethetextforthe"+item+".";   	 L        "";     }Caseof1300:tbox={    4 "Doyouwanttoopenadocument?";   	 
	                 4 "";          }Caseof5000:    
           //Hints   	 
#	   DEFAULT:    4     `	     
      //Ifnonewerefound   	 !q
        tbox={    `	 "Messagenotfound!"+msg;   	                  4     `	 "";              4 }     hbox={    `	 "Nohintavailable.Whattypeofinformation";   	 d
                 4     `	 "wouldbehelpfulhere?";              4     `	 "";              4 }ENDSwitchENDPROC8    4     N 44  //***************************************************************   **  