Convert Time to DHMS

FUNCTION "fcConvTimeToDHMS" : VOID
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
   VAR_INPUT
      timInput : TIME;   // Input time
   END_VAR

   VAR_OUTPUT
      usDays : USInt;   // Days left
      usHours : USInt;   // Hours left
      usMins : USInt;   // Minutes left
      usSecs : USInt;   // Seconds left
   END_VAR

   VAR_TEMP
      udiDiffSec : UDInt;   // Time difference in seconds
   END_VAR


BEGIN
    (*
        fcTimerRemainL
        adfox@horsefucker.org

        This function is used to convert TIME into
        days, hours, minutes and seconds.

    *)

    #udiDiffSec := TIME_TO_UDINT(#timInput) / 1000;                 // -- Get total seconds
    #usDays     := UDINT_TO_USINT(#udiDiffSec / 86400);             // -- Get days left
    #usHours    := UDINT_TO_USINT((#udiDiffSec MOD 86400) / 3600);  // -- Get hours left
    #usMins     := UDINT_TO_USINT((#udiDiffSec MOD 3600) / 60);     // -- Minutes
    #usSecs     := UDINT_TO_USINT(#udiDiffSec MOD 60);              // -- Seconds


END_FUNCTION