实验7~~~

铛铛

assume cs:codesg,ds:data,ss:table

data segment   
   db '1975','1976','1977','1978','1979','1980','1981','1982','1983'   
   db '1984','1985','1986','1987','1988','1989','1990','1991','1992'   
   db '1993','1994','1995'  
   ;年份地址0~53H
   dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514   
   dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000      
   ;年收入地址54H~A7.
   dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226   
   dw 11452,14430,15257,17800  
   ;雇员数地址A8~D1
data ends

table segment
  db 21 dup ('year summ ne ?? ')  
  ;循环了21次，0~3存储的是年份，5到8存储的是总收入，10~11存储的是雇员人数，13~14存储的是平均收入
table ends
  
codesg segment

start: mov ax,data
          mov ds,ax
          mov ax,table
          mov ss,ax
          mov bx,0                          
          mov di,0                        
          mov bp,0
          mov cx,21                        
    s:    mov ax,[bx]
          mov ss:[bp+0],ax
          mov ax,[bx+2]
          mov ss:[bp+2],ax
               
          mov ax,[bx+54h]
          mov ss:[bp+5],ax
          mov ax,[bx+54h+2]
          mov ss:[bp+5+2],ax
               
          mov ax,[di+00A8H]
          mov ss:[bp+10],ax
               
          mov ax,ds:[bx+54h]                 
          mov dx,ds:[bx+54h+2]               
          div word ptr ds:[di+00A8H]         
          mov ss:[bp+13],ax                  
          add bx,4                           
          add di,2                           
          add bp,16
          loop s
               
          mov ax,4c00H
          int 21H
codesg ends
end start

把年份、年收入、雇员人数赋值的那段，个人觉得肯定有更有效的优化方案。
如果谁有更好的办法请留言，大家一起讨论。