(* DOSclock     Date and time access procedures     1992     Chris Harsman
    This module of procedures was designed to allow reading and changing of
    the DOS internal clock. *)

DEFINITION MODULE DOSclock;

PROCEDURE GetDate(VAR day:ARRAY OF CHAR; VAR month, date, year:CARDINAL);
    (* Will return the day of the week, SUNDAY through SATURDAY, and the month
       date and year as a number. *)

PROCEDURE SetDate(month, date, year:CARDINAL);
    (* Will set the month, date and year with the specified values. *)

PROCEDURE GetTime(VAR hour, min, sec:CARDINAL);
    (* Will return the hour, minute, and second in 24 hour format. *)

PROCEDURE SetTime(hour, min, sec:CARDINAL);
    (* Will set the hour, minute, and second with the specified values. *)
    
END DOSclock.
