WPCR@  
                 0   (        h$          R&       &       /   U   <   4        6   	       4   	      4   U   .   4   	      "5   U      (5  	%      @5          F5  "     f>        7   !   `   7  #     5   !     {7   !     9   !     ;  	)   
   =         =                                                                                                        (                    $       e  A    Y                                                                 X                                                                 [                                                                 Z                                                                I n s e r t                                                           ]                                                            n     \                                                            n     _                                                                 ^                                                                 a                                                                 `                                                                 c                                                                 b                                                            |     e                                                            v     d                                                            v     g                                                            	     i                                                                 h                                                                 f                                                            	    O p e n i n g s c r e e n                                       :	     k                                                            <
     j                                                            <
    N o N a m e                                                     L
     m                                                            $     l                                                            $    P o s i t i o n                                                 4    F i l e N a m e                                                 
     p                                                                 s                                                            	     r                                                                 q                                                            	     u                                                            	     t                                                            	     w                                                            	     v                                                            	     x                                                            	     y                                                                 {                                                            	b     z                                                            	>     |                                                            	     }                                                                 ~                                                            	                                                                                                                                  	                                                                 	                                                                 	                                                                 	                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        2                                                                 r                                                                                                                                                                                                        o                                                            
     n                                                            @    O t h e r F o r m a t D l g 5 0 1                               P                                                                 
                                                                                                                                    |                                                                  |                                                                  ƈ                                                                                                                                                                                                      H'                                                                 	#                                                                 ,!                                                                 	4'                                                                 	#                                                                 	4'    F i l e n a m e D l g 5 2 1                                     X'                                                                 '                                                                 :                                                                 	p,                                                                 (                                                                 	:                                                                 	0                                                                 	,                                                                 	5                                                                 	1                                                                 	5                                                                 	:    S e t v a r s 5 0 1 1                                           :    S e t v a r s 5 0 1 2                                           >?    S e t v a r s 5 2 1                                             B    S e t v a r s 4 0 5 1                                           dG    S e t v a r s 4 0 5 2                                           ,K    F o r m a t D l g 4 0 5                                         ƮN                                                                 N                                                                 hU                                                                 	R                                                                 LO                                                                 	TU                                                                 	R                                                                 	TU                                                                    |U      M e s s a g e                                                                	V                                                                 U                                                                 	fm                                                                 	*X                                                                 	V                                                                 	`                                                                 	NX                                                                 	<c                                                                 	 a                                                                 	Zd                                                                 	`c                                                                 	^f                                                                 	~d                                                                 	Ng                                                                 	f                                                                 	<h                                                                 	rg                                                                 	Ri                                                                 	`h                                                                 	2j                                                                 	vi                                                                 	Rk                                                                 	Vj                                                                 	k                                                                 	vk                                                                 	k                                                                 	fm                                                                    pm           M e s s a g e                                                   |U                                                                               Z                   7      5G            "                        C       @%      .      $5      >      aP      aV                                    1      d                        N                               3      l      ~      ]       	            	      	      
                  .      ]      n                              -                  
      `            -                         J      -p      S                    -#            ,      Z            	#      	P       v       	~!      qY"      qY"      7"       "      "       "      	#      l$      J$      J$    6$      3 $      	7%       %      >%      7%      } %      	 %      
&      1&      o&      	3'      :m)      vU*      +      	9+      +      ,      ,      -      '-      T.       W.      Q/      /      /      0      I0       L0      70      } 0      	 0      1      Q1      1      1      1      1      41      -;2      3      n3      3      3      3      3      H4      N4      7T4      } Z4      	 4      4      74       4      4      } 4      	5      ::      } :      @      	@      -aA      3B      B      7B       B      B      } B      	'C      	I      } B      	0P      } B      :V      } V      ]      	]      -O^      <_      -(d      e      -i      j      -^o      Kp      -	u      u      -z      r{      7{       {      #|      } *|      	R|      :܁      }             	      -      )a      	      	      	E      	2      	      	      	      	|      	      	      	]      	      	֙      :#      6      	@      Z            .  G            %  .  5  P  \  p        1  d        N        3  l  ~          	  :	  	  	  
  
  
  ~        .  ]  n                
  
  6  `                J  p  S  o      O  i    #    a          z    v        y            Z  v        #  z    P      ~!  !  Y"  "  "  "  #  l$  $  $  $  %  >%  %  %  
