Chrono()

         Gets/Sets 3 programable chronos

    Syntax:

         Chrono( nChrono [, lLoad] ) -> nTime

         nChrono : Chrono number ( 1 2 3 )
         lLoad   : A logic indicating if we want to load the chrono with
                   the actual time. Default value is .F.

    Description:

         Gets/Sets 3 internal chronos. Each of them come be programmed
         separately.

    Return:

         The interval between actual time and the time when the chrono was
         programmed.

    Example:

         Chrono( 1, .T. )       // Chrono 1 with actual time
         Delay( 10 )            // Delay, 10 seconds
         ? Chrono( 1 )          // 10