课程设计1

光头羊与喜强强

感觉写得有点粗糙，看过的大佬也分享一下你们的写法

1. assume cs:codesg
   
2. 
   
3. data segment
   
4. 
   
5.         db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
   
6.         db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
   
7.         db '1993','1994','1995'
   
8.        
   
9.         dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
   
10.         dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
    
11.        
    
12.         dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
    
13.         dw 11542,14430,15257,17800
    
14.        
    
15. data ends
    
16. 
    
17. table segment
    
18.        
    
19.         db 21 dup('year summ ne ?? ')
    
20.        
    
21. table ends
    
22. 
    
23. codesg segment
    
24.        
    
25.         start:mov ax,data
    
26.         mov ds,ax
    
27.         mov ax,0b800h
    
28.         mov es,ax
    
29.         mov di,0
    
30.         mov si,0
    
31.         mov bx,0
    
32.         mov cx,21
    
33.         s:push cx
    
34.         call showstr
    
35.         add si,14h
    
36.         mov ax,054h[di]
    
37.         mov dx,054h[di].2
    
38.         call dtoc
    
39.         add si,14h
    
40.         mov ax,0a8h[bx]
    
41.         mov dx,0
    
42.         call dtoc
    
43.         add si,14h
    
44.         push bx
    
45.         mov ax,054h[di]
    
46.         mov dx,054h[di].2
    
47.         mov bx,0a8h[bx]
    
48.         call divdw
    
49.         call dtoc
    
50.         pop bx
    
51.         add si,64h
    
52.         add di,4
    
53.         add bx,2
    
54.        
    
55.         pop cx
    
56.         loop s
    
57.         mov ax,4c00h
    
58.         int 21h
    
59.        
    
60.         showstr:mov ax,[di]
    
61.         mov es:[si],al
    
62.         mov es:[si].2,ah
    
63.         mov ax,[di].2
    
64.         mov es:[si].4,al
    
65.         mov es:[si].6,ah
    
66.         ret
    
67.        
    
68.         dtoc:
    
69.         push bx
    
70.         mov cx,0
    
71.         push cx
    
72.         s0:mov bx,10
    
73.         call divdw
    
74.         jcxz checklow
    
75.         s2:pop cx
    
76.         inc cx
    
77.         add bx,30h
    
78.         push bx
    
79.         push cx
    
80.         mov cx,10
    
81.         loop s0
    
82.        
    
83.         divdw:push ax
    
84.         mov ax,dx
    
85.         mov dx,0
    
86.         div bx
    
87.         mov cx,ax
    
88.         pop ax
    
89.         div bx
    
90.         mov bx,dx
    
91.         mov dx,cx
    
92.         ret
    
93.        
    
94.         checklow:mov cx,ax
    
95.         jcxz showdw
    
96.         mov cx,0
    
97.         jcxz s2
    
98.        
    
99.         showdw:pop cx
    
100.         inc cx
     
101.         add bx,30h
     
102.         push bx
     
103.         mov bx,0
     
104.         s1:pop ax
     
105.         mov es:[si][bx],al
     
106.         add bx,2
     
107.         loop s1
     
108.         pop bx
     
109.         ret
     
110.        
     
111. codesg ends
     
112. 
     
113. end start
     
114. 
     
115. 
     

复制代码

FGing

对比楼主的代码加上注释，还加上了个人的理解（看了一天了有的地方还是不理解。。。）。

1. assume cs:codesg
   
2. 
   
3. a segment
   
4. dw 1975,1976,1977,1978,1979,1980,1981,1982,1983
   
5. dw 1984,1985,1986,1987,1988,1989,1990,1991,1992
   
6. dw 1993,1994,1995  ;42
   
7. 
   
8. dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
   
9. dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000        ;84
   
10. 
    
11. dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
    
12. dw 11542,14430,15257,17800        ;42
    
13. 
    
14. ;dw 5,3,42,104,85,210,123,111,105,125,140,136,153,211,199,209,224,239,260
    
15. ;dw 304,333        ;42
    
16. 
    
17. a ends
    
18. 
    
19. codesg segment
    
20. start:
    
21.         mov ax,a
    
22.         mov ds,ax                                 ;a段数据段地址做ds
    
23.         mov ax,0b800h                         ;显存地址做es
    
24.         mov es,ax
    
