NAME: GetTime

     USE: Procedure to return the current operating system time.
          Returned values can range  Hour   = 0..23
                                     Minute = 0..59
                                     Second = 0..59
                                     Sec100 = 0..99

     DEPENDENCY:  The DOS unit must be used placed in the uses section.

     SYNTAX: GetTime(Var Hours, Minutes, Seconds, Sec100 : Word);