实验14

avatar10010

1. code segment
   
2. dis db "20??/??/?? ??:??:??",'
   
3. num db 9,8,7,4,2,0
   
4. start:        
   
5.         xor si,si
   
6.         mov di,2
   
7.         mov cx,6                                
   
8. lp:                        
   
9.         push cx
   
10.         mov al,num[si]
    
11.         out 70H,al
    
12.         in al,71H                                
    
13.         mov ah,al
    
14.         mov cl,4
    
15.         shr ah,cl
    
16.         and al,00001111b
    
17.         add ah,30H
    
18.         add al,30H
    
19.         
    
20.         mov dis[di],ah
    
21.         mov dis[di+1],al
    
22.         inc si
    
23.         add di,3
    
24.         pop cx
    
25.         loop lp
    
26. 
    
27.         mov ah,2                 ;置光标
    
28.         xor bh,bh                ;第0页
    
29.         mov dh,8                        ;置行号
    
30.         mov dl,24                        ;置列号
    
31.         int 10h                                ;调用10号中断        
    
32.         
    
33.         mov ah,9                           ;在光标位置显示字符
    
34.         mov bx,cs
    
35.         mov ds,bx
    
36.         mov dx,offset dis        ;要加offset
    
37.         int 21h
    
38.                                 
    
39. code ends
    
40. end start
    

复制代码