课程设计 1（代码相对较少饿）

avatar10010

1. ;初学汇编，希望给点意见，将代码更加精{:1_1:}
   
2. assume cs:code
   
3. 
   
4. code segment  
   
5. year        db   '19751976197719781979198019811982198319841985',
   
6.                       '1986198719881989199019911992199319941995'
   
7. income   dd   16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514,
   
8.                       345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
   
9. member  dw  3,7,9,13,28,38,130,220,476,778,1001,1442,2258,
   
10.                       2793,4037,5635,8226,11542,14430,15257,17800  
    
11. 
    
12. start:
    
13.         mov ax,0b800h+160*4/16   ;4代表行号
    
14.         mov es,ax
    
15. 
    
16.         mov bh,2        ;设置颜色(绿色)
    
17.         xor si,si
    
18.         xor di,di
    
19.         xor bp,bp
    
20.         mov cx,21                ;设置循环次数
    
21. line:
    
22.         ;Year
    
23.         ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
24.         mov bl,year[di]
    
25.         mov es:[bp],bx
    
26.         mov bl,year[di+1]
    
27.         mov es:[bp+2],bx
    
28.         mov bl,year[di+2]
    
29.         mov es:[bp+4],bx
    
30.         mov bl,year[di+3]
    
31.         mov es:[bp+6],bx
    
32.         ;Income
    
33.         ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
34.         add bp,12
    
35.         mov ax,word ptr income[di]
    
36.         mov dx,word ptr income[di+2]
    
37.         call dtoc
    
38.         ;Member
    
39.         ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
40.         add bp,18
    
41.         mov ax,member[si]
    
42.         xor dx,dx
    
43.         call dtoc
    
44.         ;Average
    
45.         ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
46.         add bp,14
    
47.         push cx
    
48.         mov ax,word ptr income[di]
    
49.         mov dx,word ptr income[di+2]
    
50.         mov cx,member[si]
    
51.         call divdw
    
52.         call dtoc
    
53.         add si,2
    
54.         add di,4
    
55.         add bp,116
    
56.         pop cx        
    
57. loop line        
    
58.         mov ax,4c00h
    
59.         int 21h
    
60. 
    
61. dtoc:
    
62.         push si
    
63.         push cx        
    
64.         xor si,si
    
65. s:
    
66.         mov cx,10
    
67.         call divdw
    
68.         add cl,30h
    
69.         mov ch,bh
    
70.         push cx
    
71.         inc si
    
72.         mov cx,ax
    
73.         jcxz return1
    
74.         jmp s
    
75. return1:
    
76.         mov cx,si        
    
77.         mov si,bp
    
78. return2:
    
79.         pop es:[si]
    
80.         add si,2
    
81.         loop return2
    
82.         pop cx
    
83.         pop si
    
84.         ret
    
85. 
    
86. divdw:
    
87.         push bx
    
88.         push ax    ;保存低16位
    
89.         mov ax,dx  ;此时ax的值是高16位
    
90.         xor dx,dx
    
91.         div cx           ;H/N
    
92.         mov bx,ax  ;bx的值为（int）H/N,dx的值是（rem）H/N
    
93.         pop ax
    
94.         div cx           ;L/N
    
95.         mov cx,dx
    
96.         mov dx,bx
    
97.         pop bx
    
98.         ret
    
99. 
    
100. code ends
     
101. end start

复制代码

小靚同学Leon

0x1.代码请用代码格式发
0x2.新手可以看下置顶的帖子再发帖哦

avatar10010

小靚同学Leon 发表于 2014-10-3 15:13
0x1.代码请用代码格式发
0x2.新手可以看下置顶的帖子再发帖哦

谢谢，我已经改正了