Click above to get retro games delivered to your door ever month!

 FT_CIV2MIL()
 Convert usual civilian format time to military time.
------------------------------------------------------------------------------

 Syntax

      FT_CIV2MIL( <cCIVTIME> ) -> cMILTIME

 Arguments

     <cCIVTIME>  character string of form hh:mm (am,pm,n or m),
        where 0<hh<12.

 Returns

     <cMILTIME>  character string of form hhmm, where 0<=hh<24.

 Description

     Converts time from 12-hour civilian format to military.

 Examples

     FT_CIV2MIL( " 5:40 pm" ) -> 1740

     FT_CIV2MIL( " 5:40 am" ) -> 0540

     FT_CIV2MIL( "12:00 n" ) -> 1200

     FT_CIV2MIL( "12:00 m" ) -> 0000

     Caution:  leading blanks are irrelevant; p,a,n,m must be preceded by
               one and only one space.

 Source: MILTIME.PRG

 Author: Alexander B. Spencer