[net.sources.mac] Mousometer DA

darin@tmq.UUCP (Darin Adler) (03/03/85)

Well, I got the "Mousometer" desk accessory done faster than I thought I would.
It is here, in BinHex format (not 4.0, since I like to use xbin).  It does
interesting things besides just reporting the mouse's position.  If you hold
down the option key (a MacPaint-type undocumented feature), the coordinates
are displayed local to the window that the mouse is over.  The cut, copy, and
paste functions are implemented.  The cut/copy reads the y coordinate and then
the x coordinate, separated by a tab.  The paste function does something
interesting; try it and find out.

Due to a little laziness on my part, the file that I am posting here contains
both the Mousometer and the latest version of SkipFinder (4.3).  There is only
one difference between 4.2 and 4.3.  When I added the Tab feature to the
accessory (Tab functions like the Drive button), I neglected to make it work
in the document selection dialog as well as in the application selection
dialog.  Now the Tab feature works in both.  Judge for yourself if it is an
important change.

Thank you very much to those who sent me comments on SkipFinder!  Please do
not hesitate to send me a message about either of these accessories.

Because of an exciting idea I recently got and a number of other things, I
won't be working on the MacPaint document accessory for a while (at least a
month or so).  However, be on the lookout for a useless, but quite crazy,
desk accessory (or application) in the next couple of weeks.


Darin Adler
ihnp4!tmq!darin


