WPC9  
                 0   (        B         
        "  	1   S   {#  0   U   #  	1      #$  0   L   $  	1   m   6%  0   L   %  0   \   %   U        	%                  "     7       K&  0   H   >.  #       	1   W   .       .   U   2   i2   	      2   	      2        2        2   !   `   2   !     #3   !     35  	)      C7      b   K7  < 
  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    (                    $        UU C a n c e l M s g   s e l e c t [ 0   x p o s   y p o s   D e f t i t l e   S c r n M o d e   S c r e e n H i g h   S t e p N u m   S t e p T e x t    w p c h l i b r . w p m    C o l o r S c h e m e   M s g A d j   D l g M e s s a g e  $ D i s p l a y R e w r i t e $ $ W i n d o w M a x i m i z e $  w p   d l g   t b o x ; 2 0 0   M e s s a g e B o x   t b o x ; 3   E n d I f   t b o x ; 1 0   t b o x   P o s C u r s o r   F a k e I t   P o s C h a r N e x t   P o s C h a r P r e v   k e y p r e s s   c h k c o d e   D o E d i t  " G e t W P C h a r s D l g "  w p c h a r s   F o n t M e n u   e x a l l o w   a c c e l   e x a c c e l   n o s u b m e n u   s u b v a l   s u b a c l   e x s u b a c l   f u n k e y   P o s t I t   M e n u A c t i v e   H o t S p o t   C a s e O f   s b o x   S h o w M e n u   P u l l D o w n D l g   D l g I n p u t   W p C h a r D l g  $ M e n u B a r C o n t r o l $  E N D C A S E   M e n u C o n t r o l   C a n c e l M e n u s    C h o o s e B u l l e t    M o u s e L e f t   E n d W h i l e   C a n c e l C o a c h   S h o w S e t  " D i a l o g C o n t r o l "  H r t   P o s L i n e U p   E n d F o r   P o s L i n e D o w n   t b o x ; M s g   E N D P R O C    F  A    $                                                            &     $                                                            P     $                                                            <     $                                                            <     $                                                            P     $                                                            V     $                                                            n    W e l c o m e D l g                                                  $                                                                 $                                                                P o s C u r s o r                                                   G e t S R D l g                                                      $                                                            L
     $                                                            	     $                                                                 $                                                            	"     $                                                            	d     $                                                            	B     $                                                            	     $                                                            	     $                                                            	     $                                                            	     $                                                            	     $                                                            	@     $                                                            	     $                                                            	"     $                                                                 $                                                                 $                                                                 $                                                                 $                                                                 $                                                                O p e n R e p l a c e D l g                                     L     $                                                            ڠ     $                                                                 $                                                            x     $                                                                 $                                                            d     $                                                            x     $                                                            ^     $                                                            (     $                                                            (     $                                                                 $                                                                 $                                                                 $                                                                 $                                                                 $                                                            v     $                                                            v    S p e c i a l H i n t                                           ڸ     $                                                            4     $                                                            !     $                                                            !     $                                                            	N(     $                                                            h'     $                                                            	p.     $                                                            	H)     $                                                            	x(     $                                                            	*     $                                                            	r)     $                                                            	,     $                                                            	*     $                                                            	V-     $                                                            	:,     $                                                            	p.     $                                                            	-     $                                                            v.     $                                                            .    N o t F o u n d E r r o r                                       ڰ.                                                                    0      M e s s a g e    $                                                            	|3     $                                                            Z0     $                                                            	~>     $                                                            	"5     $                                                            	3     $                                                            	,6     $                                                            	F5     $                                                            	08     $                                                            	P6     %                                                            	R:      %                                                            	T8     %                                                            	<     %                                                            	v:     %                                                            	=     %                                                            	<     %                                                            	=     %                                                            	~>                                                                    ڈ>           M e s s a g e                                                   0                                                                                                       3 7 9 ; = ? A G M                 1 .   a .   1 )       (                 p5$          	       0                            C 3 7 ; C O _ s         1   1 . 0   1 . 0 . 0   1 . 0 . 0 . 0   1 . 0 . 0 . 0 . 0   1 . 0 . 0 . 0 . 0 . 0   1 . 0 . 0 . 0 . 0 . 0 . 0   1 . 0 . 0 . 0 . 0 . 0 . 0 . 0       (       $           $       2    3
   
 0      
               #4e   3 7 = C I Q Y a g       1 .   a .   i .   ( 1 )   ( a )   ( i )   1 )   a )       (       $           $       2    3
   
 0         (         
      $       @    K  

     
 
     
 !      L             5                       ,                   	~                  4      "             	                   '       	1	      
      a            -      F      K      K    t      u      -O
      _      ,      b      	      	      v[      	      q       ,      	O      	      :"      v      y      	                   ,      J      4\      ~            -                        
J      J    9       
t;       t;       uS       7               L       !!      t $!      g!      s k!       ~!      s !      \!      \!   
 \K"      \T"    t#      #      #      s #       #      s #      $      K$      K$    %      } %      '/%      K%      K%     U%      U%    &3&      
&       &      F&      '      I'      g'      '      (      K7(      K?(    t(      } w(      '(      K(      K(     U#)      U,)    &z)      
)       )      F)      .*      L*      j*      \*      \*   
 \+      \+    t+      f,      x,      K,      K,    ,      -,      j-      -    ,-      .       .      .      @.      	@.     @.    A/      
A!/    A/      
A/    A/      
A0    Ap0      
A{0    A0      
A0    AX1      
Ac1    A1      
A1     
At2      
A2     
A2      
A2     
A3      
A(3     
BM3      `3      	3      	4      	5      	7      	9      	;      0<      	4:<      -K<      =      K#=      K+=    X=      -=      )>      	>      	>      	cA      	UB      	B      	#E      	F      	?H      :H      I      	I          (          
      ޿$       

    
 
    
                  #        3 7 ; ? C G K O S            -     *   +     x   !  L  q  }            e    s              !  K  ~                  1	  	  	  	  
    7  a        F  c            
  +
  O
  _  {    k  C      B    a            $  b      Y      [      ,  O      7    "  y      y            ,  J  \  ~                  +  J  ;   S         !!  g!  !  
"  K"  #  #  #  N$  $  $  %  %  %  3&  &  &  '  I'  g'  '  '  (  7(  t(  (  #)  z)  )  )  .*  L*  j*  *  *  +  +  f,  x,  ,  ,  ,  j-  ~-  -  -  -  -  -  -  .  9.  .  .  .  /  /  /  p0  0  X1  1  t2  2  3  M3  `3  3  3  4  4  4  5  5  	6  6  7  7  8  9  9  :  ;  !;  <  0<  :<  K<  =  #=  <=  X=  s=  =  =  =  =  >  >  >  >  cA  nA  UB  `B  B  B  #E  /E  F  F  ?H  LH  H  H  I  I  0 2  A p`    H e l v e t i c a         A  HD    B `B #| L   	      " B D O ??=K ' 	             "  u^88Goo,CCNu8C88oooooooooo88uuuo˅z8dozz888^o,oodoo8oo,,d,ooooCd8oddddC4CuC8CC!CCC     CCCCCC  Cz  oooooȲdoooo88888888ooooooooodoozodoooooddddooooooooooooo88888,88  d do,o,o,o,o,ooooooȽCCCddddz8z8z8oooooodzdzdzd  oo,oCdz8ddoooo88 8oNF  8 koCzoooo oJIoC oC &  CCoCC  oo            dd     ,C             C'uu      u           u               P  u                         o         "  u^..;]]o%88Aa.8..]]]]]]]]]]..aaa]ooxxofx.So]xoxofxooof...N]%]]S]].]]%%S%]]]]8S.]SxSSS8+8a8.88888     888888  8f  o]o]o]o]o]xSo]o]o]o]........x]]]]]x]x]x]x]oSo]x]f]oSx]o]o]o]o]xSxSxSxSx]o]o]o]o]]]]]]]x]x].....%..  S oS]%]%]%]%]%x]x]x]x]]]x8x8x8oSoSoSoSf.f.f.x]x]x]x]x]x]xoSfSfSfS  x]]%x]x8oSf.oSoSx]]x]o].. .]N:  . Z]8f]]]] ]>=]8 {{]8    88]88  ]]            SS     %8             8'aa      a           a               C  a                         ]           < 6X  9  ` +   C o u r i e r         "0 2  A p`    H e l v e t i c a         =  ? x x x  X    Xx  {  1 ` C `    / X` { ~ ) P 8 P    / P {                    	Z     *                                                             	      )                
    !    W   
  ,   X      X{ X  X X   //*********************************************////     NAME:    
           WPCH_SR1.WPM   	 @   //        	 X   //     PURPOSE:     Search/ReplaceCoach   	     //  //     AUTHOR:          WordPerfectCorp.(G.McComb)// //*********************************************   	 %
    
 	 Global(ScrnMode;MsgAdj;DefTitle;CancelMsg)Global(HotElement;SaveScrn;AreaHgt)CancelMsg=0select[0]=0xpos=0ypos=0Deftitle="Coach"ScrnMode=?ScreenHigh24StepNum=0    `	     
                    <     h           //Initializestepnumber   	    StepText="Positionyourcursor"              D     p //Initializesteptext   	 P   Use("wpchlibr.wpm")         <     h                     //Sharedlibraryfile   	 0   ColorScheme()ScreenSetup()MsgAdj=DlgMessage()         <     h                     //Setanadjustmentfor   	  P   messages	   	    //*********************************************////     MAINPROGRAM:Coach   	 @   ////*********************************************Cancel(Off!)Call(WelcomeDlg)Repeat     If(?DocBlank)          Message(&tbox;49)          Result=OpenDocument(&tbox)          If(Result=1)              4 QuitCoach()          Endif     EndifUntil(NOT(?DocBlank))Call(PosCursor)    
           0     //Callroutinethathelpspositioncursor    H
 (#(#  DisplayRewriteWindowMaximizeSuccess=?Position    
      0     //Setcurrentcursorpositiontovariablesuccess    P (#(#  Call(GetSRDlg)    
                    < //helpuserGettoReplacedialog   	 h   Message(&tbox;1008)Result=MessageBox("Coach";&tbox;1)QuitCoach()//*********************************************//     ENDMAINPROGRAM   	 X   //*********************************************	   	  p   //*******************************//Subroutine:Welcome//********************************Label(WelcomeDlg)     Message(&tbox;10)     Result=Welcome("Coach";&tbox)     If(Result=1)          QuitCoach()     EndIfReturn	   	 	   //***********************************************////Label:PosCursor////*****************************************************Label(PosCursor)     Message(&tbox;50)     Display(On!)     FakeIt(DefTitle;&tbox;3;1;0)     PosCharNext     PosCharPrev     keypress={8154;}     chkcode={1;}     Result=DoEdit(1;&chkcode;&keypress)Return	   	 
   //*********************************************////     SUBROUTINE:GetSRDlg   	 @   ////     PURPOSE:Walkuserthroughgettingtothes&rdlg   	     ////*********************************************Label(GetSRDlg)     Message(&tbox;100)     hbox1={    `	 "Choose>  r [BoldOn]?
   
 Edit.";   	 	                 4     `	 "";              4 }     hbox2={    `	 "Choose>  r [BoldOn]?
   
 Replace.";   	 `	                 4     `	 "";              4 }     hbox3={1;              4 }     EditMenu(&valid)     allow={    4     `	 1499;          //replacemenuoption   	                  4     `	 }     exallow={    `	 0;    
      //Allowexecute   	 P                 4 }     accel={    4     `	 108;               //Rep(l)ace   	 0                 4 }     exaccel={    `	 0;    
      //Allowexecute   	 p                 4 }     nosubmenu(&subval;&subacl;&exsubacl;&subs)     funkey={    `	     
 8135//Alt+F2//8135   	                  4 }     Repeat          Result=PostIt(DefTitle;&tbox;38;11;0;2;0)          MenuActive=0          Show=HotSpot(0;0;62;0;544;&funkey;1)          Switch(show)          CaseOf1:    
 //Showmenu   	  X#                 4 sbox={"Choose>  r [BoldOn]?
   
 Replace.";}   	   $   А              4 Result=PostIt(DefTitle;&tbox;38;11;0;3;0)              4 ShowMenu("Coach";&sbox;37;16ScrnMode;1;13;0;0)          CaseOf1475:          //EditmenuId   	 #@(                 4 PosLineDown %
    
            CaseOf544:     //Accelmenualte   	 H&!+                 4 PullDownDlg              4 Type("e")          CaseOf8135:     //Functionkey(Alt+F2)   	 h)$/             CaseOf8085:     //Alt+=   	 *H&1                 4 sbox={1;}              4 Result=PostIt(DefTitle;&tbox;38;11;0;3;0)              4 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;37;              4 16ScrnMode;101;&funkey)   	 .h)5   Ї          DEFAULT:    
 //Default   	                     4 sbox={1;}              4 PosLineDown              4 MenuActive=MenuBarControl%
     
 ("Coach";&hbox1;&sbox;37;              4     `	 16ScrnMode;101;&funkey)          EndSwitch    
    	              If(menuactive<>1)              4 If(Show<>8135andMenuActive<>8135)              4     `	     
 //Iffunctionkeywasnotpressed              4     `	 Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;              4     `	 &allow;&exallow;&accel;&exaccel;&subval;              4     `	 &subacl;&exsubacl;&subs;&funkey)              4     `	 MenuActive=Result              4     `	 CancelMenus()              4 EndIf          EndIf     Until(MenuActive<>1)     DisplayRewrite     CancelMenus()     Call(OpenReplaceDlg)Return	   	 0   //***********************************************//LABEL:OpenReplaceDlg////PURPOSE:OpenandclearReplacedialog////****************************************************Label(OpenReplaceDlg)     SearchString("")     ReplaceString("")     DlgInput(On!)     ReplaceDlg     Message(&tbox;105)     Result=PostIt("Coach";&tbox;10;1+(MsgAdjScrnMode);0;4;0)//*********************************************//     Thenextcommandisaremedyforabug   	 H
   //*********************************************     PosCharNext     PosCharPrevious//*********************************************//*********************************************     While(?Dialog<>1)          Char(Key)          If(?Mousey=(yposS1+ScrnMode))              4 If((?Mousex>=xposH1)and(?Mousex<=xposH2))              4     `	 ShowCode(SaveScreen!)              4     `	 SpecialHint()              4     `	 ShowCode(RestoreScreen!)//*********************************************//     Thenextcommandisaremedyforabug   	   $   //*********************************************     PosCharNext//*********************************************//*********************************************              4 Else              4     `	 If((?Mousex>=xposQ1)and(?Mousex<=xposQ2))              4     `	     
 CancelCoach()              4     `	 Else              4     `	     
 Display(On!)              4     `	     
 If(?DialogControl=3543orKey=8159)              4     `	     
      Display(Off!)              4     `	     
      NotFound(On!)              4     `	     
      OnNotFound(NotFoundError)              4     `	     
 Endif   	 .h)5                 4     `	     
 Type(ntoc(Key))              4     `	 Endif              4 Endif          Else              4 If(Key=8160)              4     `	 CancelCoach()              4 Else              4     `	 Display(On!)              4     `	 If(?DialogControl=3543orKey=8159)              4     `	     
 Display(Off!)              4     `	     
 NotFound(On!)%
     
               4     `	     
 OnNotFound(NotFoundError)              4     `	 Endif              4     `	 Type(ntoc(Key))              4 Endif          Endif          If(key=8158)//F1              4 ShowCode(SaveScreen!)              4 SpecialHint()              4 ShowCode(RestoreScreen!)//*********************************************//     Thenextcommandisaremedyforabug   	 0   //*********************************************     PosCharNext//*********************************************//*********************************************          EndIf     EndWhile     Display(On!)     DisplayRewriteReturn	   	 @"   //*********************************************////     LABELSpecialHint   	 @   ////*********************************************LABEL(SpecialHint)Sty=StyNoPeriod!Ln1=""Ln2=""Result=0Repeat     OpOn={"";"";"";"";"";""}     OpOff={"";"";"";"";"";""}     If(Result>=1AndResult<=6)          OpOn[Result]=">  r [BoldOn]?
   
 "          OpOff[Result]=">   [BoldOff]?
   
 "     EndIf     DlgCreate(Result;"Hint";DlgNoClear!+DlgNoCancel!;;1;70;13)     DlgControl(CtrlOption!;;OpOn[1]+"Confirm     Replacement"+OpOff[1];Sty;2;4)   	         DlgControl(CtrlOption!;;OpOn[2]+"Backward     Search"+OpOff[2];Sty;2;5)   	         DlgControl(CtrlOption!;;OpOn[3]+"CaseSensitive     Search"+OpOff[3];Sty;2;6)   	 P        DlgControl(CtrlOption!;;OpOn[4]+"FindWholeWords    D Only"+OpOff[4];Sty;30;4)   	 h        DlgControl(CtrlOption!;;OpOn[5]+"Extended     Search"+OpOff[5];Sty;30;5)   	 0        DlgControl(CtrlOption!;;OpOn[6]+"LimitNumberof     Matches"+OpOff[6];Sty;30;6)   	    0     DlgControl(CtrlLabel!;;">  r [BoldOn]?
   
 Choosefromthefollowingtopicsformoreinformationaboutthe";Sty;2;1)  
  (#(#       DlgControl(CtrlLabel!;;"searchandreplaceoptionsyoucanselect>   [BoldOff]?
   
 .";Sty;2;2)     DlgControl(CtrlLabel!;;Ln1;Sty;2;8)     DlgControl(CtrlLabel!;;Ln2;Sty;2;9)     DlgEnd     Switch(Result)          CaseOf1:0    
 Ln1="Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 ,thenselectthisitemifyouwanttoskipover"    8 
(#
(#                4     `	     
      Ln2="somereplacements."          CaseOf2:0    
 Ln1="Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 ,thenselectthisitemtochangethesearch   	 x!   direction."  
  
(#
(#                4     `	     
 0     Ln2=""  
  (#(#            CaseOf3:0    
 Ln1="Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 ,thenselectthisitemif,forexample,youwant"      $ 
(#
(#                4     `	 0    
 0    
(#
(# Ln2="tofindalloccurrencesof>  r [BoldOn]?
   
 President>   [BoldOff]?
   
 ,butnot>  r [BoldOn]?
   
 president>   [BoldOff]?
   
 ."  
  (#(#            CaseOf4:0    
 Ln1="Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 ,thenselectthisitemif,forexample,youwant"    (#x' 
(#
(#                4     `	     
 0     Ln2="tofindalloccurrencesof>  r [BoldOn]?
   
 apples>   [BoldOff]?
   
 ,butnot>  r [BoldOn]?
   
 pineapples>   [BoldOff]?
   
 ."  
  (#(#            CaseOf5:0    
 Ln1="Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 ,thenselectthisitemifyouwanttoextendthe"    % * 
(#
(#                4     `	     
      Ln2="searchintoheaders,footers,andfootnotes."          CaseOf6:0    
 Ln1="Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 ,thenselectthisitemifyouwanttolimitthe"    '`", 
(#
(#                4     `	     
      Ln2="numberofreplacements."     EndSwitchUntil(Result=0)Return	   	 0*%0   //*********************************************////     LABELNotFoundError   	 @   ////*********************************************LABEL(NotFoundError)     Display(On!)     CancelDialogs()     DisplayRewrite     NotFoundCoach()     Message(&tbox;1007)     Result=MessageBox("Coach";&tbox;1)     QuitCoach()Return	   	 (

   //*********************************************////     PROCEDURE:Message   	 @   ////*********************************************PROCEDUREMessage(&tbox;Msg)Switch(Msg)CaseOf10:tbox={     "";   	 
             ">  r [BoldOn]?
   
 SearchingandReplacingText>   [BoldOff]?
   
 ";     0     "";  
  (#(#            "YoucanusetheReplacefeaturetosearchforand";          "replacetext.Forexample,youcouldsearchfor";          "everyoccurrenceof>  r [BoldOn]?
   
 performance>   [BoldOff]?
   
 Ԁinyourdocument";          "andreplaceitwith>  r [BoldOn]?
   
 productivity.";          "";     }CaseOf49:tbox={     "TouseReplace,youmusthavetextinyour";   	 h             "documentwindow.Doyouwanttoopena";          "document?";          "";     }CaseOf50:tbox={     "Placeyourcursoratthetopofyourdocument.";   	              "";     }CaseOf100:tbox={     "Tosearchandreplacetext,";   	 x!             "";          "Choose>  r [BoldOn]?
   
 Edit>   [BoldOff]?
   
 ,";   	  X#             "then>  r [BoldOn]?
   
 Replace>   [BoldOff]?
   
 .";     0     "or";  
  (#(#            "Press>  r [BoldOn]?
   
 Alt+F2>   [BoldOff]?
   
 .";   	 `"&             "";     }CaseOf105:tbox={     "";   	 H&!+             "Typethetextyouwanttosearchfor,thenpress>  r [BoldOn]?
   
 Tab>   [BoldOff]?
   
 .";   	 '`",             "Typethetextyouwanttoreplaceitwith,then";   	 '(#-             "choose>  r [BoldOn]?
   
 Replace.";          "";     }CaseOf1007:tbox={     "";   	 ,'3             "Thetextyousearchedforwasnotfound.Runthe";          "Coachagainandmakesurethetextyouenteredinthe";   	 .h)5             "SearchFortextboxwastypedcorrectly.";          "";     }CaseOf1008:tbox={     "";   	              "YouhavecompletedtheCoachonreplacingtext.";          "";     }DEFAULT:tbox={         4 "";   	 (

                 4 "Messagenotfound!";              4 "";     }EndSwitchENDPROC	   	 P      