&  1&  o&  3'  '  '  i(  m)  U*  *  +  9+  +  <,  ,  .-  -  T.  .  /  Q/  /  /  0  I0  0  0  1  Q1  1  1  1  1  1  ;2  3  -3  B3  n3  3  3  3  3  H4  N4  T4  4  4  4  4  5  5  :  :  :  ?  2@  @  @  aA  3B  IB  ^B  B  B  B  'C  C  H  H  I  I  #J  N  FO  O  0P  P  U  U  V  V  V  [  +\  \  .]  ]  ]  O^  <_  [_  _  D`  `  `  ja  a  b   c  6c  c  d  d  (d  e  4e  e  f  df  f  (g  g  wh  h  h  zi  i  i  j  j  dk  k  l  tl  m  (n  o  ^o  Kp  jp  p  Iq  q  q  er  r  s  .t  Ct  t  	u  u  v  v  v  Hw  w  x  x  vy  y  y  yz  z  r{  {  {  {  #|  R|  |  I  ܁  	    f        a      ˉ  E    2  o              |      $      ]  j      ֙  #    :  6  @  0 n  A p`  $ H e l v e - W P     T y p e   1     BL a b e l   ( m e n u 1 )   C  < 6X  9  ` +   C o u r i e 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  3  #| :         " B D O ??=K ' 	             "  u^88Goo&CCNu8C88oooooooooo88uuuo˅z8dozz888^oCoodoo8oo,,d,ooooCd8oddddC4Cu >CC CCo     CCCCCC  Cz  oooooȲdoooo88888888ooooooooodoozodppoooddddooooooooooooo88888,88  d do,o,o,o,o,ooooooȽCCCddddz8z8z8oooooodzdzdzd  oo,oCdz8ddoooo88 8oN    d/dIIkk kEEkH ddH // IId //  dd                   +I             H'xx      x           x               C  x                         x         "  u^..;]]o 88Aa.8..]]]]]]]]]]..aaa]ooxxofx.So]xoxofxooof...N]8]]S]].]]%%S%]]]]8S.]SxSSS8+8a 488~ 88]     888888  8f  o]o]o]o]o]xSo]o]o]o]........x]]]]]x]x]x]x]oSo]x]f]oSx^p]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].. .]No    oS'S==YY Y::Y< SSo< '' ==S ''  SS              l     $=             <'dd      d           d               8  d                         d         "  u^.7N[[w'77@`.7..[[[[[[[[[[77```dwwwwndw.[wdwnwndwnnnd7.7M[`[d[d[7dd..[.dddd@[7d[[[R@+@` 7;7| 77[     888788  8d  w[w[w[w[w[w[n[n[n[n[........wdddddwdwdwdwdn[w[wdddn[wendw[w[w[w[w[w[w[wdn[n[n[n[ddddddwdwd........  [ w[d.d.d.d.d.wdwdwdwdddw@w@w@n[n[n[n[d7d7d7wdwdwdwdwdwdn[dRdRdR  wdd.wdw@n[d7n[n[wddwdn[.. .dNn    nR7d<<XX X99X; RRn; $$ CCR &&  RR              j     $F             ;'cc      c           c               7  `                         c            < 6X  9  ` +   C o u r i e r         "0 n  A p`  $ H e l v e - W P     T y p e   1     4   A p  , H e l v e - W P   B o l d   T y p e   1     e  ? x x x  X    Xx    1 ` C `    / X` I ~ ) P 8 P    / P q^  ( V 8 V    l V 
    !    W       X X  X X      { X X //*********************************************   	       ////     NAME:    `	      WPCH_ IF2.WPM    	 @   //     PURPOSE:     CoachonInsertingFilename   	 X    // //*********************************************  //RevisionHistory////  %
    
  Global(ScrnMode;MsgAdj;DefTitle;CancelMsg)Global(w;h;tbox;hbox;helpmsg;Round501)Global(FakeBtns;HotElement;SaveScrn)select[0]=0Round501=0DefTitle="Coach"     //Main"Coach"name   	 a	   ScrnMode=?ScreenHigh24Use("wpchlibr.wpm")              h      //Sharedlibraryfile   	 i   If(NotExists(Module))     ScreenSetup()     ColorScheme()EndifIf(?BlockActive)     BlockoffEndifOnCancelCall(CancelCoach)Error(off!)MsgAdj=DlgMessage()CancelMsg=0//***********************************************************	   	 !q   //*********************************************////     MAINPROGRAM:Coach   	 @   ////*********************************************%
    
 //LABEL(MainCoach)     WindowMaximize     Cancel(Off!)     Call(OpeningScreen)    a (# //OpeningScreen/MainMenu   	 	        Call(NoName)   	 
        Call(Position)   	 J
   Label(Insert)     Call(FileName)         a (# //MenuControlRoutine   	 
        Call(OtherFormatDlg501)   	 l        Call(FilenameDlg521)   	 5        Call(OtherFormatDlg501)   	 N
        If(?Dialog=405)         `	 Call(SetVars4052)   	             `	 Call(Formatdlg405)   	 X        Endif     If(?LeftCode=11217)         `	 Success=1     Else         `	 Success=0     Endif          If(Success=1)         `	 Message(&tbox;1001)    h          } (# //Correctcodeinsertedindocument   	 a            `	 Result=MessageBox("Coach";&tbox;1)     ELSE         `	 Message(&tbox;1002)    h          Am (# //Correctcodenotinsertedindocument,tryagain?   	 	             `	 Result=MessageBox("Coach";&tbox;3)         `	      If(Result=1)    h            (# //Ifnotyes   	 I"            `	           CancelCoach()         `	      ElseIf(Result=1)         `	           Round501=0         `	           Go(Insert)         `	      Endif     Endif   	 1#'        EndifIf(Exists(module))     If(Module=1)         `	 RETURN     EndifEndifQuitCoach()	   	 (#.   //*********************************************////     SUBROUTINE:OpeningScreen   	 @   ////*********************************************Label(Openingscreen)     Message(&tbox;1100)     (# //OpeningScreen   	 `	        Result=Welcome("Coach";&tbox)     If(Result=1)    
 (# //UserchoseQuit   	 
@            `	 QuitCoach()     EndifReturn	   	 (

   //***********************************************************////     SUBROUTINE:NoName   	 @   ////************************************************************Label(NoName)     If(?Name="")         `	 Message(&tbox;1105)         `	 Result=Messagebox("Coach";&tbox;1)     Endif    `	    	 	   RETURN	   	 H
   //***********************************************************////     PLACECURSORWHEREYOUWANTIT...   	 @   ////************************************************************Label(Position)     Message(&tbox;1205)     //PlacecursoratXXXposition   	 `	        FakeIt("Coach";&tbox;3;1;0)     keypress={8154;}           (# //F7key   	 	        chkcode={1;}     Key=DoEdit(1;&chkcode;&keypress)    I (# //WaitforusertoF7   	 H
        WindowMaximize//*****************************************************************RETURN	   	 
   //*****************************************************************////     MENUCONTROL   	 @   ////******************************************************************Label(FileName)   	    //************SetValidMenuOptionVariables     hbox1={     "Choose>  r [BoldOn]?
   
 Layout.";   	 
A            `	      }     hbox2={     "Choose>  r [BoldOn]?
   
 Other.";   	 
            `	      }     hbox3={     1;   	 c	            `	      }     LayoutMenu(&valid)     allow=    `	 {          1553;}    h //[Other]   	 k        exallow=     {     0;}    h //Executethatitem   	 4        accel=    `	 {          111;}    h //OforOtheracceleratorformenu   	 M
        exaccel=     {     0;}    h //Executethatitem   	         NoSubMenu(&subval;&subacl;&exsubacl;&subs)     funkey={          8141;}    h //Shift+F8validfuntionkey   	 o        sbox={    `	 "Choose>  r [BoldOn]?
   
 Other.";          //Message   	              `	 "";         `	 }     HelpMsg={"Choose>  r [BoldOn]?
   
 Layout,";   	 !            `	 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 Other.";         `	 "";    h    	 a            `	 }     Altletter=537     //AltLTheAlt+lettertoaccessmenubar   	 A        MenuLetter=108     //LforLayoutThemenuLetter   	 
         Message(&hbox;5000)         h           //hint   	 K"   Repeat     Message(&tbox;1210)         X (# //ChooseLayout,Other   	 !%        DisplayRewrite     Result=PostIt("Coach";&tbox;45;13;0;2;0)     MenuActive=0     Show=HotSpot(0;0;62;0;altletter;&funkey;1)	   	 % *   Switch(Show)    `	               h           //InsertingFilename   	       //*****************************************//     UserchoosesShowMe   	 @   //******************************************     CaseOf1:              h //ShowMe   	          Result=Postit("Coach";&tbox;45;13;0;3;0)     //Coordinatesforinstructionbox   	    А     ShowMenu("Coach";&sbox;1;4;3;8;0;0)     //coordinatesforhelp,menuover,menudown   	 a	   //*****************************************//     UserchoosesLayout         h      //Menubaritem   	 
   //******************************************     CaseOf1531:              h //UserchoosesLayout   	 c	            `	 PosLineDown//*****************************************//     UserpressesAltL   	 4   //******************************************     CaseOf537:              h //UserpressedAltL   	             `	 Result=Postit("Coach";&tbox;45;13;0;3;0)   	    Ѐ         `	 PullDownDlg   	 W            `	 While(?Dialog=1)         `	 Endwhile         `	 Type("l")         h      //menubarletter   	    //********************************************************//     UserPressesShift+F8   	 X   //********************************************************     CaseOf8141:     (# //UserpressedShift+F8   	             `	 DisplayRewrite         `	 DlgInput(on!)         `	 Wait(4)         `	 FormatDlg   	 !            `	 While(?Dialog<>405)         `	 Endwhile    Mv (# //Opencorrectdlgandtabtocorrectitem   	  b#            `	 While(?DialogControl<>675)         `	      TabKey         `	 Endwhile         `	 Call(Setvars4051)   	 2#'            `	 Call(FormatDlg405)	   	 % *   //*****************************************//     UserpressesAlt=   	 x    //******************************************     CaseOf8085:              h               p //UserpressedAlt+=   	 X            `	 Message(&sbox;1220)         `	 Result=PostIt("Coach";&tbox;45;13;0;3;0)   	             `	 0          `	 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;1;4;MenuLetter;&funkey)    a	 (#(#  //*****************************************//     NoChoice   	 
	   //******************************************     DEFAULT:              h               p                x      	 J
             	 J
        	 J
         //Default          `	 PosLineDown          `	 0          `	 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;1;4;MenuLetter;&funkey)    
 (#(#       ENDSwitch   	 3   If(MenuActive<>1)          //forintermediatedlgifmenuisused   	         If(Show<>8141)     //UserdidnotpressShiftF8   	             `	 0          `	 Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;&accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)  
  (#(#           `	      DisplayRewrite         `	      MenuActive=Result//Stepstomanuallybringupdialog,reducesscreendisplayproblems   	 =            `	      If(Result=1553orResult=111)//userselectedOtheroro   	 V            `	           If(?Dialog<>501)   	             `	               h CancelMenus()         `	               h CancelDialogs()         `	               h DisplayRewrite         `	               h FormatOtherDlg   	 @            `	           Endif         `	      EndIf         `	      If(?Dialog=405)         `	           While(?DialogControl<>675)         `	               h TabKey         `	           Endwhile         `	           Call(Setvars4051)         `	           Call(FormatDlg405)         `	      Endif     EndifEndifUntil(MenuActive<>1)//*********************************************************RETURN	   	 (#.   //************************************************************////     OtherFormatDlg#501   	 @   ////************************************************************Label(OtherFormatDlg501)Result=0    `	 SaveScrn=0        	 `	   If(Round501=0)     Call(Setvars5011)         h //ChooseInsertFilename   	 	   ElseIf(Round501=1)     Call(Setvars5012)         h //ChooseOK   	 `	   EndifEndifWhile(?DialogControl<>DlgCntl)     TabkeyEndwhileWhile(?Dialog=501)          //###Dlg   	         Switch(?DialogControl)         `	 CaseOfCTRL:     //SittingonthisBUTTONitemintheDlg   	 i            `	      info={     CTRL;    h      //ControlID   	 2            `	           501;    h      //DialogID   	             `	           0;    h      //don'tallowarrows   	 s            `	           "Coach";     //title   	 ;            `	           41;    h      //xposforPostit   	 S            `	           11;    h      //yposforPostit   	             `	           0;    h      //Hintbutton   	             `	           "Coach";     //helpTitle   	 ]            `	           1;    h      //RestoreScreen   	 %u            `	           0;    h      //Reserved   	 =            `	      }         `	 0     Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  (#(#           `	 DEFAULT:         `	      info={     ?DialogControl;     //ControlID   	 e"&            `	           501;    h           //DialogID   	 -#}'            `	           0;    h           //don'tallowarrows   	 #F(            `	           "Coach";          //Title   	 $ )            `	           41;    h           //xposforPostit   	 % *            `	           11;    h           //yposforPostit   	 O&!+            `	           0;    h           //HintButton   	 'h",            `	           "Coach";          //HelpTitle   	 '0#-            `	           1;    h           //RestoreScreen   	 (#.            `	           0;    h           //Reserved   	 p)$/            `	      }         `	      Allow={CTRL;}    h      //whichcontrolstoallow   	  +P&1            `	 0     Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)    Y-(4 (#(#  Ї     ENDSwitchEndwhile    `	           //###Dlg   	 x    //***********************************************************RETURN	   	 	Y   //************************************************************////     FilenameDlg521   	 @   ////************************************************************Label(FilenameDlg521)Result=0    `	 SaveScrn=0        	 `	   Call(Setvars521)While(?Dialog=521)          //###Dlg   	 	        Switch(?DialogControl)         `	 CaseOf3822:     //SittingonInsertFilename   	 a	            `	      info={     3822;    h      //ControlID   	 *

            `	           521;    h      //DialogID   	 
            `	           0;    h      //don'tallowarrows   	 k            `	           "Coach";     //title   	 3            `	           20;    h      //xposforPostit   	 K
            `	           4;    h      //yposforPostit   	             `	           0;    h      //Hintbutton   	             `	           "Coach";     //helpTitle   	 U            `	           1;    h      //RestoreScreen   	 m            `	           0;    h      //Reserved   	 5            `	      }         `	      accel={     49;50;102;112;     //1,2,forp   	 u            `	           }         `	      aclpnt={    h 0;0;0;0;}   	 V            `	 0     Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  (#(#           `	 CaseOf3878:     //SittingonInsertpathandfilename   	 >            `	      info={     3878;    h      //ControlID   	              `	           521;    h      //DialogID   	 !            `	           0;    h      //don'tallowarrows   	 H"            `	           "Coach";     //title   	  `#            `	           20;    h      //xposforPostit   	  ($            `	           4;    h      //yposforPostit   	 !%            `	           0;    h      //Hintbutton   	 j"&            `	           "Coach";     //helpTitle   	 2#'            `	           1;    h      //RestoreScreen   	 #J(            `	           0;    h      //Reserved   	 $ )            `	      }         `	      accel={     49;50;102;112;     //1,2,forp   	 R&!+            `	           }         `	      aclpnt={    h 0;0;0;0;}   	 '3#-            `	 0     Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  (#(#           `	 CaseOf0:     //SittingonOK   	 +'2            `	      info={     0;    h      //ControlID   	 ,'3            `	           521;    h      //DialogID   	 ]-(4            `	           0;    h      //don'tallowarrows   	                `	           "Coach";     //title   	 x             `	           20;    h      //xposforPostit   	 @            `	           4;    h      //yposforPostit   	 	Y            `	           0;    h      //Hintbutton   	 "            `	           "Coach";     //helpTitle   	             `	           1;    h      //RestoreScreen   	 b	            `	           0;    h      //Reserved   	 *
z            `	      }         `	      accel={     49;50;102;112;8182;     //1,2,forp,andEnter   	 
	            `	           }         `	      aclpnt={    h 0;0;0;0;1;}   	 K
            `	 0     Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  (#(#           `	 DEFAULT:         `	      info={     ?DialogControl;     //ControlID   	             `	           521;    h           //DialogID   	 S            `	           0;    h           //don'tallowarrows   	 l            `	           "Coach";          //Title   	 4            `	           20;    h           //xposforPostit   	             `	           4;    h           //yposforPostit   	 u            `	           0;    h           //HintButton   	 >            `	           "Coach";          //HelpTitle   	 V            `	           1;    h           //RestoreScreen   	             `	           0;    h           //Reserved   	             `	      }         `	      Allow={3822;3878;0;}          //   	 &v            `	      accel={     49;50;102;112;     //1,2,forp   	 ?            `	           }         `	      aclpnt={    h 0;0;0;0;}   	 !            `	 0     Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)  
  (#(#       ENDSwitchEndwhile    `	           //521Dlg   	 0#'   //***********************************************************RETURN	   	 $ )   //**********************************************************////     SETVARSfor1sttimethroughFormatDlg501   	 @   ////*************************************************************Label(Setvars5011)     x1={    `	 15;          //HotspotCoordinatesforInsertFilename   	 `	            `	 }     x2={    `	 35;   	 
A            `	 }     y1={    `	 13;   	 
            `	 }     y2={    `	 13;   	 c	            `	 }     hotkey={     102;     //fforInsertFilename   	 
            `	 }     hotpnt={     1;     //RepaintthescreenwhenHotspotschosen   	 5            `	 }     helpmsg={     "Choose>  r [BoldOn]?
   
 InsertFilename.";   	             `	      "";         `	 }     Message(&tbox;1240)     //MessagetoAppearinthisDlg   	 m        Ctrl=2487     accel={    `	 102;53;         h      //for5forFilename   	             `	 }     aclpnt={     1;1;}   	 >        Round501=1     DlgCntl=2487Return	   	    //**********************************************************////     SETVARSfor2ndtimethroughFormatDlg501   	 @   ////*************************************************************Label(Setvars5012)     x1={    `	 44;          //HotspotCoordinatesforOK   	 `	            `	 }     x2={    `	 51;   	 
A            `	 }     y1={    `	 18;   	 
            `	 }     y2={    `	 18;   	 c	            `	 }     hotkey={     8182;     //Enter   	 
            `	 }     hotpnt={     1;     //RepaintthescreenwhenHotspotschosen   	 5            `	 }     helpmsg={     "Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 .";   	             `	      "";         `	 }     Message(&tbox;1250)     //MessagetoAppearinthisDlg   	 m        Ctrl=0     accel={    `	 8182;          //Enter   	             `	           }     aclpnt={     1;}   	 >        DlgCntl=0Return	   	    //**********************************************************////     SETVARSfor1sttimethroughFilenameDlg521   	 @   ////*************************************************************Label(Setvars521)     x1={    `	 22;22;37;         h //HotspotCoordinatesforInsertFilename   	 `	            `	 }     x2={    `	 42;51;44;   	 
A            `	 }     y1={    `	 11;12;14;   	 
            `	 }     y2={    `	 11;12;14;   	 c	            `	 }     hotkey={     49;     //1InsertFilename   	 
            `	      50;     //2Insertpathandfilename   	 m            `	      768;     //OK   	 5            `	 }     hotpnt={     0;0;1;     //RepaintthescreenwhenHotspotschosen   	             `	 }     helpmsg={     "Selecteitheritem,";   	 m            `	      "thenchoose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 .";         `	 }     Message(&tbox;1260)     //MessagetoAppearinthisDlg   	 u   Return	   	 =   //**********************************************************////     SETVARSfor1sttimethroughFormatDlg405   	 @   ////*************************************************************Label(Setvars4051)     x1={    `	 25;          //HotspotCoordinatesforOther   	 `	            `	 }     x2={    `	 35;   	 
A            `	 }     y1={    `	 15;   	 
            `	 }     y2={    `	 15;   	 c	            `	 }     hotkey={     111;     //oforother   	 
            `	 }     hotpnt={     1;     //RepaintthescreenwhenHotspotschosen   	 5            `	 }     helpmsg={     "Choose>  r [BoldOn]?
   
 Other>   [BoldOff]?
   
 .";   	             `	               h "";         `	 }     Message(&tbox;1220)     //MessagetoAppearinthisDlg   	 m        Ctrl=675     accel={    `	 111;55;         h      //oor7fornumberOther   	             `	 }     aclpnt={     1;1;}   	 >   Return	   	 V   //**********************************************************////     SETVARSfor2ndtimethroughFormatDlg405   	 @   ////*************************************************************Label(Setvars4052)     x1={    `	 46;          //HotspotCoordinatesforClose   	 `	            `	 }     x2={    `	 52;   	 
A            `	 }     y1={    `	 17;   	 
            `	 }     y2={    `	 17;   	 c	            `	 }     hotkey={     8182;     //Enter   	 
            `	 }     hotpnt={     1;     //RepaintthescreenwhenHotspotschosen   	 5            `	 }     helpmsg={     "Choose>  r [BoldOn]?
   
 Close>   [BoldOff]?
   
 .";   	             `	               h "";         `	 }     Message(&tbox;1230)     //MessagetoAppearinthisDlg   	 m        Ctrl=0     accel={    `	 8182;          //Enter   	             `	           }     aclpnt={     1;}   	 >   Return	   	    //**********************************************************////     DIALOGCONTROL   	 @   ////**********************************************************Label(FormatDlg405)Result=0    `	 SaveScrn=0        	 `	   While(?Dialog=405)          //###Dlg   	 (
x        Switch(?DialogControl)         `	 CaseOfCTRL:     //SittingonthisBUTTONitemintheDlg   	 
            `	      info={     CTRL;    h      //ControlID   	 J
            `	           405;    h      //DialogID   	 c	            `	           0;    h      //don'tallowarrows   	 +

            `	           "Coach";     //title   	 
            `	           41;    h      //xposforPostit   	 k            `	           7;    h      //yposforPostit   	 4            `	           0;    h      //Hintbutton   	 M
            `	           "Coach";     //helpTitle   	             `	           1;    h      //RestoreScreen   	             `	           0;    h      //Reserved   	 U            `	      }         `	 0     Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  (#(#           `	 DEFAULT:         `	      info={     ?DialogControl;     //ControlID   	             `	           405;    h           //DialogID   	             `	           0;    h           //don'tallowarrows   	 ^            `	           "Coach";          //Title   	 &v            `	           41;    h           //xposforPostit   	 >            `	           7;    h           //yposforPostit   	              `	           0;    h           //HintButton   	 !            `	           "Coach";          //HelpTitle   	 H"            `	           1;    h           //RestoreScreen   	  `#            `	           0;    h           //Reserved   	  ($            `	      }         `	      Allow={CTRL;}    h      //whichcontrolstoallow   	 h"&            `	 0     Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)  
  (#(#       ENDSwitchEndwhile    `	           //###Dlg   	 'i",   //***********************************************************RETURN	   	 (#.   //***********************************************************////     PROCEDURE:Message   	 @   ////************************************************************PROCEDUREMessage(&tbox;Msg)Switch(Msg)Caseof1001:    `	 //Coachsuccessful   	 	   tbox={     "Youhaveinsertedafilenameintoyourdocument.";   	 
        "";     }Caseof1002:    `	 //Coachnotsuccessful   	 
   tbox={     "Somehowafilenamewasnotinsertedintoyourdocument.";   	 h        "Doyouwanttotryagain?";     "";     }Caseof1100:    `	 //OpeningScreen   	 P   tbox={     "";   	 h        "%
 	   
 Ԁ>  r [BoldOn]?
   
 InsertingaFilename>   [BoldOff]?
   
 ";     "";     "Youcaninsertthefilenameofadocumentintothedocument";     "text.Ifyouchangethenameofyourfile,thefilenameinyour";     "documentchangesalso.";     ""; 
     X      "
";   	         "		";     "	ClientDataForm(CLIENT.FRM)	";     "		";     "	Name	";     "	Address	";     "		";     "	Phone	";     "		";     "\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/";̀"";     }̀Caseof1105:     //Ifcurrentdochasnoname.   	 #[)      X g  tbox={     "Thedocumentinthedocumentwindowhasnotbeen";   	 #*        "namedyet.YoucaninserttheFilenamecode,but";     "anamewillnotappearuntilyounamethedocument";     "whenyousaveit.";     "";     }Caseof1205:tbox={     "Placethecursorwhereyouwanttoinsertthefilename.";   	 )B%2        "";     }Caseof1210:tbox={     "Toinsertthefilename,";   	 -*)7        "";     "Choose>  r [BoldOn]?
   
 Layout>   [BoldOff]?
   
 ,";   	 x         "then>  r [BoldOn]?
   
 Other>   [BoldOff]?
   
 .";     "or";     "Press>  r [BoldOn]?
   
 Shift+F8>   [BoldOff]?
   
 .";   	          "";     }Caseof1220:tbox={     "Choose>  r [BoldOn]?
   
 Other.";   	 	        "";     }Caseof1230:tbox={     "Choose>  r [BoldOn]?
   
 Close.";   	 h        "";     }Caseof1240:tbox={     "Choose>  r [BoldOn]?
   
 InsertFilename.";   	 P        "";     }Caseof1250:tbox={     "Choose>  r [BoldOn]?
   
 OK.";   	 8        "";         `	 }Caseof1260:tbox={     "Selecteitheritem,";   	  p        "thenchoose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 .";         `	 "";     }Caseof5000:    `	           //Hints   	  X#   DEFAULT:    `	               h //Ifnonewerefound   	 !%        tbox={    `	 "Messagenotfound!"+msg;   	 `"&            `	           "";         `	      }     hbox={    `	 "Nohintavailable.Whattypeofinformation";   	 % *            `	           "wouldbehelpfulhere?";         `	           "";         `	      }ENDSwitchENDPROC8    `	     0*%0 `	x`	x  //*****************************************************************	   	 +'2        