WPCi  
                 0   (        @:       H   <       H>     0  *S        =\   	      ZZ        I\   	      `Z   !   `   Y\   !   `   \   U      fZ  	%      ~Z          Z  "   ]  ^f   !     ]   !   0  `  #     .[   !     b   !   0   d  	)      )e      '  7e                                                                            (                    $         A                                                                          E x i t T a b l e E d i t                                                                                                                                                                                                                                                                                                                                                " T a b l e E d i t C o n t r o l                                                                                                                                                                                                     T                                                                  V     
                                                             P     	                                                             P                                                                  	                                                                                                                                                                                                                                                                        b                                                                                                                                                                                                           
                                                                                                                               	                                                                  <	                                                                  d	                                                                  	                                                                  B                                                                  4                                                                  
      - I                                                         	      - E                                                                - B                                                         `
                                                                                                                                                                                                      4                                                                  <                                                                  <                                                                    j      T a b l e E d i t C t r l 2                                                                  b
     !                                                             
     "                                                                  #                                                             $     %                                                                  $                                                                  '                                                             d     )                                                                  +                                                                  -                                                             l     .                                                             0     /                                                             X     ,                                                             l     *                                                                  (                                                                  1                                                             P     2                                                             
     3                                                             2     0                                                             P     &                                                                  5                                                                  6                                                                   - I                                                               - E                                                               - B                                                         .     8                                                                  7                                                                  4                                                                  :                                                             
     9                                                             
                                                                    8    .  E d i t T a b l e   E d i t T a b l e T o p                                               <                                                                  ;                                                                  >                                                             n     =                                                             n     @                                                             
     A                                                                   - I                                                               - E                                                         R      - B                                                              C                                                                  B                                                                  E                                                             |     D                                                                  G                                                                  F                                                                  ?                                                              2     J                                                             &     M                                                             	,)     L                                                             ((     K                                                             	-     O                                                             	f)     N                                                             	R)     Q                                                             	P*     P                                                             	)     S                                                             	*+     R                                                             	z*     U                                                             	+     T                                                             	T+     W                                                             	p,     V                                                             	+     X                                                             	p,     Y                                                             	-     \                                                             r1     ^                                                             ^1     `                                                             0     _                                                             0     b                                                             J1     a                                                             J1     ]                                                             ^1     [                                                             r1     d                                                             1     H                                                             2     c                                                             1     I                                                             1                                                                    42    
  T b l C o l E d i t    e                                                              
6     f                                                             "C     i                                                             	:     h                                                             (7     g                                                             	C     k                                                             	>     j                                                             	;     l                                                             	>     m                                                             	C                                                                    6C      T a b l e B l o c k E d i t    o                                                             D     p                                                             `D    B l o c k i t                                                   D     s                                                             bE     u                                                             F     t                                                             F     w                                                             H     x                                                             F     y                                                             G     {                                                             H     }                                                             H     |                                                             H     z                                                             H     v                                                             J                                                                  I     q                                                             K     ~                                                             I                                                                  J                                                                  J     r                                                             K                                                                  N                                                                  N                                                                    VN    9  P o s t A N o t e                                                                 O                                                                  O                                                                  P                                                                  P                                                                  P      - I                                                         P      - E                                                         Q      - B                                                         *Q                                                                  Q                                                                  Q                                                                  RR                                                                  R                                                                  
T                                                                  S                                                                  S                                                                  S                                                                  S                                                                  S                                                                  S                                                                  T                                                                  T                                                                  T                                                                  T                                                                  T                                                                  U                                                                  U                                                                  <X                                                                  U                                                                  (X                                                                  V                                                                  "X                                                                  W                                                                  X                                                                  [                                                                  Y                                                                  ~[                                                                  Y                                                                  x[                                                                  Z                                                                  r[                                                                  ]                                                                  m                                                                  b                                                                  a                                                                  b                                                                  m                                                                  e                                                                  m                                                                  i                                                                  m                                                                  l                                                                  m                                                                  Bn      - I                                                         $n      - E                                                         n      - B                                                         n                                                                    C,o           E x i t T a b l e E d i t                                             T a b l e E d i t C o n t r o l                                     T a b l e E d i t C t r l 2                                     j    E d i t T a b l e                                                8    T b l C o l E d i t                                              42    T a b l e B l o c k E d i t                                     6C    P o s t A N o t e                                               VN                                                                               )0      	5i                                 N	      FT	      
      
      
      )      	5      M      7      MA      W                  7      L;
      ]
      
      
      
       
                    `       e       v       {            {        2      F7      7      u       
                        -       1       C       G       Z                           7      u       
C      -                        1            '      -      ?      u                  '      '      '      '$      '2       0      F6      {                        )      	5      M!      77      M]      s                  7      La                               $       ?       D                                       {        X      F]      7      u       
"                  '      S       W       i       m                                  7      u !      
i      -                        W            '      -"       e                     !      '!      '.!      '=!      'J!      'X!       V"      F\"      "      "      "      #      )#      	5#      $$      
$      )$      I$       L$      -$      %      "%      "%%       )%       (       (      #(      6(      "9(       =(      @q)      	@)    @)    A)      
A)    A2*      
A=*    A*      
A*    A*    
!+      AZ+      
Ae+     
+      B+      +      
,      gj,      -,      ,      ,      6-      w-      -      .      ..      x.      .      ,?      
@      	?@      K@      K@    	A      	B      qB      qB       /C      	^C      C      > D      	"E      JE      JE    E      	3F      :FG      vH      vH      I      	;I      I      'I      hK      hK      K      'K      'K      tM      JM      JM    !N      jN      N       N      O      O      P      0P      '@P       CP      P      P      4P      P      P      )Q      	5Q      7U       U       W      } 'W      	PW      	_      } 'W      :g      } 1h      o      	p      p      p      MCq      7Yq      Mq      q      Uq      Uq    &q      
q      $q      q      r      ,r      LVs      s      %t      Ct      7t      u t      
u      Ou      '_u      'nu      '}u      'u      'u      'u      '/v      '>v       v      Fv      
w       w      C w      Z w      w      fx      x      x       x       x       x       x       y       y       y       ]y      Fby      y       z      *z       .z       Hz       Mz       z       z       z       z       z       z      y z       I{      FN{      {      {      5+|      UX|      Ua|     |      |     4|      '|      Z #}      5}      ~      ~      -~                  
      MV      7l      M            0      0            2      D      0u            @      R      e                  <       K      t                  *      S            Մ                  8                  ̅      ޅ            +      M       [      @      	@    @          +       :      @z      	@    @    	      >       L      @      	@    @          @ۉ      	@1    @:    ̊                  &      C       Q      @      	@   @ @     @܋    @    6      _       n      @      	@   @ @     @B    @K                       @H      	@a   @ @n     @͎    @֎    d      @      	@   @ @     @Q    @Z                4      F      X      A      
A    A      
A    7      T      'c            A      
A&    A|      
A    A    
[      C      Ax      
A    A    A      
A    A    
ݙ            $      Ad      
Ao    A      
A    AÛ      
AΛ    A+    
      S      A      
A    AT      
A_    A
      
A    AƠ      
AѠ    A.    
      ң      A*      
A5    A9      
AD    A]      
Ah    A    
"                        .      @      ^      A      
A     
ڭ      B      -            0  i        J    N	  
  
  
            A  W  m  s       
  ;
  ]
  
  
  
  
  `    2            -    C          1      ?  u      0  {            
  !  7  ]  s            a                X    "      '  S    i          W    "   e         !  V"  "  "  "  #  #  #  $  )$  I$  $  %  "%  %  %  &  &  m'  '  (  #(  6(  _(  d(  (  q)  )  2*  *  !+  Z+  +  +  +  
