jrh@duncan.UUCP (John Hoffman) (07/10/87)
Here is a nifty little clock program sent to me in the days when this
newsgroup wasn't getting out too well. This will be a repost for some
of you...
Enjoy!
Doc
# This is a shell archive.
# Remove everything above and including the cut line.
# Then run the rest of the file through sh.
#----cut here-----cut here-----cut here-----cut here----#
#!/bin/sh
# shar: Shell Archiver
# Run the following text with /bin/sh to create:
# mouseclock.uu
# This archive created: Fri Jul 10 13:49:12 1987
# By: Craig Norborg (Purdue University Computing Center)
cat << \SHAR_EOF > mouseclock.uu
begin 42 mouseclock
M #\P # ( /< 90 $ /I #W$[Z!BY#
M;W!Y<FEG:'0@*&,I(#$Y.#8L(#$Y.#<@2F]H;B!2+B!(;V9F;6%N !-;W5S
M94-L;V-K( !.5?[(2'C_^T*G3KH-Z%A/+P!.N@Z84$]"ITAZ ;A.N@Y(4$\I
M0($89@Y(>@&Z/SP 94ZZ C!<3T*G2'H!P$ZZ#+A03RE @2!F#DAZ ;L_/ !F
M3KH"$%Q/0J=(;($N2'@ 4AZ ;].N@WJ3^\ $$I 9PY(>@&\/SP 9TZZ >A<
M3REL@2"!/!E\ 6!-D(L@3<Y? )@4I(;(#H3KH.>EA/*4"!'&8.2'H!I#\\
M &A.N@&T7$](;?_^2&W__TAM_[1.N@'^3^\ #$AL@$X_/ '2&R !DZZ D9/
M[P *.T#__$)G/SS__TAL@ 9.N@2@4$]P/)!M__Q:0'( ,@ I08%.0JR!4DAL
M@2Y.N@V66$\@;($<(F@ 5G $"D #W(!X:$L;($@= 4+@ /=@'EHX*#+P%.
MN@V(6$\@;($<+R@ 5DZZ#.Y83RM _LAG2B!M_L@,J @ %&8P+RW^R$ZZ
M#3!83Q M__Y(@#\ $BW__TB!/P%(;?^T3KH$$E!/2'H XD)G3KH WEQ/+RW^
MR$ZZ#0!83V"B+RR!($ZZ#)183TAL@$X_/ '2&R !DZZ 6Y/[P *.T#__$AL
M@$X_/ '2&R !DZZ U)/[P *8 #_(DY=3G5I;G1U:71I;VXN;&EB<F%R>0!#
M86XG="!G970@:6YT=6ET:6]N+@H =&EM97(N<&]R= !#86XG="!C<F5A=&4@
M82!T:6UE<B!P;W)T+@H =&EM97(N9&5V:6-E $-A;B=T(&]P96X@82!T:6UE
M<B!D979I8V4N"@!#86XG="!O<&5N(&$@=VEN9&]W+@H !.50 2&R!+DZZ
M"DI83TJL@1QG"B\L@1Q.N@Q\6$]*K($\9PI(;($N3KH*3EA/2JR!(&<*+RR!
M($ZZ"N983TJL@1AG"B\L@1A.N@HZ6$\_+0 (3KH(9%1/3EU.=4Y5_QA(YP@@
M)&T "$ZZ"S9(> #H2&W_&$ZZ#"Q03W@ 8!@P!$C XX!![?\T,@1(P>.!-; (
M !@ 4D2X? D;>(@;0 ,$*W_?"!M ! 0K?]]3KH+:DS?!!!.74YU3E7_[$CG
M## D;0 (."T #"9M Y(;?_T3KH)6%A/<CP@+?_X3KH'('(,3KH'0CM __!*
M;?_P9@1P#& $,"W_\#M __ P+?_P2$!"0$A @/P "CM __(P+?_P2$!"0$A
M@/P "DA .T#_\'(\("W_^$ZZ!OP[0/_L,"W_[$A 0D!(0(#\ H[0/_N,"W_
M[$A 0D!(0(#\ I(0#M _^PP+($DL&W_\F=">@!@- QM '_\F86, 5(P..
M<@ R,P@ XX$ <H & !@%# %2,#C@'( ,C,( ..! G)__Q@ 4D6Z1&7(.6W_
M\H$D,"R!)K!M__!G4GH 8$0P!4C XX!R #(S" #C@0)RQ_\8 # %2,#C@'(
M,C,( ..!-"W_\,3\ XV!4C#XX/4@T'L@%PV,"@ = OE8X=R& !21;I$9;@Y
M;?_P@28P+($HL&W_[F=0>@!@0C %2,#C@'( ,C,( ..! G+_'Q@ , 5(P..
M<@ R,P@ XX$T+?_NQ/P #C8%2,/C@]2#0>R 7#8P* #K0X=R& !21;I$9;HY
M;?_N@2AZ &!", 5(P.. <@ R,P@ XX$"<O_Q& P!4C XX!R #(S" #C@30M
M_^S$_ .-@5(P^.#U(-![(!<-C H .-#AW(8 %)%ND1ENG(R("W__$ZZ!51,
MWPPP3EU.=4Y5_QA(YPPP)&T "#@M PF;0 .3KH(UDAX .A(;?\83KH)S%!/
M>@!@*# %2,#C@'( ,C,( ..!- 5(PN."=@ V,R@ XX-![?\T,;(8 #@ 4D6Z
M1&740J=(> #H2&W_&$ZZ":A/[P ,3KH(^DS?##!.74YU3E7_&$CG"" D;0 (
M3KH(:DAX .A(;?\83KH)8%!/> !@&# $2,#C@#($2,'C@4'M_S0QL@@ & !2
M1+A\ "1MXAMM W_?!MM __?4*G2'@ Z$AM_QA.N@D^3^\ #$ZZ")!,WP00
M3EU.=6%P0^R!+D7L@2ZUR68.,CP &6L(= BPE')__PI3X%6+'@ !"E.@5I(
MYX" ""X ! $I9Q!+^@ (3J[_XF &0J?S7TYS0_H ($ZN_F@I0(%>9@PN/ #
M@ =.KO^48 1.N@ :4$].=61O<RYL:6)R87)Y $GY !__DYU3E4 "\*2'D
M 0 ,"R!*L'\ 8O $ZZ!UY03RE @6)F%$*G2'D 0 3KH&*%!/+FR!5DYU
M(&R!8D)H 0@;(%B,7P 0 0(FR!8C-\ $ "B!L@58@+(%6D*@ !%" *4"!
M9B!L@68@O$U!3EA"ITZZ!Q983R1 2JH K&<N+RT #"\M @O"DZZ +)/[P ,
M.7P 8%J(&R!8@!H@ !"!L@6( :( I@1$AJ %Q.N@>F6$](:@!<3KH'
M"%A/*4"!;"!L@6Q*J D9Q @;(%L(F@ )"\13KH%.%A/+RR!;"\*3KH"6%!/
M*6R!;(%P3KH%."!L@6(@@$ZZ!40@;(%B(4 !F<62'@#[4AZ "Q.N@4@4$\@
M;(%B(4 #"\L@7 _+(%T3KKX:%Q/0F=.N@-\5$\D7TY=3G4J $Y5 !(YPPP
M)&T $"!M @@* "LY8 H "!$("@ $.6 )D 0$TB 2,#0K0 ,5( Y0(%V0J<P
M+(%V2, O $ZZ!?Q03RE @7AF"$S?##!.74YU$!-(@#\ ($M2B"\(+RR!>$ZZ
M 41/[P *2'H!.A 32(!(P-"L@7@O $ZZ 7A03S\M XO"B\L@7A.N@%$3^\
M"D)L@70F;(%X)$L0$TB .@"P? @9QBZ? )9Q*Z? ,9PRZ? -9P:Z? *
M9@12BV#8#!, (&UZ#!, (F8N4HL@2U*+$!!(@#H 9QX@2E**$(6Z? B9A ,
M$P B9@12BV &0BK__V "8-9@."!+4HL0$$B .@!G)KI\ "!G(+I\ EG&KI\
M QG%+I\ UG#KI\ IG""!*4HH0A6#.($I2BD(02D5F E.+4FR!=& _UI"
M$D*G,"R!=%) 2,#E@"\ 3KH$YE!/*4"!<&8(0FR!=& _N1Z "9L@7A@'C %
M2,#E@"!L@7 ABP@ +PM.N@'>6$]20$C U\!21;IL@71MW# %2,#E@"!L@7!"
ML @ 8 #^IB 3.\# $( @R+P ,8 (0V5?)__QG!E)!8 )"&%')__Q.=3 \
M?_]@!# O P@;P $2AAF_%-((F\ "%- $-E7R/_\9P)"$" O 1.=2!O 0@
M"")O @0V6;\3G5.50 2.<.,"1M A"ITAZ (Y.N@2J4$\I0(&*9@A,WPQP
M3EU.=2!M PB: D+RD !$ZZ!0Q83R@ 9U)(>@!M($0O* V3KH$WE!/)D!*
M@&<T2'@#[2\+3KH"FE!/+ !G)" &Y8 J "!%)6@ " "D)48 G$AX ^U(>@ X
M3KH"=E!/)4 H"\$3KH$JEA/+RR!BDZZ J983T*L@8I@@&EC;VXN;&EB<F%R
M>0!724Y$3U< *@!(YT@ 0H1*@&H$1(!21$J!:@9$@0I$ %A/DI$9P)$@$S?
M !)*@$YU2.=( $*$2H!J!$2 4D1*@6H"1(%A&B !8-@O 6$2( $B'TJ 3G4O
M 6$&(A]*@$YU2.<P $A!2D%F($A!-@$T $) 2$" PR( 2$ R H+#, %"04A!
M3-\ #$YU2$$F 2( 0D%(04A 0D!T#]" TX&V@6($DH-20%'*__),WP ,3G4@
M;P $( A*&&;\D< @"%. 3G5.50 2JR!CF<&(&R!CDZ0/RT "$ZZ A43TY=
M3G5.5?_\+P0P+0 (2, K0/_\2JR!8F<H> !@"C\$3KH T%1/4D2X;($J;? P
M+($JP?P !B\ +RR!8DZZ J!03TJL@9)G!B!L@9).D$JL@7QG"B\L@7Q.N@%<
M6$]*K(& 9PHO+(& 3KH!3%A/2JR!A&<*+RR!A$ZZ 3Q83RQX 0(+@ $ 2EG
M%"\-2_H "DZN_^(J7V &0J?S7TYS2JR!;&8P2JR!>&<H,"R!=DC +P O+(%X
M3KH")E!/,"R!=%) 2,#E@"\ +RR!<$ZZ A!03V .3KH!_"\L@6Q.N@* 6$\@
M+?_\+FR!5DYU*!].74YU3E4 $CG#B X+0 (, 3!_ &)$#5[(%B2D1M"KAL
M@2IL!$J29A Y? "@8AP_TS?!'!.74YU,"H !,!\@ !F""\23KH "EA/0I)P
M &#@(B\ !"QL@5Y.[O_<(B\ !"QL@5Y.[O^"(B\ !"QL@5Y.[O] +&R!7D[N
M_\I,[P & 0L;(%>3N[_XBQL@5Y.[O_$(F\ !"QL@5I.[OX@2.<!!$SO((
M#"QL@5I.KO^43-\@@$YU(F\ !"QL@5I.[OX^3OH B)O 0L;(%:3N[^8DY5
M !(YP@@2'C__TZZ -!83R@ L+S_____9@IP $S?!!!.74YU2'D 0 !2'@
M(DZZ +A03R1 2H!F#"\$3KH [%A/< !@UB5M @ "A5M \ "15\ 0 "$(J
M X51 /0J=.N@"66$\E0 02JT "&<*+PI.N@!:6$]@"DAJ !1.N@#$6$\@
M"F"23E4 "\*)&T "$JJ IG""\*3KH [%A/%7P _P ()7S_____ !1P ! J
M \O $ZZ '!83TAX "(O"DZZ %!03R1?3EU.=2)O 0L;(%:3N[^GB O 0L
M;(%:3N[^MD[Z ),[P # 0L;(%:3N[_.D[Z (B;P $+&R!6D[N_MI.^@ "
M+&R!6D[N_WQ.^@ "(F\ !" O @L;(%:3N[_+B O 0L;(%:3N[^L$[Z (@
M;P $+&R!6D[N_HP@;P $((A8D$*H 0A2 (3G4@;P $3.\" 0 ((B\ $"QL
M@5I.[OY$3OH BQL@5HB;P $("\ "$[N_=@L;(%:3N[_=B)O 0L;(%:3N[^
MF$[Z (B;P $+&R!6D[N_H8B;P $+&R!6D[N_C(B;P $("\ ""QL@5I.[O[4
M("\ !"QL@5I.[O["(&\ !"QL@5I.[OZ 3.\# $+&R!BD[N_Z @;P $+&R!
MBD[N_Z8@;P $+&R!BD[N_[(@;P $+&R!&$[N_[@@;P $("\ ""QL@1A.[O]\
M(&\ !"QL@1A.[O\T(&\ !$SO , ""QL@1A.[OZ\ /L 0 $
M :D _( /J 2P 0 ^ #X . X "P + F "8 P
M# #__O_^ #__KCN__ZHJO_^JJK__KCN__ZJJO_^J*K__KCN__X /_^__[_
M_@ $ 2 !0 %@ 8 !H ' ' 4 !0 % 4 !0 ' ( @ " ( @ "
M ( !P ! $ !P $ 0 !P ' $ 0 ' $ 0 ' 4 !0 % < 0 ! $
M!P $ 0 !P ! $ !P ' 0 ! ' 4 !0 ' < 0 ! $ 0 ! $ !P %
M 4 !P % 4 !P ' 4 !0 ' $ 0 ' :H "D K__P @ @!.
M N ! &, 8P!C
L !0 ^P " $ _( /K 0 _)C
end
SHAR_EOF
# End of shell archive
exit 0