2000-05-06 21:34:20 +02:00
|
|
|
;
|
|
|
|
; File:
|
|
|
|
; rdpcclk.asm
|
|
|
|
; Description:
|
|
|
|
; read the PC style clock from bios
|
|
|
|
;
|
|
|
|
; Copyright (c) 1995
|
|
|
|
; Pasquale J. Villani
|
|
|
|
; All Rights Reserved
|
|
|
|
;
|
|
|
|
; This file is part of DOS-C.
|
|
|
|
;
|
|
|
|
; DOS-C is free software; you can redistribute it and/or
|
|
|
|
; modify it under the terms of the GNU General Public License
|
|
|
|
; as published by the Free Software Foundation; either version
|
|
|
|
; 2, or (at your option) any later version.
|
|
|
|
;
|
|
|
|
; DOS-C is distributed in the hope that it will be useful, but
|
|
|
|
; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
|
|
|
|
; the GNU General Public License for more details.
|
|
|
|
;
|
|
|
|
; You should have received a copy of the GNU General Public
|
|
|
|
; License along with DOS-C; see the file COPYING. If not,
|
|
|
|
; write to the Free Software Foundation, 675 Mass Ave,
|
|
|
|
; Cambridge, MA 02139, USA.
|
|
|
|
;
|
|
|
|
; $Header$
|
|
|
|
;
|
2001-11-18 00:26:45 +01:00
|
|
|
|
2003-06-15 13:46:51 +02:00
|
|
|
%include "../kernel/segs.inc"
|
2001-11-18 00:26:45 +01:00
|
|
|
|
2003-03-12 23:43:53 +01:00
|
|
|
segment HMA_TEXT
|
2001-11-18 00:26:45 +01:00
|
|
|
|
2000-05-06 21:34:20 +02:00
|
|
|
;
|
2004-04-09 15:47:20 +02:00
|
|
|
; ULONG ReadPCClock(void)
|
2000-05-25 22:56:23 +02:00
|
|
|
;
|
2004-04-09 15:47:20 +02:00
|
|
|
global READPCCLOCK
|
|
|
|
READPCCLOCK:
|
2003-09-15 12:53:09 +02:00
|
|
|
mov ah,0
|
2001-11-18 00:26:45 +01:00
|
|
|
int 1ah
|
2002-01-23 23:29:41 +01:00
|
|
|
extern _DaysSinceEpoch ; ; update days if necessary
|
|
|
|
|
2003-09-15 12:53:09 +02:00
|
|
|
; (ah is still 0, al contains midnight flag)
|
2007-07-20 22:52:33 +02:00
|
|
|
add word [_DaysSinceEpoch ],ax ; *some* BIOSes accumulate several days
|
2002-01-23 23:29:41 +01:00
|
|
|
adc word [_DaysSinceEpoch+2],0 ;
|
|
|
|
|
2003-09-15 12:53:09 +02:00
|
|
|
; set return value dx:ax
|
|
|
|
xchg ax,cx ; ax=_cx, cx=_ax
|
|
|
|
xchg ax,dx ; dx=_cx, ax=_dx (cx=_ax)
|
2002-05-09 00:49:35 +02:00
|
|
|
|
2001-11-18 00:26:45 +01:00
|
|
|
ret
|
|
|
|
|