铛铛 发表于 2017-8-8 20:03:21

实验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,
          mov ss:,ax
          mov ax,
          mov ss:,ax
               
          mov ax,
          mov ss:,ax
          mov ax,
          mov ss:,ax
               
          mov ax,
          mov ss:,ax
               
          mov ax,ds:               
          mov dx,ds:               
          div word ptr ds:         
          mov ss:,ax                  
          add bx,4                           
          add di,2                           
          add bp,16
          loop s
               
          mov ax,4c00H
          int 21H
codesg ends
end start

把年份、年收入、雇员人数赋值的那段，个人觉得肯定有更有效的优化方案。
如果谁有更好的办法请留言，大家一起讨论。
页: [1]
查看完整版本: 实验7~~~