-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathsoft1.asm
86 lines (65 loc) · 899 Bytes
/
soft1.asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
.MODEL SMALL
.STACK
.DATA
MSG DB 10,13,'CURRENT DATE AND TIME IS= $'
.CODE
MOV AX,@DATA
MOV DS,AX
LEA DX,MSG
MOV AH,09H
INT 21H
;TIME
MOV AH,2CH
INT 21H
MOV AL,CH
CALL DISP
MOV DL,':'
MOV AH,02H
INT 21H
MOV AL,CL
CALL DISP
MOV DL,' '
MOV AH,02H
INT 21H
MOV DL,' '
MOV AH,02H
INT 21H
;DAY
MOV AH,2AH
INT 21H
MOV AL,DL
CALL DISP
MOV DL,'/'
MOV AH,02H
INT 21H
;MONTH
MOV AH,2CH
INT 21H
MOV AL,DH
CALL DISP
MOV DL,'/'
MOV AH,02H
INT 21H
;YEAR
MOV AH,2CH
INT 21H
ADD CX,0C30H
MOV AL,CH
CALL DISP
MOV AL,CL
CALL DISP
MOV AH,4CH
INT 21H
DISP PROC NEAR
AAM
ADD AX,3030H
MOV BX,AX
MOV DL,BH
MOV AH,02H
INT 21H
MOV DL,BL
MOV AH,02H
INT 21H
RET
DISP ENDP
END