[comp.sources.amiga] v90i220: ttime - calculate file transfer time, Part01/01

amiga-request@abcfd20.larc.nasa.gov (Amiga Sources/Binaries Moderator) (08/13/90)

Submitted-by: maverick@floopy.uucp (Thomas Schwarz)
Posting-number: Volume 90, Issue 220
Archive-name: util/ttime/part01

[ uuencoded executable enclosed  ...tad ]

This is a short little program that I threw together one day out of boredom.
It just figures the length of your file and then takes the baud rate that you
enter and calculates how long it will take to transfer the file.  Not a big
deal but it is a somewhat useful program.  This program is being released
into the public domain.  You can use the source code any way you like as long
as you leave my name in it.  

#!/bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#		"End of archive 1 (of 1)."
# Contents:  read.me ttime.c ttime.uu
# Wrapped by tadguy@abcfd20 on Sun Aug 12 22:13:14 1990
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'read.me' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'read.me'\"
else
echo shar: Extracting \"'read.me'\" \(894 characters\)
sed "s/^X//" >'read.me' <<'END_OF_FILE'
XThis is a short little program that I threw together one day out of boredom.
XIt just figures the length of your file and then takes the baud rate that you
Xenter and calculates how long it will take to transfer the file.  Not a big
Xdeal but it is a somewhat useful program.  This program is being released
Xinto the public domain.  You can use the source code any way you like as long
Xas you leave my name in it.  I can be reached at the following addresses if
Xyou have any desire to get in touch with me.
X
X         ____
X        / / /  Amiga 1000  | Thomas "Maverick" Schwarz  -  Sirius Software
X       / / /  The  Machine |     Box 349 Caromar Dr.  Mars, PA  16046
X____  / / /   That Made It |                (412) 443-8916
X\ \ \/ / /      Possible!  |
X \ \/ / /          --      |UUCP: {allegra,cadre}!pitt!darth!floopy!maverick
X  \/_/_/         First!    |  or: ...uunet!nfsun!eklektik!thomas
END_OF_FILE
if test 894 -ne `wc -c <'read.me'`; then
    echo shar: \"'read.me'\" unpacked with wrong size!
fi
# end of 'read.me'
fi
if test -f 'ttime.c' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'ttime.c'\"
else
echo shar: Extracting \"'ttime.c'\" \(2520 characters\)
sed "s/^X//" >'ttime.c' <<'END_OF_FILE'
X/******************************************************************************
X*  This program will tell you how long it will take to send a file to a remote*
X*     computer.  All you do is give it the name of the file and the baud rate *
X*     that you will be sending the file at.                                   *
X******************************************************************************/
X/******************************************************************************
X*         ____                                                                *
X*        / / /  Amiga 1000  | Thomas "Maverick" Schwarz  -  Sirius Software   *
X*       / / /  The  Machine |     Box 349 Caromar Dr.  Mars, PA  16046        *
X*____  / / /   That Made It |                (412) 443-8916                   *
X*\ \ \/ / /      Possible!  |                                                 *
X* \ \/ / /          --      |UUCP: {allegra,cadre}!pitt!darth!floopy!maverick *
X*  \/_/_/         First!    |  or: ...uunet!nfsun!eklektik!thomas             *
X******************************************************************************/
X
X/**** COPYRIGHT 1990 Thomas "Maverick" Schwarz - Sirius Software ****/
X
X#include <libraries/dos.h>
X#include <intuition/intuition.h>
X#include <exec/memory.h>
X#include <stdio.h>
X
Xstruct FileLock *mylock  = NULL;
Xstruct FileInfoBlock *fib = NULL;
X
Xmain(argc,argv)
Xint argc;
Xchar *argv[];
X{
Xint success, baud;
Xlong tsecs, hours, mins, secs;
X
X    if (argv[1] == "?")
X	    {
X        printf("\nUsage: TTime <filename> <baud rate>\n\n");
X		exit(0);
X	    }
X    if (argc < 2)
X	    {
X        printf("\nUsage: TTime <filename> <baud rate>\n\n");
X		exit(0);
X	    }
X    baud = atoi(argv[2]);
X    if (baud == 0)
X        {
X        printf("\nUseage: TTime <filename> <baud rate>\n\n");
X        exit(0);
X        }
X    if((fib = (struct FileInfoBlock *)AllocMem(sizeof(struct FileInfoBlock),MEMF_PUBLIC|MEMF_CLEAR))==NULL)
X        exit(0);
X    mylock = (struct FileLock *)Lock(argv[1],ACCESS_READ);
X    if(!(success = Examine(mylock,fib)))
X        {
X            printf("\n\n\nFile Not Locked!\n\n");
X            FreeMem(fib,sizeof(struct FileInfoBlock));
X            exit(0);
X        }
X    tsecs = ((((fib->fib_Size) *10) / baud) + (fib->fib_Size / 1920)); 
X	hours = (tsecs / 3600);
X    mins = ((tsecs - 60 * hours) / 60);
X    secs = (tsecs - (mins * 60) - (hours * 3600));
X    printf("\nTransfer time will be: %02d:%02d:%02d\n\n",hours,mins,secs);
X    FreeMem(fib,sizeof(struct FileInfoBlock));
X    UnLock(mylock);
X}
END_OF_FILE
if test 2520 -ne `wc -c <'ttime.c'`; then
    echo shar: \"'ttime.c'\" unpacked with wrong size!
