WPCq  
                 0   (     	1   S           /  0   \        D  #     Y  G     L  <Z   	      b        kd   	      b        wd   U      b  	%      b          b  "   ]  *n   !   `   d   !     d  #     \c   !   0  h   !     j   !   0   l  	)      l      '  m                                                                                          (                    $                               3 7 9 ; = ? A G M                 1 .   a .   1 )      M e s s a g e                                                                                                                                      (         
      $       @    S  

     
 
     
   A                                                                 D                                                                   D                                                                   :                                                                  b                                                                  d     	                                                             F                                                                  n                                                                  @     
                                                                                                                               z                                                                  &                                                                  h                                                                                                                                                                                                      ,     
                                                             l                                                                  r                                                                                                                                                                                                                                                                        0	                                                                  0	    B l o c k T e x t                                               \	                                                                                                                                    n
                                                                  
                                                                                                                                                                                                          I n s e r t T e x t                                             Ǩ                                                                                                                                                                                                       
     "                                                             
     !                                                             
                                                                  
    S e l e c t T e x t                                             
     %                                                             ǜ     '                                                                  &                                                             b     )                                                             \     (                                                             \     $                                                             h     #                                                                 P o s i t i o n C u r s o r                                     Ǭ    T y p e T e x t                                                 ǲ     +                                                                  .                                                                  -                                                                  ,                                                                  *                                                             L     1                                                                  0                                                                  /                                                             ,    A t t r i b O n                                                 ǒ     4                                                             !     7                                                             	H$     6                                                             4#     5                                                             	F)     9                                                             	 %     8                                                             	n$     ;                                                             	&     :                                                             	J%     =                                                             	&     <                                                             	&     ?                                                             	^(     >                                                             	'     @                                                             	^(     A                                                             	F)     D                                                             f.     F                                                             N*     E                                                             R.     H                                                             *     G                                                             L.     J                                                             -     I                                                             F.     L                                                             @.     K                                                             @.     C                                                             f.     3                                                             l.     2                                                             .    A t t r i b O f f                                               .     O                                                             2;     R                                                             	=     Q                                                             <     P                                                             	B     T                                                             	v>     S                                                             	=     V                                                             	?     U                                                             	>     X                                                             	4@     W                                                             	 @     Z                                                             	A     Y                                                             	^@     [                                                             	A     \                                                             	B     _                                                             FG     a                                                             C     `                                                             2G     c                                                             D     b                                                             ,G     e                                                             &G     g                                                             G     f                                                             G     d                                                             &G     ^                                                             FG     N                                                             LG     M                                                             G    F o n t S u b 1                                                 ǢG     i                                                             xI     h                                                             K     j                                                             M     k                                                             Jb     n                                                             	Q     m                                                             N     l                                                             	6b     p                                                             	R     o                                                             	Q     q                                                             	*R     r                                                             	DR     s                                                             	bR     t                                                             	|R     u                                                             	R     v                                                             	R     w                                                             	R     x                                                             	R     y                                                             	
S     z                                                             	$S     {                                                             	BS     |                                                             	\S     }                                                             	zS     ~                                                             	S                                                                  	S                                                                  	S                                                                  	S                                                                  	\                                                                  	\                                                                  	6b    F o n t S u b 2                                                 Zb                                                                  d                                                                  f                                                                  ǰi                                                                                                                                    	
n                                                                  i                                                                  	                                                                  	:r                                                                  	(n                                                                  	rr                                                                  	Xr                                                                  	r                                                                  	r                                                                  	r                                                                  	r                                                                  	 s                                                                  	s                                                                  	8s                                                                  	Rs                                                                  	ps                                                                  	s                                                                  	s                                                                  	s                                                                  	s                                                                  	s                                                                  	t                                                                  	2t                                                                  	Pt                                                                  	B}                                                                  	B}                                                                  	    S e l e c t D a t a                                                                                                                                                                                 ʃ                                                                                                                                                                                                                                                                                                                                                                                                                                                                              
                                                                                                                                                                                                      
                                                                                                                                                                                                                                                                                                                                                                                                                                                                              ·                                                                                                                                    ̈                                                                  z                                                                                                                                    ̈                                                                                                                                    l                                                                                                                                                                                                                                                                        X                                                                                                                                                                                                                                                                        H                                                                                                                                                                                                            $  M e s s a g e                                                                 	l                                                                                                                                    	                                                                  	                                                                  	                                                                  
                                                                                                                                    N                                                                  z                                                                  	z                                                                  	                                                                  	                                                                  	                                                                  	                                                                  	                                                                  	                                                                  	                                                                  	                                                                  	Ԙ                                                                  	                                                                  	<                                                                  	                                                                  	                                                                  	N                                                                  	                                                                  	                                                                  	r                                                                  	                                                                  	6                                                                  	                                                                  	                                                                  	D                                                                  	                                                                  	D                                                                  	                                                                                  C        @      #      6      i                   5#            G                         a      a                ,<      O      "R      V            
                  ,-      4             	'      &       )      	d                  	       	      I	      r	      	      	      4	       	      	'	      	      
      
      
      
      
      
            $      |                  @            `       
      }
      
      ,      _                  -      Y      w       z      	                         
      {      ` ~            B      j      |      -      S       q      K9      KA    ,{            y            C             8      4J      C P       ]      -n      ,       N      Ki      Kq                        -            ^ 
      
M       P      ,}      u      4      ^       
            %   ,B      um      4      ^       
                            -      S       (      KH&      KP&    ,a&      &      '      	'      	(      v(      	})      q4*      q4*       d*      	*      	Q+      :,      v,      }-      	-      -      JC.      JL.    .      K .      G.      G.      G /      G/      9/      l/      /      G0      G0      G0      G0      T0      0      (2      ':2      J2      J2    ?3      K 3      G3      G3      G3      G3      S4      4      4      GR5      GV5      GZ5      G^5      5      
6      O6      6      6      6      46      J7      J7     7      -u7      .8       K8      ,yA      A      B      	B      	C      vC      	YD      qE      qE       @E      	E      	F      :4G      vaG      
H      	.H      gH      JH      JH    H      K <I      $I      $I      I       J      5J      $J      $J      J      K      L      'L      JTM      J]M    M      K N      $iN      $qN      N      O      $O      $O      O      OP      P      P      P      Q      4"Q      JFQ      JOQ     -UQ      
R      )R      S      U      7W       W      X      } X      	NX      } X       Y      	]      } X      ;^      	H^      } X      ;^      	^      } X      ;^      	_      } X      ;X_      	_      } X      ;_      	_      } X      ;,`      	Z`      } X      ;`      	`      } X      ; a      	.a      } X      ;ja      	a      } X      } a       Rb      :h      } hh       h      q      	q      -q      r      r      jt      (v      7Ox       Ux      {x      } x      	x      } y       oy      	8~      } x      } ~       ~      	      } x      ;      	'      } x      ;c      	      } x      ;̈́      	      } x      ;7      	e      } x      ;      	υ      } x      ;      	9      } x      ;u      	      } x      ;߆      	
      } x      ;I      	w      } x      } Ň       1      :      } M                   	      -      n                   	˘      +                               Й      5                                     L                  ƛ       ɛ            R                  ̜       Ϝ            X                  ҝ       ՝            \            Ğ      ֞       ٞ            g      ҟ                                     ؠ                         '                        -      )      	΢      	ۢ      	£      ϣ                  ;      ~            	      	B      	      	֫      	      	Z      	/      	Ԯ      	      	5      	#      	      :      r      	|          #  6  i          #                          1  <  O          
    C      -  d      &  d      	   	  I	  r	  	  	  	  	  	  	  v
  
  
  
  
  
  
    $  *  |          
  Q
  }
  
  
  
  ,  _        Y  w          
  {        B  j  |      S  q    9  R  {        F  y        8  J  n  ,  N  i        1  y              $  M  }          B  m            _      S  (      @  V         #  #  $  $  $  %  H&  a&  &  &  &  .'  '  '  (  e(  (  (   )  })  )  4*  d*  *  *  Q+  +  
,  ,  ,  ,  }-  -  -  C.  .  .  .  .   /  /  9/  l/  /  0  0  0  0  T0  0  0  1  (2  2  2  ?3  3  3  3  3  3  S4  4  4  R5  V5  Z5  ^5  5  
6  O6  6  6  6  6  7  7  u7  .8  K8  8  (9  c:  y;  ;  ;  o>  >  ~?  ?  '@  #A  yA  A  A   B  2B  B  B  C  iC  C  C  D  YD  D  E  @E  nE  E  F  F  F  4G  aG  G  
H  .H  gH  H  H  <I  I  I  I   J  5J  J  J  J  K  TK  EL  L  L  TM  M  N  iN  qN  N  O  O  O  O  OP  P  P  P  Q  "Q  FQ  UQ  
R  )R  NR  R  S  S  S  T  iT  T  :U  U  U  U  bV  V  W  W  W  X  NX  X  [  \  -]  ]  ^  H^  ^  ^  ^  _  X_  _  _  _  ,`  Z`  `  `   a  .a  ja  a  a  .e  If  Yg  h  Vh  k  Ll  l  q  q  q  q  r  r  r  3s  s  
t  jt  t  t  ^u  u  (v  ;v  v  v  w  /x  8x  Ox  {x  x  x  K|  |  }  8~  u~  ρ  o        '  c    ̈́    7  e    υ    9  u    ߆  
  I  w    !  @  R    ;    1  ̒          n      ˘    +  T        Й    5  ^            L  u      ƛ    &  R  {      ̜    ,  X        ҝ    1  \      Ğ  ֞    8  g    ҟ        V      ؠ      '  ^              ΢  ۢ    £  ϣ        %  ;  X  ~        B  O      ֫        Z  g  /  <  Ԯ      ̯  5  B  #  0    #      r  |  ?  HD  < 
  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  Z K #| x   	     " B D O ??=K ' 	             "   h;]8C d  CCdn2n28dddddddddd88nnnY                           C C d                           `(`8\             d                                      ȫ                                                                                                                                                                        nnn8! n BBnnn yy          P  n7 c1R      yy     X         yy       c   n               n    n                                                                                      nd                   cccc    cccc                                                          y       MMM    MMM    MMM    MMM֐~n  yRzczXzcyhCBnnshcnnonvy XzXshn~zXyCB Bns s ~    |y                              ~~~~~~~~~~~~~~~~~~~~~~XXXXXXXyyyyyyyyyyyyyyyyyyyyyyBBBBBBBBBBBBnnnnnnn  ssssssssssss             " $ $ 8                                 Đn×rcnksX7SNN                                  mmw}\] ¸                                 Đn×rcnksX7SNN                                  mmw}\] ¸             "  u^8;Noo)CCdy8C88oooooooooo88yyyYQo~čzCyCyd)ooYsdCkz?;w?zdsoY]Nzkkk`CyCyC8CC!CCC     CCCCCC  Cs  oooooȟYddddQ?Q?Q?Q?zddddzzzzkosddkdsoooYYYYsddddkkkkkkzzQ?Q?Q?Q?  o w?????zzzzddȧYYY~]~]~]~]NNNzzzzzzĜkz`z`z`  s?zY~]NkksdzdQ? ?dNy  8 yd;YUUoo oC<oC oC )  NNo44  dd            zz     )N             C'yy      y           y               P  y                         z                            < 6X  9  ` +   C o u r i e r         "6 2  
