macintosh@felix.UUCP (03/02/87)
[Animated watch cursor: WatchInstall5.0]
This is the latest version of my animated watch cursor, that will make
BOTH hands of the watch spin whenever the cursor is a watch.
It is an INIT that installs a little task in the vertical retrace that
checks whether the cursor is a watch, and if so will advance the hands
in the cursor, the large hand runs independently from the small hand.
There is no worry for loss of CPU power, the overhead is minimal.
The INIT is installed by running this binhexed program. A dialog will
appear where you can choose to Install or Remove the watch. The
installer will look for a free resource id, it will not overwrite an
existing resource..
By the way: this is the ORIGINAL animated watch, it was implemented
first in my TeX Previewer, back in 1985 8-)
Rick Jansen
Bitnet: Rick@Hasara5
UUCP: mcvax!rick@hasara5.bitnet
---
(This file must be converted with BinHex 4.0)
:$eGKG'0S5@jcG'&XE$8Z-!""8&"-9e4$5#!!N!F5!-fV!*!%!3#3!a!!N!-2!*!
$!4J!N#!29f&dBfK*ER0dB@aX05i`!J#3!d&38%aA9%0))3!!J!!!39"36&G83dJ
K!!#!!8!!N!i#0J!!R!#,13#3"K)!N)CB9d&ZD@eKG'9N)(GKG'0S)'0eFR0[FL`
JBfp`HA*TCfKd)$%j1$8JBRNJ8QPMDb"+B@jcC@iJ3#"639*",#""EA0dCA*NB@d
X)&4SC5"1CA4SCA*XB@jNF`#3!cNi8d&535`J5h*eDA0XB@&Z)$3a05`J-6!j1#"
65L!J3@ecG'9bC'&Y,#"8D'8J6Q9dD'9bE'&ZC(-!N!-q299159JJ999$8$SJ)(Y
cC@PcE@mXC'9MGQ&i,("SD@aKBR0p)@eMGQ&i)A*TBfY!D'&cBA*K05j#5941493
!N!-9&%*TG'jPG$SJ8QPMDd")390"8N%e!*!$"d&38%`!N!BF9e4$5!#3!`&*3di
M!*!%!3"'8N9'!*!%!3#3!`%!!"rq!!!IrJ!!(ri!!"rq!!!IrJ!!(ri!!"rq!!!
IrJ!!)!%!!%"!J!#!3%!"!%!J!3"!)!%!3#!"!%!`!3"!1!%!3$J"$m!`!3!!)!%
!!#!"!!!J!)!!3!"!!)!!)!%!!"rq!!!IrJ!!(ri!!"rq!!!IrJ!!(ri!!"rq!!!
IrJ#3)Mrr!!"r[i!!rlr!!Iqqi!(r[H!"rl[J!Iqhm!(rVr!"rjr`!Iqrm!(rrq!
"rrrJ!Irri!$rrm!!Irq!!$rr!*!N&3""!$`")J(#!!%"!*!(!3#3"!&k!!F!N!@
q!"i!dJ"N"!G*ER0dB@aX!*!'[J$`!0)"0J3'3f&ZBf9X!*!&[J"i!0)![J3'8Q9
YEhCP!*!&$`!8!#-"N!!),P0jFh4PE5"ABA4MD#"*ER0dB@aXCA)J9Q9bFfP[EL!
e,M!J)#Je,8j29Ldi0LN!N!8M!"3!0`'3!!JEU6%j1$BJBRNJ8QPMDb"+B@jcC@i
J3#"639*"!*!'2!!8!)F!qJJe8d&533e3,NmZ)%*[H#!d0M%c$6%`-$NJ39!J)%&
YFh4PFQ4KE3e8D'8J6Q9dD'9bE'&ZC(-!N!D(!"3!T3&h#%P#DA41CA3[48&56MS
J8QPMDd")390"8N%e$9993e!k)(YcC@PcE@mXC'9MGQ&iI5&YBhCKH#&5D@0V3%K
"8d&5368Z3NP86N98!*!'2!$k!)F"N!!)+Nj29%8k)&*PBQp[G#"0B@0TER4[FfJ
JB@CdCA)JD@jcG'&XE'&dD@pZ)3#3!``!b!"N!8!"N!!"!84%!*!$2!!#!*!&#J$
F!"i")J3#6dX!N!8h!!S!C!%L#!*H-3#3"@3!#J"d!5))$%*eCeCKE(9P1L"H-!!
!!XC1qJ#5!*!&!3#3"3m!!$m!2`!r!$m!3)#!3)"!J'#!B)"!J%"!J$m!2`!r!$m
!N!3F!*!%#!3!N!-%N!-!N!3#"!#3"3B!N!8%!J#3"!3%!*!%"!J!"*!%!*!$!3)
%!*!&"`#3"33#!3#3!`53!`#3!`3)%!#3!c`!N!-3#!3!N!4)jrrq98qTG$!ICJ!
!,%kk!(*"q[pF3rS!$#&*!!DJ-f!!!"C)jrrq5(Vr9%kk!)a"q[p)-,`!$dcIIrp
1G9GbDA4dC@iJ-M8Y4N9#,6Jf)%*j)&*TBfXJ5Q&ZFf9Z)%!J8d&535`J3@ecG'9
bC'&Y,#"8D'8J6Q9dD'9bE'&ZC(-!6PErpN(ZrrC$qJ!N)0NJf6#4F!�J$f3UF
[1J!15'lrpUQKUC*1ANje58j*9!N`8hPc9f&dBfK19[qb51F$'#KZ!!JX2!!!#%3
J4N2ZrlC`%5,B8d"ZqLCm!!!)c(i&B#BJ"q0!,`"#Tb)(id%d0K#f5-)[!Lmmrrr
!rkKB)KmJ(cf"!,C54`a(!!T[e%*()!IP3#)(j8%N0J#fY,33!&I!$%F!"er"`!&
R"&*(B1!-4`!(E`!!m(i&B!!!a#!(id![!%+R)JIM363f%,C)`Lm#,`"#Tbm!3UF
b,!#!5-%[!A)(,`'S@#)I)"r$r!!'*!I834)d)%X#33$r5-%[!6mm!!LSA#)I)"m
[!DKE)KmJ(cf"!,BJ"q0!,`"#Tb)(id%d0K#f5-)[!Lm!3UF[!%+R,`"#Tc)X!)"
)`5m"2ccrrDKF)KmJ(bm"FJF[!DKB)KmJ(m2m!!BN"p4"%M3J'`*"!2p)`5m"2c`
!#+KF)KmJ(bm"U&XL(b!I2B%!YP*($%F!#Qm!rcJ-8`%!CKJ`,!#!8N!j3!#!,`d
UH!N%5'lrYUK4+Pp-haM!6PiZRdje!*!$'!#3!bJ!!!)!N!3)!*!$)!8+2c`!!DR
`!!!'c!#3!`&19[rm5'lrr+Kd3Hhr[#m)5(S"8+KQ3Hhrh#m)5(S"!UKQ3Hhrr#m
)5(S!l+KQ3UF[1J$J3QHTS#YIr``[,Im-6VS&+NKk!-SJEIm-,a"1ZJ9H$&m!+PE
!)'hr$#"3%K!#33$r$%%!9eE"J!&R!URd3Qhr)%+RUA8VArmF3HhrR#m)5(S!DUK
Q3HhrV#m)5(S!2+KQ5'hrP%*R3QFr2!!32c`!%+LR1h`!![q53Hhr[#Y)rij"lIm
L,`LSEdKYrikSG5mZrrbSFdjH6R8J-$-`1$!d-$F`06!f-$B`0c!h-$J`0M!j-$8
`36!d-$N!)$!e-$8`0c!f-$F`1$!h-%%`06""-$-`36!b-$J`-c!f!!&59e4$5!J
`N!-i-*!$1!"!-dB`-$0'-$!c4M!`-dB`-$G'1$"'4N-`4NC$-%C'3c"'4N-`4NC
$-%C'3c!h4MJ`-dB`-$0'-$!c4M!`-dB`-!"!-dB`-$0'-$!c4M!`-dB`-$3`1$!
i-$3`1$!d-$J`0M!i-$B`1$!d-$J`0$!d-$J`-dBi-$0'-$!c4M!`-dB`-!"19[r
m,`a)E[rmU(4"lImL,`LSFdKYra3r2!!#2c`!"6mm!!Jr2!!,U+G)EIm8U+0#Tc!
Yrb")`#m!F!F[!+KB)"rM3%Re!*`3&!*!!2mr!"!X!!%#3!$r2`#SNcmm!!8r2!!
)U*&#Td+R-#hr)%M!,`!r22rpU&a`"bm!U&JJ(q0!5I8!V"!8!N!!rcm!%#`!!3*
!!2mr!+L45'hr[+K43UHTG5YIraa5EImJ,blrr+Kc+&p1ANje6PEqp%MR!4K"l[l
d3rS!U#$C)0N`NA!"3Hlqp%)`!!"#Tbmk!)ir2!%!UD!QAbm,UC*#CkQB3UF[1J"
i5'lqp+QK+&mJ$'FN,`a#Td*R,`bTTM!I5-![!(#",`#S@#!I2`#TTbm-UDe#CkQ
CIKp#Tbmk!%!r"kQJ5Tp@`%T(AX(!!@F%8dGJjNT(Eai[#bmk!#)r"dKZr[5TUbm
,2c`!9+QR,`ZTUN*RUCP-haL!6Pj1G8P1593*-&0jFeGKG'0S6PEqr#m-3QHTQ%(
Zr[a$qJ"5)0NJf6#4F!&"l[lm3M!!!%+R,cS!1%KZr[bTS5KI)!aR*#m-3UG#Cbm
-UDB`(dM!,`"`J5m!U&JJ(cm!UDF[$+QY3QHTQ5KI6Pj1G8P1593*-&0jFeGKG'0
S6PErkNKZrqkSG#mYr`LSFd)Z!"3JEJ!--""A3'F'98"R!Q"b)'i!$#mS!!)[2!!
!!3"1ZJ*+)"pV',"m!!pZ%N(k!(`b!1C*4%%"-"$r#M`!"'C#,bhr#$mm!!&)E[r
q5'lrqNKZrr+TM5mZrrSr2!!+U9e`$bm!5'lrkNkk!A![,[rk3QHTA4em!!%!&#"
Z!!J`[!!"3UHTG5!IN!#Yra`-J!#3!`pY"%kkrA)[,[rZU(01AL"Ih[`!$%l3)!K
19[rX5'lrr+Kd3UFr2!%!3UG`rbm!UA`VArm),bhr#+Kc,bhr#+Q")'hr#%KS!"#
T+LmYr`Jr2!!"5'lrq%KZrr4)E[rXUBdr2!!$2c`!!kLE5'lrl$mmrr`r22rmU+P
)E[rX2c`!%$mm!"#SX%(krY)[#%KZrrUTN6!ZrrTV',"m!!GZ%N(k!$`b!1C*4%%
"-"$r#M`!"'E8-#lrqP0!C`T63'F-8d"R#Q!-6VVpD'!'B!41Z[iJ,blrr+Kc6Pj
1G3!16VS"P%j@!!!XAdj9!!#Il3!36VS"PN(YrZ3[#+KZU2kT%UR-U6#S8%+RUAX
r2!%"UAP1Z[V#6VVr"%kk!AT1A8kk!@C1G8jH6R8LAb!IS%`ZJ%jaF!![#6(!!L"
1GA!!B2BLAb"IS#P1q[rX)"mLAb"I,`#J1b+!6R919J!!3Uhr"%)Yr[j#,Ilr3Uh
qq%+Yr[4#VIlS6Pj1GD9*6NP85%9"!!"19J!!,&p)jq$J)'m!(%*!%"K#35*[!#"
#3K3CX%*X"%*"B"BN5&+"B!5c#QB'8FVrqQ!'8SK63'$D2d%!)Lp[!"J!(NcI"`G
FMdje6Pj1G59I8%p6)*!$6PB!!#m!,`%J,`!8)Lm!%%kk!"3[3!!8)KmJ(djH,eF
!"&L26R919J!!,&p)jci!+J"U!N5!,!&U!N5"*!&)3NT#CK`f!%*!5%"R")$"0!"
)3M!$J-%d!#)#3N")3'!F*!!Q!8+!3S&i(p5#dB$5JE#$E353!)05!9(-rr"+K@S
#4)#lKQS#4)&-h`"m6R91ANje584*9Ne24#"#V`!33IS!###[!!41G3#3"%je)&p
1A5m)6VVqb%je)&p193!!6Y!!N2m!N&SF!3i!#%024%8!!3"+58j*9!#3!f*"6&*
8!*!$EN4*9%`!!3"k4%a24`#3!j**3diM!*!$RN*14%`!N!1U4P*&4J#3!lCA9%0
)!!-!`J!!rrmJ!!E8!*!&!Irr0!!'m!#3"!%!N!8%#J#3"!%"rrm%!!1k!*!%!3$
rr`!!!M`!N!3"!Irr"!!$bJ#3"!%!rrm!!!)M!*!%!3$rrb!!!4m!N!3"!2rr!*!
$r`#3"!%!rrm!N!2d!*!'rrm!N!N"rrm!N!0F!*!&![rr!*!$Q3#3"32rr`#3!pX
!N!3*!&0jFeGKG'0S!*$SbI-:
---