实验7

洛臻

assume cs:code,ds:data,ss:stack

stack segment
dw 8 dup(0)
stack ends
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
data ends

table segment
db 21 dup(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)
table ends

code segment
start:
        mov ax,data
        mov ds,ax
        mov ax,table
        mov es,ax
        mov ax,stack
        mov ss,ax
        mov sp,16
        mov cx,21
        mov di,0
        mov bp,0
        z:
        push cx
        mov cx,4
        mov si,0
       
        y:
        mov al,ds:[di]
        mov es:[bx+si],al
        inc di
        inc si
        loop y
       
        sub di,bp
        mov ax,ds:[di+164]
        add di,bp
        add bp,2
        mov es:[bx+si+6],ax
       
        mov ax,ds:[di+80]
        mov es:[bx+si+1],ax
        mov dx,ds:[di+82]
        mov es:[bx+si+3],dx
       
        div word ptr es:[bx+si+6]
        mov es:[bx+si+9],ax
        add bx,16
       
        pop cx
        loop z
       
       
       
       
       
       
       
        mov ax,4c00h
        int 21h       
code ends
end start












汇编语言出个错好麻烦啊，命令都长的差不多的。一个不小心就得排错排半天。。实验7有更好的办法么