p`     S y m b o l         4U ''    p`    * I T C   Z a p f   D i n g b a t s         3    p`   4 N e w   C e n t u r y   S c h o o l b o o k         < 6X   ` #  " W P   B o x D r a w i n g           ? x x x  X    Xx  { W  1 l C l    / Xl 6 q  TK     C   X  \ X sTX  - e C e     Xe UJ  ? x x x  X   Xx Slic New Century Schoolbook Italic Palatino  Palatino Bold Palatino Bold Italic Palatino Italic ITC Zapf Dingbats  [!  b   , D FH                 z{!R  2   
    !    W %
    
   
  ,   X 	 %
 
   
 	 //*********************************************////     NAME:    
           WPCH_AT1.WPM   	 @   //        	 X   //     PURPOSE:     Coachontextappearence   	     ////*********************************************   If(?BlockActive)     BlockOffEndifGlobal(ScrnMode;MsgAdj;DefTitle;CancelMsg;AreaHgt)Global(SaveScrn;HotElement)Global(NmeAttrib)DefTitle="Coach"              <     h //Maintitlename   	 (

   ScrnMode=?ScreenHigh24CancelMsg=1Use("wpchlibr.wpm")         <     h //Sharedlibraryfile   	 H
   If(?RevealCodesActive)     RevealCodes     Reveal=1Else     Reveal=0EndifColorScheme()ScreenSetup()MsgAdj=DlgMessage()	   	    //*********************************************////     MAINPROGRAM:Coach   	 @   ////*********************************************Error(Off!)Cancel(Off!)Success=0Progress=0Repeat     If(NotExists(StndAlone))          Message(&tbox;1007)          Result=Welcome(DefTitle;&tbox)     Else          Result=1     Endif     If(Result=1)          Message(&tbox;1002)    h                //Question   	 H
             Result=MessageBox(DefTitle;&tbox;3)          If(Result=1)              4 Repeat              4     `	 tbox={1;}              4     `	 Result=OpenDocument(&tbox)              4 Until(?DocBlank=0orResult=1)              4 If(?DocBlank)              4     `	 Call(InsertText)              4 Else              4     `	 Call(BlockText)              4 Endif          Else              4 Call(InsertText)          Endif     Else          QuitCoach()     EndifUntil(?DocBlank=0orProgress=1)DisplayRewriteMessage(&tbox;1005)         <     h                //Congratulations   	 `"&   Result=MessageBox(DefTitle;&tbox;1)If(Reveal=1)     RevealCodes     DisplayRewriteEndifIf(Reveal=1)     RevealCodes     DisplayRewriteEndifQuitCoach()//*********************************************//     ENDMAINPROGRAM   	 ,'3   //*********************************************	   	 P-(4   //*********************************************////     SUBROUTINE:BlockText   	 @   ////*********************************************Label(BlockText)     Call(SelectText)     Call(AttribOn)     BlockOff     If(?FontNormal=0)          If(NmeAttrib="multiple")              4 Message(&tbox;1501)          Else              4 Message(&tbox;1502)          Endif          Result=MessageBox(DefTitle;&tbox;3)          If(Result=1)              4 Call(AttribOff)          Endif     EndifReturn	   	 P   //*********************************************////     SUBROUTINE:InsertText   	 @   ////*********************************************Label(InsertText)     If(?DocBlank=0)          Call(PositionCursor)     Endif     Call(AttribOn)     Call(TypeText)     WindowMaximize              <     h //Maximizewindow   	 H
        If(?FontNormal=0)          Message(&tbox;1503)          Result=MessageBox(DefTitle;&tbox;3)          If(Result=1)              4 Call(AttribOff)          Endif     Endif     Progress=1Return	   	 P   //*********************************************////     SUBROUTINE:SelectText   	 @   ////*********************************************Label(SelectText)     WindowMaximize              < //Maximizewindow   	 `	        Message(&tbox;1201)    <     h //Selectblockoftext   	 (
