将data段中的数据按以下格式写入table段中:
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'
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 11452,14430,15257,17800
data ends
table segment ; 存储位置
db 21 dup ('year summ ne ?? ')
table ends
code segment
start: mov ax,data ; 初始化 ds-> data
mov ds,ax
mov ax,table ; 初始化 es-> table
mov es,ax
mov bx,0
mov si,0
mov di,0
mov cx,21 ; 21行
s: mov ax,[bx] ; 循环 复制年份
mov es:[si],ax
mov ax,[bx].2
mov es:[si].2,ax
mov ax,[bx].84 ; 复制收入
mov es:[si].5,ax
mov dx,[bx].86
mov es:[si].7,dx
div word ptr ds:[di].168; 求人均
mov es:[si].13,ax ; 存储人均
mov ax,[di].168
mov es:[si].10,ax ; 存储人数
add di,2
add bx,4 ; 下一年份
add si,16 ; 下一行
loop s
mov ax,4c00h
int 21h
code ends
end start