fi
# end of 'ttime.c'
fi
if test -f 'ttime.uu' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'ttime.uu'\"
else
echo shar: Extracting \"'ttime.uu'\" \(11758 characters\)
sed "s/^X//" >'ttime.uu' <<'END_OF_FILE'
Xbegin 777 ttime
XM```#\P`````````"``````````$```82```!%````^D```822.=^_B1()`!)N
XM^0`````L>``$1_D```'H<@`@/````)I@`B;!4<C__"E/`B@I3@(@0JP")'``.
XM(CP``#``3J[^SD/Z`5IP`$ZN_=@I0`-\9@9P9&```/PF;@$4*6L`F`(<2JL`;
XMK&=H(`^0KP`$!H````"`*4`!["!K`*S1R-'((F@`$-/)T\D@`G(`$ADI20(PG
XMT(%2@$)G4H`"0/_^G\!5@$)W"``@`E.`U($?L@``(`!3@E'(__8?O``@(`!3>
XM@A^Q(``@`%'*__@B3R\)8'(I:P`Z`>QP?U*`T:P![$'K`%Q.KOZ`0>L`7$ZN+
XM_HPI0`(D+P`D0"`J`"1G$BQL`WP@0"(H```I00(<3J[_@B(J`"!G&B0\```#I
XM[4ZN_^(I0`(L9PKEB"!`)V@`"`"D(&P")"\(2&P!Z"!H`"0I:``$`C!.N@)R/
XM3KH0OG``8`0@+P`$+P`@+`(49P0@0$Z03KH+EBQX``0B;`-\3J[^8DZZ`DA*-
XMK`(D9QHB+`(L9P1.KO_<+'@`!$ZN_WPB;`(D3J[^AB`?+FP"*$S??WY.=61OE
XM<RYL:6)R87)Y`$Y5__!(YR$82?D`````+B\`*"9O`"Q!^@%@(FL`!+/(9A!(^
XM>@%63KH!Z$*73KH((EA/<`*^@&P02'H!0$ZZ`=)"ETZZ"`Q83R\K``A.N@K.<
XM6$\N`$J'9A!(>@%(3KH!LD*73KH'[%A/+SP``0`!2'@!!$ZZ%?Q03RE```1*^
XM@&8(0J=.N@?,6$](>/_^+RL`!$ZZ%9(I0```+JP`!"\`3KH5M$_O``Q*@&8>"
XM2'H!'DZZ`6!(>`$$+RP`!$ZZ%<Q"ETZZ!XY/[P`,(&P`!"`H`'PB/```!X!.>
XMN@DT+T``$"`H`'QR"DZZ"08B!TZZ"2`B+P`0T($B/```#A`O0``03KH)#'(\?
XM+T``%$ZZ".(B+P`0)`&4@"`"<CQ.N@CR(B\`%"]``!@@/```#A!.N@C`(B\`H
XM&"]``!QP/$ZZ"+(B+P`0DH`@+P`<DH`O`2\O`!PO+P`<2'H`C$ZZ!:I(>`$$O
XM+RP`!$ZZ%20NK```3KH4U$SM&(3_X$Y=3G4_``I5<V%G93H@5%1I;64@/&9IR
XM;&5N86UE/B`\8F%U9"!R871E/@H*```*57-E86=E.B!45&EM92`\9FEL96YAR
XM;64^(#QB875D(')A=&4^"@H`"@H*1FEL92!.;W0@3&]C:V5D(0H*``I4<F%N;
XM<V9E<B!T:6UE('=I;&P@8F4Z("4P,F0Z)3`R9#HE,#)D"@H`````3G5.=4CG6
XM`Q`F;P`0($M*&&;\4XB1RRP(?@`>&TJ'9S)3K`!.;18@;`!&0^@``2E)`$8@9
XM!Q"`<@`2`&#<(`=R`!(`2&P`0B\!3KH`)E!/(@!@QDAL`$)(>/__3KH`%%!/L
XM(`9,WPC`3G4```````!P84Y5_^Q(YR\0+B\`-"9O`#@H!W`QP*L`&&<&</]@6
XM``)P""L`!P`:5L!$`$B`2,`L`$JK`!1F``"$""L``@`;9GIP`"=```QR_[Z!2
XM9P`"0B\+3KH/OEA/2H!G#`CK``4`&W#_8``"*@CK``$`&TH&9PX@*P`4(@!$%
XM@2=!``Q@""`K`!0G0``,4ZL`#&T6(&L`!$/H``$G20`$(`<0@'(`$@!@$B`'_
XM<@`2`"\++P%A`/]24$\B`"`!8``!U@@K``(`&V=8</^^@&8&<`!@``'"(`<;V
XM0/__2@9G(G(*OH%F''("+P%(>@&R+RL`'"M!__!.N@B`3^\`#"H`8!IR`2\!?
XM2&W__R\K`!PK0?_P3KH(9$_O``PJ`'[_8```X`CK``$`&TH&9U)P_[Z`9TQ4U
XMJP`,<@J^@68F(&L`!$/H``$G20`$$+P`#2(K``Q*@6L*+PLO`&$`_JY03U*KQ
XM``P@:P`$0^@``2=)``0@!Q"`(BL`#$J!:P`!''[_("L`!)"K`!`K0/_P9W((P
XM*P`&`!IG4DAX``)"IR\K`!Q.N@,D3^\`#"M`_^Q*!F<X4ZW_[&TR0J<O+?_L=
XM+RL`'$ZZ`P1(>``!2&W__2\K`!Q.N@_H3^\`&$JL`@!F"A`M__UR&K`!9\@O^
XM+?_P+RL`$"\K`!Q.N@>$3^\`#"H`8`)Z`'#_NH!F"`CK``4`&V`,NJW_\&<&X
XM".L`!``;2@9G#B(K`!0D`42")T(`#&`8""L``@`;9PAR`"=!``Q@""(K`!0GE
XM00`,(&L`$"=(``2^@&<N4ZL`#&T6(&L`!$/H``$G20`$(`<0@'(`$@!@$B`'^
XM<@`2`"\++P%A`/V04$\B`'`PP*L`&&<$</]@#'#_N(!F!'``8`(@!$S?"/1."
XM74YU#0H`````````````<&%(YR`P)F\`$"1+2A)G)'``$!)![`"1"#```0@`3
XM9PIR`!(`=""2@F`$<@`2`!2!4HI@V"`+3-\,!$YU``````````!P84Y5__A(*
XMYP,P)F\`("1O`"0N+P`H($I*&&;\4XB1RBP(($M*&&;\4XB1RR`((DO3P"M)E
XM__B\AV,"+`<@!B!*8`(2V%.`9/H@;?_X0C!H`"`+3-\,P$Y=3G4O"R9O``AP4
XM`!`30>P`D0@P``,(`&<$4HM@["`+)E].=2`O``@@;P`$3E7_]")/<@I.N@10T
XM!D$`,!+!2H!F\"`)$.&_R6;Z0A"0CTY=3G4``"`O``@@;P`$3E7_]")/(@`"@
XM00`'!D$`,!+!YHAF\"`)$.&_R6;Z0A"0CTY=3G4``#`Q,C,T-38W.#EA8F-D.
XM968@+P`((&\`!$/O``0R``)!``\2^Q#<Z(AF\B`)(@]8@1#ALHEF^D(0D(%.@
XM=2!O``0B2'(`<``O`@P0`"MG!@P0`"UF`E)($!@$```P;1(,```);@PD`>6!Y
XMTH+2@=*`8.8,$0`M9@)$@20?(`A3@"!O``@@@9")3G4O!RXO``A2K`-T4ZP`7
XM3FT6(&P`1D/H``$I20!&(`<0@'(`$@!@%"`'<@`2`$AL`$(O`4ZZ^X103R(`/
XM+A].=4Y5```O"R9O``Q"K`-T2&T`#"\+2'K_K$ZZ".9(;`!"2'C__TZZ^U0@\
XM+`-T)FW__$Y=3G4``$CG#Q`N+P`8+"\`'"HO`"`O!TZZ`X183R9`(`MF!'#_H
XM8!XO!2\&+RL`!$ZZ`:!/[P`,*`!*K`(`9P1P_V`"(`1,WPCP3G4`````````>
XM`'!A2.<#,"XO`!1*AVX&<`!@``"D<`B^@&0"+@`@!U:`+@`"1__\1>P`&"927
XM(`MG0"`K``2PAVTRL(=F#"!3)(B?K``<(`M@;B`K``20AW((L(%E%B!+T<<D2
XMB"1()),E0``$GZP`'"`+8$PD2R938+P@!R(L`(S0@5.`3KH""B(L`(Q.N@'B4
XM+`!0AB`&5H`L``)&__PO!DZZ`UY83R9`(`MG$B\&+PM.N@L.+H=A`/]44$]@T
XM`G``3-\,P$YU``````````````````!(YP,0+B\`$$?L`"`@"V<T""L``@`;$
XM9B@(*P`!`!MG("`K``20JP`0+`!*AF<2+P8O*P`0+RL`'$ZZ`V)/[P`,)E-@8
XMR"\'3KH*4%A/3-\(P$YU``!(YS<0+B\`'"9O`"`L+P`D2JP"&&<$3KH-($*L^
XM`@`B!R0+)@8L;`-\3J[_T"H`</^Z@&8.3J[_?"E``@!P!2E``W@@!4S?".Q.\
XM=0``````````````````````````<&%(YS\`+B\`'"PO`"`J+P`D2JP"&&<$@
XM3KH,P$*L`@`@!5.`(@<D!B8`+&P#?$ZN_[XH`'#_N(!F#DZN_WPI0`(`<!8I9
XM0`-X(`4,@`````)G%@R``````6<(2H!F&"`&8!0@!-"&8`XB!W0`=@`L;`-\;
XM3J[_ODS?`/Q.=0``2.<W$"XO`!PF;P`@+"\`)$JL`AAG!$ZZ#$1"K`(`(@<D6
XM"R8&+&P#?$ZN_]8J`'#_NH!F#DZN_WPI0`(`<`4I0`-X(`5,WPCL3G4``"\'>
XM+B\`"$JL`AAG!$ZZ#`(B!RQL`WQ.KO_<<``N'TYU2.<P`"0`)@%(0DA#Q,'&7
XMP,#!U$-(0D)"T(),WP`,3G5*@&H``!Y$@$J!:@``#$2!80``($2!3G5A```80
XM1(!$@4YU2H%J```,1(%A```&1(!.=2\"2$$T`68``")(0$A!2$(T`&<```:$W
XMP3`"2$`T`(3!,`)(0C(")!].=2\#=A`,00"`9```!N&944,,00@`9```!NF9H
XM64,,02``9```!N6954-*06L```;CF5-#-`#FJ$A"0D+FJDA#@,$V`#`"-`-(J
XM0<3!D()D```(4T/0@63^<@`R`TA#Y[A(0,%!)A\D'TYU+P<N+P`(<``I0`(`I
XM2H=K(KZL``AL'"`'YX!![`(T2K`(`&<.(`?G@$'L`C31P"`(8`AP"2E``WAP?
XM`"X?3G4``````````````````$Y5__PO"R9O`!`@"V8$<`!@%B\+3KKZBB9`T
XM2&W__"\+3KK[.B`M__PF;?_X3EU.=4CG`#(F;`.`(`MG%"13(DL@*P`(+'@`>
XM!$ZN_RXF2F#HD<@I2`.$*4@#@$S?3`!.=4CG`3(N+P`4<`S>@"`'<@`L>``$2
XM3J[_.B9`(`MF!'``8#HG1P`(1>P#@"!J``0G2``$D<@FB$J29@(DBTJJ``1G^
XM!B)J``0BBR5+``1*K``,9@0I2P`,0>L`#"`(3-],@$YU````````````````]
XM``!(YP<P+B\`&"9O`!PL+P`@+P=.NO[06$\D0"`*9@1P_V`V""H``P`#9Q!(N
XM>``"0J<O!TZZ^QA/[P`,+P8O"R\J``1.NOQT3^\`#"H`2JP"`&<$</]@`B`%/
XM3-\,X$YU``!.5?_$2.<G,"9O`%PD;P!@?@!\`'H`<``;?``@__MR`"M!__9T&
XM_RM"__)![?_0&T#_\1M`__PK0?_D*T'_Z"M(_\Q*$V<L<``0$P1``"!G%%=`4
XM9Q110&<(54!F%GX!8`Y\`6`*>@%@!AM\``'__%*+8-`0$W(PL`%F!E*+&T'_[
XM^W`JL!-F#"!26)(K4/_V4HM@#DAM__8O"TZZ^9)03]?`$!-R+K`!9B)2BW`J!
XML!-F#"!26)(K4/_R4HM@#DAM__(O"TZZ^6A03]?`$!-R;+`!9@H;?``!__%2#
XMBV`(<FBP`68"4HL0&W(`$@`;0/_P!$$`6&<``7X$00`+9P`""E-!9R0$00`+Q
XM9P`!$E-!9P`!4%=!9P`!NE5!9P``Y%=!9P`!4F```?A*+?_Q9P@@4EB2(!!@.
XM!B!26)(@$"M`_^QL"G(!1*W_["M!_^A*K?_H9P1P+6`*2@9G!'`K8`)P(!M`S
XM_]!P`!`&(BW_Z(*`<``0!8*`9PA2K?_,4JW_Y"\M_^PO+?_,3KKX"E!/*T#_P
XMR"`M__)*@&H&<@$K0?_R("W_R"(M__*2@$CM``+_Q&\T(&W_S")(T\$O`"\)0
XM+PA.N@9J3^\`#'``$"W_^R(M_\0@;?_,8`(0P%.!9/H@+?_R*T#_R-&M_^1!`
XM[?_0*TC_S$H'9P`!,!M\`"#_^V```29*+?_Q9P@@4EB2(!!@!B!26)(@$"M`:
XM_^Q@`/]D2BW_\6<((%)8DB`08`8@4EB2(!`K0/_L2BW__&<2(&W_S!#\`#!R)
XM`2M!_^0K2/_,+P`O+?_,3KKW;E!/*T#_R&``_S(;?``P__L@+?_R2H!J!G`(D
XM*T#_\DHM__%G""!26)(@$&`&(%)8DB`0*T#_[$HM__QG%B!M_\P0_``P$/P`5
XM>'("*T'_Y"M(_\PO`"\M_\Q.NO=24$\K0/_(<%BP+?_P9@#^T$AM_]!.NO8.)
XM6$]@`/["(%)8DB)0*TG_S&8(0?H`V"M(_\P@;?_,2AAF_%.(D>W_S"M(_^0@)
XM+?_R2H!K)K'`;R(K0/_D8!QP`2M`_^0@4EB2(!`;0/_00BW_T6`&<`!@``",[
XM("W_Y"(M__:R@&P(=``K0O_V8`21K?_V2@=G-E.M_^1M&'``(&W_S!`8+P`KG
XM2/_,(&T`$$Z06$]@XE.M__9M2'``$"W_^R\`(&T`$$Z06$]@Z%.M__9M$G``%
XM$"W_^R\`(&T`$$Z06$]@Z%.M_^1M&'``(&W_S!`8+P`K2/_,(&T`$$Z06$]@7
XMXB`+3-\,Y$Y=3G4``$Y5__1(YP$P)F\`("1O`"0K;0`0__8>&DH'9S1P);X`,
XM9B*P$F8$4HI@&B\+2&W_]B\*80#\%D_O``PK0/_Z9P0D0&#2<``0!R\`3I-8X
XM3V#&3-\,@$Y=3G4``$Y5__!(YR$R)F\`+`RL````(`/&;```AA`3<B"P`6<,;
XM<@FP`6<&<@JP`68$4HM@Z$H39V@@+`/&Y8!2K`/&0>P#SM'`)$AP(K`39B92P
XMBR2+2A-G"G`BL!-G!%*+8/)*$V8,2'@``4ZZ`B183V">0AM@FB2+2A-G&!`3?
XM<B"P`6<0<@FP`6<*<@JP`6<$4HM@Y$H39@)@!D(;8`#_<DJL`\9F!B!L`B1@F
XM!$'L`\XI2`/*2JP#QF9\0_H!)$WL`XPLV2S9+-DLV3R1(FP")"!I`"1(>``HU
XM+R@`!$AL`XQ.NO0J3^\`#"QL`WQ![`.,(@@D/````^Y.KO_B*4`"."E``D!RY
XM$"E!`CPI0`)(*4$"1.6`*T#_\"QX``23R4ZN_MH@;?_P(D`C:``(`*1^`"M`P
XM__1@*BQL`WQ.KO_**4`".$ZN_\0I0`)`0?H`IB(()#P```/M3J[_XBE``DA^/
XM$"`'`$"``8&L`C0@!P!`@`*!K`(\`*P``(`#`D1*K`"(9P1P`&`&(#P``(``_
XM+@!"K``\(`<`0``!*4``.'`!*4``7B`'`$```BE``%IP`BE``(`@!P!``(`IP
XM0`!\0?H"ABE(`A@O+`/*+RP#QDZZ[=I"ETZZ]B1,[4R$_]Q.74YU8V]N.C$P-
XM+S$P+S,R,"\X,"\`*@````````````````!(YS`R+&\`."!O`!@B;P`<)&\`/
XM("9O`"0@+P`H(B\`+"0O`#`F+P`T3J[^I$S?3`Q.=0``+PLF;P`(2JL`%&<,0
XM""L``P`;9@1P`&`V+RP!E$ZZ]-Y83R=```0G0``02H!F"G`,*4`#>'#_8!8GZ
XM;`&4`!1P\\&K`!AP`"=```PG0``()E].=0``````````<&%(YP<`+B\`$"`L6
XM``A3@"P`2D9K,"`&2,#G@$'L`C0J,`@`2@5G&@@%``1F%"`&2,#G@$'L`C0O.
XM,`@$3KKVJ%A/4T9@S"\'3KKL=%A/3-\`X$YU``!.5?_H2.<!,BXO`#1*AVX&C
XM</]@``#2<`B^@&0"+@`@!U:`+@`"1__\)&T`""`M``C0A]^L`!Q![``8)E`KL
XM0/_P*TC_]"`+9P``D"!+("L`!-'`*TC_[")M__"WR6,0)(LE1P`$+&W_]"R*R
XM<`!@>+?)9AHL4R2.("L`!"(`TH<E00`$+&W_]"R*<`!@6K7(9`B?K``<</]@X
XM3K7(9BQ*DV<.(%.SR&,(GZP`''#_8#C?JP`$2I-G#K/39@H@*0`$T:L`!":10
XM<`!@'BM+__0K;?_L_^@F4V``_VX@;?_T((I"DB5'``1P`$S?3(!.74YU``!(2
XMYP<P+B\`&"9O`!PL+P`@+P=.NO:06$\D0"`*9@1P_V`>+P8O"R\J``1.NO4H`
XM3^\`#"H`2JP"`&<$</]@`B`%3-\,X$YU```@;P`$(F\`""`O``QO%K/(90S1P
XMP-/`$R!3@&;Z3G42V%.`9OI.=0``3E7_F$CG,P)^`"!L`C`>*/__<$^^@&\"H
XM+@`@!T/M_Z]@`A+84X!D^D(U>*\L>``$D\E.KO[:*T#_IB!`2J@`K&=2(B@`W
XMK.6!(D$L*0`X2.T``O^>2H9F!"PH`*!*AF<T+&P#?"(&0?H`LB0(=@M.KO_03
XM($=2AR`(&[P`"@BO+&P#?"(&)@=![?^O)`A.KO_0</]@4BQX``1#^@",<`!./
XMKOW8*T#_FF8$</]@.D'M_Z\I2`&X+RW_FDAX`#Q(>`#Z<``O`"\`2&P!U$ALV
XM`<!(;`&L0J=.NOSF3^\`)%.`9P1P_V`"<`!,WT#,3EU.=2HJ(%5S97(@06)O`
XM<G0@4F5Q=65S=&5D("HJ``!#3TY424Y510``04)/4E0`*BHJ($)R96%K.B``F
XM:6YT=6ET:6]N+FQI8G)A<GD`````````<&$O!W``(CP``#``+'@`!$ZN_LXNI
XM``*'```P`$J'9R!*K`(89QH@;`(83I!*@&8"8`Y"K`(82'@`%$ZZ_-)83RX?L
XM3G5AO$YU``!(YR`"+'D```-\3.\`!@`,3J[_K$S?0`1.=0``+PXL>0```WPB!
XM+P`(3J[_IBQ?3G5(YR`"+'D```-\3.\`!@`,3J[_FDS?0`1.=0``+PXL>0``1
XM`B!,[P`#``A.KO\Z+%].=0``+PXL>0```B`B;P`(("\`#$ZN_RXL7TYU```#=
XM[`````@````!```8-```&!P``!@"```7[```%](```&R````%`````H`````,
XM```#\`````-?06QL;V--96T``````!@8`````E]?0UA-,S,````+E`````)?=
XM7V1R96%D````"R@````"7W-T8W5L7V0```>$`````E]#6$0S,P`````+M```1
XM``%?7W!F```1J@````)?=W)I=&4`````#90````$7U],075T;U)E<75E<W0`-
XM````%``````#7T-H:U]!8F]R=``````7Q@````)?7V1W<FET90``"DP````"G
XM7U]P9FUT``````WT`````E]P<FEN=&8````(J@````)?17AA;6EN90``%_P`7
XM```"7W)L<VUL`````!3D`````E]#6$)22P`````61`````)?<W1C;%]O````=
XM![0````"7U]E>&ET`````!20`````E]#6$0R,@`````+Y@````)?;6]V;65M@
XM````%AP````"7U]G971B9@```!0T`````E]S=&-I7V\````'M`````)?3&]C>
XM:P``````%\P````"7V5X:70```````GX`````E]?0UA-,C(````+E`````)?V
XM871O:0``````#,0````"7W-T<FYC870```<,`````E]S='!B;&L````'9```,
XM``)?;'-B<FL`````#20````"7U]W<FET97,```.X`````E]5;DQO8VL````7-
XMZ`````)?;6%I;@```````:@````"0%A#15A)5`````%0`````E]?0UA$,C(`"
XM```+Y@````)?;'-E96L`````".`````"7V-H:W5F8@````QX`````E]?9'-EB
XM96L````*K`````)?7VUA:6X`````$@0````"7W-T8V1?:0````@@`````E]#D
XM6$TR,@`````+E`````)?<W1R=7!R````!L@````"7W-T8VE?:`````?T````=
XM`U]-96U#;&5A;G5P````#/0````#7V-H:V%B;W)T```````7A`````)?7V9LF
XM<V)F````!"0````"7T9R965-96T``!@P`````E]G971M;``````),`````)?!
XM<W1C;%]H````!_0````#7U]?9G!I;FET```````#M`````)?<F5A9```````6
XM%=0````"7T-833,S``````N4`````E]S=&-U7V0````'A`````-?7U]F<'1ET
XM<FT```````.V`````E]?9&-L;W-E```+=`````)?7T-81#,S````"[0````"7
XM7UA#15A)5`````%,`````````_(```/J````>@``````````````*```````%
XM````````````````````````0@``````````````````````````````````"
XM`````````&0`````````````````````````````````````````````````D
XM`````````````````````````````````````````(`````$```@("`@("`@D
XM("`H*"@H*"`@("`@("`@("`@("`@("`@($@0$!`0$!`0$!`0$!`0$!"$A(2$0
XMA(2$A(2$$!`0$!`0$(&!@8&!@0$!`0$!`0$!`0$!`0$!`0$!`0$!$!`0$!`0"
XM@H*"@H*"`@("`@("`@("`@("`@("`@("`@(0$!`0("`@("`@("`@("@H*"@H\
XM("`@("`@("`@("`@("`@("`@2!`0$!`0$!`0$!`0$!`0$(2$A(2$A(2$A(00P
XM$!`0$!`0@8&!@8&!`0$!`0$!`0$!`0$!`0$!`0$!`0$0$!`0$!""@H*"@H("H
XM`@("`@("`@("`@("`@("`@("`A`0$!`@```````"`/__````#@`.````````B
XM%S(`````__\````$``0``````````````9C__P````0`!````````!=.````3
XM`/__````!``$````````%U@````````#[`````,````````!X````<P```&DZ
XM`````P````$```&\````0@```"`````````#\`````)?7V9M;V1E`````(@`I
XM```"7U]/4T524@````(``````E]?3TY%6$E4```"%`````)?8W5R9&ER````D
XM`AP````"7U]O<V5R<@````(``````E]?:6]B````````(`````)?7U-)1T90>
XM10```@@````"7U]P;V]L```````,`````E]?4TE'24Y4```"#`````)?4WES1
XM0F%S90```B`````"7U]M8F%S90````'P`````E]?8G5F<VEZ```!E`````)??
XM7VUS:7IE`````?@````#7U]-96U,:7-T```````#@`````)?=&%R9W8`````$
XM`\H````"7U]/3D524@````(0`````E]?;6YE>'0````!]`````)?3E5,3```B
XM`````>@````"7U]U9F)S``````(T`````U]?4W1A8VM0='(``````B@````"H
XM7V%R9V,```````/&`````E]?8W1Y<&4`````D`````-?5T)E;F-H37-G````Z
XM``(D`````E]?='-I>F4````!_`````)?7VUE;'0``````!@````"7U]N=69B'
XM<P`````(`````E]?;7-T97``````C`````)?;7EL;V-K```````````$7U]0R
XM<F]G<F%M3F%M90```````C`````"7V5R<FYO``````-X`````E]A<F=V````.
XM```#S@````)?7V)A<V4``````>P````!7V9I8@````0````#7U]/3D)214%+Q
XM```````"&`````)?7T9015)2`````@0````"7T1/4T)A<V4```-\````````@
X"`_(`U
X``
Xend
Xsize 8372
END_OF_FILE
if test 11758 -ne `wc -c <'ttime.uu'`; then
    echo shar: \"'ttime.uu'\" unpacked with wrong size!
fi
# end of 'ttime.uu'
fi
echo shar: End of archive 1 \(of 1\).
cp /dev/null ark1isdone
MISSING=""
for I in 1 ; do
    if test ! -f ark${I}isdone ; then
	MISSING="${MISSING} ${I}"
    fi
done
if test "${MISSING}" = "" ; then
    echo You have the archive.
    rm -f ark[1-9]isdone
else
    echo You still need to unpack the following archives:
    echo "        " ${MISSING}
fi
##  End of shell archive.
exit 0
-- 
Mail submissions (sources or binaries) to <amiga@uunet.uu.net>.
Mail comments to the moderator at <amiga-request@uunet.uu.net>.
Post requests for sources, and general discussion to comp.sys.amiga.