x        Display(On!)     FakeIt(DefTitle;&tbox;5;1;0)     Repeat          Result=BlockEdit(DefTitle;1;1;&tbox;5;1)          If(Result=3)              4 Message(&hbox;1902)              4 Hint=Hint(&hbox;99;99;3)          Else              4 If(?BlockActive=0)              4     `	 Null=NoBlock()              4 Endif          Endif     Until(?BlockActiveandResult=1)Return	   	 0   //*********************************************////     SUBROUTINE:PositionCursor   	 @   ////*********************************************Label(PositionCursor)     WindowMaximize     Display(On!)     Message(&tbox;1302)    <     h      //Positioncursor   	 
@        FakeIt(DefTitle;&tbox;3;1;0)     chkcode={1;}     keypress={8154;}    < //F7key   	 `	        Key=DoEdit(1;&chkcode;&keypress)     WindowMaximize     DisplayRewriteReturn	   	 H
   //*********************************************////     SUBROUTINE:TypeText   	 @   ////*********************************************Label(TypeText)     Message(&tbox;1303)    <     h      //Typetext   	 `	        Code=?RightCode     FakeIt(DefTitle;&tbox;3;1;0)     If(?WP51CursorMovement)          Repeat              4 PosCharPrevious          Until(?RightCode=Code)     Else          WP51CursorMovement(On!)          Repeat              4 PosCharPrevious          Until(?RightCode=Code)          WP51CursorMovement(Off!)     Endif     chkcode={1;}     keypress={8154;}    < //F7key   	 h        Key=DoEdit(1;&chkcode;&keypress)     DisplayRewriteReturn	   	 p   //*********************************************////     SUBROUTINE:AttribOn   	 @   ////*********************************************Label(AttribOn)     WindowMaximize              <     h //Maximizewindow   	 `	        Message(&tbox;1701)    <     h      //ChooseFontmenu   	 (
