实验七 寻址方式在结构化数据中的应用
assume cs:codesg ,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'
dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800
dw 1,2,3
data ends
table segment
db 21 dup ('year summ ne ?? ')
table ends
codesg segment
start:
mov ax,data
mov ds,ax
mov ax,table
mov es,ax
mov si,0;定位data中的单个年份字符
mov bx,0;定位每个结构型数据
mov di,0;定位收入
mov bp,0;定位人均收入
mov cx,21
s: push cx
mov cx,4
s1: mov al,ds:[si];拷贝年份
mov es:[bx],al
inc si
inc bx
loop s1
pop cx
sub bx,4
mov es:[bx+4],' '
mov ax,ds:[84+di];拷贝年收入
mov es:[bx+5],ax
add di,2
mov ax,ds:[84+di]
mov es:[bx+7],ax
add di,2
mov es:[bx+9],' '
mov ax,ds:[168+bp];拷贝雇员数
mov es:[bx+0ah],ax;注意前导0
add bp,2
mov es:[bx+0ch],' '
mov ax,es:[bx+5];计算平均收入
mov dx,es:[bx+7]
div word ptr es:[bx+0ah]
mov es:[bx+0dh],ax
mov es:[bx+0fh],' '
add bx,16;定位table中的结构型数据
loop s
mov ax,4C00H
int 21H
codesg ends
end start