25. 
    
26.         mov si,0                                ;显存偏移
    
27.         mov di,0                                ;字符偏移(收入)
    
28.         mov bx,0                                ;字符偏移
    
29. 
    
30.         mov cx,21
    
31. 
    
32. ls:        push cx
    
33.         mov ax,[bx]                         ;第一组字符(年份)，低16位
    
34.         mov dx,0                                 ;清零高16位
    
35.         call dtoc
    
36. 
    
37.         add si,14h
    
38.         mov ax,[di+42]                        ;第二组字符(收入)，低16位
    
39.         mov dx,[di+44]                        ;高16位
    
40.         call dtoc
    
41. 
    
42.         add si,14h
    
43.         mov ax,[bx+126]                ;第三组字符(人数)，低16位
    
44.         mov dx,0                                ;清零高16位
    
45.         call dtoc
    
46. 
    
47.         push bx                                 ;因为要用到所以保存
    
48.         add si,14h
    
49.         mov ax,[di+42]                        ;第二组字符(收入)，低16位
    
50.         mov dx,[di+44]                        ;高16位
    
51.         mov bx,[bx+126]                ;人数字符
    
52.         call divdw                                ;除法
    
53.         call dtoc
    
54.         pop bx
    
55.         add si,100                                ;显存换行写入
    
56.         add bx,2                                ;下一个字符
    
57.         add di,4                                ;下一个收入字符
    
58.         pop cx
    
59.         loop ls
    
60. 
    
61.         mov ax,4c00h
    
62.         int 21h
    
63. 
    
64. dtoc:
    
65.         push bx                                ;保存bx要用作之后用做被除数
    
66.         mov cx,0                               ;初始化cx   
    
67.     push cx                                        ;保存cx做计次用
    
68. 
    
69. s0:       
    
70.         mov bx,10                         ;除法的被除数
    
71.         call divdw                                ;跳转到除法
    
72.         jcxz checklow                        ;divdw代码结束时才会回到这里，cx=0跳转checklow
    
73. s2:        pop cx                                ;恢复计次
    
74.         inc cx                                ;计次
    
75.         add bx,30h                        ;余，ascll码
    
76.         push bx                                 ;保存字符ascll码
    
77.         push cx                                 ;保存计次
    
78.         ;mov cx,10                        
    
79.         ;loop s0
    
80.         jmp short s0
    
81. 
    
82. divdw:                                        ;除法
    
83.         push ax                                ;保存ax,先除dx
    
84.         mov ax,dx                                ;dx的值给ax
    
85.         mov dx,0                                ;清零，余(dx)
    
86.         div bx                                ;ax除以bx，高16位/10
    
87.         mov cx,ax                                 ;商给cx
    
88.         pop ax                                  ;还原ax
    
89.         div bx                                 ;ax/bx = 低16位/10
    
90.         mov bx,dx                         ;余给bx
    
91.         mov dx,cx                                 ;第一次除法的商给dx
    
92.         ret
    
93. 
    
94. checklow:                                         ;当divdw段代码执行完成时，到jcxz checklow并且cx=0时跳转到这
    
95.         mov cx,ax                                 ;ax是divdw子程序的商
    
96.         jcxz showdw                             ;当除法，商=0时跳转
    
97.         jmp short s2                        ;计算下一个 ，1975 →197
    
98.         ;mov cx,0
    
99.         ;jcxz s2
    
100. 
     
101. showdw:                                         ;做字符ascll码
     
102.         pop cx                                ;把保存的次数拿出来
     
103.         inc cx                                ;加上一次循坏(最后余的)
     
104.         add bx,30h                        ;divdw 的余，第一位数(1975的1)
     
105.         push bx                                 ;把每个数字的ascll保存在栈
     
106.         mov bx,0                                 ;清零bx s1要用做显存的偏移变量
     
107. 
     
108. s1:        pop ax                                 ;把数字的ascll码拿出来
     
109.         mov es:[si+bx],al                 ;bx是定位下一个显存字符的变量，(00 00 00 = [bx] 00 [bx])
     
110.         add bx,2                                 ;下一组显存数据(00 00 00 = 00 00 [bx])
     
111.         loop s1
     
112.         pop bx
     
113. 
     
114.         ret
     
115. codesg ends
     
116. end start

复制代码