x        hbox1={    
 "Select>  r [BoldOn]?
   
 Font>   [BoldOff]?
   
 Ԁfromthemenubar";   	 	                 4     `	 "";          }    4     `	     
    	 H
        hbox2={    
 "Select>  r [BoldOn]?
   
 anyAttribute>   [BoldOff]?
   
 Ԁfromthe   	 `	   Fontmenu";              4     `	 "";          }     hbox3={    
 1;   	 0             }          FontMenu(&valid)     allow={    
      1656;   	 P                 4     `	 1666;              4     `	 1667;              4     `	 1668;              4     `	 1669;              4     `	 1670;              4     `	 1671;              4     `	 1672;              4     `	 1673;              4     `	 1684;          }     exallow={    
 0;1;1;1;1;1;1;1;1;1;   	 8                 4 }     accel={    
 111;98;117;100;105;116;97;   	 @"                 4 99;114;115;          }     exaccel={    
 0;1;1;1;1;1;1;1;1;1;   	 !%                 4 }     NoSubMenu(&subval;&subacl;&exsubacl;&subs)     sbox={    `	 "";   	 #@(             "Chooseanyof";   	 $ )             "theattributes";          "fromBoldto";          "Strikeout.";          "";          }     funkey={    
 8117;   	 >*%0             }     Display(On!)     Repeat          DisplayRewrite   	 ^-(4             Result=Postit(DefTitle;&tbox;0;12;0;2;0)          MenuActive=0               Show=HotSpot(0;0;62;0;534;&funkey;1)          Switch(Show)          CaseOf1:               //Showmenu   	 `	                 4 Result=Postit(DefTitle;&tbox;0;12;0;3;0)              4 ShowMenu("Coach";&sbox;9;5ScrnMode;5;3;0;0)          CaseOf1655:              4 PosLineDown              4 Result=Postit("Coach";&sbox;9;5ScrnMode;0;0;0)          CaseOf534:         < //Accelmenu   	 
                 4 Result=Postit(DefTitle;&tbox;0;12;0;3;0)              4 PullDownDlg              4 Type("o")              4 Result=PostIt("Coach";&sbox;9;5ScrnMode;0;0;0)          CaseOf8117:         < //Functionkey   	 P             CaseOf8085:         < //Choosemenu   	 0                 4 Result=Postit(DefTitle;&tbox;0;12;0;3;0)              4 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;9;5     	     ScrnMode;111;&funkey)          DEFAULT:              4 PosLineDown              4 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;9;5     	 x!    ScrnMode;111;&funkey)          EndSwitch          If(MenuActive<>1)              4 If(Show=8117)              4     `	 DlgInput(On!)              4     `	 DisplayRewrite              4     `	 FontDlg              4     `	 TabTabTabTab              4     `	 Call(FontSub1)              4 Else              4     `	 If(MenuActive=8117)              4     `	     
 TabTabTabTab              4     `	     
 Call(FontSub1)              4     `	 Else              4     `	     
    Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;              4     `	     
 &accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)              4     `	     
 MenuActive=Result              4     `	     
 If(Result=1656orResult=111)   	 .h)5                 4     `	     
      CancelMenus()              4     `	     
      DlgInput(On!)              4     `	     
      DisplayRewrite              4     `	     
      FontDlg              4     `	     
      TabTabTabTab              4     `	     
      Call(FontSub1)              4     `	     
 Else              4     `	     
      If(Result=8117)              4     `	     
           TabTabTabTab              4     `	     
           Call(FontSub1)              4     `	     
      Endif              4     `	     
 Endif              4     `	 Endif              4 Endif          Endif     Until(MenuActive<>1)     DlgInput(Off!)     Call(SelectData)         < //Getnamesofattributes   	    Return	   	    //*********************************************////     SUBROUTINE:AttribOff   	 @   ////*********************************************Label(AttribOff)     WindowMaximize              <     h //Maximizewindow   	 `	        Message(&tbox;1802)    <     h      //ChooseFontmenu   	 (
