汇编语言(王爽 第三版)实验十四

assume cs:code
code segment
s1:    db 9,8,7,4,2,0
s2:    db 'yy/mm/dd hh:mm:ss','$'
start:    mov ax,cs
mov ds,ax
mov si,offset s1
mov di,offset s2
mov cx,6
s:    push cx
mov al,ds:[si]
out 70h,al
in al,71h

mov ah,al
mov cl,4
shr ah,cl
and al,00001111b

add ah,30h
add al,30h

mov ds:[di],ah
mov ds:[di+1],al

inc si
add di,3
pop cx
loop s

mov ah,2
mov bh,0
mov dh,5
mov dl,12
int 10h

mov dx,offset s2
mov ah,9
int 21h

mov ax,4c00h
int 21h
code ends
end start