WPC/<  
      .           0   (   2  0   P   2        3  	B        	B   *     	D   3          L            8  "       &       '   U      1)  	%      I)          O)  "     a7   E      )   e      )  #     )   U      +   	      #+        5+   	      )+   	      /+        A+   !   `   Q+   !   `   +   !   `   ,   !   `   q,   !     ,   !   0  q0   !     3   !   0   5  	)      5      ^  6                                                                                                                                                                                                                                           d    &     0        d          d       '                          d x    dE  A    Y                                                                  X                                                                  [                                                                  Z                                                                  ]                                                                  _                                                                  ^                                                                  \                                                                  a                                                             v     c                                                             b     b                                                             b     `                                                             v    O v e r v i e w D l g                                                e                                                                  d                                                                  g                                                                  f                                                                 C a l c T a b l e                                                    j                                                                  m                                                             	
     l                                                             	     k                                                             	     o                                                             	
     n                                                             	
     q                                                             	t     p                                                             	     r                                                             	     s                                                                  u                                                             	P
     t                                                             	     v                                                             	     w                                                             
     y                                                             	     x                                                             	z
     z                                                             	     {                                                             	     ~                                                                                                                                                                                                                                                                                                                                     Z                                                                                                                                         }                                                                  i                                                                  h                                                                 V a l i d M e n u                                                   T b l C o l C r e a t e                                                                                                                                                                              R8                                                                  N                                                                   N                                                                   	6$                                                                  x                                                                   	>8                                                                  	(                                                                  	T$                                                                  	+                                                                  	0(                                                                  	/                                                                  	,                                                                  	3                                                                  	/                                                                  	3                                                                  	>8    B l a n k S c r e e n                                           b8                                                                  9                                                                  9                                                                    29      M e s s a g e                                                                 	:                                                                  9                                                                  	4G                                                                  	<                                                                  	:                                                                  	=                                                                  	<                                                                  	?                                                                  	=                                                                  	2A                                                                  	@                                                                  	vB                                                                  	VA                                                                  	C                                                                  	B                                                                  	D                                                                  	C                                                                  	hE                                                                  	D                                                                  	hE                                                                  	4G                                                                    >G                          !             5      5%      :      "=      A                  C       @            $            a      a                                    "                               -                              7      -\      o      u            	      
      G
      -
      
      
      
      -      A      R      ,c            
      	      	      	      q      q      7        &      J       k      	      G      Jn      Jw    >       7      }       	             <      	       :2      v            	            _      _                         J$      J-    > V      7      }       	             .      Y      m      s      4y      -      g      -*      +      7
