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

hackiy

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

1. assume cs:code
   
2. 
   
3. data segment
   
4.         db '20yy/mm/dd hh:mm:ss','$';用于存放时间的ascii码
   
5. data ends
   
6. 
   
7. code segment
   
8. start:        mov ax,data
   
9.                 mov ds,ax
   
10.                 mov bx,2
    
11.                
    
12. ;获取日期
    
13.                 mov al,9
    
14.                 mov cx,3
    
15. rdate:         call a2a
    
16.                 add bx,3
    
17.                 dec al                ;年：9，月：8，日：7
    
18. loop rdate
    
19. 
    
20. ;获取时间
    
21.                 mov al,4
    
22.                 mov cx,3
    
23. rtime:        call a2a
    
24.                 add bx,3
    
25.                 sub al,2        ;时：4，分：2，秒：0
    
26. loop rtime
    
27. 
    
28. ;显示时间
    
29.                 mov ah,2        ;置光标
    
30.                 mov bh,0        ;第0页
    
31.                 mov dh,12        ;dh中存放行号
    
32.                 mov dl,30        ;dl中存放列好
    
33.                 int 10h
    
34. 
    
35.                 mov dx,0        ;ds:dx指向字符串首地址data:0
    
36.                 mov ah,9        ;在光标处显示字符串
    
37.                 int 21h
    
38. 
    
39. ;程序退出
    
40.         in al,60h        ;读取按键到al
    
41.                 cmp al,10h        ;比较是否为Q键
    
42.                 je over                ;是就结束
    
43.                 jmp start        ;否则循环
    
44. 
    
45. over:   mov ax,4c00h
    
46.                 int 21h
    
47.                
    
48.                
    
49. ;说明：将MOS RAM里偏移地址为al的数据转换成ascii码存放到ds:bx里
    
50. ;参数：al=COMS RAM的偏移地址
    
51. a2a:        push ax
    
52.                 push cx
    
53.                
    
54.                 out 70h,al
    
55.         in al,71h                        ;从CMOS RAM中读取指定地址的数据
    
56. 
    
57.         mov ah,al
    
58.         mov cl,4
    
59.         shr ah,cl
    
60.         and al,00001111b        ;ah为十位，al为个位
    
61. 
    
62.         add ah,30h
    
63.         add al,30h                        ;将数据转换为ascii码
    
64. 
    
65.                 mov [bx],ah                ;将ascii码保存到ds:dx里
    
66.                 mov [bx+1],al
    
67.                
    
68.         pop cx
    
69.         pop ax
    
70.         ret
    
71. 
    
72. code ends
    
73. end start

复制代码