课程设计1

拖着拖把去拖鞋

用了3个循环.改了几次,这次应该是可读性最好的了.欢迎指导

1. ; 显示数据在显示器上
   
2. assume cs:code
   
3. 
   
4. data segment
   
5.      ; 21个年头
   
6.           db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
   
7.           db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
   
8.           db '1993','1994','1995'
   
9.      ; 21年来每一年的收入,偏移位置开头为54H
   
10.           dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
    
11.           dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
    
12.      ; 21年来每一年的雇员,偏移位置开头为A8H
    
13.           dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
    
14.           dw 11542,14430,15257,17800
    
15.      ; 存放每一年的人均收入,偏移地址开头为D2H
    
16.           dw 21 dup (0)
    
17.      ; 21行40列的输出字符串,偏移地址开头为FCH
    
18.           db 840 dup (20H)
    
19.      ;  偏移地址开头为444H,分别是年份、收入、雇员、人均收入的偏移地址
    
20.           dw 0H,54H,0A8H,0D2H
    
21.      ;  偏移地址开头为44cH,分别是年份、收入、雇员、人均收入字符串的偏移地址
    
22.           dw 0FCH,106H,110H,11AH
    
23. data ends
    
24. 
    
25. stack segment
    
26.            dw 8 dup (0)
    
27. stack ends
    
28. 
    
29. code segment
    
30.      start:              mov  ax,data
    
31.                          mov  ds,ax
    
32.                          mov  ax,stack
    
33.                          mov  ss,ax
    
34.                          mov  sp,32
    
35. 
    
36.                          mov  si,54H                        ; 用于定位年收入
    
37.                          mov  di,0A8H                       ; 用于定位年雇员
    
38.                          mov  bp,0D2H                       ; 用于定位人均收入
    
39.                          mov  cx,21
    
40.      ; l0用于计算年人均收入
    
41.      l0:                 mov  ax,ds:[si]
    
42.                          mov  dx,ds:[si+2]
    
43.                          mov  bx,ds:[di]
    
44.                          div  bx                            ; 计算年人均收入
    
45.                          mov  ds:[bp],ax                    ; 存入计算得出的人均收入
    
46.                          add  si,4
    
47.                          add  di,2
    
48.                          add  bp,2
    
49.                          loop l0
    
50. 
    
51.                          mov  cx,21
    
52.      l1:                 push cx
    
53.      ; 存入年份 start
    
54.                          mov  di,ds:[444H]                  ; 存入即将要处理的年份的偏移地址
    
55.                          mov  si,ds:[44CH]                  ; 存入即将要写入数据的偏移地址
    
56.                          mov  ax,ds:[di]                    ; 存入即将要处理的年份
    
57.                          mov  ds:[si],ax                    ; 将年份存入字符串
    
58.                          mov  ax,ds:[di+2]                  ; 存入即将要处理的年份
    
59.                          mov  ds:[si+2],ax                  ; 将年份存入字符串
    
60.                          add  di,4                          ; 移到下一个要处理的年份
    
61.                          add  si,40                         ; 移到下一行,对应年份的位置
    
62.                          mov  ds:[444H],di                  ; 更新内存中的地址
    
63.                          mov  ds:[44CH],si                  ; 更新内存中的地址
    
64.      ; 存入年份 end
    
65. 
    
66.      ; 存入收入 start
    
67.                          mov  di,ds:[446H]                  ; 存入即将要处理的收入的偏移地址
    
68.                          mov  si,ds:[44EH]                  ; 存入即将要写入数据的偏移地址
    
69.                          mov  ax,ds:[di]
    
70.                          mov  dx,ds:[di+2]
    
71.                          push si
    
72.                          call change_to_dec_init            ; 转换收入数据
    
73.                          pop  si
    
74.                          add  di,4
    
75.                          add  si,40
    
76.                          mov  ds:[446H],di                  ; 更新内存中的地址
    
77.                          mov  ds:[44EH],si                  ; 更新内存中的地址
    
78.                          mov  dx,0
    
79.      ; 存入收入 end
    
80. 
    
81.      ; 录入雇员 start
    
82.                          mov  di,ds:[448H]
    
83.                          mov  si,ds:[450H]                  ; 存入即将要写入数据的偏移地址
    
84.                          mov  ax,ds:[di]
    
85.                          push si
    
86.                          call change_to_dec_init            ; 转换雇员数据
    
87.                          pop  si
    
88.                          add  di,2
    
89.                          add  si,40
    
90.                          mov  ds:[448H],di                  ; 更新内存中的地址
    
91.                          mov  ds:[450H],si                  ; 更新内存中的地址
    
92.      ; 录入雇员 end
    
93. 
    
94.      ; 录入人均收入 start
    
95.                          mov  di,ds:[44AH]                  ; 存入人均收入的偏移地址
    
96.                          mov  si,ds:[452H]                  ; 存入即将要写入数据的偏移地址
    
97.                          mov  ax,ds:[di]
    
98.                          push si
    
99.                          call change_to_dec_init            ; 转换人均收入数据
    
100.                          pop  si
     
101.                          add  di,2
     
102.                          add  si,40
     
103.                          mov  ds:[44AH],di                  ; 更新内存中的地址
     
104.                          mov  ds:[452H],si                  ; 更新内存中的地址
     
105.      ; 录入人均收入 end
     
106. 
     
107.                          pop  cx
     