0       0      0      N1      l1      } s1      	1      	f;      } s1      	 E      } s1      	fO      } s1      	Y      } s1      :d      } d      n      	n      -n      o      o       o      	p      -%p      )p      	p      	q      	_r      	t      	u      	y      	z      	(|      	}      	~      :            	            !  >  K        %  :  ]  w                                          7  \  o  u  {      m	  	  	  
  G
  
  
  
  
  !  M    A  R  c  v    
  F
  _
  
                   J  k      G  n          <         w  2    1          _        $  V        .  Y  m  s  y    g        :   Y      !  !  !  &  '  c'  '  ((  *)  *  +  +  W,  ,  ,  C-  O.  i.  /  /  
0  {0  0  0  1  N1  l1  1  N2  9  :  :  f;  <  cC  BD  D   E  E  M  N  N  fO  P  W  X  
Y  Y  dZ  /b  c  Sc  d  d  l  m  m  ?n  n  n  n  o  o  o  p  p  %p  p  p  q  iq  _r  r  t  t  u  u  y  y  z  z  (|  A|  }  }  ~                
     
   )          >   '                 
 x         d     >    	       Name:C:\WP60\MACROS\WPCH_TB1.WPM    Q (# Page@
   
 
     
 1
   
 A
   
 Ԁof18   	           October15,1993!
   
      V (# "(   US: !  &  US  ,     (       5:13pm!
   
  
     
   )          >   '                 
 x         d     >    	       Name:C:\WP60\MACROS\WPCH_TB1.WPM    Q (# Page@
   
 
     
 1
   
 A
   
 Ԁof18   	           October15,1993!
   
      V (# "(   US: !  &  US  ,     (       5:14pm!
   
 < 
  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. @p       ` (    @  D  HD    2 : #| c   	      " B D O ??=K ' 	            " B D O ??=K ' 	            " 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                (                    $           (   (               3$       
   U!         W    M e s s a g e                                                   29                                                                                 "  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         "<    9   +   C o u r i e r   B o l d        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x   ^ r 5 d d d  X    d  qj n 2 ` ` `  X    `  O s 4 d d d  X  / d Cac ~ ) Z 8 Z    f Z 6g]{ Tn     8   X    sT  % T 8 T     T U\ r 5 d d d  X  #d S!#!     !                                                                                                                                                 
    !    W        X X     
       iCa:;           iCa:;  o  [      X     `	 P
      h X     p `      x h   ! (#   Xo 	 %
    
 	 //*********************************************   	       ////     NAME:    `	     P
      WPCH_CA0.WPM   	 N   //     PURPOSE:     CoachonCalculatingTables   	    ////*********************************************%
    
 Global(ScrnMode;MsgAdj;DefTitle;Title)Global(FakeBtns;CancelMsg)Global(w;h;tbox;hbox;helpmsg)Global(HotElement;SaveScrn)select[0]=0DefTitle="Coach"     //Main"Coach"name   	 +
{
   Title="Coach"ScrnMode=?ScreenHigh24Use("wpchlibr.wpm")                    h //Sharedlibraryfile   	    Use("wpchlbtb.wpm")If(NotExists(Module))     ScreenSetup()     ColorScheme()EndifIf(?BlockActive)     BlockoffEndifOnCancelCall(CancelCoach)Error(off!)MsgAdj=DlgMessage()CancelMsg=0	   	     //*********************************************////     MAINPROGRAM:Coach   	 N   ////*********************************************//Label(menu)WindowMaximizeCancel(Off!)Success=0If(NOTExists(Module))     Call(OverviewDlg)                    h //OverviewDialog   	 6
             If(Result=1)          Windowmaximize          QuitCoach()          Return     EndifEndifIf(Exists(Module))     If(Module=1)          RETURN     EndifEndifQuitCoach()//*********************************************//     ENDMAINPROGRAM   	 X   //*********************************************	   	 O   //*********************************************////     SUBROUTINE:OverviewDlg   	 N   ////*********************************************Label(OverviewDlg)          Message(&tbox;1100)          h     X //WelcomeScreen   	              Result=Welcome("Coach";&tbox)               If(Result=1)                   `	 QuitCoach()               Endif               If(Result=2)                   `	 RETURN               Endif          Call(BlankScreen)          Call(CalcTable)          Message(&tbox;1240)          Result=MessageBox("Coach";&tbox;1)          RETURN	   	 e   //*********************************************////     SUBROUTINE:CalcTable   	 N   ////*********************************************Label(CalcTable)Call(ValidMenu)Repeat     Message(&tbox;1210)               h     X //ChooseLayout,Tables,Calc   	 
	        DisplayRewrite     Result=PostIt("Coach";&tbox;0;13;0;2;0)     MenuActive=0     Show=HotSpot(0;0;62;0;537;&funkey;1)	   	 +
{
   Switch(Show)    P
                          h //Creatingtable   	       //*****************************************//     UserchoosesShowMe   	 N   //******************************************     CaseOf1:          Result=Postit("Coach";&tbox;0;13;0;3;0)̐          ShowMenu("Coach";&sbox;52;2;3;5;7;0)//*****************************************//     UserchoosesLayout   	 6
   //******************************************     CaseOf1531:                         h     X      //UserchoosesLayout   	    //*****************************************//     UserpressesAltL   	 y	   //******************************************     CaseOf537:                         h     X      //UserpressedAltL   	              Result=Postit("Coach";&tbox;0;13;0;3;0)̀          PullDownDlg   	 e             While(?Dialog=1)          Endwhile          Type("l")          Result=PostIt("Coach";&tbox;0;13;0;3;0)//********************************************************//     UserPressesAlt+F7   	    //Columns/TablesDlgBoxDialog#370//********************************************************     CaseOf8130:                         h     X           //UserpressedAlt+F7   	              DisplayRewrite          DlgInput(on!)          ColumnsTablesDlg          While(?DialogControl<>58)               TabKey          Endwhile          Call(TblColCreate)	   	 !q'   //*****************************************//     UserpressesAlt=   	 W    //******************************************     CaseOf8085:                         h     X                //UserpressedAlt+=   	              Message(&sbox;1220)          0           MenuActive=MenuBarControl("Coach";&hbox1;&helpmsg;52;2;108;&funkey)  
  (#(#            Result=PostIt("Coach";&tbox;0;13;0;3;0)//*****************************************//     NoChoice   	 6
   //******************************************     DEFAULT:    `	     P
                          h     X                //Default   	              PosLineDown          0           MenuActive=MenuBarControl("Coach";&hbox1;&sbox;52;2;108;&funkey)  
  (#(#       EndSwitch   	  p
   If(MenuActive<>1)     If(Show<>8130)               {              h //UserdidnotpressAlt+F7   	 e             0           Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;&accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)  
  (#(#                 DisplayRewrite               MenuActive=Result          If(?Dialog=370)               DisplayRewrite               DlgInput(on!)               ColumnsTablesDlg               While(?DialogControl<>58)                   `	 TabKey               Endwhile               Call(TblColCreate)          Endif     EndifEndifUntil(MenuActive<>1)Return	   	 !q'   //***************************************************************////SUBROUTINE:DefineValidMenuitemsforTables////***************************************************************LABEL(ValidMenu)     hbox1={    `	 "Choose>  r [BoldOn]?
   
 Layout.";   	 A	                  }     hbox2={    `	 "Choose>  r [BoldOn]?
   
 Tables.";   	 
	                  }     hbox3={    `	 "Choose>  r [BoldOn]?
   
 CalculateAll.";   	 E                  }     LayoutMenu(&valid)     allow=    `	 {    P
 1542;}           //[Create]*   	 
F	        exallow=    `	 {    P
 0;}   	 	        accel=    `	 {    P
 116;}                //TforTables   	 D
        exaccel=    `	 {    P
 1;}   	 ;        subval=    `	 {    P
      1538;           //Create*   	                       `	     P
      1539;           //Edit*   	 9                      `	     P
      264;           //Insert*   	 0
                      `	     P
      265;           //Delete*   	 
                      `	     P
      1540;           //Join*   	 .~                      `	     P
      1541;           //Split*   	 %                      `	     P
      1542;           //Calculate*   	 |                      `	     P
      1543;           //CreateFloatingCell*   	 #s                      `	     P
      1544;           //EditFloatingCell*   	              }     subacl={    `	 97;}                     //aforCalcall   	 h        exsubacl={1;        	                   }     subs={1537;}                     //Tables*   	 
]        funkey={8130;}                //Alt+F7   	 [!        sbox={    `	 "Choose>  r [BoldOn]?
   
 CalculateAll.";    p     ` //Message   	 R"                      `	 "";               }     HelpMsg={    P
 "Choose>  r [BoldOn]?
   
 Tables,";   	 &                      `	     P
 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 CalculateAll.";                   `	     P
 "";        	 T(                  }RETURN	   	 !,   //************************************************************////              `	 RoutineforittheypressedAlt+F7toCreate   	 N   ////************************************************************Label(TblColCreate)     x1={     16;18;          //Tables,Create   	              }     x2={     25;32;   	 	8             }     y1={     6;11;   	 6
             }     y2={6  %
    
  ;11;          }     hotkey={    `	     P
 116;          //ttables   	 
"	                      `	     P
 768;          //acalculateall   	 y	                  }     hotpnt={0;1;}     helpmsg={    P
 "Choose>  r [BoldOn]?
   
 Tables,";   	 n                      `	 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 Calculateall.";                   `	 "";        	 
                  }     Result=0SaveScrn=0     While(?Dialog=370)               h //Columns/TablesDlgBox   	 [        Message(&tbox;1230)     If(Result="Hint")          Message(&hbox;5010)          h    	  P             Moreinfo=MessageBox("Hint";&hbox;1)     Endif          Switch(?DialogControl)               CaseOf0:                    h     X           //OK   	 C!                      `	 info={     0;               h     X           //ControlID   	 :"                      `	     P
           370;          h     X           //DialogID   	 #                      `	     P
           0;               h     X           //don'tallowarrows   	 8$                      `	     P
           "Coach";     //Title   	 /%                      `	     P
           33;          h     X           //xposforPostit   	 &                      `	     P
           6;               h     X           //yposforPostit   	 -}'                      `	     P
           0;               h     X           //HintButton   	 $(                      `	     P
           "Coach";    h     X           //HelpTitle   	 {)                      `	     P
           1;               h     X           //RestoreScreen   	 " r*                      `	     P
           0;               h     X           //Reserved   	  +                      `	     P
 }                   `	 accel={     50;116;    h     X           //2Tfortables   	 "g-                      `	     P
 }                   `	 aclpnt={0;0;}               0    `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  `	(#`	(#                 CaseOf58:                    h     X           //Tables   	 &Q!3                      `	 info={     58;          h     X           //ControlID*   	 &!4                      `	     P
           370;          h     X           //DialogID   	 O'"5                      `	     P
           0;               h     X           //don'tallowarrows   	 'F#6                      `	     P
           "Coach";     //Title   	 (#7                      `	     P
           33;          h     X           //xposforPostit   	 D)$8                      `	     P
           6;               h     X           //yposforPostit   	 );%9                      `	     P
           0;               h     X           //HintButton   	 *%:                      `	     P
           "Coach";    h     X           //helpTitle   	 9+&;                      `	     P
           1;               h     X           //RestoreScreen   	 +0'<                      `	     P
           0;               h     X           //Reserved   	                          `	     P
 }                   `	 accel={     50;116;    h     X           //2ortforTable   	 N                      `	     P
 }                   `	 aclpnt={0;0;}               0    `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  `	(#`	(#                 CaseOf59:                    h     X                //Create   	 	8                      `	 info={     59;          h     X                //ControlID*   	 
	                      `	     P
           370;          h     X                //DialogID   	 6
                      `	     P
           1;               h     X                //don'tallowarrows   	 -                      `	     P
           "Coach";          //Title   	                       `	     P
           33;          h     X                //xposforPostit   	 +
{
                      `	     P
           6;               h     X                //yposforPostit   	 
"	                      `	     P
           0;               h     X                //Hintbutton   	 y	                      `	     P
           "Coach";    h     X                //HelpTitle   	  p
                      `	     P
           1;               h     X                //RestoreScreen   	                       `	     P
           0;               h     X                //Reserved   	 n                      `	     P
 }                   `	 accel={     53;97;    h     X                //5aCalculate   	 
                      `	     P
 }                   `	 aclpnt={1;1}               0    `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  `	(#`	(#                 CaseOf60:                    h     X                //Edit   	                       `	 info={     60;          h     X                //ControlID*   	 M                      `	     P
           370;          h     X                //DialogID   	 D                      `	     P
           1;               h     X                //don'tallowarrows   	                       `	     P
           "Coach";          //Title   	 B                      `	     P
           33;          h     X                //xposforPostit   	 9                      `	     P
           6;               h     X                //yposforPostit   	                        `	     P
           0;               h     X                //Hintbutton   	 7!                      `	     P
           "Coach";    h     X                //HelpTitle   	 ."                      `	     P
           1;               h     X                //RestoreScreen   	 #                      `	     P
           0;               h     X                //Reserved   	 ,|$                      `	     P
 }                   `	 accel={     53;97;    h     X                //5aCalculate   	 z&                      `	     P
 }                   `	 aclpnt={1;1}               0    `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)  
  `	(#`	(#                 CaseOf63:                    h     X                //Calculate   	 d!,                      `	 info={     63;          h     X                //ControlID*   	 "[-                      `	     P
           370;          h     X                //DialogID   	 ".                      `	     P
           0;               h     X                //don'tallowarrows   	 Y#/                      `	     P
           "Coach";          //Title   	  $P0                      `	     P
           33;          h     X                //xposforPostit   	 $1                      `	     P
           6;               h     X                //yposforPostit   	 N% 2                      `	     P
           0;               h     X                //Hintbutton   	 %E!3                      `	     P
           "Coach";    h     X                //HelpTitle   	 &!4                      `	     P
           1;               h     X                //RestoreScreen   	 C'"5                      `	     P
           0;               h     X                //Reserved   	 ':#6                      `	     P
 }                   `	 accel={     53;97;    h     X                //5aCalculate   	 8)$8                      `	     P
 }                   `	 aclpnt={1;1}               0    `	 Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg)    +$'< `	(#`	(#  Ї               DEFAULT:                         h     X                     //Default   	                          `	 info={     ?DialogControl;          //ControlID        	 W                       `	     P
           370;          h     X                //DialogID   	 N                      `	     P
           1;               h     X                //don'tallowarrows   	                       `	     P
           "Coach";          //Title   	 L                      `	     P
           33;          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={     50;116;    h     X                //2tforTables   	                       `	     P
      }                   `	 aclpnt={0;0;}               allow={     0;58;  %
     
  59;63;}   	 y	                  0    `	 Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)  
  `	(#`	(#            EndSwitch     EndWhileRETURN	   	 
Z   //**************************************************////     BlanksScreen   	 N   ////**************************************************Label(BlankScreen)If(?DocBlank)     Message(&tbox;1200)     Result=OpenDocument(&tbox)EndifRETURN	   	 6
   //*********************************************////     PROCEDURE:Message   	 N   ////*********************************************PROCEDUREMessage(&tbox;Msg)Switch(Msg)CaseOf1005:    P
           //NoTableCreated   	 
	        tbox={0    `	 "Somehownotablewascreatedinyourdocument.";    6
 `	(#`	(#                     `	 "Wouldyouliketotryagain?";                   `	 "";     }CaseOf1100:    P
      //AboutTablesOverview   	  p
        tbox={    `	 "";   	 n                      `	 ">  r [BoldOn]?
   
 CalculatingTableFormulas>   [BoldOff]?
   
 ";                   `	 "";               0    `	 "Youcancalculatealltableformulasinyour";  
  `	(#`	(#                     `	 "documentatonce.";               }Caseof1200:    P
           //Retrievefilewithtables   	    tbox={     "Doyouwanttoopenadocument?";   	 M                  "";          }CaseOf1210:    P
           //ChooseLayout,Table,Calc   	 9   tbox={               "Tocalculatetableformulas,";               "";               "Choose>  r [BoldOn]?
   
 Layout>   [BoldOff]?
   
 ,";   	 ,|$        0          "then>  r [BoldOn]?
   
 Tables>   [BoldOff]?
   
 ,";  
  (#(#       0          "then>  r [BoldOn]?
   
 CalculateAll>   [BoldOff]?
   
 .";  
  (#(#                 "or";               "Press>  r [BoldOn]?
   
 Alt+F7>   [BoldOff]?
   
 .";   	 $(                  "";          }CaseOf1215:     hbox={    `	 "Choose>  r [BoldOn]?
   
 Tables,";   	 #"s-                      `	 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 CalculateAll.";                   `	 "";        	 }#/                  }CaseOf1220:    P
    	 &i!3        sbox={    `	 "Choose>  r [BoldOn]?
   
 Tables,";   	 &"4                      `	 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 CalculateAll.";                   `	 "";                   `	 }CaseOf1230:     tbox={    `	 "Choose>  r [BoldOn]?
   
 Tables,";   	 ]+&;                      `	 ">   [BoldOff]?
   
 Ԁthen>  r [BoldOn]?
   
 CalculateAll.";   	 ,`'<                      `	 "";        	                      }Caseof1240:     tbox={    `	 "YouhavecompletedtheCoachoncalculatingtableformulas.";   	 L                      `	 "";          }	   	    CaseOf5000:    P
                //hintforTableCreateDlg   	            tbox=     {    `	    	 N        "Hint";          }DEFAULT:    `	     P
           //Ifnonewerefound   	 C        tbox={    `	 "Messagenotfound!";   	                       `	 "";               }       hbox={     "Nohintavailable.Whattypeofinformation";                    "wouldbehelpfulhere?";                    "";               } EndSwitchENDPROC8     	    -   