WPCQ 
                 0   (     	1   m        : .     %  >    X  d    {f  u           	                       !   `     U        	%                  "   ]    !     &  !   0   #        !       !   0     !   `   6 	)           ^                                                                                                     < 
  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    (                    $                        # e   3 7 = C I Q Y a g       1 .   a .   i .   ( 1 )   ( a )   ( i )   1 )   a )     A                                                                        &  F a k e I t                                                                                                                                                                                                     \                                                                  \                                                                  F                                                                                                                                         
                                                             x     	                                                                                                                               r                                                                  2                                                                  F     
                                                                   - I                                                               - E                                                         P      - B                                                                                                                           
                                                                  B
                                                                  B
                                                                  :                                                                  4                                                                  
                                                                  
                                                                  	                                                                  
                                                                  	                                                                   	z                                                                  	                                                                  	                                                                  	                                                                  	                                                                  	                                                                   	                                                                   	                                                                  4     #                                                                  "                                                                                                                                       C o m m e n t s B o x    %                                                                  $                                                                  &                                                                   - I                                                               - E                                                               - B                                                         J                                                                          C a n c e l M e n u s    '                                                                   (                                                                                                                                 ,      C a n c e l D i a l o g s    )                                                              2     *                                                                  ,                                                                   +                                                                                                                                  (      S c r e e n S e t u p    .                                                                  -                                                                  1                                                             	`     0                                                                   3                                                             L     2                                                             L     /                                                             	*     5                                                             	"     4                                                             	~     7                                                             "     6                                                             "     8                                                             	"     ;                                                             %     :                                                             \*     =                                                             '     <                                                             V*     9                                                             	*     @                                                             +     ?                                                             +     B                                                             P,     A                                                             r,     D                                                             ,     C                                                             ,     F                                                             F-     E                                                             -     H                                                             .     J                                                             .     I                                                             .     G                                                             .                                                                    /      R e s t o r e S t a t e s    L                                                             2     N                                                             /     M                                                             /     P                                                             /     O                                                             /     R                                                             60     Q                                                             60     T                                                             0     S                                                             0     V                                                             0     U                                                             0     X                                                             2     Z                                                             1     Y                                                             1     W                                                             2     K                                                             2                                                                    ,2    ^  B l o c k E d i t    [                                                             3     \                                                             l3     _                                                             	z4     ^                                                             3     ]                                                             	X:     a                                                             	|5     `                                                             	4     c                                                             	~6     b                                                             	5     e                                                             	7     d                                                             	6     g                                                             	8     f                                                             	7     i                                                             	9     h                                                             	8     j                                                             	9     k                                                             	X:     n                                                             :     m                                                             :     o                                                             ;     p                                                             V     r                                                             A     s                                                             =     t                                                             T>     v                                                             zA     x                                                             @     w                                                             @     u                                                             zA     q                                                             A     z                                                             C     |                                                             C     ~                                                             C                                                                  RC                                                                  C     }                                                             C     {                                                             C     y                                                             O                                                                  L                                                                  K                                                                  G                                                                  G                                                                  dG                                                                  F                                                                  F                                                                  dG                                                                  G                                                                  G                                                                  J                                                                  J                                                                  I                                                                  "J                                                                  J                                                                  J                                                                  K                                                                  K                                                                  L                                                                  K                                                                  K                                                                  O                                                                  *M                                                                  M                                                                  M                                                                  O                                                                  M                                                                  N                                                                  N                                                                  N                                                                  N                                                                  N                                                                  R                                                                  P                                                                  R                                                                  R                                                                  Q                                                                  *R                                                                  R                                                                  R                                                                  S                                                                  S                                                                  S                                                                  S                                                                  T                                                                  T                                                                  T                                                                  T                                                                  U                                                                  U                                                                  U                                                                  U                                                                  V                                                                  V                                                                  V                                                                  V                                                                     W      B l k F r m M e n u                                                                 	f_                                                                  ]                                                                  	a                                                                  	f_                                                                  a                                                                  a                                                                  	a                                                                    b      S h o w M e n u                                                                 c                                                                  c                                                                  d      - I                                                         c      - E                                                         Xd      - B                                                         2d                                                                  d      - I                                                         d      - E                                                         "e      - B                                                         d                                                                  2f                                                                  f                                                                  f                                                                  2f                                                                  f                                                                  f                                                                  h                                                                  g                                                                  @g      - I                                                         "g      - E                                                         g      - B                                                         zg                                                                  g                                                                  h                                                                  h                                                                  h                                                                  h                                                                  h                                                                    2i      M e n u B a r                                                                   j      M e n u P o p                                                                    o      F i l e M e n u                                                                   q      E d i t M e n u                                                                   t      V i e w M e n u                                                                   (w      L a y o u t M e n u                                                                   Rz      T o o l s M e n u                                                                   0}      F o n t M e n u                                                                         G r a p h i c s M e n u                                                                   $      W i n d o w M e n u                                                                         H e l p M e n u                                                                         N o S u b M e n u                                                                   d      A s s i g n e d S u b s                                                                 	                                                                   ֆ                                                                  	                                                                  	,                                                                  	.                                                                  	܍                                                                  	Z                                                                  	                                                                  	
                                                                  	H                                                                  	                                                                  	H                                                                  	v                                                                  	                                                                  	v                                                                  	                                                                  	                                                                    *    &  S a v i n g D o c                                                                  \                                                                  	^                                                                                                                                    	                                                                  	                                                                  	                                                                  	                                                                  	§                                                                  	                                                                  	ܨ                                                                  	ª                                                                  	                                                                  	ª                                                                  	                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        &                                                                  :                                                                 	                                                                 r                                                                 	&                                                                 	                                                                 	ΰ                                                                 	n                                                                 	2     	                                                            	ʱ                                                                 	                                                                 	&     
                                                            	                                                                    ^    
  E x i t D l g P r o c    
                                                                                                                              
                                                                 	»                                                                                                                                  	                                                                 	                                                                 	                                                                 	                                                                 	                                                                          R e p l a c e P r o c                                                                 r                                                                 x                                                                 B                                                                 B                                                                 	0                                                                 l                                                                 	d                                                                 	                                                                 	N                                                                  	     !                                                            	d                                                                           F i l e S a v e D l g P r o c    #                                                                  $                                                                 &                                                            6     %                                                            6     )                                                            	J     (                                                            `     '                                                            	~     +                                                            	,     *                                                            	h     ,                                                            	,     -                                                            	~                                                                        
  E x i t W p P r o c    /                                                                  0                                                            N     2                                                                 1                                                                 5                                                            	\     4                                                                 3                                                            	:     6                                                            	\     7                                                            	:                                                                    b      E x i t D o c P r o c    9                                                                 :                                                                <                                                                ;                                                                ?                                                            	    >                                                            "    =                                                            	    A                                                            	,    @                                                            	    C                                                            	    B                                                            	J    D                                                            	    E                                                            	                                                                        N o t F o u n d C o a c h                                                                      
  C a n c e l C o a c h    H                                                            2    G                                                                J                                                                L                                                                K                                                                I                                                                N                                                            6    M                                                                P                                                                O                                                                R                                                            $    Q                                                            $                                                                   8     Q u i t C o a c h    S                                                             >    T                                                            t                                                                   &   	  S e t B o x S i z e    V                                                                U                                                                W                                                             <     - I                                                               - E                                                         &     - B                                                          z    Y                                                                X                                                                                                                                    P l e a s e W a i t                                                                        C h e c k C o l o r S e t    [                                                            4     Z                                                            `                                                                        
  C o l o r S c h e m e    ]                                                            v"    \                                                            v"    _                                                            "    ^                                                            "    a                                                            %   T e x t D e f a u l t S c h e m e                               $    c                                                            v%    b                                                            %    `                                                            (   G r a p h D e f a u l t S c h e m e                             '    e                                                            (    d                                                            (                                                                   2)   E  P o s t I t    f                                                            *    g                                                            *    i                                                            +    h                                                            +    k                                                            ^,    m                                                            J,    l                                                            J,    j                                                            ^,    n                                                            ,     - I                                                         ,     - E                                                         -     - B                                                         ,    p                                                            -    o                                                            -    r                                                            @.    q                                                            .    t                                                            .    s                                                            .    v                                                            v0    x                                                            
0    z                                                            /    y                                                            /    w                                                            b0    |                                                            \0    {                                                            \0    u                                                            1    ~                                                            1                                                                0                                                                0    }                                                            1                                                                ~1                                                                ~1                                                                4                                                                ^2                                                                4                                                                "3                                                                4                                                                44                                                                4                                                                X8                                                                5                                                                R8                                                                6                                                                L8                                                                7                                                                F8                                                                :                                                                J                                                                ?                                                                 >                                                                ?                                                                J                                                                B                                                                J                                                                F                                                                J                                                                I                                                                J                                                                L                                                                L     - I                                                         K     - E                                                         L     - B                                                         FL                                                                M                                                                8M    	 - I                                                         M    	 - E                                                         M    	 - B                                                         vM                                                                   2N     N o B l o c k                                                                   nO     N o S e l e c t                                                                Q                                                                Q                                                                   RQ   %  M e s s a g e B o x                                                                Q                                                                Q                                                                R                                                                R                                                                S    
 - I                                                         R    
 - E                                                         S    
 - B                                                         RS                                                                S                                                                S                                                                T                                                                T                                                                lU                                                                nW                                                                 V                                                                hW                                                                V                                                                bW                                                                W                                                                W                                                                xX                                                                xX                                                                Y                                                                Y                                                                Z                                                                Z                                                                [                                                                [                                                                N\                                                                N\                                                                f]                                                                f]                                                                ]     - I                                                         ]     - E                                                         x^     - B                                                         ^                                                                   ^   '  H o t S p o t                                                                `                                                                `                                                                ^`                                                                `                                                                `                                                                h                                                                a                                                                a                                                                e                                                                &c                                                                b                                                                b                                                                b                                                                b                                                                e                                                                e                                                                4d                                                                c                                                                d                                                                e                                                                d                                                                d                                                                d                                                                e                                                                e                                                                Ne                                                                ve                                                                e                                                                e                                                                e                                                                vf                                                                vf                                                                hg                                                                Tg                                                                Tg                                                                hg                                                                g                                                                g                                                                   Fh   >  D o E d i t                                                                Hi                                                                Hi                                                                i                                                                i                                                                	j                                                                j                                                                	p                                                                	k                                                                	
k                                                                	l                                                                	l                                                                	m                                                                	m                                                                	n                                                                	n                                                                	o                                                                	o                                                                	o                                                                	p                                                                p                                                                $q                                                                q                                                                }                                                                 u                                                                r                                                                u                                                                .t                                                                t                                                                t                                                                u                                                                t                                                                u    
                                                            u    	                                                            u                                                                u                                                                u                                                                 z                                                                y                                                                xx                                                                dx                                                                dx                                                                xx                                                                y                                                                y                                                                y                                                                y    
                                                            y                                                                <z                                                                <z                                                                {                                                                p{                                                                p{                                                                {                                                                z|                                                                 f|                                                                f|                                                                z|    "                                                            p}    $                                                            \}    #                                                            \}    !                                                            p}                                                                   }   B  M e n u B a r C o n t r o l    &                                                            >    %                                                            >    (                                                                '                                                                *                                                            r    )                                                            r    -                                                            	l    ,                                                                +                                                            	    /                                                            	Z    .                                                            	    1                                                            	H    0                                                            	    3                                                            	:    2                                                            	r    5                                                            	*    4                                                            	d    7                                                            	    6                                                            	T    9                                                            	    8                                                            	B    ;                                                            	     :                                                            	8    =                                                            	    <                                                            	*    ?                                                                @                                                            ʕ    B                                                            Ԋ    A                                                            Ԋ    D                                                            8    F                                                                E                                                            $    H                                                                J                                                                I                                                                G                                                                L                                                                 N                                                            ؍    M                                                            ؍    K                                                                P                                                                O                                                                R                                                                Q                                                                C                                                                T                                                                V                                                                U                                                                S                                                                X                                                            R    W                                                            R    Z                                                                \                                                                ^                                                            p    ]                                                                [                                                                Y                                                                `                                                                b                                                                a                                                                _                                                                d                                                                c                                                                f                                                                e                                                                                                                               .   Q  M e n u C o n t r o l    h                                                                g                                                                j                                                                i                                                                k                                                            
    l                                                                n                                                            |    p                                                                o                                                            h    r                                                                t                                                            Ԝ    s                                                            Ԝ    q                                                            b    v                                                            \    u                                                            \    m                                                            |    w                                                            
    x                                                                z                                                            Ԟ    y                                                            Ԟ    |                                                            ƣ    ~                                                                }                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                              f                                                                                                                                4                                                                                                                                                                                                    {                                                                                                                            l                                                                l                                                                8                                                                                                                                f                                                                                                                                |                                                                |                                                                R                                                                                                                                L                                                                                                                                ڬ                                                                                                                                                                                                4                                                                4                                                                                                                                                                                                                                                                Ƭ                                                                                                                                8                                                                                                                                «                                                                «                                                                $                                                                r                                                                                                                                ڬ                                                                J                                                                6                                                                6                                                                J                                                                ޱ                                                                Z                                                                n                                                                *                                                                h                                                                                                                                b                                                                ޱ                                                                   8   5  B u t t o n C o n t r o l                                                                                                                                                                                                T                                                                                                                                                                                                                                                                  F                                                                f                                                                V                                                                                                                                                                                                                                                                v                                                                b                                                                b                                                                v                                                                                                                                                                                                                                                                                                                                B                                                                                                                                ~                                                                                                                                                                                                                                                                                                                                                                                                <                                                                                                                                >                                                                                                                                                                                                                                                                                                                                                                                                H                                                                                                                                                                                                                                                                4                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                R                                                                >                                                                >                                                                R                                                                      ;  W i n E d C o n t r o l                                                                                                                                                                                                                                                                                                                                (                                                                v                                                                                                                                                                                                x                                                                                                                                                                                                $                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
                                                                z    
                                                                	                                                            t                                                                4                                                                n                                                                                                                                                                                                                                                                |                                                                h                                                                $                                                                $                                                                h                                                                                                                                                                                                    
                                                                                                                            z                                                                z                                                                                                                                                                                                                                                                |                                                                |                                                                                                                                                                                                     "                                                                !                                                                $                                                                #                                                                                                                                  1  L s t B x C o n t r o l    &                                                                %                                                                (                                                                '                                                                *                                                            p    )                                                            p    +                                                                ,                                                            8    -                                                            ^    .                                                                 0                                                            
    2                                                            L    3                                                                4                                                                6                                                            *    8                                                                :                                                                9                                                                7                                                                5                                                            *    <                                                                ;                                                                >                                                            8    =                                                            8    1                                                                @                                                                B                                                            2    A                                                                D                                                                C                                                                F                                                            \    E                                                                ?                                                                /                                                                 H                                                                J                                                                I                                                            r    G                                                                L                                                                N                                                                M                                                                K                                                                P                                                                O                                                                R                                                            4    Q                                                            4    T                                                                S                                                                                                                                  /  I n v a l i d C o n t r o l    V                                                            V    U                                                            V    W                                                                X                                                            
    Y                                                            R    Z                                                            r    \                                                            ^    ^                                                                _                                                            T    `                                                            |    b                                                            <    d                                                            (    c                                                            (    a                                                            <    f                                                                e                                                                h                                                            J    g                                                            J    ]                                                            J    j                                                            
    l                                                                k                                                                n                                                            "    m                                                                p                                                                o                                                                i                                                            D    [                                                            f    r                                                                t                                                                s                                                                q                                                            `    v                                                                x                                                                w                                                                u                                                            Z    z                                                                |                                                                {                                                                y                                                            T    ~                                                                }                                                                                                                                                                                                                                                            ^                                                                ^                                                                        O p e n D o c u m e n t                                                                Z                                                                                                                                                                                                                                                                  B                                                                                                                                ~                                                                ~                                                                                                                                                                                                                                                                F                                                                Z                                                                        X Y F i l t e r                                                                T     - I                                                         6     - E                                                         	     - B                                                                                                                         	                                                                	                                                                   &
     F i l t e r                                                                
    
 - I                                                         
    
 - E                                                         *    
 - B                                                         $                                                                Z                                                                F                                                                F                                                                                                                                T
                                                                @
                                                                @
                                                                                                                                                                                                                                                                   `   	  C o d e F i l t e r                                                                     - I                                                              - E                                                         T     - B                                                         L                                                                <                                                                (                                                                (                                                                <                                                                      	  K e y F i l t e r                                                                H     - I                                                         *     - E                                                              - B                                                                                                                                                                                         t                                                                                                                                                                                                      	  D l g F i l t e r                                                                     - I                                                              - E                                                              - B                                                                                                                                                                                                                                                                                                                                                                                            P     D l g M e s s a g e                                                                	                                                                 z                                                                	                                                                	                                                                	                                                                   :     W e l c o m e                                                                                                                                                                                                n                                                                n                                                                     - I                                                              - E                                                              - B                                                         
                                                                                                                                                                                                     - I                                                              - E                                                         l     - B                                                                                                                               ! 
 H i n t                                                                                                                                                                                                     - I                                                              - E                                                              - B                                                                                                                                                                                                                                                                                                                                                                                         >                                                                                                                                                                                                                                                                                                                                 "                                                                p!                                                                "                                                                N"                                                                "                                                                #                                                                :&                                                                
%                                                                4&                                                                %                                                                .&                                                                &     - I                                                         z&     - E                                                         L'     - B                                                         &                                                                '                                                                '                                                                   (     O v e r v i e w                                                                (                                                                (                                                                N)                                                                N)                                                                )     - I                                                         )     - E                                                         *     - B                                                         )                                                                ~*                                                                ~*                                                                ,     - I                                                         ,     - E                                                         -     - B                                                          -                                                                   -       W  8X  X  X  X  X  X  
Y  #Y  6Y  ZY  mY  Y  Y  Y  Z  $Z  YZ  Z  Z  Z  Z  "[  I[  n[  [  [  W\  t\  \  \  \  ]  F`  `  `  *a  ma  a  	b  Ib  b  b  c  d  Vd  d  e  	f  g  %h  \h  h  h  i  5j  >k  k  l  m  n  n  p  &q  /r  ur  s  t  t  t  u  u  u  u  u  u  v  v  w  @w  w  w  x  x  x  
y  y  $y  y  z  .z  Dz  Mz  
{  ={  j{  {  {  {  7|  n|  |  |  L}  q}  }  }  }  }  ~  N~    7  [  n    ʂ  k    ׆      (  ]      b  ;  p  H  f      ٓ      $  7  G  X  _  f            ɔ            %  P  j            "  0  >  `  ~    ϖ      '  D  T  Z  `  %  ?  \  r      ǘ    
  #  ?  e  z          %  :  L  z        U      Л                *  R  h  ~      ǝ          /  Q  Z  {        Ğ      0  9  Z  c  y      ß  ̟        .  6  V  _          ɠ          0  Q  Z  {        ¡  ١      ;  N  h      Ӣ        -  O  
  W        M    å    2  w        I      d      9      
  5  S  q      >      V    خ    p          $  n  ֱ  5    س  R  ̴  =          U    ٷ      f  Ժ  B        ݼ  `      3      N    ſ    c          +  |      5    _        K    
  g      -  W  u    	  J        E    '  }       v    #  Y        :  }          a      >  p      M          0  S  q        +  @  U  p      R  {            9      U      9  q              8    7  J  T    V  r            
  %  <  e  }              S              .  N          /  d        %  H  Z  l      E  i                 z      E  l              >
 
 % m '
 P
    g   a   Y  Y     /    c 
# r# x- -  0 h0 2 3 3 3 {4 4 6 7 +7 E7 _7 y7 7 7 7 I8 8 8 9 99 ^9 9 9 A: : ; n; < |< < = L= = = A> |> > y? ? #@ @ @ @ GA QB B B /C zC C C D OD D D D D .E pE E E 6F vF F G [G G G 0H H H *I ]I I #K 2K K L )L AL YL qL L L KN ~O O O O P P S "T `T U U X 1Y oY Z Z ^ P^ ^ ^ x_ _ _ R` v` ` ` ` ` ` a a !b *b Ab lb b d d d #e e h 1i oi j j m 9n wn 'o `o r r 5s ts t 5t >t t %u \u u u v !v ;v dw Ex Nx ex x x   
 I Ҁ 2  N  : Æ 
 M  ; t ˎ  I  2 H Q  . c  ͑   4   
 ! N    4 p  > {  g   I   m   G k    W {  ! 3 < S    G f  ߤ - j  V   2 n  X   " Ҳ  c   & ѷ    Ӹ  q   e   ˺   2   Լ  M {   {        D `        : U q v 0 S     " O      & , 2   )       . D g {      . @ V c  B l   	  , ] y     6 w   - Q p     < z   
 + S n    Q   8 \ {   
 > `    1 O w      e      9 W {     1 C U    Q c v     7 `     0 d     J s     / X v       _   H  
 e \      " ?  0 Y    @ f   ( R p    [   * K m     < |     N    K   8    Q    + I r  a %   H   
 N     n *  3    j   8       p  " z ^   p   g    6 ` ~      
  : s      	 	 
 
 
     *
 Y
 k
 z
 3 h ~      2 D V    R d w   % 7 T f x    ( _     - b  7 U g y   ) ; c      $ m   < N v    ;    F Y l { 1 ~        3 I q            < o     8! |! ! ! -" W" " " # # J$ $ $ J% % 1& & 	' W' ' H( ( #) ) ) * K* u* * * + + + + 
, T, , - )- G- - - `. ~. . . . . / / / 0 0 10 ]0 v0 0 0 0 0 0 0 1 %1 :1 \1 e1 1 1 1 1 1 2 2 ;2 D2 e2 n2 2 2 2 2 2 2 3 3 93 A3 a3 j3 3 3 3 3 3 3 3 4 &4 ;4 \4 e4 4 4 4 4 4 4 5 75 M5 c5 }5 5 5 5 
6 ,6 _6 _7 7 7 8 8 ?9 9 9 : F: "; p; ; < = Y= = > i> > > ? )? R? *A A A PB B B 9C oC C ;D D D 1E gE E E E 
F BF cF F F F 8G }G G G G (H H H I  I >I I I 3J ]J |J J J J J J K K L +L RL hL zL L L L L M 7M VM hM M M N N #O O O _P Q 6Q Q VR vR R S S 
T T T NU V )V V IW iW W X X X X X X Y Y (Y SY uY Y Y Z 1Z OZ qZ Z Z #[ ][ [ [ b\ \ 
] L] ] ] ] R^ ^ _ ]_ _ _ ` `` ` 	a Pa a b Zb b b b c Cc c *d }d d e /e Ye e e f ?f if f f Ag g g @h h h 
i Ni i i i i )j sj j j k k k &l Dl bl l l *m Vm m m m m m 5n ln ~n n Go o p ,p Bp Tp p p p p p p q ,q Tq nq q q q q /r Sr |r r r Es s s t Mt wt t t 9u cu u u u u u u u v >v rv v v v w Hw w w x 6x x y \y y y 2z mz z z >{ { { ;| | | #} i} } } %~ o~ ~  _   i    ) R  Ё 
 4 _   K Ã 6   L   P  ߆ I   K  È  g ҉ M  $   v  X   y ǎ    &  U   ,  1       q ߖ 9    N  Ƙ   @ w   > Қ 
 7 U s  ߛ =   & z   z Ǟ ' ]   ݟ  / A V o ~ :  ʡ  + B T  Ģ ܢ   B X n    ԣ " D w Ԥ  V   '   , b   5 k      S  : | ɫ U   [  U   j   # a   Ұ K  ܱ  F {   +   f Ӷ -  ޷ 4 v ø 
 C m   ݹ  * H  Ϻ   =   Ż  I  ¼    , E ] i $     + = 4 M e u   % ; c y       9 M    a    p   r   % y   N   $   
 m  @   {  (   {  B    I     :   W   R   6     d    G      3    . ] {    * H z     $ < H  v    
           / G o      ; ]   - o   @   e  v  t   " v   A   F {  ]   _  J     P    B x   ! ? h :      
 B   h   Y  " c     ; j     7 U      1 I U     $ ; N      ; Q h q     X    g    i       p   ;   L   2  )   .   j  [  "	 	 	 
 J
 
 
 
  :  5  
 M
 
  ? t + w  q   *   T     @ v     B t    & D v       8 G  + @ Y    ^    B ~  _    U    :! ! ! " M" # # $ C$ m$ $ $ $ $ $ % % % & & & ' <' N' a' p' %( S( h( ( ( ") [) ) ) ) * D* * * + T+ ~+ + 
, R, , , , - (- ;- J- . 0. E. s. . . / U/ / / / / / 0 0 0 0 H1 1 1 1 2 @2 ^2 p2 2 2 J3 v3 3 3 3 :4 g4 4 4 4 5 #5 65 E5 5 !6 B6 e6 {6 6 6 6 6 7 7 7 7 8 8 =8 a8 s8 8 8 8 9 9 9 9 : $: 7: w: : P; }; ; ; ; ; < < < = "= 5= b= = = 1> C> V> > > > >  ? 9? V? ? ? ? =@ n@ @ @ @ 	A A RA A A B B B B C C sD D D D D /E E E E *F tF F F ;G pG G G G 
H 7H nH H ?I jI I I I GJ VJ 
K @K ^K K K K K K K L 8L dL L M M ,M M M M M 9N uN N N #O 6O JO YO :   F a k e I t                                                          C h e c k C o l o r S e t                                           C o m m e n t s B o x                                               C a n c e l M e n u s                                                C a n c e l D i a l o g s                                        ,    S c r e e n S e t u p                                            (    M e s s a g e B o x                                             RQ   Q u i t C o a c h                                                8   R e s t o r e S t a t e s                                        /    B l o c k E d i t                                               ,2    N o t F o u n d C o a c h                                           C a n c e l C o a c h                                               B l k F r m M e n u                                              W    N o S e l e c t                                                  nO   E d i t M e n u                                                 q    N o S u b M e n u                                                   M e n u C o n t r o l                                           
.   M e n u B a r C o n t r o l                                     }   F i l t e r                                                     &
   S h o w M e n u                                                 b    P o s t I t                                                     2)   M e n u B a r                                                   2i    M e n u P o p                                                   j    F i l e M e n u                                                  o    V i e w M e n u                                                 t    L a y o u t M e n u                                             (w    T o o l s M e n u                                               Rz    F o n t M e n u                                                 0}    G r a p h i c s M e n u                                             W i n d o w M e n u                                             $    H e l p M e n u                                                     A s s i g n e d S u b s                                         d    S a v i n g D o c                                                *    H o t S p o t                                                   ^   E x i t D l g P r o c                                            ^    F i l e S a v e D l g P r o c                                        E x i t W p P r o c                                                  E x i t D o c P r o c                                            b    R e p l a c e P r o c                                                B u t t o n C o n t r o l                                       8   I n v a l i d C o n t r o l                                        H i n t                                                            W i n E d C o n t r o l                                            S e t B o x S i z e                                              &   P l e a s e W a i t                                                 C o l o r S c h e m e                                                N o B l o c k                                                    2N   D o E d i t                                                     Fh   C o d e F i l t e r                                             `   D l g F i l t e r                                                  K e y F i l t e r                                                  X Y F i l t e r                                                    L s t B x C o n t r o l                                            O p e n D o c u m e n t                                            D l g M e s s a g e                                              P   W e l c o m e                                                   :   O v e r v i e w                                                 (                                                                              )W      	8X      X      MX      7X      MX      
Y      6Y      mY      Y      Y      "Y      Y      Z      $Z      Z      Z      "[       I[      n[      
[      W\      \      \      @]      	@>]    @G]    @T]   @ @a]     F`      A`      
A`     
`      *a      '9a      Aa      
Aa    	b      AIb      
ATb    b      Ab      
Ab    c      d       d      d       d      Ae      
Ae    A	f      
Af    Ag      
A(g    %h      \h      	h      Ah      
Ah    	i      A5j      
A@j    	>k      Ak      
Ak    Al      
Al    Am      
Am    	n      An      
A	o    Ap      
Ap    A&q      
A1q    	/r      Aur      
Ar    As      
As    t      	t      t      Bu      ' u      	tu      tu      u      ' u      	uu      u      v      )v      	w      @@w      	@rw    @{w    @w   @ @w     w      @w      	@$x    @-x    @:x   @ @Gx     x      x      Ax      
Ax     

y      By      $y      )y      	7z       	z        .z      	Dz      Mz      )
{      	7={       C{      Kj{      Kr{       {      	{       {       {       7|      F=|      n|      |      |      )L}      	q}      "t}      x}      }      }       }      	}      ~       ~       D       X      [      	n       }                           ԃ      ׆      :            (       Y                          ;      H      f      ٓ      	      m            :       
m$      m$      m7      	m7      	mA    G      mX      mX      _      f       j                                     ɔ       ̔                                   %      0 (      j      W      W      9      	      ]      ]    K"      K*     J0      J9    >      "A      H E      
`      o              ϖ      C      C      '      CD      T      Z      `      )%      	?      B      mI      \      m_      mr      	m|                ǘ       ט         
      #      /   ?      e      Wz      9      	      ]      ]ԙ   	      C       @%      :      L      "O      H S      
z      K      KÚ     J      J           U      C      C      Л                              M      7*      MR      h      ~      	      	/      	Ğ      	y      	      	      :0      ¡      	      ;      UN      UW    &h      
s                $            JӢ      Jܢ    7      L-      O      u S      
 w       |                                   ң       ֣       W      F\      }       v      v      UM      UV    &      
      å      ʥ    $            72       8      Lw             F                  C                     d                  5      S      q                    ƫ       ׫                     .       ?            C       >       J             F             V      F[            خ             F      p                                               6       ;       K       O                    y              F      $      n      u q      
 |      C       ֱ      5      س      ̴                  U            ٷ             u       
       C 8            Ժ                  `            3       ?      C C      N            ſ      C ȿ      @      c                                &       +       A       v            |                  5       9       O       T       j                   _                                         .            K      7      u       

                  -      W      u                   	      C       @J            ?      ?
   	E      '            v      #                                      :                              ',      a       p       t            >      p            '                                                                C0      
S      7q       w      L             F      +      @      UU      U^     p      w     -            )R      	U{      U    &      
                $                  	      :      8      7      J      	T      )      	V      J      J                q
      /%      <      te      }      6            v                                          '      6      C      
      .      N            v                  /                  6      C%      
H      Z      /l                       )E      	      )      	       )      	      )z      	      )E      	      )      	     )     	     )     	>
     )
     	m     )'
     	     )     	g     )      	     )Y     	     	     	     	     	     	
#     	x-     	 0     :2     3     	3     ){4     	,7     8     9     	9     	n;     	<     q<     q<      =     	=     	=     :y?     @     	@     @      @     B     /C     & zC     C     C     OD     & D     D     D     D     pE     4E     7E      E     6F      =F     	vF     	G      =F     	G      =F     	0H      =F     	H      =F     ]I     	I     J#K     J,K    2K     )K     	7O      O     O     } O     	P     	U     } O     :Z     } Z     x_     	_     _     )R`     	7Ab      Gb     lb     d     d     } d     	#e     	j     } d     :'o     } ro     t     	5t     >t     )t     	7ex      kx     x          
     }      	I     	:     }      :;     }      2     	H     Q     )     	7!      '     N          4     } ;     	p     :g     }      m     	          )G     	7S      Y          G     f     } m     	     	V     } m     	     } m     :Ҳ     }      ѷ     	          )     	dӸ     	dݸ    d     	d        )e     	           ˺                2          Լ                         M     	{                                        t     u     SD     `          )     	7     H      
           :     +q     v     )0     	0U     0               "     0S                    2     )     	K     K         )     	     K     K    J     J   p.     	} L     yg     yg      {     }                .       @     	KV     K^   c     )     	B     H E     
l     +	          ,     "/     3     y     a     a        %          H6     Hw     H     d     	d   a-     a3    Q     p     K     K    J     J              <     o ?     dz     	d        d     	d   
     JS     J\    n     %     %     B     B  BQ     Bt   B     B  d     	d   a8     a>    \     {     K     K    J     J   
      >     `     o c     d     	d        d     	d   1     Jw     J         a     a    K     K             e     M     7     M          0     0=     W                    0     0     1     C     U     0          Q     c     v                     7                          0     d                    s                         X     v                               +     @_     	@v   @                   @H     	@_   @h        
           @e     	@   @        @     	@-   @6                  "     ?      M     @     	@  @ @    @   @   0     Y      h     @     	@  @ @    @:   @C                   @@     	@W  @ @d    @   @        @     	@7  @ @D    @   @   (     R     p               A     
A   A[     
Af             '     <     A|     
A   A     
A   [K          A     
A   A   A8     
AC   Aa   +     I     r     A     
A   Aa     
Al   A%     
A0             A     
A   A     
A   An     
Ay   A*     
A5        8     A     
A   A     
A   A     
A   ^           6     `     ~               A     
A    
     A     
A    

          :     As     
A~    
          B     -          	     -
     
               ]      	Y
     -k
     z
     3     Mh     7~     M          0     0          D     V     0          R     d          7     f     x     @     	@             @(     	_          @     	@   @   @<  @ @I              b     @     	@   @   7     U     g     y     A     
A   A     
A   )     ;     Ac     
An   A     
A   A     
A   As   
          A     
A   A$     
A/   AK   m          A     
A   A   
<     N     Av     
A             A     
A   A;     
AF   A   
          A     
A    
F     BY     -l     {     1     ~               J     J   M3     7I     Mq                  $          7     L                      <     o     u s     
                                                                F      } =!     |!     7!     u !     
!     -"     W"     "      "     "      "      	#      #     7#     u #     
J$     $     $     J%      N%      e%      j%     71&     u 7&     
&     	'     W'     '      '      '      '     7H(     u N(     
(     )     )     *     K*     u*     *     *     +     +     +     
,     ,     -     )-     G-     q-     `.     ~.     .     .     .    -.     .     /     /     /     0     10     v0     0     	0     	:1     	1     	2     	3     	3     :;4     4     	M4     75     M75     M5     Uc5     Ul5   &}5     
5     5     5   $5     5     75     L
6     ,6     _6      c6      y6      }6      6      6      6      6      7      7     y 7      _7     Fd7     7     7      7      7      7      7      28     8      8     9     9     :     F:      J:      `:      e:      {:      :     ";     p;     ;      ;      ;      ;      ;      ?<     =     Y=     7=     u =     
>     i>     >     >     ?     )?     R?      b?      s?      ?      ?      ?      ?      ?      ?      2@     *A      9A     A     ] A     	P A     B     B     9C     oC      ~C     C     ^ C     
Q ;D     D     1E     gE      E     FE     E     E     
F     C F     @BF     cF     F     F     }G     G     G     G     'G     (H      7H      ;H     H     I      I     >I     'NI     I      I      I     3J     ]J     |J     J     UJ     UJ    J     J    -J     J     K     K     +L     hL     zL     L     L     L   $L     L     M     VM     hM     	M     	N     	O     	6Q     	vR     	S     	T     	)V     	iW     X     	7(Y      .Y     LSY     Y     \Y     \Y   1Z     qZ     Z     u Z     
 Z     FZ     } *[     ][     [     [      [      [     } 
\     
]     L]     ]     ]     } Y^     ^     v_     ]_     _     _     ``     v`     Pa     a     tb     Zb     b     b     b     c     Cc     'Rc     'ac     'pc      c     Fc     *d     } d     d     e     /e     Ye      e     Fe     f     ?f     if     f     Cf     
Ag     } g     g     @h     h     
i     i     i     i     i     )j     j      j     Fj     k     &l     Dl     bl     \l     \l  
 6*m     m     m     m     m    m      m      	n     ln     -~n     n     Go     o     p     Bp     Tp     p     Mp     7p     Mp     p     q     q   $,q     5q     q     q     v/r     Sr     r     } s     Es     Cs     
s     t     Mt     wt     t     Ct     
9u     cu     u     u     7u      u     Lv     >v     \rv     \{v   v     w     Hw     u Kw     
 w     Fw     } w     x     6x     x      x      x     } x     y     y     mz     z     } E{     {     C{     
;|     |     7|     x |     i}     }     }     o~     v~     _          t     i                    )     R     
     4     _     'n     '}     '           F          K     6     }           CL     
          P          ߆     CI     
     K          È                g     M     $           F          v          X          y     ǎ                                F     ,          1                     ߖ     9           N          Ƙ               @     w           >     FC     
     7     U     s     \     \  
 ߛ               z          z     '     ]          6     /     A     V     ]    -o     ~     :          ʡ      ء     \     \  
 B     Ģ     ˢ   $ܢ          M     7     MB     X     n          7ԣ     } ڣ                 L"     D     w     u z     
       Ԥ     F٤     7     u      
V          6     '     w *     \     \   C     
,     b          \     \   5      k     Fp                               S      W      n      s     :     |     ɫ      ͫ                           [      _      v      {     U          j               a               Ұ           K     \     \   ܱ           F     F     {     '     '     '     '     '     '     '     'S     'b           F          +               \f     \o   Ӷ      -     F2          4     v     
     C     m                    *     H      W     Ϻ                    Ż          H      
'	     B      I     P    -¼                    ,     3    -]     i     $                     \     \  
 +     4     tM     ue     u          M%     7;     Mc     y                        $          7M     } S      l      p     L               u      
       a     Ff     7     u      
          6p          w      \     \   Cr     
          %     \y     \              N     FS                         
      
     m      q                 @                      
                (                            {     B                                        :               \W     \`              F     R                6     F;                          d     Fi                    '     G      J                }            t     3                    ]     {                     *     H                        -<     H          v                \     \  
 
          v     s     	          s     	v          /     6   $G     P     Mo     7     M          7     }                  L;     ]          u      
            F     7-     u 3     
o          6     @     w C     \     \   C     
e     } h                 \     \  
 t               "     \v     \              F     A          F     {      ~                                      _      c      z           J                                                 B     x          !     ?     h     'w     '     '     '     '     '     '2     :      I     \     \                   F     
     B          \     \    h     Fm                F          "                         j                          7     U                        -I     U                          \     \  
 ;             $          M     7     M;     Q     7     L               u      
 	      X     F]     7     u      
          6g          w      \      \    Ci      
                 \p     \y              F     ;                    2      5                                      .      2      I      N          j                                 	     	     
     J
     
     
          :     'I     'X     'g           F     5     
     M
          ?     t     '            +     F0     w     q               *          \     \   T           F               @     v                    B     t                     &     D                        -8     G          K@     KH   Y      \     	               ,     J     J
   5 B     t_     t_     u     J     J         U      X     	:!     !     !     "     $     4C$     m$     $     $     -$     $     %     %     &      &      *&      .&      D&      a&      }&      &     '     <'     N'     -a'     p'     %(     h(     (     (     '(     )     )     )     *     D*     +     T+     ~+     +     } +     ,     ,     ,     -     (-     -;-     J-     .     E.     s.     .     U/     /     /     /     -/     /     0     0     0     '1     H1     1     2     @2     ^2     p2     -2     2     J3     3     3     } 3     3     g4     4     4     5     #5     -65     E5     5     !6      (6     	B6     	{6      (6     6     	-6     6     7     07     7     8     0#8     =8     s8     8     08     8     9     9     @7:     	@N:   @W:   Aw:     
A:   A:     
A:   A#;   
P;     A};     
A;    
;     B;     -;     ;     <     0<     <     "=     5=     0f=     =     1>     C>     >     9?     V?     ?     ?     n@     @     @     	A     A      *A     @RA     	@iA   @rA   A     A      A     @B     	@"B   @+B   B     B      B     @B     	@C   @C   C     @C     	@C   @C   sD     D     D     D     AD     
AD   A/E     
A:E   E     E     AE     
AE   A*F     
A5F   tF     F     AF     
AF   ;G     ApG     
A{G   G     G     G     
H     A7H     
ABH    
nH     BH     ?I     BI     tjI     uI     SI     I     -GJ     VJ     
K     0BK     ^K     K     0K     K     K     L     0<L     dL     M     M     @M     	@M   @M   AM     
AN   A9N     
ADN   AuN     
AN   AN   
N     AN     
AN    
#O     B6O     -JO     YO     HA         " B D O ??=K ' 	           #| x         x  HD    "   h;]8C d  CCdn2n28dddddddddd88nnnY                           C C d                           `(`8\             d                                      ȫ                                                                                                                                                                        nnn8! n BBnnn yy          P  n7 c1R      yy     X         yy       c   n               n    n                                                                                      nd                   cccc    cccc                                                          y       MMM    MMM    MMM    MMM֐~n  yRzczXzcyhCBnnshcnnonvy XzXshn~zXyCB Bns s ~    |y                              ~~~~~~~~~~~~~~~~~~~~~~XXXXXXXyyyyyyyyyyyyyyyyyyyyyyBBBBBBBBBBBBnnnnnnn  ssssssssssss             " $ $ 8                                 Đn×rcnksX7SNN                                  mmw}\] ¸                                 Đn×rcnksX7SNN                                  mmw}\] ¸             "  u^8;Noo)CCdy8C88oooooooooo88yyyYQo~čzCyCyd)ooYsdCkz?;w?zdsoY]Nzkkk`CyCyC8CC!CCC     CCCCCC  Cs  oooooȟYddddQ?Q?Q?Q?zddddzzzzkosddkdsoooYYYYsddddkkkkkkzzQ?Q?Q?Q?  o w?????zzzzddȧYYY~]~]~]~]NNNzzzzzzĜkz`z`z`  s?zY~]NkksdzdQ? ?dNy  8 yd;YUUoo oC<oC oC )  NNo44  dd            zz     )N             C'yy      y           y               P  y                         z                       " B D O ??=K ' 	           < 6X  9  ` +   C o u r i e r         "6 2  
p`     S y m b o l         WU ''    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         D<    9   +   C o u r i e r   B o l d       mZ  ? x x x  X    Xx  g{  1 l C l    / Xl 6 q  T    C   X  \ X sT - e C e     Xe U ? x x x  X   Xx S ? x x x  X  'Xx CaIIf c!fk j  lmnopqrstuvwxyz{|}~
    !    W              *      X , (#X   X*  %
    
  //*********************************************////     NAME:    D     p     	 WPCHLIBR.WPM   	 @   //        	 X   //     PURPOSE:    p SupportFunctionsandProcedures   	     //                   D     p forWordPerfect6.0Coachmacros   	    ////*********************************************  	   	 	    //*********************************************//     PROCEDURES   	 
   //********************************************* 	 	   	 H
   	 
 
 //****************************** 
 
 ***************////     PROCEDURE:FakeIt   	 h   ////*********************************************PROCEDUREFakeIt(Title;&tbox;Buttons;Frame;Steps)     Global(xposS1;xposS2;xposH1;xposH2;xposQ1;xposQ2;yposS1;FakeBtns)     Global(AreaHgt)     FakeBtns=0     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     Btns=0     If(Buttons)          Btns=2     Endif     If(Frame)          If(NotExists(ColorSet))               CheckColorSet()          Endif          If(ColorSet=1)               Adj=1               Steps=0          Else               Adj=2          Endif                    DisplayRewrite          WindowFrame          WindowSize(0;16;640;384+(ScrnMode*16)((tbox[0]+Adj+Steps+Btns)*16))          If(ColorSet=1)          AreaHgt=(384+(ScrnMode*16)((tbox[0]+Adj+Steps+Btns)*16))/16          Else          AreaHgt=((384+(ScrnMode*16)((tbox[0]+Adj+Steps+Btns)*16))/16)4          Endif     Endif     Steps=0     DlgCreate(Result;Title;   	 .h)5             DlgNoOk!+DlgNoCancel!+DlgInactive!+DlgNoClear!;          0;25+ScrnMode(tbox[0]);80;tbox[0]+1+Steps+Btns)  //          If(Steps)   	 @   //               DlgControl(CtrlLabel!;;   	 X   //          0     ">  r [BoldOn]?
   
 Step"+StepNum+""+StepText+">   [BoldOff]?
   
 ";;2;1;;1)      p&p&  //               ForNext(x;1;tbox[0])   	    //                   D DlgControl(CtrlLabel!;;tbox[x];;2;x+2;;1)   	 `	   //               Endfor   	 (
