Code is here- INCLUDE PCMAC.INC .model small .586 .stack 100h .data
Code is here-
INCLUDE PCMAC.INC
.model small
.586
.stack 100h
.data
msg DB 'Today is: $' ; Declare string output
saveAX DW ? ; Variable to save register AX
saveDX DW ? ; Variable to save register DX
EXTRN putDec:NEAR ; Use subprogram putDec
Day PROC ; Begin procedure
_Begin
_GetDate
mov ax, @data ; Requirement
mov ds, ax
_putStr msg ; Write output message
_getDate ; Get System Date
mov saveDX, dx ; Save Month and Day
mov al, dh ; Move month to register AL
mov ah, 0 ; Clear high value in AH
call putDec ; Write Month
_putCh '/' ; Write '/'
mov dx, saveDX ; Restore Month, Day
mov al, dl ; Move day to register AL
mov ah, 0 ; Clear high value in AH
call putDec ; Day
_putCh '/' ; Write '/'
mov ax, cx ; Move year to register AX
call putDec ; Year
_Exit 0 ; Exit
Day endp
end Day;
My program displays " Today is: //", I need it to display the current date.
![](/static/compass_v2/shared-icons/check-mark.png)
Trending now
This is a popular solution!
Step by step
Solved in 2 steps
![Blurred answer](/static/compass_v2/solution-images/blurred-answer.jpg)
![Computer Networking: A Top-Down Approach (7th Edi…](https://www.bartleby.com/isbn_cover_images/9780133594140/9780133594140_smallCoverImage.gif)
![Computer Organization and Design MIPS Edition, Fi…](https://www.bartleby.com/isbn_cover_images/9780124077263/9780124077263_smallCoverImage.gif)
![Network+ Guide to Networks (MindTap Course List)](https://www.bartleby.com/isbn_cover_images/9781337569330/9781337569330_smallCoverImage.gif)
![Computer Networking: A Top-Down Approach (7th Edi…](https://www.bartleby.com/isbn_cover_images/9780133594140/9780133594140_smallCoverImage.gif)
![Computer Organization and Design MIPS Edition, Fi…](https://www.bartleby.com/isbn_cover_images/9780124077263/9780124077263_smallCoverImage.gif)
![Network+ Guide to Networks (MindTap Course List)](https://www.bartleby.com/isbn_cover_images/9781337569330/9781337569330_smallCoverImage.gif)
![Concepts of Database Management](https://www.bartleby.com/isbn_cover_images/9781337093422/9781337093422_smallCoverImage.gif)
![Prelude to Programming](https://www.bartleby.com/isbn_cover_images/9780133750423/9780133750423_smallCoverImage.jpg)
![Sc Business Data Communications and Networking, T…](https://www.bartleby.com/isbn_cover_images/9781119368830/9781119368830_smallCoverImage.gif)