108.                          dec  cx
     
109.                          jcxz l1_end
     
110.                          jmp  l1
     
111.      l1_end:             nop
     
112. 
     
113.                          mov  cx,21
     
114.                          mov  si,123H
     
115.      ; l3用于输出前的预处理,把每一行后面置为0
     
116.      l2:                 mov  byte ptr ds:[si],0            ; 每一行最后放0,作为结尾
     
117.                          add  si,40
     
118.                          loop l2
     
119. 
     
120.                          mov  si,0FCH                       ; 用于定位字符串数据
     
121.                          mov  di,0                          ; 用于定位显存位置
     
122.                          mov  dh,3                          ; 行号
     
123.                          mov  dl,30                         ; 列号
     
124.                          mov  bl,2                          ; 颜色
     
125.                          call show_str_init
     
126.                          mov  cx,21
     
127.      ; l4用于输出数据到显示器
     
128.      l3:                 push cx
     
129.                          call show_str_start
     
130.                          add  di,80                         ; 换行.数据占了40列也就是80个字节,所以160-80
     
131.                          pop  cx
     
132.                          loop l3
     
133. 
     
134.                          mov  ax,4c00h
     
135.                          int  21h
     
136. 
     
137.      ; 名称: change_to_dec
     
138.      ; 功能: 将dword或word型数据转变为表示十进制数的字符串,字符串以0结尾
     
139.      ; 参数: ax=数据低16位
     
140.      ;      dx=数据高16位
     
141.      ;      ds:si指向字符串首地址
     
142.      ; 返回: 无
     
143.      change_to_dec_init: mov  cx,0
     
144.                          push cx                            ; 作为结尾
     
145.      change_to_dec_start:mov  cx,10
     
146.                          call divdw
     
147.                          add  cx,ax                         ; 处理数据中有0意外结束循环的问题
     
148.                          jcxz change_to_dec_ok
     
149.                          sub  cx,ax
     
150.                          add  cx,30h                        ; 算出ASCII码中对应的十进制数
     
151.                          push cx                            ; 由于先算出来的是最后一位,先入栈暂存
     
152.                          jmp  short change_to_dec_start
     
153.      change_to_dec_ok:   pop  cx
     
154.                          jcxz change_to_dec_end
     
155.                          mov  ds:[si],cl
     
156.                          inc  si
     
157.                          jmp  short change_to_dec_ok
     
158.      change_to_dec_end:  ret
     
159. 
     
160.      ; 名称: divdw
     
161.      ; 功能:进行不会产生溢出的除法运算
     
162.      ; 参数: ax=被除数低16位
     
163.      ;      dx=被除数高16位
     
164.      ;      cx=除数
     
165.      ; 返回: ax=结果低16位
     
166.      ;      dx=结果高16位
     
167.      ;      cx=余数
     
168.      ; 公式:X:被除数、N:除数、H:X高16位、L:X低16位、int():取商、rem():取余数
     
169.      ;     X/N=int(H/N)*65536+[rem(H/N)*65536+L]/N
     
170.      divdw:              push ax                            ; 暂存被除数低16位
     
171.                          mov  ax,dx                         ; 存放被除数高16位
     
172.                          mov  dx,0                          ; 除数16位的话dx会参与运算,置0避免溢出
     
173.                          div  cx                            ; 计算int()和rem()
     
174.                          mov  bx,ax                         ; 暂存结果高16位
     
175.                          pop  ax
     
176.                          div  cx                            ; 计算(rem(H/N)*65536+L)/N
     
177.                          mov  cx,dx                         ; 存放返回值余数
     
178.                          mov  dx,bx                         ; 存放返回值高16位
     
179.                          ret
     
180. 
     
181.      ; 名称: show_str
     
182.      ; 功能: 在指定的位置,用指定的颜色,显示一个0结尾的字符串
     
183.      ; 参数: dh=行号(取值范围0~24)
     
184.      ;      dl=列号(取值范围0~79)
     
185.      ;      cl=颜色
     
186.      ;      ds:si指向字符串首地址
     
187.      ;      ds:di指向当前显示位置
     
188.      ; 返回: 无
     
189.      show_str_init:      mov  ax,0b800h                     ; 显示区域的开头
     
190.                          mov  es,ax
     
191.                          mov  ch,0
     
192.                          mov  cl,dh
     
193.      ssil0:              add  di,160                        ; 计算跳到指定行的字节数
     
194.                          loop ssil0
     
195.                          mov  cl,dl
     
196.      ssil1:              add  di,2                          ; 计算跳到指定列的字节数
     
197.                          loop ssil1
     
198.                          ret
     
199.      show_str_start:     mov  ch,0
     
200.                          mov  cl,ds:[si]
     
201.                          jcxz show_str_ok
     
202.                          mov  es:[di],cl                    ; 存放需要显示的字符
     
203.                          mov  es:[di+1],bl                  ; 存放需要显示的颜色
     
204.                          inc  si
     
205.                          add  di,2
     
206.                          jmp  short show_str_start
     
207.      show_str_ok:        mov  byte ptr es:[di],0            ; 增加一个字符串之间的间隔
     
208.                          mov  byte ptr es:[di+1],0
     
209.                          add  di,2
     
210.                          inc  si                            ; 跳过字符串结尾的‘0’
     
211.                          ret
     
212. code ends
     
213. 
     
214. end start

复制代码