WPC  
                 0   (     0   P     	B      :     p  W               _     \          p   U      u        |   	         U        	%            /          {      !   `      	      [  #     a   !   `      !   `   L  	)        "                                                                                                                           (                    $           (   (               3>$       
   U!         W                   d  "  A                                                                 $                                                                                                                                                                                                      $                                                                  `                                                                  `                                                                                                                                                                                                                                                                            O v e r v i e w D l g                                           j                                                                                                                                          H P o s i t i o n                                               j0                                                                  j6                                                                  ^                                                                  j
                                                                                                                                     	*                                                                  h                                                                  	                                                                   	                                                                  	H                                                                  	                                                                                                                                    `                                                                                                                                    	x                                                                  	                                                                  	x                                                                  	                                                                   jN!                                                                  !                                                                    !      M e s s a g e                                                                 	(                                                                  "                                                                  	8                                                                  	)                                                                  	(                                                                  	&+                                                                  	)                                                                  	/                                                                  	J+                                                                  +                                                                  -                                                                  0,                                                                  -                                                                  ,                                                                  -                                                                  -                                                                  -                                                                  -                                                                  -                                                                 	B6                                                                 	>/                                                                 	B6                                                                 	8                                                                    j8           M e s s a g e                                                   !                                                                                                        5      5>      S      "V      Z                                     C       @            $            a'      a-                   !      (     8      ";      ?      [                  	      "	      	      	      -%
      s            K      -Q      l      7~      u       
      J      J
           F       ^ 7      7h       n            }       	R      	      }       73,      } 9,      L,      R-      .       /      F/      j/      /      	/      }       :A9      } 9      B      	B      KB      KB     JB      JB     B       B      o B      7B      } C      
 $C      -C      
 6C      K?C      KGC    -MC      )D      	!D      	/D      	L      	bM      	?O      XO      O      O      O      O      +P      0P      rP      wP      P      P      P      P      P      	R      :Y      [      	[            A  N        >  S  v                  '  3  G    !  .  8  [        P	  	  	  	  	  %
  s        ?  K  Q  l  ~          Z              7  P    .  ~      5  ;  D  h      R    q    B       '  l+  +  3,  ,  ,  R-  -  \.  .  /  j/  /  /  }0  p7  	8  E8  8  A9  z9  {@  aA  A  B  B  B  B  B  B  B  B  B  $C  -C  6C  ?C  MC  D  !D  /D  D  L  L  bM  {M  ?O  XO  O  O  O  O  O  O  P  +P  0P  YP  rP  wP  P  P  P  P  P  P  P  R  R  Y  SZ  Z  [  [  < @p       ` (    HD  < 
  9 p` (      X< 6X  9  ` +   C o u r i e r         "4  ? x x x  X    Xx  C   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JE    = #| d        " B D O ??=K ' 	            " B D O ??=K ' 	            " B D O ??=K ' 	               ;  ? x x x  X    Xx    r 5 d d d  X    d  m n 2 ` ` `  X    `                          
    !    W           X X   	    {    o  [      X     `	 P
      h X     p `      x h   ! (#   Xo //*********************************************   	       ////     NAME:    `	     P
      WPCHTB06.WPM   	 N   //     PURPOSE:     PositionTableHorizontally   	     // //*********************************************  //RevisionHistory//     7/26/93    P
 textchanges   	 A	   //     7/20/93    P
 Fixedrewriteproblems   	 	8   //     6/7/93    P
 Changesforconsistency.   	 
	     %
    
  Global(ScrnMode;MsgAdj;DefTitle;title)Global(CancelMsg;HotElement;SaveScrn)Global(w;h;tbox;hbox;mbox;helpmsg;PosChoice)select[0]=0DefTitle="Coach"               //Maintitlename   	    Title="Coach"ScrnMode=?ScreenHigh24Use("wpchlibr.wpm")                    h //Sharedlibraryfile   	  p
   Use("wpchlbtb.wpm")If(NotExists(Module))     ScreenSetup()     If(?Dialog<>36)          ColorScheme()     EndifEndifIf(?BlockActive)     BlockoffEndifOnCancelCall(CancelCoach)Error(off!)MsgAdj=DlgMessage()CancelMsg=0	   	 7!   //*********************************************////     MAINPROGRAM:Coach   	 N   ////*********************************************//Label(menu)WindowMaximizeCancel(Off!)Success=0If(NOTExists(Module))     Call(OverviewDlg)                    h //OverviewDialog   	 6
   Endif	   	    //***************************************************************//          PositionTable   	 W    //***************************************************************     Call(HPosition)     Message(&tbox;1215)               h     X //Tellthemwhatpositiontheychose   	 L        Result=MessageBox("Coach";&tbox;1)     If(NotExists(Module))          ExitTableEdit()          RestoreStates()     Endif        	 
	        Return//*********************************************//     ENDMAINPROGRAM   	    //*********************************************	   	 +
{
   //*********************************************////     SUBROUTINE:OverviewDlg   	 N   ////*********************************************Label(OverviewDlg)     Message(&tbox;1100)               h //WelcomeScreen   	         Result=Welcome("Coach";&tbox)If(Result=1)          QuitCoach()EndifReturn	   	 -   LABEL(HPosition)While(?MouseLeft)EndWhileEditTable()Message(&mbox;1200)keyequiv={    `	     P
      52;           //4Table   	                       `	     P
      116;           //tTable   	 A	                      `	     P
      84;           //TforTable   	 	8                      `	 }X1=28              `	 //hotspotforTableonmenu   	 6
   Y1=23X2=35Y2=23TableEditControl(x1;y1;x2;y2;0;&mbox;&keyequiv)     DlgInput(on!)     Type(NTOC(116))     ShiftTabKey     x1={     49;57    P
                //Position,OK   	 e             }     x2={     74;65   	 c
             }     y1={     18;22   	              }     y2={18;22          }     hotkey={    `	 112;                     //Pforposition   	 M                      `	     P
 8182                //EnterforOK   	 D                      `	 }     Hotpnt={1;1;}                  	 B        helpmsg={    P
 "Choose>  r [BoldOn]?
   
 Position>   [BoldOff]?
   
 .";   	 9                      `	     P
 "Selectaposition.";   	                        `	     P
 "Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 .";   	 O!                      `	     P
 "";               }     Result=0SaveScrn=0          While(?Dialog=142)               h //IntheTableFormatDlgBox   	 E'             Message(&tbox;1205)          Switch(?DialogControl)               CaseOf0:                    h     X           //OK   	  1+                      `	 info={     0;               h     X           //ControlID   	 !,                      `	     P
           142;          h     X           //DialogID   	 /"-                      `	     P
           0;               h     X           //don'tallowarrows   	 "&.                      `	     P
           "Coach";    h     X           //Title   	 }#/                      `	     P
           40;          h     X           //xposforPostit   	 $$t0                      `	     P
           6;               h     X           //yposforPostit   	 $ 1                      `	     P
           0;               h     X           //HintButton   	 r% 2                      `	     P
           "Coach";    h     X           //HelpTitle   	 &i!3                      `	     P
           1;               h     X           //RestoreScreen   	 &"4                      `	     P
           0;               h     X           //Reserved   	 g'"5                      `	     P
 }                   `	 accel={          112;    h     X           //PforPosition   	 ($7                      `	     P
                8182;    X           //EnterforOK   	 \)$8                      `	     P
 }                   `	 aclpnt={1;1;}               0    `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)    +H'< `	(#`	(#  Ї               CaseOf1936:               h     X                //OnPosition   	                          `	 info={     1936;          h     X      //ControlID   	 W                       `	     P
           142;          h     X      //DialogID   	 N                      `	     P
           0;               h     X      //don'tallowarrows   	                       `	     P
           "Coach";    h     X      //Title   	 L                      `	     P
           40;          h     X      //xposforPostit   	 C                      `	     P
           6;               h     X      //yposforPostit   	                       `	     P
           0;               h     X      //HintButton   	 A	                      `	     P
           "Coach";    h     X      //HelpTitle   	 	8                      `	     P
           1;               h     X      //RestoreScreen   	 
	                      `	     P
           0;               h     X      //Reserved   	 6
                      `	     P
 }                   `	 accel={          108;    h     X //lleft   	                       `	     P
                114;    h     X //rright   	 +
{
                      `	     P
                99;    h     X //ccenter   	 
"	                      `	     P
                102;    h     X //ffull   	 y	                      `	     P
                115;    h     X //sset   	  p
                      `	     P
                112;    h     X //pforposition   	                       `	     P
      }                   `	 aclpnt={1;1;1;1;1;1}                   `	 Result=Postit("Coach";&tbox;info[5];info[6];0;info[7];0)                             `	 While(?DialogControl=1936)                   `	     P
 Char(key)                   `	     P
 Result=Postit("Coach";&tbox;info[5];info[6];0;info[7];0)                   `	     P
      If(key=8160)    X           //pressCancel   	 O                      `	     P
           CancelCoach()                   `	     P
           Message(&tbox;1205)                   `	     P
      Else                   `	     P
           Type(ntoc(key))                   `	     P
      Endif                   `	 Endwhile               CaseOf2952:               h     X           //SetPositionWindow   	 ."                      `	 info={     2952;          h     X      //ControlID   	 #                      `	     P
           142;          h     X      //DialogID   	 ,|$                      `	     P
           0;               h     X      //don'tallowarrows   	 #%                      `	     P
           "Coach";    h     X      //Title   	 z&                      `	     P
           40;          h     X      //xposforPostit   	 !q'                      `	     P
           6;               h     X      //yposforPostit   	 (                      `	     P
           0;               h     X      //HintButton   	 o)                      `	     P
           "Coach";    h     X      //title   	  f*                      `	     P
           1;               h     X      //RestoreScreen   	  
+                      `	     P
           0;               h     X      //Reserved   	 d!,                      `	     P
 }                   `	 accel={     1;   	 Y#/                      `	     P
 }                   `	 aclpnt={1;}                   `	 HotElement=0         	 N% 2                  0    `	 Result=WinEdControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  `	(#`	(#                 DEFAULT:                   `	 info={     ?DialogControl;                   p //ControlID   	 (#7                      `	     P
           142;          h     X      //DialogID   	 8)$8                      `	     P
           0;               h     X      //don'tallowarrows   	 )/%9                      `	     P
           "Coach";    h     X      //Title   	 *%:                      `	     P
           40;          h     X      //xposforPostit   	 -+}&;                      `	     P
           6;               h     X      //yposforPostit   	 +$'<                      `	     P
           0;               h     X      //HintButton   	                          `	     P
           "Coach";    h     X      //Helptitle   	 W                       `	     P
           1;               h     X      //RestoreScreen   	 N                      `	     P
           0;               h     X      //Reserved   	                       `	     P
 }                   `	 accel={     112;          h     X      //pforposition   	 C                      `	     P
      }                   `	 aclpnt={1;}                   `	 allow={     2952;1936;0;}   	 	8                  0    `	 Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)  
  `	(#`	(#            ENDSwitch     EndWhileDisplay(off!)DlgInput(on!)Type("t")Type("p")PosChoice=?entryWhile(?DialogControl<>0)     EnterKeyEndwhileEnterKeyDisplay(On!)RETURN	   	 O   //*********************************************////     PROCEDURE:Message   	 N   ////*********************************************PROCEDUREMessage(&tbox;Msg)Switch(Msg)CaseOf1100:    P
           //WelcomeScreen   	 6
             tbox={0    `	 "Youcanpositionatablehorizontallyonthepage: %
    
  ";     `	(#`	(#                     `	 "";̀"


";   	 
"	   Ѐ"	++		++		++	";   	 y	   Ѐ"	*,		*,		*,	";   	  p
   Ѐ"	*,		*,		*,	";   	    Ѐ"	--		--		--	";   	 n   Ѐ"	Left		Right		Center	";   	 e   Ѐ"						";   	 
   Ѐ"						";   	 o
   Ѐ"


";   	 f                      `	 "";               }CaseOf1200:    P
                      //ChooseTable(forPosition)   	    mbox={     "Choose>  r [BoldOn]?
   
 Table>   [BoldOff]?
   
 .";   	 Y                  "";          }CaseOf1205:     tbox={    `	 "Choose>  r [BoldOn]?
   
 Position>   [BoldOff]?
   
 ,thenselect%
     
 Ԁaposition.";   	                        `	 "Choose>  r [BoldOn]?
   
 OK>  r [BoldOn]?
   
 .";   	 [!                      `	 "";               }CaseOf1215:     If(PosChoice=0)          Posit="left"     ElseIf(PosChoice=1)          Posit="right"     ElseIf(PosChoice=2)          Posit="center"     ElseIf(PosChoice=3)          Posit="full"     ElseIf(PosChoice=4)          Posit="set"     EndifEndifEndifEndifEndif     tbox={    `	 "Youhavechosen>  r [BoldOn]?
   
 "+Posit+">   [BoldOff]?
   
 Ԁasthepositionof   	 ~% 2   yourtable.";                   `	 "";               }CaseOf5000:    P
           //TableFormatDlgBoxhint   	 h)$8        hbox={"Thepositionofthetabledetermineswherethetable";               "willbeplacedbetweentheleftandrightmargins.";               "";   	 ,T'<   Ѐ"


";   	       Ѐ"	++		++		++	";   	 W    Ѐ"	*,		*,		*,	";   	 N   Ѐ"	*,		*,		*,	";   	    Ѐ"	--		--		--	";   	 L   Ѐ"	Left		Right		Center	";   	 C   Ѐ"						";   	    Ѐ"						";   	 M	   Ѐ"


";   	 	D                  "";          }DEFAULT:    `	     P
           //Ifnonewerefound   	 7

        tbox={    `	 "Messagenotfound!";   	 
.	                      `	 "";               }     hbox={    `	 "Nohintavailable.Whattypeofinformation";   	 z                      `	 "wouldbehelpfulhere?";                   `	 "";               }ENDSwitchENDPROC8       %
     
     