----------CUT HERE----------
(This file must be converted with BinHex.Hex)
#DESKDAMV$0000
***COMPRESSED
***DATA FORK
(  >   $2@L 36]U<V]M971E<@ < !  @  '8;1ACB $
( ! #*0 0 OH   &(@   @  $ "5 )L        (-   
(,L  $ /U@! #%X 0 NV $     )          H    '
(&'\  %0*@#'_____P  __\  /@           H    '
(&(<  $%'  '850 0(=H  =B-@ !    J?____\  /__
(   ^    /__   #____    JO____\  /__  #@    
(/__   #_P! 5S@ !]M>  =A:  '8DX 0(9* _______
(/_____\        "@ *  #__P "    "@ *    I   
(        "0   0!2@   #  6@!N %H 8 I-;W5S;VUE
('1E<@ F2"A)64](5ZAT(E\@5RZ)3M!A[$JL !YF(EE/
('  3KH#O#\ 3KH#QD*G</\O *E\)E\I2P >-VP & !L
(*AS< !.=6&\+RP 'D*L !ZI@V#L3KK_KC@K !HP! 1 
( ! :]QG(E= :Q)70&O29P "(%5 :P "&F<  1Q.N@+6
(&>^3KH#3&"X)FL ' QK  ,  &8R"#@    .9RH@*P "
( (  -\,  !#9P !Y@P  %AG  '>#   5F<  -P_/  *
(*G(3OK_?"\+#&L "   9@@@54AH_Y2H4297#&L !@  
(&983KH"<$ZZ NA.N@(,)FP 'DY6__)!ZP 0(DYP!C,@
(%'(__PP*  ,D&@ ".9 "(   #%   0R*  *DF@ !L'!
(*,>9PY!ZP "< 8PV5'(__Q@!"=(  (O+@ $)E=13R\+
($AO  A(;P *J8!03R9?#&L !@  9@#^ZB9L !XD:P "
(+7N__)G*$'K ! B3G &,B$RH#"!4<C_^"\)+PA(:0 &
("\7/SP  $*GJ.P@2J ?3EXF7T[Z_JQP *$B9@#^I"1(
(%%/+PHO/%1%6%1(;P ,J?T@'UA/2H!K /\$($J@)2P 
(")2859F /[V3KH >F8 _NX^ 6$Z9@#^YDZZ &IF /[>
($A'/@%*1F<&821F /[0($J@(ZA20.< ?  P(<<(*"''
( @L4/@(SD;?J%-.^OXT2D9G+F$89BI225-&2D9G"F$,
(&8&4DE31F#R< !.=1 1#   (&?T#   "6?N#   #6?H
('#_3G5Z '( 2D9G]! 1#   +68(4,5225-&9^00$00 
(  P92(,   )8APT >=!:0SC0M)":09(@-) : 0R/'__
(%))4T9FUDH%9P)$07  3G5.5O_R83I'[O_R=@ 6&T?S
(#  %OP "5(#1>[_^10:U@)3 F4$%MI@^%E/J?PO R\\
(%1%6%1(;O_SJ?Y.7D[Z_7(F;  >+BL F# '2,!![O_Y
(#\\  "I[DA', =(P$'N__(_/   J>Y.=4Y6__)ATGP&
(!H\ ,I%[O_R3KH '$7N__E.N@ 42&[_\DAN__E"IT*G
(*F+3EY.=7  $!JP!F0  "051O__,@9!\@  0_(0 %,!
(%, 9003(&#V4@%3 64$$P5@^$YU3E;_\'  0>[_\* P
("XN__I=3R\'2&\ !JDL.A\L'V<D""X  __^9PPO!JAS
(%E/2%>I<BX?O*P 'F8*(%5(:/^482I@% Q%  %G\%E/
(#\\  *IN2!?+Q!A%$Y>)FP 'KZK )AG!B=' )AP_TYU
("1?#$0 0F<$6$].TJA13M(F;  >+PNH<TAK !"I*$YU
( ! P  R+  81D'K28!!3G4_ %E/+SQ$3$]'/P"IH"!?
(*!*(% Q7P 22J@  &8@*%4R+/^0DF@ !%5!2$$R+/^2
())H  9504AH   O :BH3G7#P    !0$1$E43  @  ! 
( Q> $ +M@       /__  #__P  __\ ,/__!+8   OR
(     $   50   !4        !:RX $D_@ 'IM0  "YJ
( ! /OP 0$E>         %P        +\@        50
(    5  !URD   /=@  &>8 0" $ $ 1B(  1C( 0!$N
(" 4 $ 2+   "_(    !   $   7Y     %0@ !&,@  
(!KHX $B!  'IM0  "YJ   ;& ! $'0   .D $!%Z   
( !<   !!@  &>8!4"   $!%Y@! $8B  $8R $ 1+B 4
( ! $BP   OP     0  !   %^               P  
(  4 &2(!%XP7C'#P    !\$1$Q/1P @  ! #%X 0 NV
(        /__  #__P  __\ ,/__!+8   OR     0  
( 50   !4        !:RX $D_@ 'IM0  "YJ $ ^_ ! 
($E>         %P        +\@        50   !4  '
(%RD   /=@  &>8 0" $ $ 1B(  1C( 0!$N(!0 0!(L
(   "_(    !   $   7Y     %0@ !&,@  &NC@ 2($
(  'IM0  "YJ   ;& ! $'0   .D $!%Z    %P   $&
(   &>8!4"   $!%Y@! $8B  $8R $ 1+B 4 $ 2+   
( OP     0  !   %^           !0 >@ 0 0 !    
(   P\ *36]U<V]M971E<@ ;   !/@L 4VMI<$9I;F1E
('+_____________________________ $ ,7@! "[8 
(    0 *      ! "^A0*@    \   #5@    (    =B
(!H !V(2  =A_  '8BX@! ! #%X 0 NV       *    
(   "@ "       *    !V(<  $%'  '850 0(=H  =B
(#8  0   *G_____  #__P  ^    /__   #____    
(*K_____  #__P  X    /__   #_P! 5S@ !]M>  =A
(&@ !V). $"&2@/____________\        "@ *  #_
(/\  @    H "@   *0                      !X 
((X C@". (X*4VMI<$9I;F1E<@ D238J !@*0___ZTL 
($/  "!X"NBQ^ *F95JQ^ *J9%120UE/+SQ!3%)4/P.I
(* @7R!0,4, "$JH  !F(BA5<  P+/^0D&@ !.) 2$ P
("S_DI!H  ;B0$AH   O *BH64](5ZAT54\_ T*GJ84P
(!^H<W  3G4B/    'H@ :1 ( &E(J I(<@*Z")00?@*
(.@BR# \ "ZA1B+(,L-!^@ 4(#P   !PH"X@23 \ "Z@
($=@P+/\   )$&8<2.> @'  0_@"X! 82$ 0&: \9PY,
(-\! 4/X"1 O.O_43G5P $'X N!#^ D0$!A(0! 9H#QG
(-Y93R\\4TM)4#\Z_[:IH" ?9\Q*> I@9L8@0" 0P+@#
(!H@0%!/+SK_EDAZ_XX_.O^23M##8    RX$4TM)4  @
(   0 Q> $ +M@       /__  #__P  __\  $86  !%
(+@  $16 )__^B $  !%J   1!P  $)T           -
("T   ! /OP 0$E>         %P        +]       
(  (E0   )4 !URD   /=@  &>8 0" $ $ 1B(  1C( 
($ 1+B 4 $ 2+   "_0    !   (   7Z     "5@ !&
(#(  !KH  ==#  'IM0  "YJ   ;& ! $'0   .D $!%
(.@   !<   !CP  &>8 E2   $!%Y@! $8B  $8R $ 1
("X@% ! $BP   OS     0  "   %^8   !.5O]L0K@*
(/)!^O_VH2B@*2\(J9)(;?_\J&ZH_JD20J>I>ZG,J% P
(#@) &\(/P"IFD)X"0 @> I0L?@*5&<*(% _*  4J9I@
(.QP)T)G4<C__"!/(G@#6$*H !(Q:0!. !9*:0!(9@I*
(&D 2FL$H Y@XJ 3(FD  " )9N!!^@*L0E P+@ $3KH!
(*HO 4AZ J!(>@':/SP  DAZ HA(>@(42&[_MC\N  1"
(*<_/  $J>I*+O^V9P !7$'Z G!*$&<6(&X "C \ "Z@
($<@;@ &(E!"D:$HH"-"+O]L0?H"3DHH  %G9B!/,6[_
(+P %J 50F@ &$/N_\ A20 2H Q#^@(L(J@ )# N  14
($!.N@$F+P%(;O_ 0J="IT*GJ8M(>@(02'H!:#\\__]"
(*=(>@&&2&[_;# N  140#\ 0J<_/  $J>I*+O]L9P#_
(#193S\\  2IN2!?+Q"H42!X"NQP!$HN_VQG"! N_W8&
($  #: D9BX@4$*02B[_;&<D2B[_;6<"4E!2F##N_W(@
(.[_;C#N_W1P $/N_W80$1#94<C__"!/,6[_O  6H!5"
(&@ &"%\   *V  2H QF.$IH !AF,B%\   "X  2H QF
("9"9ZF:54^IE51/J/XB> -8,"[_O+!I $YG!B)I  !@
(/0QZ0!( A#>_ !00>[_P$/X"1!P!R+84<C__"!N  I.
(%[>_  *< !.T$)GJ9H@3R)X U@@"6<0,6D 3@ 6H!>@
( XB:0  8.Q.<#\ 64\O/$1,3T<_ *F@(%^@2B!0,5\ 
(!)R $JH  !F&"A5,BS_D))H  3B04A!,BS_DI)H  ;B
($%.=2!?(E]"5PRI1DY$4@ @9@P,J4U!0U, )&<"4-=.
(- @7R)?0E<,J4%04$P (&<,("D )$/Z (JPD6?B4-=.
(- ]?  &  Y@(DY6__(,;A )  QG[ QN  P #&<6#&X 
( T #&<./6X #  .3EX@7UQ/3M O+@ (/RX #$AN__Y(
(&[_\DAN__:IC55/+R[_\JE@,!\(0   0?H * QN  T 
( QG!!" 8 010  !+R[_\C\ J6-";@ .8+)!4%!,1DY$
(%(       ##80   18$1$E43  @  ! #%X 0 NV    
(    /__  #__P  __\  $86  !%N   1%8 G__Z( 0 
( !%J   1!P  $)T           -+0   $ ^_ ! 25X 
(        %P        +]         B5    E0 '7*0 
(  /=@  &>8 0" $ $ 1B(  1C( 0!$N(!0 0!(L   +
(/0    !   (   7Z     "5@ !&,@  &N@ !UT,  >F
(-0  "YJ   ;& ! $'0   .D $!%Z    %P   &/   9
(.8 E2   $!%Y@! $8B  $8R $ 1+B 4 $ 2+   "_, 
(    0  "   %^8      @      U@!8 .@ J 0"3TL 
(      0 !  4 #P"%Q3:VEP1FEN9&5R(&ES(&%L<F5A
(&1Y(&EN(&UE;6]R>2X-#<K*66]U('=I;&P@<VMI<"!T
(&AE($9I;F1E<@W*RG=H96X@>6]U(%%U:70@86X@87!P
(&QI8V%T:6]N+@      8  0 ,@ \ B+RLK*RDEF('EO
('4@;&EK92!3:VEP1FEN9&5R+"!S96YD#<K*RLIW:&%T
("!Y;W4@=&AI;FL@:70G<R!W;W)T:"!T;SH-#<K*RLK*
(,I$87)I;B!!9&QE<@W*RLK*RLHR-S8U($UA<FP@3V%K
("!$<BX-RLK*RLK*2&EG:&QA;F0@4&%R:RP@24P@-C P
(#,U ,-B   !, 1$251, "   $ ,7@! "[8       #_
(/\  /__  #__P  1A8  $6X  !$5@"?__H@!   1:@ 
( !$'   0G0           TM    0#[\ $!)7@      
(   7         OT        ")4   "5  =<I   #W8 
(  9Y@! ( 0 0!&(@ !&,@! $2X@% ! $BP   OT    
( $   @  !?H     )6  $8R   :Z  '70P !Z;4   N
(&H  !L8 $ 0=    Z0 0$7H    7    8\  !GF )4@
(   0$7F $ 1B(  1C( 0!$N(!0 0!(L   +\P    $ 
(  (   7Y@     +      !@ )@ <@#H! 1/<&5N    
(   ?P"8 )$ Z 0%4')I;G0       "> )@ L #H! 9#
(&%N8V5L      !@ /@ <@%8@        '\!  "1 5 $
( 5%:F5C=        )X!  "P 5 $!41R:79E        
($\ # #! 'T         3P!\ ,$ C         !8 /0 
(+@ ]8        /H ^@#Z /HB         X # !  5R(
(%%3:VEP1FEN9&5R(#0N,R!B>2!$87)I;B!!9&QE<B#1
("!&<F5E5V%R90T-66]U(&UA>2!N;W<@3W!E;B!O<B!0
(')I;G0@;VYE(&1O8W5M96YT.@       ,T "P#= 5>(
(!=$;V-U;65N=',@8W)E871E9"!B>2!>, ##8    4X$
($1)5$P (   0 Q> $ +M@       /__  #__P  __\ 
( !&%@  1;@  $16 )__^B $  !%J   1!P  $)T    
(       #2T   ! /OP 0$E>         %P        +
(/0        (E0   )4 !URD   /=@  &>8 0" $ $ 1
((B  $8R $ 1+B 4 $ 2+   "_0    !   (   7Z   
(   E8  1C(  !KH  ==#  'IM0  "YJ   ;& ! $'0 
(  #I ! 1>@   !<   !CP  &>8 E2   $!%Y@! $8B 
( !&,@! $2X@% ! $BP   OS     0  "   %^8     
( P      &  F !R .@$!$]P96X      ^@#Z /H ^B$
(        )X F "P .@$!U)E<W1A<G0       !@ /@ 
('(!6(        !_ 0  D0%0! 5%:F5C=        )X!
(   L %0! 5$<FEV90       $\ # #! 'T         
($\ ? #! (P         6 #T +@ ]8        /H ^@#
(.@#Z(@        .  P 0 %<B%=3:VEP1FEN9&5R(#0N
(#,@8GD@1&%R:6X@061L97(@T2!&<F5E5V%R90T-66]U
("!M87D@;F]W($]P96X@86X@87!P;&EC871I;VX@*&]R
("!297-T87)T*3H       #,  P W0# !1A3=&]P(%-K
(&EP<&EN9R!T:&4@1FEN9&5R      #, -0 W %1!0Y5
('-E(&$@9&]C=6UE;G3#8    !4$1$Q/1P @  ! #%X 
($ +M@       /__  #__P  __\  $86  !%N   1%8 
()__^B $  !%J   1!P  $)T           -+0   $ ^
(/P 0$E>         %P        +]         B5    
()4 !URD   /=@  &>8 0" $ $ 1B(  1C( 0!$N(!0 
($ 2+   "_0    !   (   7Z     "5@ !&,@  &N@ 
( ==#  'IM0  "YJ   ;& ! $'0   .D $!%Z    %P 
(  !CP  &>8 E2   $!%Y@! $8B  $8R $ 1+B 4 $ 2
("P   OS     0  "   %^8          .@!7  !    
(       PV  PV(    5!$1,3T< (   0 Q> $ +M@  
(     #__P  __\  /__  !&%@  1;@  $16 )__^B $
(   1:@  $0<  !"=           #2T   ! /OP 0$E>
(         !<        "_0        (E0   )4 !URD
(   #W8  !GF $ @! ! $8B  $8R $ 1+B 4 $ 2+   
( OT     0  "   %^@     E8  1C(  !KH  ==#  '
(*;4   N:@  &Q@ 0!!T   #I ! 1>@   !<   !CP  
(!GF )4@  ! 1>8 0!&(@ !&,@! $2X@% ! $BP   OS
(     $   @  !?F          #H 5P  0          
(,-B ,-A    # 1!3%)4 "   $ ,7@! "[8       #_
(/\  /__  #__P  1A8  $6X  !$5@"?__H@!   1:@ 
( !$'   0G0           TM    0#[\ $!)7@      
(   7         OT        ")4   "5  =<I   #W8 
(  9Y@! ( 0 0!&(@ !&,@! $2X@% ! $BP   OT    
( $   @  !?H     )6  $8R   :Z  '70P !Z;4   N
(&H  !L8 $ 0=    Z0 0$7H    7    8\  !GF )4@
(   0$7F $ 1B(  1C( 0!$N(!0 0!(L   +\P    $ 
(  (   7Y@          ^@$ PV%%5?__   !/@L 4VMI
('!&:6YD97+_____________________________ $ ,
(%X 0 NV     0 *      ! "^A0*@    \   #5@   
( "    '8AH !V(2  =A_  '8BX@! ! #%X 0 NV    
(   "@      "@ "       *    !V(<  $%'  '850 
($"':  '8C8  0   *G_____  #__P  ^    /__   #
(/___P   *K_____  #__P  X    /__   #_P! 5S@ 
( ?;7@ '86@ !V). $"&2@/____________\        
&PH "@  __\  @    H "@   *0           
***END OF DATA
***CRC:7ADC