王爽《汇编语言》实验7
assume cs:code,ds:datasg,es:table
datasg segment
db ‘1986’,‘1976’,‘1977’,‘1978’,‘1979’,‘1980’,‘1981’,‘1982’,‘1983’
db ‘1984’,‘1985’,‘1986’,‘1987’,‘1988’,‘1989’,‘1990’,‘1991’,‘1992’
db ‘1993’,‘1994’,‘1995’
dd 197514,22,382,1356,2390,8000,16000,24486,50065,97479,140417,17514
dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
dw 1442,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800
datasg ends
table segment
db 21 dup ('year summ ne ?? ')
table ends
code segment
start: mov ax,datasg
mov ds,ax
;mov ax,table
;mov es,ax
mov cx,21 ;循环次数
mov ax,ds
add ax,0eH
mov es,ax
mov bx,0
mov bp,0
mov si,0 ;偏移值误差
s:
mov ax,[bx+si]
mov es:[bp],ax ;复制年份前两位
mov ax,[bx+si+2]
mov es:[bp+2],ax;复制年份后两位
mov al,20H
mov es:[bp+4],al;设置空格
mov ax,ds:[bx+si+84]
mov es:[bp+5],ax
mov ax,ds:[bx+si+84+2]
mov es:[bp+7],ax;复制金额
mov al,20H
mov es:[bp+9],al;设置空格
mov ax,ds:[si+84+84]
mov es:[bp+10],ax;复制雇员
mov ax,ds:[bx+si+84]
mov dx,ds:[bx+si+84+2]
div word ptr ds:[bx+84+84]
mov es:[bp+12],ax
mov es:[bp+14],dx
mov al,20H
mov es:[bp+15],al
add bp,16
add bx,2
add si,2
loop s
mov ax,4c00h
int 21h
code ends
end start