WPC'  
                 0   (                H  Y                 U   2      	      5   	      ;   	      A        G        S   U        	%                  "     ;   !   `   c   !       #       	)            b                                                                                                                                                 < 
  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    (                    $          M e s s a g e                                                   l                                                                                 A                                                                                                                                                                                                     $                                                                                                                                                                                                       $     "                                                             T     !                                                             h    O v e r v i e w D l g                                                $                                                             	     #                                                             	    N o P r i n t e r                                               	    D a t a E n t r y                                                    '                                                                  )                                                                  (                                                                  &                                                                  %                                                             J                                                                    l    
  M E S S A G E    ,                                                             	N     +                                                                  *                                                             	     .                                                             	J     -                                                             	r     0                                                             	`     /                                                             	n     2                                                             	     1                                                             	                                                                            *      ]             5      K*      K2     a8      a>    %C      JV      J_    d      
 r      7|                     	      a      a                $                  "            K
      K    >      "A       F      	aj      ap    %            %      a      a     /      5      ;      B     H      K      K                 
2      C      
             K      K    .            -s      	      *
      j
      -p
      )      :      @?      	@W    Al      
Aw     
A      
A     
A      
A     
B-             0
      ,e
      vx
      '      '9            4      '             -      )      	&      	3      	      	      	T            	      *  ]          X  f  *  8  C  V  d  r  |              
  $  >  j          /  5  ;  H  [  g  {          2  C                ,  @  c  s  	  	  	  *
  R
  j
  p
  )  :  ?  l      -  4    
  0
  H
  e
  x
  
  
  
  '  `              &  3  K          T  a      0 2  A p`    H e l v e t i c a         F  A  HD     ә  0 #| ]         " B D O ??=K ' 	             "  u^88Goo,CCNu8C88oooooooooo88uuuo˅z8dozz888^o,oodoo8oo,,d,ooooCd8oddddC4CuC8CC!CCC     CCCCCC  Cz  oooooȲdoooo88888888ooooooooodoozodoooooddddooooooooooooo88888,88  d do,o,o,o,o,ooooooȽCCCddddz8z8z8oooooodzdzdzd  oo,oCdz8ddoooo88 8oNF  8 koCzoooo oJIoC oC &  CCoCC  oo            dd     ,C             C'uu      u           u               P  u                         o          < 6X  9  ` +   C o u r i e r         "0 2  A p`    H e l v e t i c a         )  ? x x x  X    Xx  ]  1 ` C `    / X` {         4     `	 info={     ?DialogControl;   	 +'2                    `	     
      ?Dialog;              4     `	     
      
    !    W    X{ X  X X    
     ,   X //****************************************** %
 	   
  ***   	       ////     NAME:    `	     
      WPCHLB01.WPM   	    //        	 k   //     PURPOSE:    
      CoachonCreatingLabels   	 T   ////*********************************************  //RevisionHistory//// Global(ScrnMode;MsgAdj;DefTitle;CancelMsg;AreaHgt)Global(HotElement;SaveScrn;StndAlone)DefTitle="Coach"     //Maintitlename   	 
	
   ScrnMode=?ScreenHigh24CancelMsg=1Use("wpchlibr.wpm")              <     h //Sharedlibraryfile   	 
   ColorScheme()MsgAdj=DlgMessage()	   	 W
   //*********************************************////     MAINPROGRAM:Coach   	    ////*********************************************DISPLAY(Off!)ERROR(On!)ONERROR(NoPrinter)DlgInput(On!)FormatPageDlgType("E")While(?Dialog<>1)     CancelKeyEndWhileERROR(Off!)Cancel(Off!)OnCancelCall(CancelCoach)If(NOTExists(StndAlone))     Display(On!)     ScreenSetup()     If(NOT(?DocBlank))          Error(On!)          ONERROR(Nodocs)    <    	              FileNew          ONERROR()          Error(Off!)     EndifEndifCancel(Off!)Call(OverviewDlg)StndAlone=1Message(&tbox;1000)CheckColorSet()DISPLAY(Off!)If(ColorSet)     WindowSize(0;16;640;384+(ScrnMode*16)((tbox[0]+3)*16))̆     AreaHgt=(384+(ScrnMode*16)((tbox[0]+3)*16))/16else     WindowSize(0;16;640;384+(ScrnMode*16)((tbox[0])*16))     AreaHgt=((384+(ScrnMode*16)((tbox[0])*16))/16)4EndifWindowMaximizePleaseWait()DISPLAY(On!)Nest("wpchps01.wpm")Call(DataEntry)   	 -(-   Message(&tbox;3000)Result=MessageBox("Coach";&tbox;1)RestoreStates()Return//*********************************************//     ENDMAINPROGRAM   	 =	   //*********************************************	   	 &
v   //*********************************************////     SUBROUTINE:OverviewDlg   	    ////*********************************************Label(OverviewDlg)     Message(&tbox;900)     Result=Welcome(DefTitle;&tbox)     If(Result<>1)          QuitCoach()     EndifReturn	   	 
   //*********************************************////     SUBROUTINE:NoPrinter   	    ////*********************************************Label(NoPrinter)BeepDlgCreate(novar;"Coach";DlgNoCancel!;;;40;9)DlgControl(ctrllabel!;;"Youmustselectaprinterbefore";;2;2)DlgControl(ctrllabel!;;"performingthistask.Selecta";;2;3)DlgControl(ctrllabel!;;"printer,thenrunthisCoachagain.";;2;4)DlgEndQuitCoach()	   	 
   //*********************************************////     SUBROUTINE:DataEntry   	    ////*********************************************Label(DataEntry)     Message(&tbox;1000)     WindowFrame     FakeIt(DefTitle;&tbox;5;0;0)Repeat     PosLineDown     chkcode={1;}     keypress={8154;8158}    < //F7key   	 
        Result=DoEdit(1;&chkcode;&keypress)     If(Result=8158orResult=3)          Message(&hbox;5000)          Hint=Hint(&hbox;99;99;3)     EndifUntil(Result=8154orResult=1)WindowMaximizeReturn	   	 4   PROCEDUREMESSAGE(&tbox;msg)SWITCH(Msg)CaseOf900:     tbox={    `	     
 "";   	 =	                 4     `	     
 "Creatinglabelsinvolves:";              4     `	     
 "";              4     `	     
 "1.SelectingaLabelFormat";              4     `	     
 "2.TypingAddresses";          }CaseOf1000:     tbox={    `	     
 "Typetheinformationforonelabel,thenpress>  r [Bold   	 
   On]?
   
 Ctrl+Enter>   [BoldOff]?
   
 .";              4     `	     
 "";              4     `	     
 "Repeattheaboveinstructionsuntilyouhavetypedallyour   	 @   labels.";              4     `	     
 "";              4 }CaseOf3000:     tbox={    `	     
 "YouhavecompletedtheCoachonlabels.Toviewthe";   	                  4     `	     
 "labelsbeforeprinting,youcanchoose>  r [BoldOn]?
   
 File>   [BoldOff]?
   
 ,then";              4     `	     
 "then>  r [BoldOn]?
   
 PrintPreview>   [BoldOff]?
   
 ԀafteryouleaveCoach.";              4     `	     
 "";  %
    
                4 }CaseOf5000:tbox={">  r [BoldOn]?
   
 SampleLabelText>   [BoldOff]?
   
 ";"";"JohnDoe";"123MainStreet";"NewYork,NewYork12345";"";   	 #"   "SueJones";"5thAvenue";"SaltLakeCity,Utah %
    
  84005";"";   	 F'"&   }     ENDSWITCHENDPROC  