,  =,  j,  ,  ,  ,  6-  w-  -  -  .  ..  x.  .  */  2  3  4  5  :6  6  6  \7  7  ;   <  g<  <  =  ?  %?  q?  ?  
@  ?@  @  A  [A  A  B  B  B  /C  ^C  C  D  qD  D  D  "E  E  E  3F  F  FG  G  H  mH  I  ;I  I  )J  K  hK  K  L  M  tM  M  !N  jN  N  ]O  O  O  P  0P  P  P  P  P  P  Q  Q  Q  NR  R  R  S  T  FT  yU  U  U  U   W  PW  W  ^  ^  ^  _   `  Jf  g  Dg  g  h  #n  n  o  Ho  o  p  p  p  -q  Cq  Yq  q  q  q  q  q  r  5r  ?r  Tr  nr  r  r  s  Vs  s  s  %t  Ct  t  u  Ou  v  
w  w  w  fx  x  x  ]y  y  y   z  *z  I{  {  {  +|  X|  |  |  |  }  5}  e}  ~  ~  ~  ~      
  V  l        ހ       2  D  q    ́  @  R  e          *  <  t        *  S      Մ      8  s      ̅  ޅ      +  M      +  z  	  >      ۉ  ̊      &  C    6  _        H  d        4  F  X      B  c      Ȓ      7  T      |  *  l      !  c      C  x    W    ʘ    =  v    ݙ    $  d    Û  q      %  g        S    T  
  Ơ    ͡    h      Q    ң  *  9  ]    ܧ  4      >  "  o       r  ū    j        .  @  ^    ڭ        @  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   j #| d         " B D O ??=K ' 	            " B D O ??=K ' 	             "   h;].8 S  88S\*\*.SSSSSSSSSS..\\\J                           8 8 S                           P!P8M             S                                                          n                                                                                                                                                   ~~~~ \\\w. \ 77\\\w wwwee          C  \. wR)E    r  ee     wwwwI         ee  n     R   \               \    \w                                                                          w           wrrr \S                   RRRR    RRRR                                                          e       @@@    @@@    @@@    @@@xio\  eEfRfIfRxe|W87y\r\`xWlRx\\]\ce IfIs`Wx\rrxifIxe87 7x\s` `r i    gew                              iiiiiiiiiiiiiiiiiiiiiiIIIIIIIeeeeeeeeeeeeeeeeeeeeee777777777777\\\\\\\  ````````````rrrrrrrrrrrrrrrrrrrrrr             " $ $ .                                 xs\~_q~R\Z`s|y}tvvruvstswI.EAAoo                                  z[[octhL}}Mtt                                  xs\~_q~R\Z`s|y}tvvruvstswI.EAAoo                                  z[[octhL}}Mtt              "  u^.1A]]"88Se.8..]]]]]]]]]]..eeeJ{xxxxoD]ooxioxuuf8e8eS"]]J`S8Zf51c5fS`]JMAfZZZP8e8e8.88888     888888  8`  x]x]x]x]x]xJxSxSxSxSD5D5D5D5fSSSSffffuZx]`SSuZSo`x]x]x]xJxJxJxJ`xSxSxSxSZZZZZZffD5D5D5D5  ] co5o5o5o5o5ffffSSxJxJxJiMiMiMiMoAoAoAffffffuZfPfPfP  `o5fxJiMoAuZuZ`SfxSD5 5SNe  . eS1JGG]] ]82]8 {{]8 "  AA]++  SS            ff     "A             8'ee      e           e               C  e                         f                       
      < 6X  9  ` +   C o u r i e r         "6 2  
p`     S y m b o l         U ''    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  % r 5 d d d  X    d   K ~ ) Z 8 Z    / Z 6qg{ T8     8   X  \  sT  % T 8 T     T U\ r 5 d d d  X   d SItalic Palatino  Palatino Bold Palatino Bold Italic Palatino Italic ITC Zapf Dingbats  !D͆
 ӆ   , D FH 
    !    W $       X ,   X$  %
 	   
  //*********************************************//     Name:     WPCHLBTB.WPM   	 x    //     PURPOSE:     LibraryofProceduresforTablesCoaches   	 @   ////***********************************************  //     July26,1993     textchangestoExitTableEdit()//     June7,19930     Consistencychanges      //*********************************************////     PROCEDURE:ExitTableEdit   	 
@   ////*********************************************PROCEDUREExitTableEdit()       X X  Use("WPCHLIBR.WPM")   	 `	        If(?InTable)          If(?Dialog=36)              4 tbox={     "WordPerfectisdisplayingthetable";   	 U                 4     `	     
      "inTableEditmode.Beforeyoucantype";              4     `	     
      "textinatable,youneedtoreturnto";              4     `	     
      "thenormaleditingscreen.";              4     `	     
      "";              4     `	     
      "Choose>  r [BoldOn]?
   
 Close>   [BoldOff]?
   
 .";   	 H                 4     `	     
      "or";              4     `	     
      "Press>  r [BoldOn]?
   
 F7>   [BoldOff]?
   
 .";   	                  4     `	     
      "";              4     `	 }              4 keyequiv={     8154;    h      //F7   	                  4     `	     
 }              4 TableEditControl(71;22;78;22;0;&tbox;&keyequiv)              4 Type(ntoc(8154))//     Tbox={    `	 "Youarebacktothenormaldocumentscreen.";         	 6   //              4     `	 "";   	    //              4 }   	 4    //     Result=MessageBox("Coach";&tbox;1)   	 +!             Endif     EndifENDPROC	   	  $   //*********************************************////     PROCEDURE:TableEditControl   	 N   ////*********************************************PROCEDURETableEditControl(x1;y1;x2;y2;AlphaKey;&tbox;&keyequiv)Use("WPCHLIBR.WPM")     Eprompt=0     Look(key)     While(key<>0)          Look(key)     EndWhile     key=0gomenu=0     DisplayRewrite     While(1)//          Cancel(off!)   	 n             Result=MessageBox("Coach";&tbox;0)          Char(key)          If(Key=8160)              4 CancelCoach()          Endif     If(Key=768)              4 If((?Mouselasty<19+ScrnMode)and(?Mouselasty>0))              4     `	 If((?Mouselastx>4)and(?Mouselastx<79))              4     `	     
 If(?MouseMiddle=0)              4     `	     
           Type(ntoc(Key))              4     `	     
           While(?Mouseleft)              4     `	     
           Endwhile              4     `	     
 //mouseleftclickedwithintable              4     `	     
 Endif              4     `	 Endif              4 Endif              4 If((?MouselastX>=x1and?MouselastX<=x2)and              4     `	 (?MouselastY>=y1and?MouselastY<=y2))              4     `	     
 While(?Mouseleft)              4     `	     
 Endwhile              4     `	     
 Return              4 Endif     ELSE              4 If(keyequiv[0]<>0)              4     `	 ForNext(x;1;keyequiv[0])              4     `	     
 If((key=keyequiv[x])or(key=keyequiv[x]32))              4     `	     
      Return              4     `	     
 EndIf              4     `	 Endfor              4 Endif          0    4 0    `	4(#4(#      4 If(Key=8167orKey=8168orKey=8169orKey=8166orKey=8103orKey=8102)  
  `	(#`	(#                4 0    `	 0    
`	(#`	(# 0    
(#
(# //leftarrow,rightarrow,uparrow,downarrow,PgUp,PgDn  
  (#(#                4 0    `	 Type(ntoc(Key))  
  `	(#`	(#            0    4 Endif  
  4(#4(#       Endif    4    	 (#7        EndWhileENDPROC    4 	   	 -+}&;   //*********************************************////     PROCEDURE:TableEditCtrl2   	 N   ////*********************************************PROCEDURETableEditCtrl2(x1;y1;x2;y2;xpos;ypos;&tbox;&keyequiv)Use("WPCHLIBR.WPM")     Eprompt=0     Look(key)     While(key<>0)          Look(key)     EndWhile     key=0gomenu=0     DisplayRewrite     While(1)//          Cancel(off!)   	 n             Result=Postit("Coach";&tbox;xpos;ypos;0;0;0)          Char(key)          If(Key=8160)              4 CancelCoach()          Endif     If(Key=768)              4 If((?Mouselasty<19+ScrnMode)and(?Mouselasty>0))              4     `	 If((?Mouselastx>4)and(?Mouselastx<79))              4     `	     
 If(?MouseMiddle=0)              4     `	     
           Type(ntoc(Key))              4     `	     
           While(?Mouseleft)              4     `	     
           Endwhile              4     `	     
 //mouseleftclickedwithintable              4     `	     
 Endif              4     `	 Endif              4 Endif              4 If((?MouselastX>=x1and?MouselastX<=x2)and              4     `	 (?MouselastY>=y1and?MouselastY<=y2))              4     `	     
 While(?Mouseleft)              4     `	     
 Endwhile              4     `	     
 Return              4 Endif     ELSE              4 If(keyequiv[0]<>0)              4     `	 ForNext(x;1;keyequiv[0])              4     `	     
 If((key=keyequiv[x])or(key=keyequiv[x]32))              4     `	     
      Return              4     `	     
 EndIf              4     `	 Endfor              4 Endif          0    4 0    `	4(#4(#      4 If(Key=8167orKey=8168orKey=8169orKey=8166orKey=8103orKey=8102)  
  `	(#`	(#                4 0    `	 0    
`	(#`	(# 0    
(#
(# //leftarrow,rightarrow,uparrow,downarrow,PgUp,PgDn  
  (#(#                4 0    `	 Type(ntoc(Key))  
  `	(#`	(#            0    4 Endif  
  4(#4(#       Endif    4    	 (#7        EndWhileENDPROC    4 	   	 -+}&;   //*********************************************////     PROCEDURE:EditTable   	 N   ////*********************************************PROCEDUREEditTable()Use("WPCHLIBR.WPM")     OnCancelCall(CancelCoach)     Label(EditTableTop)     If(?Dialog=36)                   <     h                //Ifintableeditmode   	 
	             Return     Endif     If(Not?InTable)              <     h                //Notintable   	 +
{
             Title="Coach"          tbox={    
 "Placethecursorinyourtable.";   	 y	                 4     `	 "";              4 }          FakeIt(Deftitle;&tbox;3;1;0)          keypress={8154;}         <     h                //F7key   	 !q             chkcode={1;}          Key=DoEdit(0;&chkcode;&keypress)     //WaitforusertopressF7   	 o
             WindowMaximize     Endif     If(Not?InTable)          w=64h=7          tbox={    
 "Thecursorisnotinatable.Wouldyouliketo...";   	 Y                 4     `	 "";              4 }     0     0    4(#(#       DlgCreate(Result;"EditaTable";DlgNoCancel!+DlgNoOk!;;;w;h)  
  4(#4(#            DlgControl(CtrlPushButton!;;"~CreateNewTable";;w61;h2)          DlgControl(CtrlPushButton!;;"~EditATable";;w41;h2)          DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";StyCancel!;w21;h2)          ForNext(x;1;tbox[0])              4 DlgControl(CtrlLabel!;;tbox[x];;2;x+1;;)          Endfor          DLGEND          If(Result=1)              4 Global(Module)              4 Module=1              4 Run("WPCHTB01.WPM")              4 RETURN          Else              4 If(Result=2)              4     `	     
 Go(EditTableTop)              4     `	 Else              4 If(Result=1)              4     `	 QuitCoach()              4 Endif          Endif    `	     
    	 &!4             Endif     Else    4     `	     
                    <     h      //Ifinatable   	 'F#6        tbox={    `	 "Tomodifyatable,youmustbein";   	 (#7                 4     `	 "TableEditMode.ToenterTable";              4     `	 "EditMode,";              4 "";              4 "Choose>  r [BoldOn]?
   
 Layout>   [BoldOff]?
   
 ,";   	 9+&;        0         4 "then>  r [BoldOn]?
   
 Tables>   [BoldOff]?
   
 ,";  
  (#(#       0         4 "then>  r [BoldOn]?
   
 Edit>   [BoldOff]?
   
 .";  
  (#(#                4 "or";              4 "Press>  r [BoldOn]?
   
 Alt+F11>   [BoldOff]?
   
 .";   	 -1)?                 4 "";          }          hbox1={    
 "Choose>  r [BoldOn]?
   
 Layout.";   	 L                 4     `	     
 "";        	 O                 4 }          hbox2={    
 "Choose>  r [BoldOn]?
   
 Tables.";   	 M	                 4     `	     
 "";        	  
P                 4 }          hbox3={    
 "Choose>  r [BoldOn]?
   
 Edit.";   	 N
                 4 }    `	     
                   	 Q             LayoutMenu(&valid)              4 //SetValidMenuVariable          allow={    
      1539;}    < //Edit   	 	             exallow={     0;}   	 D
             accel={    
      116;}         < //tforTables   	 ;             exaccel={     1;}   	              subval={              4     `	 1538;          //[Create]   	 0
                 4     `	 1539;          //[Edit]   	 
                 4     `	 264;          //Insert   	 .~                 4     `	 265;          //Delete   	 %                 4     `	 1540;          //Join   	 |                 4     `	 1541;          //Split   	 #s                 4     `	 1542;          //Calculate   	                  4     `	 1543;          //CreateFloatingCell   	 q                 4     `	 1544;          //EditFloatingCell   	 h                 4 }          subacl={    
 101;}     //(E)dit   	 f             exsubacl={     0;}   	 
]             subs={1537;}          //[Tables]   	 [!             funkey={    
 6774;         < //Alt+F11,   	 #                 4     `	     
 8130}         < //Alt+F7   	 P$             sbox={    
 "Choose>  r [BoldOn]?
   
 Tables>   [BoldOff]?
   
 ,";   	 &                 4     `	     
 " %
    
  then>  r [BoldOn]?
   
 Edit>   [BoldOff]?
   
 .";              4 }          Repeat          Result=PostIt("Coach";&tbox;0;11;0;2;0)              4 MenuActive=0        	 !,                 4 Show=HotSpot(0;0;62;0;537;&funkey;1)              4 Switch(Show)              4 CaseOf1:              < //UserchoosesShowMe   	 $' 1                 4     `	 Display(On!)̐              4     `	 ShowMenu("Coach";&sbox;51;2;3;5;2;0)              4     `	 Result=Postit("Coach";&tbox;0;11;0;3;0)              4 CaseOf2043:         < //UserchoosesLayout   	 (j#6                 4 CaseOf537:         < //UserpressedAlt+L   	 h)$8                 4     `	 Result=Postit("Coach";&tbox;0;11;0;3;0)              4     `	 PullDownDlg              4     `	 Type("l")              4 CaseOf8130:         < //UserpressedAlt+F7   	 ,'=                 4     `	 DisplayRewrite              4     `	 CancelDialogs()   	 -I)?                 4     `	 CancelMenus()              4     `	 ColumnsTablesDlg              4     `	 TblColEdit()              4 CaseOf6774:         < //UserpressedAlt+F11   	                  4     `	 DlgInput(on!)              4     `	 TableEditDlg    <    	 C                 4 CaseOf8085:         < //UserpressedAlt+=   	 A	                 4     `	 0    
      `	 MenuActive=MenuBarControl("Coach";&hbox1;&sbox;52;2;108;&funkey)  
  
(#
(#                4 DEFAULT:               //Default   	 6
                 4     `	 Result=PostIt("Coach";&tbox;0;11;0;3;0)              4     `	 PosLineDown              4     `	 0    
      `	 MenuActive=MenuBarControl %
     
  ("Coach";&hbox1;&sbox;52;2;108;&funkey)  
  
(#
(#                     4 ENDSwitch              4 If(MenuActive<>1)    h //Ifmenudown   	                  4     `	 If((Show<>6774)or(Result<>8130))//Alt+F11orAlt+F7              4     `	     
 Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;              4     `	     
 &accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)              4     `	     
 MenuActive=Result              4     `	     
 DisplayRewrite              4     `	     
 If(Result=1539orResult=101orResult=6774)        	                  4     `	     
                //EditorEorAlt+F11              4     `	     
      CancelMenus()              4     `	     
      CancelDialogs()              4     `	     
      DisplayRewrite              4     `	     
      DlgInput(On!)              4     `	     
      TableEditDlg              4     `	     
 Endif              4     `	     
 If(?Dialog=370)               //Alt+F7inTableColumnsDialog   	 9                 4     `	     
      TblColEdit()              4     `	     
 Endif              4     `	 Endif              4 Endif              4 If(Show=6774or?Dialog=36)              4     `	 Break              4 Endif     Until(MenuActive<>1)EndifENDPROC	   	 o)   //*********************************************////     PROCEDURE:TblColEdit   	 N   ////*********************************************PROCEDURETblColEdit()Use("WPCHLIBR.WPM")     x1={    4 19;20;               //Tables,Edit   	 A	             }     x2={    4 28;31;   	 
	             }     y1={    4 7;9;   	 -             }     y2={7;9;          }     Hotkey={    `	 116;          //(T)ables   	 y	                 4     `	 768;          //(E)dit   	  p
                 4 }     hotpnt={    `	 0;1;}   	 n        helpmsg={    
 "Choose>  r [BoldOn]?
   
 Tables>   [BoldOff]?
   
 ,then>  r [BoldOn]?
   
 Edit>   [Bold   	 e   Off]?
   
 .";              4     `	 "";              4 }     Result=0SaveScrn=0     While(?Dialog=370)          mbox={    
 "Choose>  r [BoldOn]?
   
 Tables,";   	                  4     `	     
 ">   [BoldOff]?
   
 then>  r [BoldOn]?
   
 Edit.";              4     `	 "";              4 }          Switch(?DialogControl)          CaseOf0:                   <     h      //OK   	                   4 info={     0;              <     h      //ControlID   	 O!                 4     `	     
 370;              <     h //DialogID   	 F"                 4     `	     
 0;                   <     h //Noarrowkeys   	 #                 4     `	     
 "Coach";         <     h //Title   	 D$                 4     `	     
 45;              <     h      //XposforPostit   	 ;%                 4     `	     
 12;              <     h      //YposforPostit   	 &                 4     `	     
 1;                   <     h //Hintbutton   	 9'                 4     `	     
 "Coach";         <     h //Helptitle   	 0(                 4     `	     
 1;                   <     h //RestoreScreen   	 )                 4     `	     
 0;                   <     h //Reserved   	 . ~*                 4     `	 }              4 accel={     50;116;    <     h      //2,(T)ables   	 |!,                 4     `	 }              4 aclpnt={0;0;}          0    4 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;  
  4(#4(#                4 &accel;&aclpnt;&mbox;&helpmsg)          CaseOf58:                   <     h //Tables   	 f% 2                 4 info={     58;         <     h           //ControlID*   	 
&]!3                 4     `	     
 370;              <     h //DialogID   	 &"4                 4     `	     
 0;                   <     h //Don'tallowarrows   	 ['"5                 4     `	     
 "Coach";         <     h //Title   	 (R#6                 4     `	     
 45;              <     h      //XposforPostit   	 (#7                 4     `	     
 12;              <     h      //YposforPostit   	 P)$8                 4     `	     
 1;                   <     h //HintButton   	 )G%9                 4     `	     
 "Coach";         <     h //Helptitle   	 *%:                 4     `	     
 1;                   <     h //RestoreScreen   	 E+&;                 4     `	     
 0;                   <     h //Reserved   	 +<'<                 4     `	 }              4 accel={     50;101;    <     h      //2,(E)dit   	 :-(>                 4     `	 }   	 -1)?                 4 aclpnt={1;1;}          0    4 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotkey;  
  4(#4(#                4 &accel;&aclpnt;&mbox;&helpmsg)          DEFAULT:              4 info={     ?DialogControl;     //ControlID   	 C                 4     `	     
 370;              <     h //DialogID   	                  4     `	     
 0;                   <     h //Don'tallowarrows   	 A	                 4     `	     
 "Coach";         <     h //Title   	 	8                 4     `	     
 45;              <     h      //XposforPostit   	 
	                 4     `	     
 12;              <     h      //YposforPostit   	 6
                 4     `	     
 1;                   <     h //HintButton   	 -                 4     `	     
 "Coach";         <     h //HelpTitle   	                  4     `	     
 1;                   <     h //RestoreScreen   	 +
{
                 4     `	     
 0;                   <     h //Reserved   	 
"	                 4     `	 }              4 accel={     50;116;    <     h      //2,(T)ables   	  p
                 4     `	     
 }              4 Aclpnt={0;0;}              4 allow={0;58}          0    4 Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;  
  4(#4(#                4 &accel;&aclpnt;&mbox;&helpmsg;&allow)          ENDSwitch     EndWhileENDPROC	   	 X   //*********************************************////     FUNCTION:TableBlockEdit   	 N   ////*********************************************FUNCTIONTableBlockEdit(Title;&msg;EnableMouse;x1;x2;y1;x2;&keypress)     Result=0     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     NotFound(On!)     OnNotFoundCall(NotFoundCoach)     OnCancelCall(CancelCoach)     Label(Blockit)     Result=0Choice=0     Firstcell=""     LastCell=""     Repeat//          Cancel(off!)   	 X             Vpos=(24(Msg[0]+7))          Result=Postit("Coach";&msg;99;Vpos;0;0;0)          Char(Key)                   < //Getakeypress   	              If(Key=8160)              4 CancelCoach()          Endif          If(Key<>768)         <     h      //cursorkeys   	 7!                 4     `	 While(?MouseLeft)              4     `	 EndWhile              4 0    `	 If((Key=8169orKey=8166orKey=8167or  
  `	(#`	(#                4     `	 Key=8168orKey=8103orKey=8102or              4     `	 Key=8107orKey=8184orKey=8133))              4     `	     
 Type(ntoc(Key))             	 !q'                 4     `	     
      If(Key=8133and?BlockActive)              4     `	     
           FirstCell=?cell              4     `	     
      Endif              4     `	     
 //arrows,PgDn,PgUp,End,Home,Block              4 Endif          Else              4 If((?MouselastX>=x1and?MouselastX<=x2)and              4 (?MouselastY>=y1and?MouselastY<=y2))              4     `	 Type(ntoc(Key))              4     `	 Choice=1              4     `	 Break              4 EndIf              4 If((?Mouselasty<19+ScrnModeand(?Mouselasty%
     
 Ԁ>0))              4 and(?Mouselastx>4and?Mouselastx<79)              4 and(EnableMouse)and(?MouseRightClick=0))              4     `	     
 Type(ntoc(Key))              4     `	     
 //mouseleftclickedwithintable              4 Endif          Endif    `	    	 *%:        Use("WPCHLIBR.WPM")          NotFound(Off!)          Cancel(Off!)          Result=Filter(&keypress;Key;1)   	 -)?        Until(Key=keypress[Result]or(Choice=1))     LastCell=?Cell     If(Firstcell=Lastcell)          tbox={    
 "Nocellsareblocked.Youmustblock";   	                  4     `	     
 "atleast2cellstocompletethetask.";              4     `	     
 "";              4 }          Result=Messagebox("Coach";&tbox;1)          Go(Blockit)     Endif     Return(LastCell)ENDFUNC	   	 -   //*********************************************////     FUNCTION:PostaNote   	 N   ////*********************************************FUNCTIONPostANote(Title;&tbox;xpos;ypos;Modal;Buttons)     Global(xposS1;xposS2;xposH1;xposH2;xposQ1;xposQ2;yposS1;yposQ1)     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     w=StrLen(tbox[1])     tst=StrLen(Title)     If(tst>w)          w=tst     Endif     ForNext(x;2;tbox[0])          tst=StrLen(tbox[x])          If(tst>w)              4 w=tst    
           //w=widthofinsideofbox   	 
             Endif     Endfor     If(Buttons=0)          h=tbox[0]+2     Else          h=tbox[0]+3     //h=heightofinsideofbox   	         Endif     w=w+4     If(Buttons>0andButtons<5)          If(Buttons=1)              4 If(w<18)              4     `	 w=18              4 Endif          Else              4 If(w<32)              4     `	 w=32              4 Endif          Endif     Else          If(Buttons=5)              4 If(w<52)              4     `	 w=52              4 Endif          Endif     Endif     If(Buttons=6)          h=h+2     EndIf     If(Modal)          If(xpos=99andypos=99)              4 DlgCreate(Result;"Coach";DlgNoOk!+DlgNoCancel!;              4 ;;w;h)          Else              4 If(xpos<>99andypos=99)              4     `	 DlgCreate(Result;"Coach";DlgNoOk!+DlgNoCancel!;              4     `	 xpos;;w;h)              4 Else              4     `	 If(xpos=99andypos<>99)              4     `	     
 DlgCreate(Result;"Coach";              4     `	     
 DlgNoOk!+DlgNoCancel!;              4     `	     
 ;ypos+ScrnMode;w;h)              4     `	 Else   	 -)?                 4     `	     
 DlgCreate(Result;"Coach";              4     `	     
 DlgNoOk!+DlgNoCancel!;              4     `	     
 xpos;ypos+ScrnMode;w;h)              4     `	 Endif              4 Endif          Endif     Else          If(xpos=99andypos=99)              4 DlgCreate(Result;"Coach";DlgInactive!+DlgNoClear!+              4 DlgNoOk!+DlgNoCancel!;              4 ;;w;h)          Else              4 If(xpos<>99andypos=99)              4     `	 DlgCreate(Result;"Coach";              4     `	 DlgInactive!+DlgNoClear!+              4     `	 DlgNoOk!+DlgNoCancel!;              4     `	 xpos;;w;h)              4 Else              4     `	 If(xpos=99andypos<>99)              4     `	 0    
 DlgCreate(Result;"Coach";DlgInactive!+DlgNoClear!+  
  
(#
(#                4     `	     
 DlgNoOk!+DlgNoCancel!;              4     `	     
 ;ypos+ScrnMode;w;h)              4     `	 Else              4     `	     
 DlgCreate(Result;"Coach";              4     `	     
 DlgInactive!+DlgNoClear!+              4     `	     
 DlgNoOk!+DlgNoCancel!;              4     `	     
 xpos;ypos+ScrnMode;w;h)              4     `	 Endif              4 Endif          Endif     Endif     If(Buttons=1)          ///OK   	 9             DlgControl(CtrlPushButton!;;"OK";;w15;h2)          DlgControl(CtrlPushButton!;;"OK";;w15;h2)          xposS1=0          xposS2=0          xposH1=0          xposH2=0          xposQ1=xpos+w15          xposQ2=xpos+w4          yposS1=ypos+h2     Else          If(Buttons=2orButtons=3)              4 If(Buttons=2)    <     h      //OKQUIT   	 Y#/                 4     `	 DlgControl(CtrlPushButton!;;"OK";;w25;h2)              4     `	 DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";StyCancel!;w15;h2)              4     `	 xposS1=xpos+w29              4     `	 xposS2=xpos+w18              4     `	 xposH1=0              4     `	 xposH2=0              4     `	 xposQ1=xpos+w15              4     `	 xposQ2=xpos+w4              4     `	 yposS1=ypos+h2              4     `	 ShowPosition(xposS1+3;yposS1+ScrnMode)   	 -)?                 4 Else              4     `	 DlgControl(CtrlPushButton!;;"Continue";StyDefault!;w29;h2)              4     `	 DlgControl(CtrlPushButton!;;"Quit...Esc";StyCancel!;w15;h2)              4     `	 xposS1=0              4     `	 xposS2=0              4     `	 xposH1=0              4     `	 xposH2=0              4     `	 xposQ1=0              4     `	 xposQ2=0              4     `	 yposS1=0              4 Endif          Else              4 If(Buttons=4)              4     `	 DlgControl(CtrlPushButton!;;"Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 ";;w   29;h2)              4     `	 DlgControl(CtrlPushButton!;;"Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 ";;w   29;h2)              4     `	 DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";StyCancel!;w15;h2)              4     `	 xposS1=0              4     `	 xposS2=0              4     `	 xposH1=xpos+w29              4     `	 xposH2=xpos+w18              4     `	 xposQ1=xpos+w15              4     `	 xposQ2=xpos+w4              4     `	 yposS1=ypos+h2              4 Else              4     `	 If(Buttons=5)              4     `	     
 DlgControl(CtrlPushButton!;;"ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w49;h2)              4     `	     
 DlgControl(CtrlPushButton!;;"ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w49;h2)              4     `	     
 DlgControl(CtrlPushButton!;;"Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 ";;w   29;h2)              4     `	     
 DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";StyCancel!;w15;h2)              4     `	     
 xposS1=xpos+w49              4     `	     
 xposS2=xpos+w32              4     `	     
 xposH1=xpos+w29              4     `	     
 xposH2=xpos+w18              4     `	     
 xposQ1=xpos+w15              4     `	     
 xposQ2=xpos+w4              4     `	     
 yposS1=ypos+h2              4     `	 Else              4     `	     
 If(Buttons=6)              4     `	     
      DlgControl(CtrlPushButton!;;              4     `	     
      "ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w20;h4;10;1)              4     `	     
      DlgControl(CtrlPushButton!;;   	 -)?                 4     `	     
      "ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w20;h4;10;1)              4     `	     
      DlgControl(CtrlPushButton!;;              4     `	     
      "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";StyCancel!;w20;h   2;10;1)              4     `	     
      xposS1=xpos+w20              4     `	     
      xposS2=xpos+w3              4     `	     
      yposS1=ypos+h4              4     `	     
      xposQ1=xpos+w20              4     `	     
      xposQ2=xpos+w3              4     `	     
      yposQ1=ypos+h2                   D     p                          L     x    	                  4     `	     
 Else              4     `	     
      xposS1=1              4     `	     
      xposS2=1                   4     `	     
      xposH1=1              4     `	     
      xposH2=1              4     `	     
      xposQ1=1              4     `	     
      xposQ2=1              4     `	     
      yposS1=1              4     `	     
 Endif              4     `	 Endif              4 Endif          Endif     Endif          ForNext(x;1;tbox[0])              4 DlgControl(CtrlLabel!;;tbox[x];;2;x;w1;1)          EndforDlgEndReturn(Result)ENDFUNC	   	 ."      