x        hbox1={    
 "Select>  r [BoldOn]?
   
 Font>   [BoldOff]?
   
 Ԁfromthemenubar";   	 	                 4     `	 "";          }    4     `	     
    	 H
        hbox2={    
 "Select>  r [BoldOn]?
   
 anyAttribute>   [BoldOff]?
   
 Ԁfromthe   	 `	   Fontmenu";              4     `	 "";          }     hbox3={    
 1;   	 0             }          FontMenu(&valid)     allow={    
      1656;   	 P                 4     `	 1657;              4     `	 1666;              4     `	 1667;              4     `	 1668;              4     `	 1669;              4     `	 1670;              4     `	 1671;              4     `	 1672;              4     `	 1673;              4     `	 1684;          }     exallow={    
 0;1;1;1;1;1;1;1;1;1;1;   	                    4 }     accel={    
 111;110;98;117;100;105;116;97;   	  X#                 4 99;114;115;          }     exaccel={    
 0;1;1;1;1;1;1;1;1;1;1;   	 `"&                 4 }     NoSubMenu(&subval;&subacl;&exsubacl;&subs)     sbox={    `	 "";   	 $ )                 4 "Choose>  r [BoldOn]?
   
 Normal.";   	 % *                 4 "";          }     funkey={    
 8117;   	 (#.             }     Repeat          DisplayRewrite          Result=Postit(DefTitle;&tbox;0;12;0;2;0)          MenuActive=0   	 ^-(4                  Show=HotSpot(0;0;62;0;534;&funkey;1)          Switch(Show)          CaseOf1:               //Showmenu   	                   4 Result=Postit(DefTitle;&tbox;0;12;0;3;0)              4 ShowMenu("Coach";&sbox;9;5ScrnMode;5;1;0;0)          CaseOf1655:              4 PosLineDown              4 Result=Postit("Coach";&sbox;9;5ScrnMode;0;0;0)          CaseOf534:         < //Accelmenu   	 `	                 4 Result=Postit(DefTitle;&tbox;0;12;0;3;0)              4 PullDownDlg              4 Type("o")              4 Result=PostIt("Coach";&sbox;9;5ScrnMode;0;0;0)          CaseOf8117:         < //Functionkey   	              CaseOf8085:         < //Choosemenu   	 P                 4 Result=Postit(DefTitle;&tbox;0;12;0;3;0)              4 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;9;5ScrnMode;111;&funkey)          DEFAULT:              4 PosLineDown              4 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;9;5ScrnMode;111;&funkey)          EndSwitch          If(MenuActive<>1)              4 If(Show=8117)              4     `	 DlgInpu  %
     
  t(On!)              4     `	 DisplayRewrite              4     `	 FontDlg              4     `	      4     `	 BackTabBackTab              4     `	 Call(FontSub2)              4 Else              4     `	 If(MenuActive=8117)              4     `	     
 BackTabBackTab              4     `	     
 Call(FontSub2)              4     `	 Else              4     `	     
 Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;              4     `	     
 &accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)              4     `	     
 MenuActive=Result              4     `	     
 If(Result=1656orResult=111)              4     `	     
      CancelMenus()              4     `	     
      DlgInput(On!)   	 .h)5                 4     `	     
      DisplayRewrite              4     `	     
      FontDlg              4     `	     
           
      BackTabBackTab              4     `	     
      Call(FontSub2)              4     `	     
      If(Result=8117)              4     `	     
           BackTabBackTab              4     `	     
           Call(FontSub2)              4     `	     
      Endif              4     `	     
 Endif              4     `	 Endif              4 Endif          Endif     Until(MenuActive<>1)     DlgInput(Off!)Return	   	 0   //*********************************************////     SUBROUTINE:FontSub1   	 @   ////*********************************************Label(FontSub1)     If(ColorSet)          x1={    `	 3;59;   	 (
x                 4 }          x2={    `	 54;66;   	 	                 4 }          y1={    `	 8;20;   	 H
                 4 }          y2={    `	 11;20;   	 (

                 4 }     Else          x1={    `	 3;59;   	 0                 4 }          x2={    `	 54;66;   	                  4 }          y1={    `	 6;21;   	 P                 4 }          y2={    `	 9;21;   	 0                 4 }     Endif     hotpnt={    
 0;1;   	  P             }     hotkey={    
 768;8182;   	                  4 }     Message(&tbox;1404)     helpmsg={    
 "Choose>  r [BoldOn]?
   
 afontattribute>   [BoldOff]?
   
 ";   	 8                 4     `	 "fromtheAppearancegroup.";              4     `	 "";              4 }     Result=0SaveScrn=0     While(?Dialog=15)          Switch(?DialogControl)              4 CaseOf0:              4     `	 info={     ?DialogControl;   	 $ )                 4     `	     
      ?Dialog;              4     `	     
      0;              4     `	     
      DefTitle;              4     `	     
      2;              4     `	     
      0;              4     `	     
      1;              4     `	     
      "Coach";              4     `	     
      1;              4     `	     
      0;              4     `	     
 }              4     `	 accel={     51;97;   	 ^-(4                 4     `	     
 }              4     `	 aclpnt={     0;0;   	 x                  4     `	     
 }              4     `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;              4     `	 &accel;&aclpnt;&tbox;&helpmsg)              4 CaseOf843:              4     `	 Continue              4 CaseOf844:              4     `	 Continue              4 CaseOf845:              4     `	 Continue              4 CaseOf846:              4     `	 Continue              4 CaseOf847:              4     `	 Continue              4 CaseOf848:              4     `	 Continue              4 CaseOf849:              4     `	 Continue              4 CaseOf850:              4     `	 Continue              4 CaseOf851:              4     `	 Continue              4 CaseOf852:              4     `	 info={     ?DialogControl;   	   $                 4     `	     
      ?Dialog;              4     `	     
      0;              4     `	     
      DefTitle;              4     `	     
      2;              4     `	     
      0;              4     `	     
      1;              4     `	     
      "Coach";              4     `	     
      1;              4     `	     
      0;              4     `	     
 }              4     `	 accel={     49;50;51;52;53;54;55;56;57;   	 h)$/                 4     `	     
      98;117;100;105;111;97;99;114;115;              4     `	     
 }              4     `	 aclpnt={     0;0;0;0;0;0;0;0;0;   	 +'2                 4     `	     
           0;0;0;0;0;0;0;0;0;              4     `	     
 }              4     `	    	 .h)5   Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;              4     `	 &accel;&aclpnt;&tbox;&helpmsg)              4 DEFAULT:              4     `	 info={     ?DialogControl;   	                   4     `	     
      ?Dialog;              4     `	     
      0;              4     `	     
      DefTitle;              4     `	     
      2;              4     `	     
      0;              4     `	     
      1;              4     `	     
      "Coach";              4     `	     
      1;              4     `	     
      0;              4     `	     
 }              4     `	 accel={     51;97;   	 h                 4     `	     
 }              4     `	 aclpnt={     0;0;   	 H
                 4     `	     
 }              4     `	 allow={         < 0;   	                  4     `	     
           843;              4     `	     
           844;              4     `	     
           845;              4     `	     
           846;              4     `	     
           847;              4     `	     
           848;              4     `	     
           849;              4     `	     
           850;              4     `	     
           851;              4     `	     
           852;              4     `	     
 }              4     `	 Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;              4     `	 &accel;&aclpnt;&tbox;&helpmsg;&allow)          EndSwitch     EndWhileReturn	   	   $   //*********************************************////     SUBROUTINE:FontSub2   	 @   ////*********************************************Label(FontSub2)     If(ColorSet)          x1={    `	 3;59;23;   	 (
