OpenEuphoria

Re: system date

• Posted by Jacques Deschenes <desja at QUEBECTEL.COM> Feb 06, 1997
• 1504 views

At 17:22 6-02-97 -0500, you wrote:
>---------------------- Information from the mail header -----------------------
>Sender:       Euphoria Programming for MS-DOS <EUPHORIA at
>MIAMIU.ACS.MUOHIO.EDU>
>Poster:       Ad Rienks <Ad_Rienks at COMPUSERVE.COM>
>Subject:      system date
>-------------------------------------------------------------------------------
>
>Hello all!
>
>I have a small question. For a program I'm writing I need a procedure or
>function to change the system date, preferably without using the system()
>procedure. I can ask  for input in a sequence, and then hopefully via a
>dosint() change the system date.
>
>Can anyone help me?
>
>Thanks for the attention,
>
>Ad Rienks
>
Hi! Ad

dos interrupt #21 provide 4 functions call to get and set time and date

to get date:
  entry:
   AH = #2A
  return:
   CX = Year(1980-2099)
   DH = Month(1-12)
   DL = Day(1-31)

to set date:
  entry:
   AH = #2B
   CX = Year
   DH = Month
   DL = Day
  return:
   AL = 0 if date was valid; AL=#FF if not

to get time:
  entry:
   AH = #2C
  return:
   CH = Hour(0-23)
   CL = Minutes(0-59)
   DH = Seconds(0-59)
   DL = Hundredths(0-99)

to set time:
  entry:
   AH = #2D
   CH = Hour
   CL = Minutes
   DH = seconds
   DL = Hundredths
  return:
   AL = 0 if time was valid else AL = #FF


Jacques Deschenes
Baie-Comeau, Quebec
Canada
desja at quebectel.com