mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 01:11:48 +03:00
24 lines
632 B
NASM
24 lines
632 B
NASM
////////////////////////////////////////////////////////////////////////
|
|
; ”ãªæ¨ï #17. ˆä®à¬ æ¨ï ® ¤ ⥠¨ ¢à¥¬¥¨ ä ©« .
|
|
;
|
|
; ¢å®¤: A - ¤¥áªà¨¯â®à ä ©«
|
|
; ¢ë室: D - ¤¥ì
|
|
; E - ¬¥áïæ
|
|
; IX - £®¤
|
|
; H - ç á
|
|
; L - ¬¨ãâë
|
|
; B - ᥪã¤ë
|
|
; A - ª®¤ ®è¨¡ª¨, ¥á«¨ CF=1
|
|
////////////////////////////////////////////////////////////////////////
|
|
GET_D_T:
|
|
CALL SET_FM
|
|
RET C
|
|
; ¢à¥¬ï/¤ âã ¨§ áâàãªâãàë ¤¥áªà.
|
|
LD E,(IY+_sFM.FS_REC.TIME) ; ¢à¥¬ï
|
|
LD D,(IY+_sFM.FS_REC.TIME+1) ;
|
|
LD C,(IY+_sFM.FS_REC.DATE) ; ¤ â
|
|
LD B,(IY+_sFM.FS_REC.DATE+1) ;
|
|
CALL RMKTIME ; à ᪮¤¨à®¢ âì ¢à¥¬ï/¤ âã
|
|
AND A
|
|
RET
|
|
; |