王爽汇编 实验七

王爽汇编 实验七

assume cs:codesg,ds:datasg,es:tablesg

    datasg 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
    datasg ends

    tablesg segment
        db 21 dup ('year summ ne ?? ')
    tablesg ends

    codesg segment
start:  
        mov ax,datasg
        mov ds,ax

        mov ax,tablesg
        mov es,ax

        mov bx,0
        mov si,0
        mov di,0
        mov cx,21
    s:  
        mov dx,ds:[si+0]
        mov es:[bx].0[0],dx
        mov dx,ds:[si+2]
        mov es:[bx].0[2],dx

        mov dx,ds:[si+84]
        mov es:[bx].5[0],dx
        mov dx,ds:[si+86]
        mov es:[bx].5[2],dx

        mov dx,ds:[di+168]
        mov es:[bx].10[0],dx

        mov ax,ds:[si+84]
        mov dx,ds:[si+86] ;
        div word ptr ds:[di+168]   ;

        mov es:[bx].13[0],ax

        add si,4
        add di,2
        add bx,16
        loop s

        mov ax,4c00h
        int 21h
    codesg ends
    end start