x   //          Else   	 
@                   ForNext(x;1;tbox[0])                    DlgControl(CtrlLabel!;;tbox[x];;2;x;;1)               Endfor  //          Endif           If(Buttons=1orButtons=2)               FakeBtns=Buttons               DlgControl(CtrlPushbutton!;;"Continue";;51;tbox[0]+Steps+Btns1)               If(Buttons=2)                    DlgControl(CtrlPushbutton!;;"Continue";;51;tbox[0]+Steps+Btns1)               Endif               DlgControl(CtrlPushbutton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";;65;tbox[0]+Steps+Btns1)                   (     T              	 `	             Else               If(Buttons>=3andButtons<=8)8                    FakeBtns=Buttons  
  D%D%                      If(Buttons>=3andButtons<=5)                        D DlgControl(CtrlPushbutton!;;                        D "Continue...>  r [BoldOn]?
   
 F7>   [BoldOff]?
   
 ";;45;tbox[0]+Steps+Btns1)                        D DlgControl(CtrlPushbutton!;;                    0    D "Continue...>  r [BoldOn]?
   
 F7>   [BoldOff]?
   
 ";;45;tbox[0]+Steps+Btns1)  
  Dp&Dp&                          D DlgControl(CtrlPushbutton!;;                    0    D "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;62;tbox[0]+Steps+Btns1)  
  Dp&Dp&                      Endif                    Switch(Buttons)                    CaseOf4:                        D DlgControl(CtrlPushbutton!;;                    0    D "ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;25;tbox[0]+Steps+Btns1)  
  Dp&Dp&                      CaseOf5:                        D DlgControl(CtrlPushbutton!;;                    0    D "Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 Ԁ";;28;tbox[0]+Steps+Btns1)  
  Dp&Dp&                      CaseOf6:                        D DlgControl(CtrlPushbutton!;;                    0    D "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;62;tbox[0]+Steps+Btns1)  
  Dp&Dp&                          D DlgControl(CtrlPushbutton!;;                    0    D "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;62;tbox[0]+Steps+Btns1)  
  Dp&Dp&                          D DlgControl(CtrlPushbutton!;;                    0    D "ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;42;tbox[0]+Steps+Btns1)  
  Dp&Dp&                      CaseOf7:                        D DlgControl(CtrlPushbutton!;;                    0    D "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;62;tbox[0]+Steps+Btns1)  
  Dp&Dp&                          D DlgControl(CtrlPushbutton!;;                    0    D "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;62;tbox[0]+Steps+Btns1)  
  Dp&Dp&                          D DlgControl(CtrlPushbutton!;;                    0    D "Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 Ԁ";;45;tbox[0]+Steps+Btns1)  
  Dp&Dp&                      CaseOf8:                        D DlgControl(CtrlPushbutton!;;   	 .h)5                       0    D "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;62;tbox[0]+Steps+Btns1)  
  Dp&Dp&                          D DlgControl(CtrlPushbutton!;;                    0    D "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;62;tbox[0]+Steps+Btns1)  
  Dp&Dp&                      ENDSwitch               Endif          Endif     DlgEnd//*****************************************//     CursorPositionBugFix   	 	   //*****************************************Pos=?PositionPosCharNextIf(pos<>?Position)     PosCharPreviousEndif//******************************************ENDPROC	   	 H
   //*********************************************////     PROCEDURE:CommentsBox   	 @   ////*********************************************PROCEDURECommentsBox(&cmnt;xpos;ypos;width;hight;Style)     If(Style=1)          DlgCreate(Result;"Coach";          DlgNoOk!+DlgNoCancel!+DlgInactive!+DlgNoClear!;          ;;width;hight)     Else          DlgCreate(Result;"Coach";          DlgNoOk!+DlgNoCancel!+DlgInactive!+DlgNoClear!;          xpos;ypos+ScrnMode;width;hight)     Endif     ForNext(x;1;cmnt[0])          DlgControl(CtrlLabel!;;cmnt[x];;2;x;;)     Endfor     DlgEndENDPROC	   	    //*********************************************////     PROCEDURE:CancelMenus   	 @   ////*********************************************PROCEDURECancelMenus()     While(?Dialog=2)          CancelKey     EndWhileENDPROC	   	 	   //*********************************************////     PROCEDURE:CancelDialogs   	 @   ////*********************************************PROCEDURECancelDialogs()          While(?Dialog<>1)          Display(off!)          CancelKey               If(?Dialog=0)                    Type("n")                    Type(ntoc(8154))               Endif     EndWhileENDPROC	   	 h   //*************************************************////     PROCEDURE:ScreenSetup   	 @   ////*************************************************PROCEDUREScreenSetup()     If(NotExists(ColorSet))          CheckColorSet()     Endif     Switch(?ScreenHigh)     CaseOf24:          If(?ScreenWide>80)               support={    	 "";   	 h                           D     p     	 "Coachesarenotsupportedin";                        D     p     	 (?ScreenWide+1)+"x"+(?ScreenHigh+1)+"columnscreenmode.";                        D     p     	 "";                        D     p     	 "Pleasechangeyoursettingsto";                        D     p     	 "80x25or80x50columnscreenmode";                        D     p     	 "thenrestartthecoach.";                        D     p     	 "";                        D }               Void=MessageBox("Coach";&support;1)               QuitCoach()          Endif     CaseOf49:          If(?ScreenWide>80)               support={    	 "";   	  p                           D     p     	 "Coachesarenotsupportedin";                        D     p     	 (?ScreenWide+1)+"x"+(?ScreenHigh+1)+"columnscreenmode.";                        D     p     	 "";                        D     p     	 "Pleasechangeyoursettingsto";                        D     p     	 "80x25or80x50columnscreenmode";                        D     p     	 "thenrestartthecoach.";                        D     p     	 "";                        D }               Void=MessageBox("Coach";&support;1)               QuitCoach()          Endif     DEFAULT:          Beep          If(ColorSet=1)               support={    	 "";   	 (#.                           D     p     	 "Coachesarenotsupportedin";                        D     p     	 "80x"+(?ScreenHigh+1)+"linescreenmode.";                        D     p     	 "";                        D     p     	 "Pleasechangeyoursettingsto";                        D     p     	 "80x25or80x50linescreenmode";                        D     p     	 "thenrestartthecoach.";                        D     p     	 "";   	 .h)5                           D }          Else               If(?ScreenHigh=35)                    support={    
 "";   	 X                           D     p     	     
 "Coachesarenotsupportedin";                        D     p     	     
 "1024x768graphicsscreenmode.";                        D     p     	     
 "";                        D     p     	     
 "Pleasechangeyoursettingsto";                        D     p     	     
 "640x480screenmodethen";                        D     p     	     
 "restartthecoach.";                        D     p     	     
 "";                        D     p }               Else                    support={    
 "";   	 (

                           D     p     	     
 "Coachesarenotsupportedin";                        D     p     	     
 "800x600graphicsscreenmode.";                        D     p     	     
 "";                        D     p     	     
 "Pleasechangeyoursettingsto";                        D     p     	     
 "640x480screenmodethen";                        D     p     	     
 "restartthecoach.";                        D     p     	     
 "";                        D     p }               Endif          Endif          Void=MessageBox("Coach";&support;1)          QuitCoach()     ENDSwitchGlobal(Bbar;Ribn;Olb;PDM;Keyboard)IF(?ButtonBar)     BBar=1     ButtonBar(Off!)ELSE     BBar=0ENDIFIF(?OutlineBar)     OLB=1     OutlineBarSetup(off!)ELSE     OLB=0ENDIFIF(?Ribbon)     Ribn=1     RibbonSetup(off!)ELSE     Ribn=0ENDIFIF(?PullDownMenus)          PDM=1   	 .h)5   ELSE          PDM=0          MenuBarRemainsVisible    L    	 @             SetupSaveEndifDisplayOnStatusLine(Nothing!)DISPLAY(Off!)DlgInput(On!)If(NOT?Substructure)     KeyboardLayoutDlg     Keyboard=?Entry     If(Keyboard<>"[ORIGINAL]")          Type("N[ORIGINAL]")          Hrt          Hrt     Else          Hrt     EndifEndifENDPROC	   	 P   //*************************************************////     PROCEDURE:RestoreStates   	 @   ////*************************************************PROCEDURERestoreStates()If(Exists(BBar))     IF(BBar=1)    p ButtonBar(On!)    x ENDIF   	 (
x        IF(OLB=1)    D OutlineBarSetup(on!)     ENDIF   	 
@        IF(Ribn=1)    p RibbonSetup(on!)     ENDIF   	 	        IF(PDM=0)    D MenuBarRemainsVisibleSetupSaveENDIF   	 
        DisplayOnStatusLine(Filename!) 
 //DisplayRewrite
      If(?BlockActive)          BlockOff     Endif     If(NOT?Substructure)          If(Keyboard<>"[ORIGINAL]")               Display(Off!)               DlgInput(On!)               KeyboardLayoutDlg               Type("n"+Keyboard)               Hrt               Hrt          Endif     EndifEndifENDPROC	   	  P   //*********************************************////     FUNCTION:BlockEdit   	 @   ////*********************************************FUNCTIONBlockEdit(Title;EnableBlk;EnableMouse;&DefMsg;Buttons;Helps)     Result=0Init=0     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     Switch(FakeBtns)     CaseOf3:          Lft1a=45Lft1b=59          Lft2a=62Lft2b=76          Lft3a=0Lft3b=0     CaseOf4:          Lft1a=45Lft1b=59          Lft2a=62Lft2b=76          Lft3a=25Lft3b=42     CaseOf5:    D    	 p             Lft1a=45Lft1b=59          Lft2a=62Lft2b=76          Lft3a=28Lft3b=42     CaseOf6:          Lft1a=0Lft1b=0          Lft2a=62Lft2b=76          Lft3a=42Lft3b=59     CaseOf7:          Lft1a=0Lft1b=0          Lft2a=62Lft2b=76          Lft3a=45Lft3b=59     CaseOf8:          Lft1a=0Lft1b=0          Lft2a=62Lft2b=76          Lft3a=0Lft3b=0     DEFAULT:          Lft1a=51Lft1b=62          Lft2a=65Lft2b=76          Lft3a=0Lft3b=0     ENDSwitch     Steps=0     If(Helps=2)          Steps=1   	 .h)5        Endif     NotFound(On!)     OnNotFoundCall(NotFoundCoach)     Cancel(On!)     OnCancelCall(CancelCoach)     DlgInput(On!)     Option=0Result=0     While(1)          Char(Key)          If((?MouseLeft)          and(?MouseLastX>=0and?MouseLastX<=62)          and(?MouseLastY>=0and?MouseLastY<=0))               FakeIt(Title;&DefMsg;Buttons;0;Steps)               Type(ntoc(Key))     
    	 0                  Option=?DialogControl               PosLineDown               BlkFrmMenu(Option)               NotFound(On!)               OnNotFoundCall(NotFoundCoach)               Cancel(On!)               OnCancelCall(CancelCoach)               While(?Dialog<>1)                    Char(Key)                    Type(ntoc(Key))                    Key=1               EndWhile               FakeIt(Title;&DefMsg;Buttons;0;Steps)               If(?BlockActiveand?Dialog=1)                    cmnt={0    	 "Usethearrowkeystopositiontotheend";    x! 	p&	p&                          D     p "ofthetext,thenchoose>  r [BoldOn]?
   
 Continue>   [BoldOff]?
   
 .";                        D }                    If(Helps=2)                        D Vpos=(24(DefMsg[0]+3))                    Else                        D Vpos=(24(DefMsg[0]+2))                    Endif                    CommentsBox(&cmnt;1;Vpos;45;4;0)                    Init=2               Endif          Endif          If(Key<>768)               If(Key<>8154andKey<>8146andKey<>8142andKey<>8139and               Key<>8124andKey<>8133andKey<>8050andKey<>8160)                    //F7,Shft+F3,Shft+F7,Shft+F10,Ctrl+F1,Alt+F4,Ctrl+S,Esc                    If(?BlockActive)                        D If(Key>64andKey<126)                        D     p PosCharacter(ntoc(Key))                        D Else   	 ^-(4                           D     p Type(ntoc(Key))                        D Endif                    Else                        D Type(ntoc(Key)) 
 %
     
 
                     Endif               Endif          Else               If((?MouseLastY<AreaHgtand(?MouseLastY>1))               and(?MouseLastX>0and?MouseLastX<79)               and(EnableMouse)and(?MouseRightClick=0))                    Type(ntoc(Key))                    If(EnableBlk)                        D If(?MouseLeftand?BlockActive)                        D     p If(Init=0)                        D     p     	 If(Helps)                        D     p     	 0    
 cmnt={0    L
p&
p& "Keepholdingthemousebuttonasyoudrag.";    0 Lp&Lp&                          D     p     	     
      }                        D     p     	     
 If(Helps=2)                        D     p     	     
      Vpos=(24(DefMsg[0]+3))                        D     p     	     
 Else                        D     p     	     
      Vpos=(24(DefMsg[0]+2))                        D     p     	     
 Endif                        D     p     	     
 CommentsBox(&cmnt;5;Vpos;48;3;0)   	                            D     p     	 Endif                        D     p     	 Init=1                        D     p Endif                        D Endif                        D If(Init=1and?MouseLeft=0and                        D ?BlockActive)                        D     p If(Helps)                        D     p     	 FakeIt(Title;&DefMsg;Buttons;0;Steps)                        D     p     	 cmnt={0     
 "Yourtextisblocked.Choose>  r [Bold   	     On]?
   
 Continue>   [BoldOff]?
   
 Ԁortryagain.";  
   
p& 
p&                          D     p     	     
 }                        D     p     	 If(Helps=2)                        D     p     	     
 Vpos=(24(DefMsg[0]+3))                        D     p     	 Else                        D     p     	     
 Vpos=(24(DefMsg[0]+2))                        D     p     	 Endif                        D     p     	 CommentsBox(&cmnt;3;Vpos;58;3;0)   	 $\(                           D     p Endif                        D     p Init=2                        D Endif                        D If(Init=2and?BlockActive=0)                        D     p FakeIt(Title;&DefMsg;Buttons;0;Steps)                        D     p Init=0                        D Endif                    Else                        D If(?BlockActive)                        D     p BlockOff                        D Endif                    Endif   	 l-(4                  Else                    If((?MouseLastX>=Lft1a)and(?MouseLastX<=Lft1b)and                    (?MouseLastY=(23+ScrnMode)))                        D If(NoSelect()=1)                        D     p Option=1                        D     p Break                        D Endif                    Else                        D If((?MouseLastX>=Lft2a)and(?MouseLastX<=Lft2b)and                        D (?MouseLastY=(23+ScrnMode)))                        D     p Call(CancelCoach)                        D Else                        D     p If((?MouseLastX>=Lft3a)and(?MouseLastX<=Lft3b)and                        D     p (?MouseLastY=(23+ScrnMode)))                        D     p     	 Option=3                        D     p     	 Break                        D     p Else                        D     p     	 While(?MouseLeft)                        D     p     	 EndWhile                        D     p     	 Key=0                        D     p Endif                        D Endif                    Endif               Endif          Endif          If(EnableBlkandKey=8133)          //Block   	 8                  If(?BlockActive)                    BlockOff                    FakeIt(Title;&DefMsg;Buttons;0;Steps)               Else                    BlockOn(CharMode!)                    If(Helps)                        D cmnt={0    
 "Usethearrowkeystopositiontotheend";       
p&
p&                          D     p     	 "ofthetext,thenchoose>  r [BoldOn]?
   
 Continue>   [BoldOff]?
   
 .";                        D     p }                        D If(Helps=2)                        D     p Vpos=(24(DefMsg[0]+3))                        D Else                        D     p Vpos=(24(DefMsg[0]+2))                        D Endif                        D CommentsBox(&cmnt;1;Vpos;45;4;0)   	 #@(                       Endif                    Init=2               Endif          Endif          If(Key=8154and?Dialog=1)    (     T //F7Key   	 '(#-                  If(NoSelect()=1)                    Option=1                    Break               Endif          Endif          If(FakeBtns=4orFakeBtns=6)               If(Key=8050and?Dialog=1)    T //Ctrl+S   	 P-(4                       Option=3   	 .h)5                       Break               Endif          Endif          If(FakeBtns=5orFakeBtns=7)               If(Key=8158and?Dialog=1)    T //F1Key   	                         Option=3                    Break               Endif          Endif          If(Key=8182and?Dialog>2)               HardReturn          Endif          While(?Dialog<>1)               Char(Key)               Type(ntoc(Key))               Key=1          EndWhile     EndWhile     NotFound(Off!)     Cancel(Off!)     Return(Option)ENDFUNC	   	 h   //*********************************************////     PROCEDURE:BlkFrmMenu   	 @   ////*********************************************PROCEDUREBlkFrmMenu(Option)     NotFound(On!)     OnNotFoundCall(NotFoundCoach)     Cancel(On!)     OnCancelCall(CancelCoach)     hbox1={    D "";   	 `	                       "BlockandSearchareavailable";                    "ontheEditmenu.";                    "";          }     hbox2={    D "";   	 H
                       "BlockandSearchareavailable";                    "ontheEditmenu.";                    "";          }     hbox3={    D 1;   	 0             }     EditMenu(&valid)     allow={    D     p     	 1487;   	  P                           D 1498;          }     exallow={    D     p 1;   	 X                           D 1;          }     accel={    D     p     	 98;   	                              D 104;          }     exaccel={    D     p 1;   	  X#                           D 1;          }     NoSubMenu(&subval;&subacl;&exsubacl;&subs)     sbox={         D     p 1;   	 #@(             }     funkey={    D     p 8133;          
 //Alt+F4   	 % *                           D 8159;    
      //F2   	 H&!+             }     Switch(Option)     CaseOf1987:          Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;          &accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)     DEFAULT:   	 .h)5             MenuActive=MenuBarControl("";&hbox1;&sbox;0;0;101;&funkey)          If(Filter(&funkey;MenuActive;2)=0)               Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;               &accel;&exaccel;&subval;&subacl;&exsubacl;&subs;&funkey)          Endif     ENDSwitchENDPROC	   	 
@   //*********************************************////     PROCEDURE:ShowMenu   	 @   ////*********************************************PROCEDUREShowMenu(Title;&sbox;xpos;ypos;Mnu;Opt;Pop;Execute)     Global(ChkMenu)     ChkMenu=0     DlgInput(On!)     CancelMenus()     If(sbox[1]=1)          sbox[0]=0     Endif     PullDownDlg     Speed(10)     ForNext(x;1;Mnu)          PosCharNext     Endfor     Wait(3)     ForNext(x;1;Opt+1)          PosLineDown     Endfor     If(Pop=0)          If(sbox[0]<>0)               Result=PostIt(Title;&sbox;xpos;ypos;0;0;0)          Endif     Endif     If(ExecuteorPop)          Wait(3)          HardReturn     Endif     If(Pop)          If(Pop<>1)               ForNext(x;1;Pop1)                    PosLineDown               Endfor          Endif          If(sbox[0]<>0)               Result=PostIt(Title;&sbox;xpos;ypos;0;0;0)          Endif          If(Execute=2)               Wait(3)               HardReturn          Endif     Endif     Speed(0)     Cancel(Off!)ENDPROC	   	 +'2   //*********************************************////     PROCEDURE:MenuBar   	 @   ////*********************************************PROCEDUREMenuBar(&bar)     bar={               309;    D     p //File   	 (
x                  1475;    p     	 //Edit   	 
@                  1502;    p     	 //View   	 	                  1531;    p     	 //Layout   	 
                  1592;    p     	 //Tools   	 H
                  1655;    p     	 //Font   	 `	                  1867;    p     	 //Graphics   	 (

                  3522;    p     	 //Window   	 
                  3704;    p     	 //Help   	 h             }ENDPROC	   	 H
   //*********************************************////     PROCEDURE:MenuPop   	 @   ////*********************************************PROCEDUREMenuPop(&pop)     pop={               0;               458;               816;               1184;               1484;               1488;               1494;               1515;               1519;               1537;               1555;               1564;               1574;               1580;               1597;    p     	     
 //Macro   	 h                  1601;    p     	     
 //Outline   	 0                  1616;    p     	     
 //Merge   	                   1549;    p     	     
 //Date   	 p                  1620;    p     	     
 //Index   	 8                  1623;    p     	     
 //TableofContents   	  P                  1626;    p     	     
 //List   	                   1629;    p     	     
 //CrossReference   	                   1633;    p     	     
 //TableofAuthorities   	 X                  1639;    p     	     
 //Math   	  p                  1644;    p     	     
 //Spreadsheet   	 8                  1650;    p     	     
 //Soundclip   	                     1658;    p     	     
 //FontSize/Position   	 x!                  4466;    p     	     
 //GraphicsBoxes   	 @"                  4467;    p     	     
 //GraphicsLines   	  X#                  4468;    p     	     
 //Graphicsborders   	   $             }ENDPROC	   	 `"&   //*********************************************////     PROCEDURE:FileMenu   	 @   ////*********************************************PROCEDUREFileMenu(&valid)     valid={               309;               310;               321;               335;               3812;               420;               436;               437;               458;               816;               1094;               1184;               1470;               1471;               1472;               1473;               1474;          }ENDPROC	   	 8   //*********************************************////     PROCEDURE:EditMenu   	 @   ////*********************************************PROCEDUREEditMenu(&valid)     valid={               1475;               1476;               1477;               1478;               1479;               1480;               1481;               1482;               1483;               1484;               1487;               1488;               1494;               1498;               1499;               1500;               1501;          }ENDPROC	   	 8   //*********************************************////     PROCEDURE:ViewMenu   	 @   ////*********************************************PROCEDUREViewMenu(&valid)     valid={               1502;               1503;               1504;               1505;               1506;               1508;               1509;               1510;               1514;               1515;               1519;               1529;               1530;               3609;          }ENDPROC	   	 0   //*********************************************////     PROCEDURE:LayoutMenu   	 @   ////*********************************************PROCEDURELayoutMenu(&valid)     valid={               1531;               1532;               1533;               1534;               1535;               1536;               1537;               1548;               4422;               1553;               1554;               1555;               1563;               1564;               1573;               1574;               1580;               0;               1591;          }ENDPROC	   	    //*********************************************////     PROCEDURE:ToolsMenu   	 @   ////*********************************************PROCEDUREToolsMenu(&valid)     valid={               1592;               1594;               1597;               1601;               1616;               1619;               1549;               1620;               1623;               1626;               1629;               1633;               1638;               1639;               1644;               1649;               1650;          }ENDPROC	   	 8   //*********************************************////     PROCEDURE:FontMenu   	 @   ////*********************************************PROCEDUREFontMenu(&valid)     valid={               1655;               1656;               1657;               1658;               1666;               1667;               1668;               1669;               1670;               1671;               1672;               1673;               1684;               1685;               1686;          }ENDPROC	   	    //*********************************************////     PROCEDURE:GraphicsMenu   	 @   ////*********************************************PROCEDUREGraphicsMenu(&valid)     valid={               1867;               1868;               4466;               4467;               4468;               3463;               3464;          }ENDPROC	   	 h   //*********************************************////     PROCEDURE:WindowMenu   	 @   ////*********************************************PROCEDUREWindowMenu(&valid)     valid={               3522;               3568;               3569;               3597;               3626;               3656;               3670;               3671;               3683;               3703;          }ENDPROC	   	    //*********************************************////     PROCEDURE:HelpMenu   	 @   ////*********************************************PROCEDUREHelpMenu(&valid)     valid={               3704;               3708;               4198;               4255;               3711;               3713;               4256;               4254;          }ENDPROC	   	 0   //*********************************************////     PROCEDURE:NoSubMenu   	 @   ////*********************************************PROCEDURENoSubMenu(&subval;&subacl;&exsubacl;&subs)     subval={    D 1;   	 `	             }     subacl={    D 1;   	 
@             }     exsubacl={    p 1;   	 
             }     subs={     1;   	 `	             }ENDPROC	   	 
   //*********************************************////     PROCEDURE:AssignedSubs   	 @   ////*********************************************PROCEDUREAssignedSubs(&subassgn;PullDown)     Switch(PullDown)     CaseOf309:    p     	     
 //File   	 
@             subassgn={                    459;                    648;                    281;                    1074;                    1093;                    1185;    	    	 h                       1186;                    1187;                    1188;                    1233;                    1258;                    }     CaseOf1475:    	     
      //Edit   	 p             subassgn={                    1485;                    1486;                    1489;                    1490;                    1491;                    1492;                    1493;                    1495;                    1496;                    1497;               }     CaseOf1502:    	     
      //View   	 `"&             subassgn={                    1516;                    1417;                    1418;                    1520;                    1521;                    1522;                    4410;                    1525;                    1526;                    3863;                    1593;                    1528;                    1227;               }   	 .h)5   Ї     CaseOf1531:    	     
      //Layout   	                 subassgn={                    1538;                    1539;                    264;                    265;                    1540;                    1541;                    1542;                    1543;                    1547;                    1558;                    1559;                    1559;                    1560;                    1565;                    1566;                    1567;                    1568;                    1569;                    1570;                    1571;                    1572;               }     CaseOf1592:    	     
      //Tools   	 8             subassgn={                    1598;                    1599;                    1600;                    1602;                    1603;                    1604;                    1605;                    1606;                    1607;                    1608;                    1609;                    1610;                    1611;                    1612;                    1613;                    1614;                    1615;                    1617;                    1618;                    1550;                    1551;                    1552;                    1621;                    1622;                    1624;                    1625;                    1627;   	 .h)5                       1628;                    1630;                    1631;                    1632;                    1634;                    1635;                    1637;                    1640;                    1641;                    1642;                    1643;                    1645;                    1646;                    1647;                    1648;                    1651;                    1652;                    1653;                    1654;               }     CaseOf1655:    	     
      //Font   	 h             subassgn={                    1596;                    1661;                    1662;                    1663;                    1664;                    1665;                    1595;                    1659;                    1660;               }     CaseOf1867:    	     
      //Graphics   	 @"             subassgn={                    2161;                    2344;                    2345;                    2346;                    2703;                    2720;                    3062;                    3099;                    3210;                    3245;                    3760;               }     Default:          subassgn={                    1;               }   	 .h)5                  ENDSwitchENDPROC	   	 @   //*********************************************////     PROCEDURE:SavingDoc   	 @   ////*********************************************PROCEDURESavingDoc()     tbox={     "Tosaveandexityourdocument,";   	 `	                  "";               "Choose>  r [BoldOn]?
   
 File>   [BoldOff]?
   
 ,";   	 
@                  "then>  r [BoldOn]?
   
 Exit>   [BoldOff]?
   
 .";               "or";               "Press>  r [BoldOn]?
   
 F7.";   	 V
                  "";          }     FileMenu(&valid)     allow={1473;}     exallow={0;}     accel={101;}     exaccel={1;}     NoSubMenu(&subval;&subacl;&exsubacl;&subs)     funkey={8154;}     Repeat     hbox1={    D "Choose>  r [BoldOn]?
   
 File.";}   	         hbox2={    D "Choose>  r [BoldOn]?
   
 Exit.";}   	 b        hbox3={    D 1;}   	 8        DisplayRewrite     Result=PostIt("Coach";&tbox;33;13;0;2;0)     MenuActive=0          Show=HotSpot(0;0;62;0;543;&funkey;1)          Switch(Show)               CaseOf1:    	     
 //Showmenu   	 x"                       sbox={"Choose>  r [BoldOn]?
   
 Exit.";}   	 @ #                       Result=PostIt("Coach";&tbox;33;13;0;3;0)                    ShowMenu("Coach";&sbox;2;14ScrnMode;0;14;0;0)               CaseOf309:    
 //ClickonFile   	 n#'                           D     p                CaseOf543:     //Alt+F   	 $N )                       Result=PostIt(DefTitle;&tbox;33;13;0;3;0)                    PullDownDlg                    Type("f")                    MenuActive=8154               CaseOf8154:     //[F7]   	 )$/                  CaseOf8085:     //Alt+=   	 >+&1                       sbox={1;}                    Result=PostIt(DefTitle;&tbox;33;13;0;3;0)                    MenuActive=MenuBarControl("Coach";&hbox1;&sbox;30;5   	 -(4    
    	 -(4   
 ScrnMode;102;&funkey)               DEFAULT:    	     
 //Default   	 @                       sbox={1;}                    MenuActive=MenuBarControl("Coach";&hbox1;&sbox;30;5 
 
 ScrnMode;102;&funkey)          ENDSwitch          If(MenuActive<>1)               If(Show<>8154andMenuActive<>8154)                    Result=MenuControl(&hbox1;&hbox2;&hbox3;&valid;                    &allow;&exallow;&accel;&exaccel;&subval;&subacl;                    &exsubacl;&subs;&funkey)                    MenuActive=Result                    If(MenuActive=1473)                        D CancelMenus()                        D DisplayRewrite                        D ExitDlg                    Endif               Else                    CancelMenus()                    DisplayRewrite                    ExitDlg               Endif          Endif          If(MenuActive=1)               Result=PostIt(DefTitle;&tbox;33;13;0;2;0)          Endif     Until(MenuActive<>1)          While(?Dialog<>1)//               DisplayRewrite   	                     Switch(?Dialog)                    CaseOf43:                        D     p ExitDlgProc()                    CaseOf47:                        D     p FileSaveDlgProc()                    CaseOf494:                        D     p ExitWpProc()                    CaseOf270:                        D     p ExitDocProc()̀                    CaseOf0:   	 (#.                           D     p ReplaceProc()               ENDSwitch          ENDWHILE//          If(?DocBlank=0)   	 ,'3   //               tbox={    	 "DocumentisBlank.";   	 P-(4   //                   D }   	 .h)5   //               Result=MessageBox(DefTitle;&tbox;1)   	       //          Endif   	 x    //Until(?DocBlank)     DlgInput(Off!)ENDPROC	   	     //*********************************************////     PROCEDURE:ExitDlgProc   	 @   ////*********************************************PROCEDUREExitDlgProc()     x1={20;34;}     x2={31;40;}     y1={14;14;}     y2={14;14;}     hotkey={115;121;}     hotpnt={1;1;}     tbox={    D "Choose>  r [BoldOn]?
   
 Yes>   [BoldOff]?
   
 Ԁtosavethefile(orchoose>  r [Bold   	 `	   On]?
   
 SaveAs>   [BoldOff]?
   
 ";               "tosavethefilewithadifferentname).";               "";                    }     helpmsg={    D "Choose>  r [BoldOn]?
   
 SaveAs>   [BoldOff]?
   
 Ԁor>  r [BoldOn]?
   
 Yes.";   	 V
                           D "";          }     Result=0SaveScrn=0     While(?Dialog=43)          Switch(?DialogControl)               CaseOf55:    
           
     L //SaveAsbutton   	 T                       info={    	 55;   	 l                           D     p 43;                        D     p 1;                        D     p DefTitle;                        D     p 12;                        D     p 16;                        D     p 1;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={121;115;}                    aclpnt={1;1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;                    &hotpnt;&accel;&aclpnt;&tbox;&helpmsg)               CaseOf423:    
           
 //Yesbutton   	 % *                       info={    	 423;   	 d&!+                           D     p 43;                        D     p 1;                        D     p DefTitle;                        D     p 12;                        D     p 16;                        D     p 1;                        D     p "Coach";                        D     p 1;                        D     p 0;   	 l-(4                           D }                    accel={115;121;}                    aclpnt={1;1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;                    &hotpnt;&accel;&aclpnt;&tbox;&helpmsg)               DEFAULT:    	     
           
     L //CancelButton   	 `	                       info={    	 ?DialogControl;   	 (
x                           D     p 43;                        D     p 1;                        D     p DefTitle;                        D     p 12;                        D     p 16;                        D     p 1;                        D     p "Coach";                        D     p 1;                        D     p 1;                        D }                    accel={115;121;}                    aclpnt={1;1;}                    allow={55;423}                    Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;                    &hotpnt;&accel;&aclpnt;&tbox;&helpmsg;&allow)          ENDSwitch     EndWhileENDPROC	   	 8   //*********************************************////     PROCEDURE:ReplaceProc   	 @   ////*********************************************PROCEDUREReplaceProc()     x1={33;44;}     x2={41;51;}     y1={13;13;}     y2={13;13;}     hotkey={121;110;}     hotpnt={1;1;}     helpmsg={"Chooseareplaceoption.";   	 `	                  "";}     tbox={     "Choosethedesiredreplaceoption.";   	 
                  "";          }     Result=0SaveScrn=0     While(?Dialog=0)          If(Result="Hint")     hbox={     "Answering>  r [BoldOn]?
   
 Yes>   [BoldOff]?
   
 Ԁwilloverwritetheprevious   	 l   version";               "ofthisfile.Ifyoudonotwanttolosetheprevious";               "version,choose>  r [BoldOn]?
   
 No>   [BoldOff]?
   
 Ԁandyouwillbe";        	                   "promptedforanewfilename."}               Hint=Hint(&hbox;99;99;3)          Endif          Switch(?DialogControl)               CaseOf4368:          
     L //Yesbutton   	 <                       info={    	 4368;   	 T                           D     p 0;                        D     p 1;                        D     p DefTitle;                        D     p 20;                        D     p 16;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={110;121;}                    aclpnt={1;1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg)               CaseOf2:    	     
      //Nobutton   	 )$/                       info={    	 2;   	 L*%0                           D     p 0;                        D     p 1;                        D     p DefTitle;                        D     p 20;   	 l-(4                           D     p 16;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={121;110}                    aclpnt={1;1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg)               DEFAULT:                    info={    	 ?DialogControl;   	 `	                           D     p 0;                        D     p 1;                        D     p DefTitle;                        D     p 20;                        D     p 16;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={121;110;}                    aclpnt={1;1;}                    allow={4368;2}                    Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg;&allow)          ENDSwitch     EndWhileENDPROC	   	  p   //*********************************************////     PROCEDURE:FileSaveDlgProc   	 @   ////*********************************************PROCEDUREFileSaveDlgProc()     x1={     2;59;}   	 `	        x2={     71;66;}   	 (
x        y1={     9;15;}   	 
@        y2={     9;15;}   	 	        hotkey={49;8182;}     hotpnt={1;1;}     helpmsg={    p "Choose>  r [BoldOn]?
   
 OK>   [BoldOff]?
   
 Ԁafterenteringafilename.";   	 `	                           D "";          }     tbox={"Typeafilename,thenpress>  r [BoldOn]?
   
 Enter.";   	 v                  "";          }     Result=0SaveScrn=0     While(?Dialog=47)          If(Result="Hint")               hbox={    p "Goodfilenamesaredescriptiveand,therefore,easily";   	 4                           D "remembered.Thefollowingrulesgovernthenamingof";                        D "files:";        	                            D "";                        D " Thenamemustbefromonetoeightcharactersin";                        D "lengthandmayhaveanextensionofuptothree";                        D "characters.";                        D "";                        D " Donotusethefollowingsymbolsinafilename:";                        D "[]|<>=+;,?*";                        D "";                        D " Useaperiodtoseparatethenamefromtheextension.";                        D "";                        D " Youcannotuseablankoraspaceinthefilename.";                        D "";                        D " Mixletters,numbersandsymbolsasdesired(forexample,";                        D "NAMES_1.SECisavalidfilename).";                        D "";                    }               Hint=Hint(&hbox;99;99;3)          Endif          Switch(?DialogControl)               CaseOf195:    
           
 //Filenametextentry   	 'D#-                       info={    	 195;   	 ($.                           D     p 47;                        D     p 1;                        D     p DefTitle;                        D     p 17;                        D     p 18;                        D     p 4;   	 l-(4                           D     p "Coach";                        D     p 1;                        D     p 1;                        D }                    accel={8148;8156;8152;8155;8153;}     //Don'tallow   	                         aclpnt={2;2;2;2;2}    x                //thesefunckeys   	                        HotElement=1                    Result=WinEdControl(&info;&x1;&x2;&y1;&y2;&hotkey;                    &hotpnt;&accel;&aclpnt;&tbox;&helpmsg)               CaseOf0:    	     
           
 //Okbutton   	 
                       info={    	 0;   	 H
                           D     p 47;                        D     p 1;                        D     p DefTitle;                        D     p 17;                        D     p 18;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={49;102;}                    aclpnt={0;0;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg)               DEFAULT:                    info={    	 ?DialogControl;   	                            D     p 47;                        D     p 1;                        D     p DefTitle;                        D     p 17;                        D     p 18;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={49;102;}                    aclpnt={1;1;}                    allow={195;0}                    Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg;&allow)          ENDSwitch     EndWhileENDPROC	   	 (#.   //*********************************************////     PROCEDURE:ExitWpProc   	 @   ////*********************************************PROCEDUREExitWpProc()     x1={     36;}   	 `	        x2={     41;}   	 (
x        y1={     13;}   	 
@        y2={     13;}   	 	        hotkey={110;}     hotpnt={1;}     helpmsg={    p "Choose>  r [BoldOn]?
   
 No";   	 `	                           D "";}     tbox={     "Answer>  r [BoldOn]?
   
 No>   [BoldOff]?
   
 ԀtocontinueinWordPerfect.";   	 
                       "";          }     Result=0SaveScrn=0     While(?Dialog=494)          If(Result="Hint")               hbox={    p "Hintsgohere."}   	 ^                  Hint=Hint(&hbox;99;99;3)          Endif          Switch(?DialogControl)               CaseOf3942:          
     L //Nobutton   	 ^                       info={    	 3942;   	 &                           D     p 494;                        D     p 1;                        D     p DefTitle;                        D     p 20;                        D     p 16;                        D     p 0;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={110;}                    aclpnt={1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg)               DEFAULT:                    info={    	 ?DialogControl;   	 'n",                           D     p 494;                        D     p 1;                        D     p DefTitle;                        D     p 20;                        D     p 16;                        D     p 0;                        D     p "Coach";                        D     p 1;   	 ^-(4                           D     p 0;                        D }                    accel={110;}                    aclpnt={1;}                    allow={3942}                    Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg;&allow)          ENDSwitch     EndWhileENDPROC	   	 	   //*********************************************////     PROCEDURE:ExitDocProc   	 @   ////*********************************************PROCEDUREExitDocProc()     x1={     32;41;49;}   	 `	        x2={     38;46;56;}   	 (
x        y1={     15;15;15;}   	 
@        y2={     15;15;15;}   	 	        hotkey={121;110;8182;}     hotpnt={1;1;1;}     helpmsg={    D "Makeyourchoice";   	 `	                           D "";}     tbox={     "Answer>  r [BoldOn]?
   
 No>   [BoldOff]?
   
 Ԁtoremaininthedocument.";   	 
                       "";          }     Result=0SaveScrn=0     While(?Dialog=270)          If(Result="Hint")               hbox={    p "Hintsgohere."}   	 ^                  Hint=Hint(&hbox;99;99;3)          Endif          Switch(?DialogControl)               CaseOf1088:                    info={    	 1088;   	 &                           D     p 270;                        D     p 1;                        D     p DefTitle;                        D     p 10;                        D     p 16;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={110;}                    aclpnt={1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg)               CaseOf1089:                    info={    	 1089;   	 'n",                           D     p 270;                        D     p 1;                        D     p DefTitle;                        D     p 10;                        D     p 16;                        D     p 4;                        D     p "Coach";                        D     p 1;   	 ^-(4                           D     p 0;                        D }                    accel={121;}                    aclpnt={1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg)               CaseOf1:                    info={    	 1;   	 
@                           D     p 270;                        D     p 1;                        D     p DefTitle;                        D     p 10;                        D     p 16;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={110;121;}                    aclpnt={1;1;}                    Result=ButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg)               DEFAULT:                    info={    	 ?DialogControl;   	 8                           D     p 270;                        D     p 1;                        D     p DefTitle;                        D     p 10;                        D     p 16;                        D     p 4;                        D     p "Coach";                        D     p 1;                        D     p 0;                        D }                    accel={110;121;}                    aclpnt={1;1;}                    allow={1088;1089;1}                    Result=InvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;                    &accel;&aclpnt;&tbox;&helpmsg;&allow)          ENDSwitch     EndWhileENDPROC	   	 H&!+   //*********************************************////     PROCEDURE:NotFoundCoach   	 @   ////*********************************************PROCEDURENotFoundCoach()     SHOWCOLOR(Off!)     tbox={     "NotFound";   	 (
x                  "";          }     Result=MessageBox("";&tbox;1)     SHOWCOLOR(On!)ENDPROC	   	 `	   //*********************************************////     PROCEDURE:CancelCoach   	 @   ////*********************************************PROCEDURECancelCoach()     If(?Dialog=2)          CancelMenus()     Else          If(?Dialog=36)               tbox={    p "";   	 
                           D "QuitCoach?";                        D "";                    }               If(MessageBox("Coach";&tbox;5)=1)                    QuitCoach()               Endif          Else               If(?Dialog<>1andCancelMsg)                    CancelKey               Else                    tbox={    	 "";   	 h                           D     p     	 "QuitCoach?";                        D     p     	 "";                        D     p }                    If(MessageBox("Coach";&tbox;5)=1)                        D QuitCoach()                    Endif               Endif          Endif     Endif//*********************************************//     Thenextcommandisaremedyforabug   	      //*********************************************     If(Exists(BugFix))          PosCharNext          PosCharPrevious          DISCARD(BugFix)     Endif//*********************************************//*********************************************ENDPROC	   	 '`",   //*********************************************////     PROCEDURE:QuitCoach   	 @   ////*********************************************PROCEDUREQuitCoach()     While(?Substructure)          SubstructureCancel     Endwhile     CancelMenus()     CancelDialogs()     WindowMaximize     RestoreStates()     QuitENDPROC	   	 
   //*********************************************////     PROCEDURE:SetBoxSize   	 @   ////*********************************************PROCEDURESetBoxSize()     w=StrLen(tbox[1])          
     L //Determineboxsize   	 `	        tst=StrLen(title)     If(tst>w)          w=tst     EndIf     ForNext(x;2;tbox[0])          tst=StrLen(tbox[x])               If(tst>w)                    w=tst               EndIf     EndFor     h=tbox[0]     w=w+4h=h+4ENDPROC	   	    //*********************************************////     PROCEDURE:PleaseWait   	 @   ////*********************************************PROCEDUREPleaseWait()     Display(Off!)     tbox={     "";   	 (
x                  "PleaseWait...";               "";          }     Result=MessageBox("Coach";&tbox;0)ENDPROC	   	 `	   //*********************************************////     PROCEDURE:CheckColorSet   	 @   ////*********************************************PROCEDURECheckColorSet()     Global(ColorSet)     Display(Off!)     DlgInput(On!)     ScreenDlg     Control=?DialogControl     GotoDlg     Type("7")     Control2=?DialogControl     If(Control=Control2)          ColorSet=1     Else          ColorSet=0     Endif     CancelKey     Display(On!)ENDPROC	   	 h   //*********************************************////     PROCEDURE:ColorScheme   	 @   ////*********************************************PROCEDUREColorScheme()     If(?Substructure)          Beep          tbox={    D "";   	 
@                       "Pleasereturntoanormaldocument";                    "screenthenrestartthiscoach.";                    "";               }          Result=Messagebox("Coach";&tbox;1)          Quit     EndIf     If(NotExists(ColorSet))          CheckColorSet()     Endif     Error(On!)     If(ColorSet=1)          OnError(TextDefaultScheme)          ColorSchemeCreate("[WPCoach]")          ColorSchemeAssign("[WPCoach]";20;248)          ColorSchemeAssign("[WPCoach]";24;244)          ColorSchemeAssign("[WPCoach]";22;242)          ShowColor(On!;"[WPCoach]")          Error(Off!)          Break          Label(TextDefaultScheme)          Display(Off!)          DlgInput(On!)          TextScreenOptionsDlg          Type("2")          If(?Entry="[WPCoach]")               ShowColor(On!;"[Gettysburg]")          Else               ShowColor(On!;"[WPCoach]")          Endif          CancelDialogs()          DlgInput(Off!)     Else          OnError(GraphDefaultScheme)          GraphicsColorsCreate("[WPCoach]")          GraphicsColorsAssign("[WPCoach]";DlgActiveTitle!;0;127;0)          GraphicsColorsAssign("[WPCoach]";DlgBackground!;255;255;175)          GraphicsColorsAssign("[WPCoach]";DlgBoldTextColor!;191;0;0)          ShowColor(On!;"[WPCoach]")          Error(Off!)          Break          Label(GraphDefaultScheme)          Display(Off!)   	 .h)5             DlgInput(On!)          GraphicsScreenOptionsDlg          Type("2")          If(?Entry="[WPCoach]")               ShowColor(On!;"[WPDefault]")          Else               ShowColor(On!;"[WPCoach]")          Endif          CancelDialogs()          DlgInput(Off!)     Endif     Error(Off!)     Display(On!)ENDPROC	   	 (

   //*********************************************//     FUNCTIONS   	 x    //*********************************************	   	 @   //*********************************************////     FUNCTION:PostIt   	 @   ////*********************************************FUNCTIONPostIt(Title;&tbox;xpos;ypos;Modal;Buttons;Steps)     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     If(Steps)          If((12+StrLen(StepText))>w)               w=StrLen(StepText)+12          Endif     Endif     ForNext(x;2;tbox[0])          tst=StrLen(tbox[x])          If(tst>w)               w=tst    p     	     
 //w=widthofinsideofbox   	 8             Endif     Endfor     If(Steps=0andButtons=0)          h=tbox[0]+2     Else          If(Steps=0)               h=tbox[0]+3          Else               h=tbox[0]+5    
 //h=heightofinsideofbox   	 @"             Endif     Endif     w=w+4     If(Buttons>0andButtons<5)          If(Buttons=1)               If(w<18)                    w=18               Endif          Else               If(w<32)                    w=32               Endif          Endif     Else          If(Buttons=5)               If(w<52)                    w=52               Endif          Endif   	 .h)5        Endif     If(Buttons=6)          h=h+2     EndIf     If(Modal)          If(xpos=99andypos=99)               DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;               ;;w;h)          Else               If(xpos<>99andypos=99)                    DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;                    xpos;;w;h)               Else                    If(xpos=99andypos<>99)                        D DlgCreate(Result;Title;                        D DlgNoOk!+DlgNoCancel!;                        D ;ypos+ScrnMode;w;h)                        D xpos=40w/2                    Else                        D DlgCreate(Result;Title;                        D DlgNoOk!+DlgNoCancel!;                        D xpos;ypos+ScrnMode;w;h)                    Endif               Endif          Endif     Else          If(xpos=99andypos=99)               DlgCreate(Result;Title;DlgInactive!+DlgNoClear!+               DlgNoOk!+DlgNoCancel!;               ;;w;h)          Else               If(xpos<>99andypos=99)                    DlgCreate(Result;Title;                    DlgInactive!+DlgNoClear!+                    DlgNoOk!+DlgNoCancel!;                    xpos;;w;h)               Else                    If(xpos=99andypos<>99)                    0    D DlgCreate(Result;Title;DlgInactive!+DlgNoClear!+  
  Dp&Dp&                          D DlgNoOk!+DlgNoCancel!;                        D ;ypos+ScrnMode;w;h)                        D xpos=40w/2                    Else                        D DlgCreate(Result;Title;                        D DlgInactive!+DlgNoClear!+                        D DlgNoOk!+DlgNoCancel!;                        D xpos;ypos+ScrnMode;w;h)                    Endif               Endif          Endif     Endif     If(Buttons=1)          DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";;w15;h2)   	 .h)5             DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";;w15;h2)          xposS1=0          xposS2=0          xposH1=0          xposH2=0          xposQ1=xpos+w15          xposQ2=xpos+w4          yposS1=ypos+h2     Else          If(Buttons=2orButtons=3)               If(Buttons=2)                    DlgControl(CtrlPushButton!;;"ShowMe";;w29;h2)                    DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";;w15;h 
 
 2)                    xposS1=xpos+w29                    xposS2=xpos+w18                    xposH1=0                    xposH2=0                    xposQ1=xpos+w15                    xposQ2=xpos+w4                    yposS1=ypos+h2                    ShowPosition(xposS1+3;yposS1+ScrnMode)               Else                    DlgControl(CtrlPushButton!;;"ShowMe";StyGray!;w29;h2)                    DlgControl(CtrlPushButton!;;"Quit...Esc";StyGray!;w15;h2)                    xposS1=0                    xposS2=0                    xposH1=0                    xposH2=0                    xposQ1=0                    xposQ2=0                    yposS1=0               Endif          Else               If(Buttons=4)                    DlgControl(CtrlPushButton!;;"Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 ";;w29;h 
 
 2)                    DlgControl(CtrlPushButton!;;"Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 ";;w29;h 
 
 2)   	 .h)5                       DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";;w15;h 
 
 2)                    xposS1=0                    xposS2=0                    xposH1=xpos+w29                    xposH2=xpos+w18                    xposQ1=xpos+w15                    xposQ2=xpos+w4                    yposS1=ypos+h2               Else                    If(Buttons=5)                        D DlgControl(CtrlPushButton!;;"ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w49;h2)                        D DlgControl(CtrlPushButton!;;"ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w49;h2)                        D DlgControl(CtrlPushButton!;;"Hint...>  r [BoldOn]?
   
 F1>   [BoldOff]?
   
 ";;w 
 
 29;h2)                        D DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";;w 
 
 15;h2)                        D xposS1=xpos+w49                        D xposS2=xpos+w32                        D xposH1=xpos+w29                        D xposH2=xpos+w18                        D xposQ1=xpos+w15                        D xposQ2=xpos+w4                        D yposS1=ypos+h2                    Else                        D If(Buttons=6)                        D     p DlgControl(CtrlPushButton!;;                        D     p "ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w20;h4;10;1)                        D     p DlgControl(CtrlPushButton!;;                        D     p "ShowMe...>  r [BoldOn]?
   
 Ctrl+S>   [BoldOff]?
   
 ";;w20;h4;10;1)                        D     p DlgControl(CtrlPushButton!;;                        D     p "Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";;w20;h2;10;1)                        D     p xposS1=xpos+w20                        D     p xposS2=xpos+w3                        D     p yposS1=ypos+h4                        D     p xposQ1=xpos+w20                        D     p xposQ2=xpos+w3                        D     p yposQ1=ypos+h2                   (     T                         0     \    	 P-(4                           D Else   	 .h)5                           D     p xposS1=1                        D     p xposS2=1                             D     p xposH1=1                        D     p xposH2=1                        D     p xposQ1=1                        D     p xposQ2=1                        D     p yposS1=1                        D Endif                    Endif               Endif          Endif     Endif     If(Steps)          DlgControl(CtrlLabel!;;     0     ">  r [BoldOn]?
   
 Step"+StepNum+""+StepText+">   [BoldOff]?
   
 ";;2;1;;1)  
  p&p&            ForNext(x;1;tbox[0])               DlgControl(CtrlLabel!;;tbox[x];;2;x+2;w1;1)          Endfor     Else          ForNext(x;1;tbox[0])               DlgControl(CtrlLabel!;;tbox[x];;2;x;w1;1)          Endfor     EndifDlgEndReturn(Result)ENDFUNC	   	    //*********************************************////     FUNCTION:NoBlock   	 @   ////*********************************************FUNCTIONNoBlock()     tbox={         D     p "Nothingisblocked.";   	 `	                           D     p "";                    }     Result=MessageBox(DefTitle;&tbox;1)     Return(Result)ENDFUNC	   	 H
   //*********************************************////     FUNCTION:NoSelect   	 @   ////*********************************************FUNCTIONNoSelect()     Result=1     If(?LeftCode=11241)          tbox={    D     p "Blockison,butnotext";   	 
@                           D     p "hasbeenselected.";                        D     p "";               }          Result=MessageBox("Coach";&tbox;1)     Endif     Return(Result)ENDFUNC	   	 h   //*********************************************////     FUNCTION:MessageBox   	 @   ////*********************************************FUNCTIONMessageBox(Title;&tbox;Buttons)     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)               w=tst    p     	     
 //w=widthofinsideofbox   	              Endif     Endfor     h=tbox[0]    D     p     	     
 //h=heightofinsideofbox   	 0        w=w+4     If(Buttons)          h=h+3     Else          h=h+2     Endif     If(Buttons=1)          DlgCreate(Result;Title;DlgNoCancel!;;;w;h)     Else          If(Buttons=2)               DlgCreate(Result;Title;;;;w;h)          Else               If(Buttons=0)               0     DlgCreate(Result;Title;DlgNoCancel!+DlgNoOk!+  
  p&p&                      DlgInactive!+DlgNoClear!;                    ;;w;h)               Else                    If(w<26)                        D w=26                    Endif               0     DlgCreate(Result;Title;DlgNoCancel!+DlgNoOk!;  
  p&p&                      ;;w;h)               Endif          Endif     Endif     If(Buttons=3)          DlgControl(CtrlPushbutton!;;"~Yes";;w23;h2)          DlgControl(CtrlPushbutton!;;"~No";;w12;h2)     Endif     If(Buttons=4)          DlgControl(CtrlPushbutton!;;"~Yes";;w35;h2)   	 .h)5             DlgControl(CtrlPushbutton!;;"~No";;w24;h2)          DlgControl(CtrlPushbutton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";StyCancel!;w 
 
 13;h2)     Endif     If(Buttons=5)          DlgControl(CtrlPushbutton!;;"~Yes";;w23;h2)          DlgControl(CtrlPushbutton!;;"~No";StyDefault!;w12;h2)     Endif     If(Buttons=6)          DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";StyCancel!;w 
 
 15;h2)     Endif     If(Buttons=7)          DlgControl(CtrlPushButton!;;"Continue";;w13;h2)     Endif     If(Buttons=8)          DlgControl(CtrlPushButton!;;"~Continue";;w30;h2)          DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 ";StyCancel!;w 
 
 15;h2)     Endif     ForNext(x;1;tbox[0])          DlgControl(CtrlLabel!;;tbox[x];;2;x;w1;1)     Endfor     DlgEnd     Return(Result)ENDFUNC	   	 8   //*********************************************////     FUNCTION:HotSpot   	 @   ////*********************************************FUNCTIONHotSpot(xpos1;ypos1;xpos2;ypos2;AltKey;&funkey;Execute)     Global(ChkMenu)     ChkMenu=1     If(funkey[1]=1)          funkey[0]=0     Endif     DlgInput(On!)     Show=0     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     Cancel(On!)     OnCancelCall(CancelCoach)     While(1)          Char(Key)          If(Key=8182)          
 //Enterkey   	 p                  Show=1                        D //Showmenu               Break          Endif          If(Key=768)               If((?MouseLeft)               and(?MouseLastX>=xpos1and?MouseLastX<=xpos2)̀               and(?MouseLastY>=ypos1and?MouseLastY<=ypos2))   	                     //Hotspot                    If(Execute)                        D Type(ntoc(Key))                        D Show=?DialogControl                    Endif                    While(?MouseLeft)                    EndWhile                    Break               Else                    If(?MouseLastY=(yposS1+ScrnMode))                        D If((?MouseLastX>=xposS1)and(?MouseLastX<=xposS2))               //Showbutton                        D     p Show=1                        D     p While(?MouseLeft)                        D     p EndWhile                        D     p Break                        D Else    	    	 *H&1                           D     p If((?MouseLastX>=xposH1)and(?MouseLastX<=xposH2))                        D     p     	 Show=2                        D     p     	 While(?MouseLeft)                        D     p     	 EndWhile   	 .h)5   Ї                        D     p     	 Break                        D     p Else                        D     p     	 If((?MouseLastX>=xposQ1)and(?MouseLastX<=xposQ2))                        D     p     	     
 While(?MouseLeft)                        D     p     	     
 EndWhile                        D     p     	     
 CancelCoach()                        D     p     	 Endif                        D     p Endif                        D Endif                    Endif               Endif          Endif          If(Key=AltKey)               //Acceleratorkey               Show=AltKey                        D //Accelmenu               Break          Endif          If(funkey[0]<>0)               If(Filter(&funkey;Key;2))                    Show=Key                        D //Executefunctionkey                    Break               Endif          Endif          If(Key=8085)          
 //Alt+Equalkeys   	 8                  PullDownDlg               Show=Key                        D //Choosemenu               Break          Endif     EndWhile     Cancel(Off!)     Return(Show)ENDFUNC	   	 @"   //*********************************************////     FUNCTION:DoEdit   	 @   ////*********************************************FUNCTIONDoEdit(EnableMouse;&chkcode;&keypress)     Global(Element)     If(keypress[1]=1)          keypress[0]=0     Endif     If(chkcode[1]=1)          chkcode[0]=0     Endif     Switch(FakeBtns)     CaseOf3:          Lft1a=45Lft1b=59          Lft2a=62Lft2b=76          Lft3a=0Lft3b=0     CaseOf4:          Lft1a=45Lft1b=59          Lft2a=62Lft2b=76          Lft3a=25Lft3b=42     CaseOf5:    D    	  P             Lft1a=45Lft1b=59          Lft2a=62Lft2b=76          Lft3a=28Lft3b=42     CaseOf6:          Lft1a=0Lft1b=0          Lft2a=62Lft2b=76          Lft3a=42Lft3b=59     CaseOf7:          Lft1a=0Lft1b=0          Lft2a=62Lft2b=76          Lft3a=45Lft3b=59     CaseOf8:          Lft1a=0Lft1b=0          Lft2a=62Lft2b=76          Lft3a=0Lft3b=0     DEFAULT:          Lft1a=51Lft1b=62          Lft2a=65Lft2b=76          Lft3a=0Lft3b=0     ENDSwitch   	 .h)5        Look(Key)     While(Key<>0)          Look(Key)     EndWhile     NotFound(On!)     OnNotFoundCall(NotFoundCoach)     Cancel(On!)     OnCancelCall(CancelCoach)     While(1)          Char(Key)          If(Key=768)               If((?MouseLastY<AreaHgtand?MouseLastY>1)               and(?MouseLastX>0and?MouseLastX<79)               and(EnableMouse)and(?MouseRightClick=0))                    Type(ntoc(Key))               Else                    If((?MouseLastX>=Lft1a)and(?MouseLastX<=Lft1b)and                    (?MouseLastY=(23+ScrnMode)))                        D Result=NoSelect()                        D If(Result<>2andFakeBtns)                        D     p Key=1                        D     p Break                        D Endif                    Else                        D If((?MouseLastX>=Lft2a)and(?MouseLastX<=Lft2b)and                        D (?MouseLastY=(23+ScrnMode)))                        D     p Call(CancelCoach)                        D Else                        D     p If((?MouseLastX>=Lft3a)and(?MouseLastX<=Lft3b)and                        D     p (?MouseLastY=(23+ScrnMode)))                        D     p     	 Key=3                        D     p     	 Break                        D     p Else                        D     p     	 While(?MouseLeft)                        D     p     	 EndWhile                        D     p Endif                        D Endif                    Endif               Endif          Else               If(Key<>8154andKey<>8146andKey<>8142andKey<>8139and               Key<>8124andKey<>8050andKey<>8160andKey<>8140and               Key<>8118andKey<>8115)                    //F7,Shft+F3,Shft+F7,Shft+F10                    //Ctrl+F1,Ctrl+S,Esc,Shft+F9,Ctrl+F7,Ctrl+F10                    If(Key=8112andchkcode[0]<>0)                        D If(CodeFilter(&chkcode;?LeftCode))                        D     p DeleteCharPrevious                        D     p Key=chkcode[Element]                        D     p Break                        D Endif   	 .h)5                       Endif                    If(Key=8111andchkcode[0]<>0)                        D If(CodeFilter(&chkcode;?RightCode))                        D     p DeleteCharNext                        D     p Key=chkcode[Element]                        D     p Break                        D Endif                    Endif                    Type(ntoc(Key))               Endif          Endif          If(?BlockActive)               BlockOff          Endif          If(keypress[0]<>0)               Result=Filter(&keypress;Key;1)               If(Result)                    Key=keypress[Result]                    Break               Endif          Endif          If(FakeBtns=4orFakeBtns=6)               If(Key=8050and?Dialog=1)    T //Ctrl+S   	 0                       Key=3                    Break               Endif          Endif          If(FakeBtns=5orFakeBtns=7)               If(Key=8158and?Dialog=1)    T //F1Key   	                        Key=3                    Break               Endif          Endif     EndWhile     NotFound(Off!)     Cancel(Off!)     Return(Key)ENDFUNC	   	 `"&   //*********************************************////     FUNCTION:MenuBarControl   	 @   ////*********************************************FUNCTIONMenuBarControl(Title;&hbox1;&sbox;xpos;ypos;MnuLtr;&funkey)     Global(ChkMenu;Element)     ChkMenu=1     If(sbox[1]=1)          sbox[0]=0     Endif     If(funkey[1]=1)          funkey[0]=0     Endif     Cancel(On!)     OnCancelCall(CancelCoach)     If(MnuLtr<91)          MnuLtr=MnuLtr+32     Endif     Switch(MnuLtr)     CaseOf102:    p     	     
 //(F)ile   	 0             allow={    p     	 310;   	                            D 321;               }          FileMenu(&valid)     CaseOf101:    p     	     
 //(E)dit   	              allow={    p     	 1476;   	 X                           D 1477;               }          EditMenu(&valid)     CaseOf118:    p     	     
 //(V)iew   	 @"             allow={    p     	 1503;   	  X#                           D 1504;               }          ViewMenu(&valid)     CaseOf108:    p     	     
 //(L)ayout   	 #@(             allow={    p     	 1532;   	 $ )                           D 1533;               }          LayoutMenu(&valid)     CaseOf116:    p     	     
 //(T)ools   	 (#.             allow={    p 1594;   	 h)$/                           D 1597;               }          ToolsMenu(&valid)     CaseOf111:    p     	     
 //F(o)nt   	 P-(4             allow={    p     	 1656;   	 .h)5                           D 1657;               }          FontMenu(&valid)     CaseOf103:    p     	     
 //(G)raphics   	              allow={    p     	 1868;   	 `	                           D 4466;               }          GraphicsMenu(&valid)     CaseOf119:    p     	     
 //(W)indow   	 H
             allow={    p     	 3522;   	 `	                           D 3569;               }          WindowMenu(&valid)     CaseOf104:    p     	     
 //(H)elp   	 H
             allow={    p     	 3708;   	                            D 4198;               }          HelpMenu(&valid)     ENDSwitch     MenuBar(&bar)     MenuPop(&pop)     Count=0Option=1LineDown=0ScrnRestore=0     While(?Dialog=2)          Char(Key)          FunKeyFlag=0          If(ScrnRestore)               SHOWCODE(RestoreScreen!)               ScrnRestore=0          Endif          Option=1          If(Key=768)               If(?MouseLeft)                    Type(ntoc(Key))                    Option=?DialogControl               Else                    If(Filter(&bar;0;0))                        D If(?MouseLastY<>0andbar[Element]=?DialogControl)                        D     p CancelMenus()                        D     p Option=1                        D     p Break                        D Endif                        D LineDown=1                    Endif                    If(Filter(&valid;0;0))                        D Option=?DialogControl                        D If(Filter(&bar;0;0))                        D     p PosLineDown   	 .h)5                           D Endif                        D Break                    Else                        D Count=Count+1                        D If(LineDown)                        D     p PosLineDown                        D     p LineDown=0                        D Else                        D     p If(Filter(&pop;0;0))                        D     p     	 PosCharNext                        D     p Endif                        D Endif                    Endif               Endif          Else          0     If(Key=8169orKey=8166orKey=8167or  
  p&p&                 Key=8168)                    Type(ntoc(Key))                    If(Filter(&allow;0;0))                        D Option=?DialogControl                        D Break                    Endif               Endif               If(Key=MnuLtr)                    Type(ntoc(Key))                    Option=Key                    Break               Endif               If(Key=8182)                    If(Filter(&bar;0;0))                        D HardReturn                        D If(Filter(&allow;0;0))                        D     p Option=?DialogControl                        D     p Break                        D Else                        D     p Count=Count+1                        D Endif                    Else                        D Count=Count+1                    Endif               Endif          Endif          If(funkey[0]<>0)               If(Filter(&funkey;Key;2))                    CancelMenus()                    DisplayRewrite                    Type(ntoc(Key))                        D //Executefunctionkey                    Option=Key                    FunKeyFlag=1                    Break               Endif          Endif          If(Count>1)   	 .h)5                  SHOWCODE(SaveScreen!)               Result=MessageBox("Coach";&hbox1;0)               Wait(5)               ScrnRestore=1               Count=0          Endif     EndWhile     Cancel(Off!)     If(sbox[0]<>0andOption<>1andFunKeyFlag=0)          Result=PostIt(Title;&sbox;xpos;ypos;0;0;0)     Endif     Return(Option)ENDFUNC	   	 `	   //*********************************************////     FUNCTION:MenuControl   	 @   ////*********************************************FUNCTIONMenuControl(&hbox1;&hbox2;&hbox3;&valid;&allow;&exallow;&accel;&exaccel;          &subval;&subacl;&exsubacl;&subs;&funkey)     Global(Element)     If(subs[1]=1)          subs[0]=0     Endif     If(funkey[1]=1)          funkey[0]=0     Endif     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     Cancel(On!)     OnCancelCall(CancelCoach)     MenuBar(&bar)     MenuPop(&pop)     subassgn[0]=0     AssignedSubs(&subassgn;valid[1])     If(ChkMenu)          If(Filter(&bar;0;0))               PosLineDown          Else               Execute=DlgFilter(&allow;&exallow)               If(Execute)                    Option=?DialogControl                    If(Execute=2)                        D HardReturn                        D DisplayRewrite                    Endif                    Break               Else                    If(Filter(&subs;0;0))                        D HardReturn                    Endif               Endif          Endif     Endif     Count=0Option=1LineDown=0ScrnRestore=0     While(?Dialog=2)   	 .h)5             Char(Key)          If(ScrnRestore)               SHOWCODE(RestoreScreen!)               ScrnRestore=0          Endif          Option=1          If(Key=768)               If(?MouseLeft)                    Type(ntoc(Key))                    Option=?DialogControl               Else                    If(Filter(&bar;0;0))                        D If(?MouseLastY<>0andbar[Element]=?DialogControl)                        D     p CancelMenus()                        D     p Option=1                        D     p Break                        D Endif                        D LineDown=1                    Endif                    Execute=DlgFilter(&allow;&exallow)                    If(Execute)                        D Option=?DialogControl                        D If(Execute=2)                        D     p HardReturn                        D     p DisplayRewrite                        D Endif                        D WHILE(?MouseRight)                        D     p Option=1                        D ENDWHILE                        D Break                    Else                        D Count=Count+1                        D If(LineDown)                        D     p PosLineDown                        D     p LineDown=0                        D Else                        D     p If(Filter(&pop;0;0))                        D     p     	 PosCharNext                        D     p Endif                        D Endif                    Endif               Endif          Else               If(Key=8160)                    CancelMenus()                    Option=1                    Break               Endif          0     If(Key=8169orKey=8166orKey=8167orKey=8168)  
  p&p&                      Type(ntoc(Key))               Else                    If(Key=8182)    L //Enterkey   	 P-(4                           D Execute=DlgFilter(&allow;&exallow)   	 .h)5                           D If(Execute)                        D     p Option=?DialogControl                        D     p If(Execute=2)                        D     p     	 HardReturn                        D     p     	 DisplayRewrite                        D     p Endif                        D     p Break                        D Else                        D     p If(Filter(&subs;0;0))                        D     p     	 HardReturn                        D     p Else                        D     p     	 Count=Count+1                        D     p Endif                        D Endif                    Else                        D If(Key>31andKey<127)                        D     p If(Filter(&valid;0;0))                        D     p     	 Execute=KeyFilter(&accel;Key;&exaccel)                        D     p     	 If(Execute)                        D     p     	     
 Option=Key                        D     p     	     
 If(Execute=2)                        D     p     	     
      Type(ntoc(Key))                        D     p     	     
 Endif                        D     p     	     
 If(subs[0]=0)                        D     p     	     
      Break                        D     p     	     
 Endif                        D     p     	 Else                        D     p     	     
 Count=Count+1                        D     p     	 Endif                        D     p Else                        D     p     	 If(subs[0])                        D     p     	 0    
 If(Filter(&subval;0;0))  
  
p&
p&                          D     p     	     
      Execute=KeyFilter(&subacl;Key;&exsubacl)                        D     p     	     
 0     If(Execute)  
  p&p&                          D     p     	     
      0     
 Option=Key  
   
p& 
p&                          D     p     	     
           
 If(Execute=2)                        D     p     	     
           
 0    L Type(ntoc(Key))  
  Lp&Lp&                          D     p     	     
           
     L DisplayRewrite                        D     p     	     
           
 Endif                        D     p     	     
           
 Break                        D     p     	     
      Else                        D     p     	     
           
 Count=Count+1                        D     p     	     
      Endif                        D     p     	     
 Else                        D     p     	     
      Count=Count+1                        D     p     	     
 Endif                        D     p     	 Else                        D     p     	     
 Count=Count+1                        D     p     	 Endif                        D     p Endif                        D Endif                    Endif               Endif          Endif   	 .h)5             If(funkey[0]<>0)               If(Filter(&funkey;Key;2))                    CancelMenus()                    DisplayRewrite                    Type(ntoc(Key))                        D //Executefunctionkey                    Option=Key                    Break               Endif          Endif          If(Count>1)               SHOWCODE(SaveScreen!)          0     If(Filter(&subval;0;0))  
  p&p&                      Result=MessageBox("Coach";&hbox3;0)               Else               0     If(Filter(&subassgn;0;0))  
  p&p&                          D Result=MessageBox("Coach";&hbox2;0)                    Else                        D If(Filter(&valid;0;0))                        D     p Result=MessageBox("Coach";&hbox2;0)                        D Else                        D     p Result=MessageBox("Coach";&hbox1;0)                        D Endif                    Endif               Endif               Wait(5)               ScrnRestore=1               Count=0          Endif     EndWhile     Cancel(Off!)     Return(Option)ENDFUNC	   	      //*********************************************////     FUNCTION:ButtonControl   	 @   ////*********************************************FUNCTIONButtonControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpm 
 
 sg)     Global(Element)     If(SaveScrn=0andinfo[9])          SHOWCODE(SaveScreen!)          SaveScrn=1     Endif     Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdjScrnMode);0;info[7];0)     CancelMsg=0     Cancel(On!)     OnCancelCall(CancelCoach)     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     If(accel[1]=1)          accel[0]=0     Endif     Count=0     While(?DialogControl=info[1]and?Dialog=info[2])          Char(Key)          If(Key=768)               If(?MouseLeftandXYFilter(&x1;&x2;&y1;&y2))                    Type(ntoc(Key))                    While(?MouseLeft)                    EndWhile                    If(hotpnt[Element]=2)                        D Wait(5)                        D If(?MouseLeftDouble)                        D     p SHOWCODE(RestoreScreen!)                        D     p HardReturn                        D Endif                    Endif                    If(hotpnt[Element]=1)                        D SHOWCODE(RestoreScreen!)                    Endif                    Type(ntoc(hotkey[Element]))                    If(hotpnt[Element]=0)                        D Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                    Endif               Else                    If(?MouseLastY=(yposS1+ScrnMode))                        D If((?MouseLastX>=xposS1)and(?MouseLastX<=xposS2))   	 .h)5                           D     p Key="Show"                        D     p Break                        D Else                        D     p If((?MouseLastX>=xposH1)and(?MouseLastX<=xposH2))                        D     p     	 Key="Hint"                        D     p     	 Break                        D     p Else                        D     p     	 If((?MouseLastX>=xposQ1)and(?MouseLastX<=xposQ2))                        D     p     	     
 CancelCoach()                        D     p     	 Else                        D     p     	     
 Count=Count+1                        D     p     	 Endif                        D     p Endif                        D Endif                    Else                        D Count=Count+1                    Endif               Endif          Else               If(Key=8182andKey<>8160)    T //Enter   	                        If(info[9])                        D SHOWCODE(RestoreScreen!)                    Endif                    Type(ntoc(Key))               Else                    If(Key=8183orKey=8098orKey=8182or                    Key=8166orKey=8169orKey=8167orKey=8168or                    Key=8103orKey=8102orKey=8184)                        D //Tab,Shft+Tab,Enter                        D //Down,Up,Left,Right                        D //PgUp,PgDown,Home                        D Type(ntoc(Key))                    Else                        D If(accel[0]<>0)                        D     p If(Filter(&accel;Key;1))                        D     p     	 If(aclpnt[Element])                        D     p     	     
 SHOWCODE(RestoreScreen!)                        D     p     	 Endif                        D     p     	 Type(ntoc(Key))                        D     p Else                        D     p     	 Count=Count+1                        D     p Endif                        D Else                        D     p Count=Count+1                        D Endif                    Endif               Endif          Endif          If(Key=8158)               Key="Hint"               Break          Endif          If(Key=8050andxposS1<>0)   	 .h)5                  Key="Show"               Break          Endif          If(Count>1)               Result=MessageBox(info[8];&helpmsg;1)               Count=0          Endif          If(info[10]=1)               If(?Substructureor?EditScreen)                    Cancel(Off!)                    CancelMsg=1                    Return(Key)               Endif     Endif     EndWhile     Cancel(Off!)     CancelMsg=1     Return(Key)ENDFUNC	   	    //*********************************************////     FUNCTION:WinEdControl   	 @   ////*********************************************FUNCTIONWinEdControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpms 
 
 g)     Global(Element)     If(SaveScrn=0andinfo[9])          SHOWCODE(SaveScreen!)          SaveScrn=1     Endif     Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdjScrnMode);0;info[7];0)//*********************************************//     Thenextcommandisaremedyforabug   	 H
   //*********************************************If(info[10])     PosCharNext     PosCharPreviousEndif//*********************************************//*********************************************//*********************************************//     Thenextcommandisaremedyforabug   	 X   //*********************************************     Global(BugFix)     BugFix=1//*********************************************//*********************************************     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     If(accel[1]=1)          accel[0]=0     Endif     CancelMsg=0     Cancel(On!)     OnCancelCall(CancelCoach)     Count=0     While(?DialogControl=info[1]and?Dialog=info[2])          Char(Key)   	 .h)5             If(Key=768)               If(?MouseLeftandXYFilter(&x1;&x2;&y1;&y2))                    Type(ntoc(Key))                    While(?MouseLeft)                    EndWhile                    If(hotpnt[Element]=2)                        D Wait(5)                        D If(?MouseLeftDouble)                        D     p SHOWCODE(RestoreScreen!)                        D     p HardReturn                        D Endif                    Endif                    If(hotpnt[Element]=1)                        D SHOWCODE(RestoreScreen!)                    Endif                    If(Element<>HotElement)                        D Type(ntoc(hotkey[Element]))                    Endif                    If(hotpnt[Element]=0)                        D Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                    Endif               Else                    If(?MouseLastY=(yposS1+ScrnMode))                        D If((?MouseLastX>=xposS1)and(?MouseLastX<=xposS2))                        D     p Key="Show"                        D     p Break                        D Else    	    	                            D     p If((?MouseLastX>=xposH1)and(?MouseLastX<=xposH2))                        D     p     	 Key="Hint"                        D     p     	 Break                        D     p Else                        D     p     	 If((?MouseLastX>=xposQ1)and(?MouseLastX<=xposQ2))                        D     p     	     
 CancelCoach()                        D     p     	 Else                        D     p     	     
 Count=Count+1                        D     p     	 Endif                        D     p Endif                        D Endif                    Else                        D Count=Count+1                    Endif               Endif          Else               If(accel[0]<>0)                    If(Filter(&accel;Key;1))                        D If(aclpnt[Element]=1)                        D     p If(aclpnt[Element])                        D     p     	 SHOWCODE(RestoreScreen!)                        D     p Endif                        D     p Type(ntoc(Key))                        D Endif                    Else   	 .h)5                           D If(Key<>8160)                        D     p Type(ntoc(Key))                        D Endif                    Endif               Else                    If(Key<>8160)                        D Type(ntoc(Key))                    Endif               Endif               If(Key=8182orKey=8183)                    If(?Dialog=info[2])                        D Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                    Endif                    //*********************************************                    //    p Thenextcommandisaremedyforabug   	 0                       //*********************************************                    If(?DialogControl=info[1]andinfo[10])                        D PosCharNext                    Endif                    //**********************************************               Endif          Endif          If(Key=8158)               Key="Hint"               Break          Endif          If(Key=8050andxposS1<>0)               Key="Show"               Break          Endif          If(Count>1)               Result=MessageBox(info[8];&helpmsg;1)               Count=0          Endif     EndWhile     Cancel(Off!)     CancelMsg=1     Return(Key)ENDFUNC	   	 $ )   //*********************************************////     FUNCTION:LstBxControl   	 @   ////*********************************************FUNCTIONLstBxControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&helpms 
 
 g)     Global(Element)     If(SaveScrn=0andinfo[9])          SHOWCODE(SaveScreen!)          SaveScrn=1     Endif     Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdjScrnMode);0;info[7];0)//*****************************//thisisabugfix//**************************If(info[10]=2)     PosLineDown     PosLineUpEndIf//**************************//***************************//*****************************//thisisabugfix//**************************If(info[10]=3)     PosLineUp     PosLineDownEndIf//**************************//***************************     CancelMsg=0     Cancel(On!)     OnCancelCall(CancelCoach)     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     Count=0     While(?DialogControl=info[1]and?Dialog=info[2])          Char(Key)          If(Key=768)               If(?MouseLeftandXYFilter(&x1;&x2;&y1;&y2))                    Type(ntoc(Key))                    While(?MouseLeft)                    EndWhile                    If(hotpnt[Element]=2)                        D Wait(5)                        D If(?MouseLeftDouble)                        D     p SHOWCODE(RestoreScreen!)                        D     p HardReturn   	 .h)5                           D     p If(?DialogControl=info[1]and?Dialog=info[2])    8"    	                               D     p     	 SHOWCODE(SaveScreen!)                        D     p     	 SaveScrn=1                        D     p     	 Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                        D     p Endif                        D Endif                    Endif                    If(hotpnt[Element]=1)                        D SHOWCODE(RestoreScreen!)                    Endif                    Type(ntoc(hotkey[Element]))                    If(hotpnt[Element]=0)                        D Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                    Endif               Else                    If(?MouseLastY=(yposS1+ScrnMode))                        D If((?MouseLastX>=xposS1)and(?MouseLastX<=xposS2))                        D     p Key="Show"                        D     p Break                        D Else    	    	 h                           D     p If((?MouseLastX>=xposH1)and(?MouseLastX<=xposH2))                        D     p     	 Key="Hint"                        D     p     	 Break                        D     p Else                        D     p     	 If((?MouseLastX>=xposQ1)and(?MouseLastX<=xposQ2))                        D     p     	     
 CancelCoach()                        D     p     	 Else                        D     p     	     
 Count=Count+1                        D     p     	 Endif                        D     p Endif                        D Endif                    Else                        D Count=Count+1                    Endif               Endif          Else               If(Key=8182orKey=8166orKey=8169or                    Key=8103orKey=8102orKey=8184or                    Key=8183orKey=8098)                    //Enter,Dwn,Up                    //PgUp,PgDwn,Home                    //Tab,Shft+Tab                    If(Key=8182andInfo[9])                        D SHOWCODE(RestoreScreen!)                    Else                        D Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                    Endif                    Type(ntoc(Key))               Else                    If(Filter(&accel;Key;1))                        D If(aclpnt[Element])   	 .h)5                           D     p SHOWCODE(RestoreScreen!)                        D     p Type(ntoc(Key))                        D Else                        D     p Type(ntoc(Key))                        D     p Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                        D Endif                    Else                        D Count=Count+1                    Endif               Endif          Endif          If(Key=8158)               Key="Hint"               Break          Endif          If(Key=8050andxposS1<>0)               Key="Show"               Break          Endif          If(Count>1)               Result=MessageBox(info[8];&helpmsg;1)               Count=0          Endif     EndWhile     Cancel(Off!)     CancelMsg=1     Return(Key)ENDFUNC	   	    //*********************************************////     FUNCTION:InvalidControl   	 @   ////*********************************************FUNCTIONInvalidControl(&info;&x1;&x2;&y1;&y2;&hotkey;&hotpnt;&accel;&aclpnt;&tbox;&help 
 
 msg;          &allow)     Global(Element)     If(SaveScrn=0andinfo[9])          SHOWCODE(SaveScreen!)          SaveScrn=1     Endif     Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdjScrnMode);0;info[7];0)     CancelMsg=0     Cancel(On!)     OnCancelCall(CancelCoach)     Look(Key)     While(Key<>0)          Look(Key)     EndWhile     Result=0Count=0     While(1)          Char(Key)          If(Key=768)               If(?MouseLeftandXYFilter(&x1;&x2;&y1;&y2))                    Type(ntoc(Key))                    While(?MouseLeft)                    EndWhile                    If(hotpnt[Element]=2)                        D Wait(5)                        D If(?MouseLeftDouble)                        D     p SHOWCODE(RestoreScreen!)                        D     p HardReturn                        D Endif                    Endif                    If(hotpnt[Element]=1)                        D SHOWCODE(RestoreScreen!)                    Endif                    Type(ntoc(hotkey[Element]))                    If(hotpnt[Element]=0)                        D Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                    Endif                    Result=2    
      //Lostcontrolduetomouseclick   	 *H&1                       Break               Else                    If(?MouseLastY=(yposS1+ScrnMode))   	 .h)5                           D If((?MouseLastX>=xposS1)and(?MouseLastX<=xposS2))                        D     p Result="Show"                        D     p Break                        D Else    	    	 X                           D     p If((?MouseLastX>=xposH1)and(?MouseLastX<=xposH2))                        D     p     	 Result="Hint"                        D     p     	 Break                        D     p Else                        D     p     	 If((?MouseLastX>=xposQ1)and(?MouseLastX<=xposQ2))                        D     p     	     
 CancelCoach()                        D     p     	 Else                        D     p     	     
 Count=Count+1                        D     p     	 Endif                        D     p Endif                        D Endif                    Else                        D Count=Count+1                    Endif               Endif          Else               If(Key=8183orKey=8098orKey=8167orKey=8168)                    //Tab,Shft+Tab,Left,Right                    Type(ntoc(Key))                    If(Filter(&allow;0;0))                        D Result=1          
 //LostcontrolduetoTabkey   	 p                           D Break                    Else                        D Result=PostIt(info[4];&tbox;info[5];info[6]+(MsgAdj 
 
 ScrnMode);0;info[7];0)                    Endif               Else                    If((Key=8166orKey=8169)and(info[3]=1))                        D //Up,Down                        D Type(ntoc(Key))                        D If(Filter(&allow;0;0))                        D     p Result=1     
     L //LostcontrolduetoTabkey   	  X#                           D     p Break                        D Endif                    Else                        D If(Filter(&accel;Key;1))                        D     p If(aclpnt[Element])                        D     p     	 SHOWCODE(RestoreScreen!)                        D     p Endif                        D     p Type(ntoc(Key))                        D     p Break          
     L     x //Lostcontrolduetoanacceleratorkey   	 '`",                           D Else                        D     p Count=Count+1                        D Endif                    Endif               Endif          Endif          If(Key=8158)               Result="Hint"               Break   	 .h)5             Endif          If(Key=8050andxposS1<>0)               Result="Show"               Break          Endif          If(Count>1)               Result=MessageBox(info[8];&helpmsg;1)               Count=0          Endif     EndWhile     Cancel(Off!)     CancelMsg=1     Return(Result)ENDFUNC	   	 (

   //*********************************************////     FUNCTION:OpenDocument   	 @   ////*********************************************FUNCTIONOpenDocument(&tbox)     Result=0     Display(On!)     If(?DocBlank)          If(tbox[1]=1)               tbox={    p "Thedocumentscreenisblank.Wouldyou";   	 
                           D     p "liketoopenafile?";                        D     p "";                        D }          Endif    D     p     	    	 
             Result=MessageBox(DefTitle;&tbox;3)          If(Result=1)               Repeat                    DlgInput(On!)                    FileOpenDlg                    tbox={0    	 "Typeafilename,thenpress>  r [BoldOn]?
   
 Enter>   [BoldOff]?
   
 .";    P 	p&	p&                          D     p     	 "or";                        D     p     	 "Choose>  r [BoldOn]?
   
 FileManager>   [BoldOff]?
   
 Ԁ(F5)tofinda   	 >   file.";                        D     p }                    Result=PostIt(DefTitle;&tbox;99;18+(MsgAdjScrnMode);0;0;0)                    PosCharNext                    PosCharPrev                    DlgInput(Off!)                    DisplayRewrite                    If(?DocBlank=0)                        D tbox={    
 "Isthisthedocumentthatyouwant?";   	 T                           D     p     	     
 "";                        D     p }                        D Result=MessageBox(DefTitle;&tbox;3)                        D If(Result=2)                        D     p ClearDoc                        D Endif                    Else                        D tbox={    
 "Adocumenthasnotbeenopened.";   	 D#'                           D     p     	     
 "";                        D     p }                        D Result=MessageBox(DefTitle;&tbox;1)                        D Result=1                    Endif               Until(Result=1)          Else               Result=1          Endif     Endif     Return(Result)ENDFUNC	   	 ,'3   //*********************************************////     FUNCTION:XYFilter   	 @   ////*********************************************FUNCTIONXYFilter(&x1;&x2;&y1;&y2)     Result=0     ForNext(x;1;x1[0])          If((?MouseLastX>=x1[x]and?MouseLastX<=x2[x])and          (?MouseLastY>=y1[x]+MsgAdjand?MouseLastY<=y2[x]+MsgAdj))               Result=x               Element=x               Break          Endif     Endfor     Return(Result)ENDFUNC	   	 0   //*********************************************////     FUNCTION:Filter   	 @   ////*********************************************FUNCTIONFilter(&array;Key;Accel)     Result=0     ForNext(x;1;array[0])          If(Accel=1)               If(Key=array[x]orKey=array[x]32)                    Result=x                    Element=x                    Break               Endif          Else               If(Accel=2)                    If(Key=array[x])                        D Result=x                        D Element=x                        D Break                    Endif               Else                    If(?DialogControl=array[x])                        D Result=x                        D Element=x                        D Break                    Endif               Endif          Endif     Endfor     Return(Result)ENDFUNC	   	 8   //*********************************************////     FUNCTION:CodeFilter   	 @   ////*********************************************FUNCTIONCodeFilter(&array;Code)     Result=0     ForNext(x;1;array[0])          If(code)               If(Code=array[x])                    Result=x                    Element=x                    Break               Endif          Endif     Endfor     Return(Result)ENDFUNC	   	 H
   //*********************************************////     FUNCTION:KeyFilter   	 @   ////*********************************************FUNCTIONKeyFilter(&array;Key;&brk)     Result=0     ForNext(x;1;array[0])          If(Key=array[x]orKey=array[x]32)               If(brk[x]=1)                    Result=2               Else                    Result=1               Endif               Break          Endif     Endfor     Return(Result)ENDFUNC	   	    //*********************************************////     FUNCTION:DlgFilter   	 @   ////*********************************************FUNCTIONDlgFilter(&array;&brk)     Result=0     ForNext(x;1;array[0])          If(?DialogControl=array[x])               If(brk[x]=1)                    Result=2               Else                    Result=1               Endif               Break          Endif     Endfor     Return(Result)ENDFUNC	   	    //*********************************************////     FUNCTION:DlgMessage   	 @   ////*********************************************FUNCTIONDlgMessage()     Switch(?ScreenHigh)     CaseOf24:          Result=0     CaseOf49:          Result=12     ENDSwitch     Return(Result)ENDFUNC	   	 H
   //*********************************************////     FUNCTION:Welcome   	 @   ////*********************************************FUNCTIONWelcome(Title;&tbox)     w=StrLen(tbox[1])     If(w<30)          w=30     Endif     tst=StrLen(Title)     If(tst>w)          w=tst     Endif     ForNext(x;2;tbox[0])          tst=StrLen(tbox[x])          If(tst>w)               w=tst    p     	     
 //w=widthofinsideofbox   	              Endif     Endfor     h=tbox[0]    D     p     	     
 //h=heightofinsideofbox   	 h        w=w+4h=h+4     DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;;;w;h)     DlgControl(CtrlPushButton!;;"Continue";;w33;h2)     DlgControl(CtrlPushButton!;;"Quit...>  r [BoldOn]?
   
 Esc>   [BoldOff]?
   
 Ԁ";StyCancel!;w 
 
 17;h2)     ForNext(x;1;tbox[0])          DlgControl(CtrlLabel!;;tbox[x];;2;x;w1;1)     Endfor     DlgEnd     Return(Result)ENDFUNC	   	 @"   //*********************************************////     FUNCTION:Hint   	 @   ////*********************************************FUNCTIONHint(&tbox;xpos;ypos;Buttons)     w=StrLen(tbox[1])     If(w<30)          w=30     Endif     ForNext(x;2;tbox[0])          tst=StrLen(tbox[x])          If(tst>w)               w=tst    p     	     
 //w=widthofinsideofbox   	 
             Endif     Endfor     h=tbox[0]    D     p     	     
 //h=heightofinsideofbox   	 H
        w=w+4h=h+4     key=0     If(Buttons=1)          Title="Hint"     Else          If(Buttons=2)        	                   Title="QuickTip"          Else               If(Buttons=3)                    Title="Hint"               Else                    Title="QuickTip"               Endif          Endif     Endif     If(xpos=99andypos=99)          DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;          ;;w;h)     Else          If(xpos<>99andypos=99)               DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;xpos;;               w;h)          Else               If(xpos=99andypos<>99)               0     DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;;  
  p&p&                      ypos+ScrnMode;w;h)               Else                    DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;                    xpos;ypos+ScrnMode;w;h)               Endif          Endif     Endif     If(Buttons=1)          DlgControl(CtrlPushButton!;;"~ReturntoCoach";;w20;h2)          DlgControl(CtrlPushButton!;;"~ShowMe";;w31;h2)   	 .h)5        Else          If(Buttons=2)               DlgControl(CtrlPushButton!;;"~Continue";;w14;h2)               DlgControl(CtrlPushButton!;;"~ShowMe";;w25;h2)          Else               If(Buttons=3)                    DlgControl(CtrlPushButton!;;"~ReturntoCoach";;w20;h2)               Else                    DlgControl(CtrlPushButton!;;"~Continue";;w14;h2)               Endif          Endif     Endif     ForNext(x;1;tbox[0])          DlgControl(CtrlLabel!;;tbox[x];;2;x;w1;1)     Endfor     DlgEnd//*********************************************//     Thenextcommandisaremedyforabug   	    //*********************************************     If(Exists(BugFix))          PosCharNext          PosCharPrevious          DISCARD(BugFix)     Endif//*********************************************//*********************************************     Return(Result)ENDFUNC	   	      //*********************************************////     FUNCTION:Overview   	 @   ////*********************************************FUNCTIONOverview(Title;&tbox;Buttons)     w=StrLen(tbox[1])     If(w<30)          w=30     Endif     tst=StrLen(Title)     If(tst>w)          w=tst     Endif     ForNext(x;2;tbox[0])          tst=StrLen(tbox[x])          If(tst>w)               w=tst    p     	     
 //w=widthofinsideofbox   	              Endif     Endfor     h=tbox[0]    D     p     	     
 //h=heightofinsideofbox   	 h        w=w+4h=h+4     DlgCreate(Result;Title;DlgNoOk!+DlgNoCancel!;;;w;h)     DlgControl(CtrlPushButton!;;"Prev";;w33;h2)     DlgControl(CtrlPushButton!;;"Next";;w24;h2)     DlgControl(CtrlPushButton!;;"Cancel";StyCancel!;w15;h2)     ForNext(x;1;tbox[0])          DlgControl(CtrlLabel!;;tbox[x];;2;x;w1;1)     Endfor     DlgEnd     Return(Result)ENDFUNC  	   	 @"    