实验7

许楠

;研究了三四个小时,没看教程,回头看看人家写的,汗颜啊 比我写的精简多了

1. assume cs:code
   
2. data segment
   
3. db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
   
4. db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
   
5. db '1993','1994','1995';0-83
   
6. 
   
7. dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
   
8. dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000;84-167
   
9. 
   
10. dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226;168-209
    
11. dw 11542,14430,15257,17800
    
12. data ends
    
13. stack segment
    
14. dw 8 dup (0)
    
15. stack ends
    
16. table segment
    
17. db 21 dup ('year summ ne ?? ')
    
18. table ends
    
19. code segment
    
20. start:
    
21. mov ax,data
    
22. mov ds,ax
    
23. mov ax,table
    
24. mov es,ax
    
25. mov ax,stack
    
26. mov ss,ax
    
27. mov sp,8
    
28. mov dx,0
    
29. mov bp,0
    
30. mov cx,21
    
31. mov si,0
    
32. mov di,0
    
33. s:
    
34. push cx
    
35. mov cx,4
    
36. 
    
37. s0:
    
38. mov al,byte ptr ds:[bx+di]
    
39. mov byte ptr es:[si],al
    
40. inc di
    
41. inc si
    
42. loop s0
    
43. mov byte ptr es:[si],' '
    
44. inc si
    
45. mov di,84
    
46. mov cx,2
    
47. s1:
    
48. mov ax,word ptr ds:[bx+di]
    
49. mov dx,word ptr ds:[bx+di+2]
    
50. mov word ptr es:[si],ax
    
51. mov word ptr es:[si+2],dx
    
52. add di,2
    
53. add si,2
    
54. loop s1
    
55. mov byte ptr es:[si],' '
    
56. inc si
    
57. mov di,168
    
58. mov ax,word ptr ds:[bp+di]
    
59. mov word ptr es:[si],ax
    
60. add si,2
    
61. mov byte ptr es:[si],' '
    
62. inc si
    
63. mov di,84
    
64. mov ax,word ptr ds:[bx+di]
    
65. mov dx,word ptr ds:[bx+di+2]
    
66. mov di,168
    
67. div word ptr ds:[bp+di]
    
68. mov word ptr es:[si],ax
    
69. add si,2
    
70. mov byte ptr es:[si],' '
    
71. inc si
    
72. 
    
73. pop cx
    
74. add bx,4
    
75. add bp,2
    
76. mov di,0
    
77. ;inc bx
    
78. loop s
    
79. 
    
80. 
    
81. mov ax,4c00h
    
82. int 21h
    
83. code ends
    
84. end start
    

复制代码

415968430

我也贴下代码，刚刚弄出来。

1. data segment
   
2. db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
   
3. db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
   
4. db '1993','1994','1995'
   
5. ;以上是表示21年的21个字符串, 0~53h
   
6. dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
   
7. dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
   
8. ;以上是表示21年公司总收入的21个dword型数据, 54h~0A7h
   
9. dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
   
10. dw 11542,14430,15257,17800
    
11. ;以上是表示21年公司雇员工人数的21个word型数, 0A8h~0D1h
    
12. data ends
    
13. table segment
    
14. db 21 dup('year summ ne ?? ')
    
15. table ends
    
16. codesg segment
    
17. start:
    
18. mov ax,data
    
19. mov ds,ax
    
20. mov ax,table
    
21. mov es,ax
    
22. mov bx,0
    
23. mov si,0
    
24. mov di,0
    
25. mov cx,21
    
26. 
    
27. s:mov al,ds:[bx]
    
28. mov es:[di],al
    
29. mov al,ds:[bx+1]
    
30. mov es:[di+1],al
    
31. mov al,ds:[bx+2]
    
32. mov es:[di+2],al
    
33. mov al,ds:[bx+3]
    
34. mov es:[di+3],al
    
35. 
    
36. mov ax,ds:[bx+54h]
    
37. mov dx,ds:[bx+56h]
    
38. mov es:[di+5],ax
    
39. mov es:[di+7],dx
    
40. 
    
41. mov si,ds:[bx+0A8h]
    
42. mov es:[di+10],si
    
43. 
    
44. div si
    
45. 
    
46. mov es:[di+13],ax
    
47. 
    
48. add di,10h
    
49. add bx,4
    
50. 
    
51. loop s
    
52. 
    
53. 
    
54. 
    
55. mov ax,4c00h
    
56. int 21h
    
57. codesg ends
    
58. end start
    
59. 
    

复制代码

小甲鱼版本的。。