x                 4 }          x2={    `	 54;66;30;   	 	                 4 }          y1={    `	 8;20;20;   	 H
                 4 }          y2={    `	 11;20;20;   	 (

                 4 }     Else          x1={    `	 3;59;23;   	 0                 4 }          x2={    `	 54;66;30;   	                  4 }          y1={    `	 6;21;21;   	 P                 4 }          y2={    `	 9;21;21;   	 0                 4 }     Endif     hotpnt={    
 0;1;1;   	  P             }     hotkey={    
 768;8182;8182;   	                  4 }     Message(&tbox;1405)     helpmsg={    
 "Choosethe>  r [BoldOn]?
   
 Normal>   [BoldOff]?
   
 Ԁbutton.";   	 8                 4     `	 "";              4 }     Result=0SaveScrn=0     While(?Dialog=15)          Switch(?DialogControl)              4 CaseOf0:              4     `	 info={     ?DialogControl;   	 #N(                 4     `	     
      ?Dialog;              4     `	     
      0;              4     `	     
      DefTitle;              4     `	     
      2;              4     `	     
      0;              4     `	     
      1;              4     `	     
      "Coach";              4     `	     
      1;              4     `	     
      0;              4     `	     
 }              4     `	 accel={     51;97;110;   	 ,'3                 4     `	     
 }   	 ^-(4                 4     `	 aclpnt={     0;0;0;   	                     4     `	     
 }              4     `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;              4     `	 &accel;&aclpnt;&tbox;&helpmsg)              4 CaseOf3191:              4     `	 info={     ?DialogControl;   	 (
x                 4     `	     
      ?Dialog;              4     `	     
      0;              4     `	     
      DefTitle;              4     `	     
      2;              4     `	     
      0;              4     `	     
      1;              4     `	     
      "Coach";              4     `	     
      1;              4     `	     
      0;              4     `	     
 }              4     `	 accel={     51;97;110;   	                  4     `	     
 }              4     `	 aclpnt={     0;0;0;   	 P                 4     `	     
 }              4     `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;              4     `	 &accel;&aclpnt;&tbox;&helpmsg)              4 CaseOf843:              4     `	 Continue              4 CaseOf844:              4     `	 Continue              4 CaseOf845:              4     `	 Continue              4 CaseOf846:              4     `	 Continue              4 CaseOf847:              4     `	 Continue              4 CaseOf848:              4     `	 Continue              4 CaseOf849:              4     `	 Continue              4 CaseOf850:              4     `	 Continue              4 CaseOf851:              4     `	 Continue   	 .h)5                 4 CaseOf852:              4     `	 info={     ?DialogControl;   	 x                  4     `	     
      ?Dialog;              4     `	     
      0;              4     `	     
      DefTitle;              4     `	     
      2;              4     `	     
      0;              4     `	     
      1;              4     `	     
      "Coach";              4     `	     
      1;              4     `	     
      0;              4     `	     
 }              4     `	 accel={     49;50;51;52;53;54;55;56;57;   	 `	                 4     `	     
      98;117;100;105;111;97;99;114;115;110;              4     `	     
 }              4     `	 aclpnt={     0;0;0;0;0;0;0;0;0;   	 h                 4     `	     
           0;0;0;0;0;0;0;0;0;0;              4     `	     
 }              4     `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;              4     `	 &accel;&aclpnt;&tbox;&helpmsg)              4 DEFAULT:              4     `	 info={     ?DialogControl;   	                  4     `	     
      ?Dialog;              4     `	     
      0;              4     `	     
      DefTitle;              4     `	     
      2;              4     `	     
      0;              4     `	     
      1;              4     `	     
      "Coach";              4     `	     
      1;              4     `	     
      0;              4     `	     
 }              4     `	 accel={     51;97;   	 @"                 4     `	     
 }              4     `	 aclpnt={     0;0;   	   $                 4     `	     
 }              4     `	 allow={         < 0;   	 `"&                 4     `	     
           843;              4     `	     
           844;              4     `	     
           845;              4     `	     
           846;              4     `	     
           847;              4     `	     
           848;              4     `	     
           849;              4     `	     
           850;              4     `	     
           851;              4     `	     
           852;              4     `	     
 }              4     `	 Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;              4     `	 &accel;&aclpnt;&tbox;&helpmsg;&allow)          EndSwitch   	 .h)5        EndWhileReturn	   	 x    //*********************************************////     SUBROUTINE:SelectData   	 @   ////*********************************************Label(SelectData)     NmeAttrib=""     If(?FontBold)          If(NmeAttrib="")              4 NmeAttrib="Bold"          Else              4 NmeAttrib="multiple"          Endif     Endif     If(?FontUnderline)          If(NmeAttrib="")              4 NmeAttrib="Underline"          Else              4 NmeAttrib="multiple"          Endif     Endif     If(?FontDoubleUnderline)          If(NmeAttrib="")              4 NmeAttrib="DoubleUnderline"          Else              4 NmeAttrib="multiple"          Endif     Endif     If(?FontItalics)          If(NmeAttrib="")              4 NmeAttrib="Italics"          Else              4 NmeAttrib="multiple"          Endif     Endif     If(?FontOutline)          If(NmeAttrib="")              4 NmeAttrib="Outline"          Else              4 NmeAttrib="multiple"          Endif     Endif     If(?FontShadow)          If(NmeAttrib="")              4 NmeAttrib="Shadow"          Else              4 NmeAttrib="multiple"          Endif     Endif     If(?FontSmallCaps)          If(NmeAttrib="")              4 NmeAttrib="SmallCaps"          Else   	 .h)5                 4 NmeAttrib="multiple"          Endif     Endif     If(?FontRedline)          If(NmeAttrib="")              4 NmeAttrib="Redline"          Else              4 NmeAttrib="multiple"          Endif     Endif     If(?FontStrikeout)          If(NmeAttrib="")              4 NmeAttrib="Strikeout"          Else              4 NmeAttrib="multiple"          Endif     EndifReturn	   	 H
   //*********************************************////     PROCEDURE:Message   	 @   ////*********************************************PROCEDUREMessage(&tbox;Msg)Switch(Msg)CaseOf1002:tbox={    4 "";   	 
             "Doyouwanttochangetheappearanceofsome";          "textthatyouhavealreadytyped?";          "";     }CaseOf1005:If(NmeAttrib="multiple")     tbox={0    `	 "";     `	(#`	(#            0    4 "Youhavenowapplied"+NmeAttrib+"attributesinyourdocument.";  
  4(#4(#                4 "";          }Else     If(NmeAttrib="")          tbox={0    
 "";    8 
(#
(#                4 0    `	 "Youhavenowappliednormaltextinyourdocument.";  
  `	(#`	(#                4     `	 "";              4 }     Else          tbox={0    
 "";     p 
(#
(#                4 0    `	 "Youhavenowappliedthe"+NmeAttrib+"attributeinyourdocument.";  
  `	(#`	(#                4     `	 "";              4 }     EndifEndifCaseOf1007:tbox={    4 "";   	 (#x'             ">  r [BoldOn]?
   
 ChangingTextAppearance>   [BoldOff]?
   
 ";          "";          "Youcanapplyseveralfontattributesto";          "yourtext:";          "";          "UnderlineDoubleUnderline";          "ItalicsOutline";          "ShadowSmallCaps";          "RedlineStrikeout";          "Bold";          "";          "";          }   	 .h)5   CaseOf1201:tbox={    4 "";   	 x         0     "Blockthetextyouwanttochange.";    @ (#(#            "";     }CaseOf1302:tbox={    4 "";   	 6
        0     "Placethecursorwhereyouwanttobegintyping.";    
N (#(#            "";     }CaseOf1303:tbox={    4 "";   	 D

        0     "Typethetext.";     (#(#            "";     }CaseOf1501:tbox={    4 "";   	              "WouldyoulikeCoachtohelpyou";          "changebacktonormaltext?";          "";     }CaseOf1502:tbox={    4 "";   	 *z             "WouldyoulikeCoachtohelpyou";          "changebacktonormaltext?";          "";     }CaseOf1503:tbox={    4 "";   	 !        "WouldyoulikeCoachtohelpyou";     "changebacktonormaltext?";     "";}CaseOf1404:tbox={    4 "SelectanyfontattributefromtheAppearance";   	 $j(             "groupbox,thenchoose>  r [BoldOn]?
   
 OK.";          "";     }CaseOf1405:tbox={    4 "Choose>  r [BoldOn]?
   
 Normal>   [BoldOff]?
   
 Ԁatthebottomofthe   	 (($.   dialogbox,";          ">   [BoldOff]?
   
 thenchoose>  r [BoldOn]?
   
 OK.";          "";     }CaseOf1701:   	 -(4   tbox={    4 "";   	                 "Tochooseafontattribute,";          "";          "Choose>  r [BoldOn]?
   
 Font>   [BoldOff]?
   
 .";   	               "or";          "Press>  r [BoldOn]?
   
 Ctrl+F8>   [BoldOff]?
   
 .";   	 n	             "";     }CaseOf1802:tbox={    4 "";   	 d
             "Tochangebacktonormaltext,";          "";          "Choose>  r [BoldOn]?
   
 Font>   [BoldOff]?
   
 .";   	              "or";          "Press>  r [BoldOn]?
   
 Ctrl+F8>   [BoldOff]?
   
 .";   	 Z             "";     }CaseOf1902:tbox={    4 "";   	 P        0     ">  r [BoldOn]?
   
 Toblocktextwithamouse:>   [BoldOff]?
   
 Ԁ>  r [BoldOn]?
   
 Toblocktextwithkeys:>   [BoldOff]?
   
 ";  
  (#(#            "";          "1.Placeyourmousepointeratthe1.Placeyourcursoratthestart";          "startofthetextyouwanttoofthetextyouwanttoblock.";          "block.2.PressAlt+F4.";          "2.Holdyourleftmousebutton3.Moveyourcursortotheendof";          "down.thetextyouwanttoblockso";          "3.Moveyourmousepointertothethatthetextishighlighted.";          "endofthetextyouwantto";          "blocksothatthetextisYourtextisnowblocked.";          "highlighted.";          "4.Releaseyourmousebutton.";          "";          "Yourtextisnowblocked.";     }DEFAULT:tbox={    4 "";   	 (($.             "Nomessagefound!";          "";     }EndSwitchENDPROC	   	 -(4   