实验7练习。

jeset

作业声明，此作业是没有看老师的视频，先看的书本写出来的，此程序没有太多优化。如果有什么不恰当的地方请指出！
assume cs:code,ds:data,es: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'
;定义年份完成，byte类型
dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
;定义收入完成，dword类型
dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800
;定义21年雇佣人数
data ends
table segment
db 21 dup ('year summ ne ?? ')
table ends

code segment
kaishi:
mov ax,data
mov ds,ax
mov ax,table
mov es,ax
mov ax,0
mov bx,0
mov si,0
mov di,0
mov cx,21
;年份开始复制
nfw:
push cx
mov cx,2
nfn:
mov ax,ds:[si]
mov es:[bx+di],ax
add si,2
add di,2
loop nfn
mov di,0
add bx,10H
pop cx
loop nfw
;年份结束完毕

;收入开始复制

mov di,5H
mov cx,21
mov bx,0
srw:
push cx
mov cx,2
srn:
mov ax,ds:[si]
mov es:[bx+di],ax
add si,2
add di,2
loop srn
mov di,5H
add bx,16
pop cx
loop srw
;收入结束复制
;人数开始复制
mov di,0AH
mov bx,0
mov cx,21
rs:
mov ax,ds:[si]
mov es:[bx+di],ax
add si,2
add bx,16
loop rs
;人数结束复制
;计算人均开始，因除数为字型数据即16位除非运算，所有被除数被32位，并且取整
mov bx,0
mov cx,21
rj: mov dx,es:[bx+7H]
mov ax,es:[bx+5H]
div word ptr es:[bx+0AH]
mov es:[bx+0DH],ax
add bx,16
loop rj
;计算人均结束
mov ax,4c00h
int 21h


code ends
end kaishi