Time                                                           MiscTTT



Purpose   To display the system time nicely formatted

Returns   String;

Declaration    Time:string;

Uses CRT, DOS, MiscTTT;



Remarks   The format of the returned string is hour:min:sec a.m. or
          hour:min:sec p.m.

Example


               USES CRT, FASTTTT, DOS, MISCTTT;
               BEGIN
                 CLRSCR;
                 WRITECENTER(1,YELLOW,BLACK,TIME);
               END.


The time would be written at the top center of the screen.