实验14解决方案之一，支持按Q键退出，时间会实时更新！

hackiy

;写完最后一个代码的时候，我又想到了第二种方式实验14解决方案之二
;编译后按Q键可退出，时间会实时更新！
;另外请高手指点可以优化之处，本人为新学者。

assume cs:code

data segment
        db '20yy/mm/dd hh:mm:ss','$';用于存放时间的ascii码
data ends

code segment
start:        mov ax,data
                mov ds,ax
                mov bx,2
                
;获取日期
                mov al,9
                mov cx,3
rdate:         call a2a
                add bx,3
                dec al                ;年：9，月：8，日：7
loop rdate

;获取时间
                mov al,4
                mov cx,3
rtime:        call a2a
                add bx,3
                sub al,2        ;时：4，分：2，秒：0
loop rtime

;显示时间
                mov ah,2        ;置光标
                mov bh,0        ;第0页
                mov dh,12        ;dh中存放行号
                mov dl,30        ;dl中存放列好
                int 10h

                mov dx,0        ;ds:dx指向字符串首地址data:0
                mov ah,9        ;在光标处显示字符串
                int 21h

;程序退出
        in al,60h        ;读取按键到al
                cmp al,10h        ;比较是否为Q键
                je over                ;是就结束
                jmp start        ;否则循环

over:   mov ax,4c00h
                int 21h
                
                
;说明：将MOS RAM里偏移地址为al的数据转换成ascii码存放到ds:bx里
;参数：al=COMS RAM的偏移地址
a2a:        push ax
                push cx
                
                out 70h,al
        in al,71h                        ;从CMOS RAM中读取指定地址的数据

        mov ah,al
        mov cl,4
        shr ah,cl
        and al,00001111b        ;ah为十位，al为个位

        add ah,30h
        add al,30h                        ;将数据转换为ascii码

                mov [bx],ah                ;将ascii码保存到ds:dx里
                mov [bx+1],al
                
        pop cx
        pop ax
        ret

code ends
end start