实验14

~疯子

0地址是秒，2地址是分，4地址是时，7地址是日，8地址是月，9地址是年
那么年怎么计算啊 年是4个十进制 如2011年  11可以读取  20就没有了

三田学校

都是一个字节

s0512

1. assume cs:code
   
2. code segment
   
3. ;初始化
   
4. start:      
   
5.             mov ax,0b800h
   
6.             mov es,ax
   
7.             mov di,160*12+24*2
   
8.             mov dh,9 ;年
   
9.             mov cx,3   
   
10. ;读年月日  
    
11. ymd:         
    
12.             push cx
    
13.             mov al,dh
    
14.             out 70h,al
    
15.             in al,71h
    
16.             
    
17. year:       mov ah,al
    
18.             and al,00001111b
    
19.             add al,30h
    
20.             mov cl,4
    
21.             shr ah,cl
    
22.             add ah,30h
    
23.             
    
24.             mov es:[di],ah
    
25.             inc di
    
26.             mov byte ptr es:[di],4
    
27.             inc di
    
28.             mov es:[di],al        
    
29.             inc di
    
30.             mov byte ptr es:[di],4
    
31.             inc di
    
32.             
    
33.             add di,4
    
34.             mov bp,sp
    
35.             cmp byte ptr ss:[bp],1
    
36.             je y_end
    
37.             mov byte ptr es:[di],'/'
    
38.             inc di
    
39.             mov byte ptr es:[di],2
    
40.             inc di
    
41.             add di,4
    
42.             
    
43.             dec dh
    
44. y_end:      pop cx
    
45.             loop ymd
    
46.             
    
47. ;以下读时间
    
48.             mov dh,4
    
49.             mov cx,3
    
50. fm:         
    
51.             push cx
    
52.             mov al,dh
    
53.             out 70h,al
    
54.             in al,71h
    
55.             
    
56.             mov ah,al
    
57.             and al,00001111b
    
58.             add al,30h
    
59.             mov cl,4
    
60.             shr ah,cl
    
61.             add ah,30h
    
62.             
    
63.             mov es:[di],ah
    
64.             inc di
    
65.             mov byte ptr es:[di],6
    
66.             inc di
    
67.             mov es:[di],al        
    
68.             inc di
    
69.             mov byte ptr es:[di],6
    
70.             inc di
    
71.             
    
72.             add di,4
    
73.             mov bp,sp
    
74.             cmp byte ptr ss:[bp],1
    
75.             je fm_end
    
76.             mov byte ptr es:[di],':'
    
77.             inc di
    
78.             mov byte ptr es:[di],2
    
79.             inc di
    
80.             add di,4
    
81.             
    
82.             sub dh,2
    
83. fm_end:     pop cx
    
84.             loop fm
    
85. 
    
86.       
    
87.                         
    
88.             mov ah,01
    
89.             int 21h
    
90.             
    
91.             ;做一个循环，显示年月日
    
92.             
    
93. code ends
    
94. end start   

复制代码

嘻嘻