Implemented RTC functions

This commit is contained in:
pagefault
2001-07-23 21:09:53 +00:00
parent 1a84eebc9b
commit 707eb5f842

View File

@@ -53,7 +53,8 @@ EXTSYM ZFileDelFName,ZFileDelete
EXTSYM ZCloseFileHandle,ZCloseFile EXTSYM ZCloseFileHandle,ZCloseFile
EXTSYM ZFileTellHandle,ZFileTell EXTSYM ZFileTellHandle,ZFileTell
EXTSYM ZFFTimeFName,ZFTime,ZFDate,ZFileGetFTime EXTSYM ZFFTimeFName,ZFTime,ZFDate,ZFileGetFTime
;EXTSYM kbhit EXTSYM GetTime
EXTSYM GetDate
EXTSYM keyboardhit EXTSYM keyboardhit
EXTSYM GUIkeydelay2 EXTSYM GUIkeydelay2
EXTSYM ZFileMKDir,ZFileCHDir,ZFileRMDir,CHPath,MKPath,RMPath EXTSYM ZFileMKDir,ZFileCHDir,ZFileRMDir,CHPath,MKPath,RMPath
@@ -521,14 +522,14 @@ NEWSYM File_Seek_End
NEWSYM Get_Time NEWSYM Get_Time
pushad pushad
; call GetTime call GetTime
mov [TempVarSeek],eax mov [TempVarSeek],eax
popad popad
mov eax,[TempVarSeek] mov eax,[TempVarSeek]
ret ret
NEWSYM Get_TimeDate NEWSYM Get_TimeDate
pushad pushad
; call GetDate call GetDate
mov [TempVarSeek],eax mov [TempVarSeek],eax
popad popad
mov eax,[TempVarSeek] mov eax,[TempVarSeek]