实验14

3-3

与答案有一点出入，但是功能是一样的。

assume cs:code

code segment
        time: db 'yy/mm/dd hh:mm:ss','
        coms: db 9,8,7,4,2,0
        
 start:
        mov ax,cs
        mov ds,ax
        mov bx,offset coms
        mov si,offset time
        mov di,si
        mov ch,6
        
 s:
        mov al,[bx]
        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 [si],ah
        mov [si+1],al
        
        cmp ch,1
        je s1
        add si,3
        sub ch,1
        inc bx
        jmp s
        
 s1:
        mov ah,2
        mov bh,0
        mov dh,5
        mov dl,12
        int 10h
        
        mov dx,di
        mov ah,9
        int 21h
 
        mov ax,4c00h
        int 21h
        
code ends
end start