课程设计1

1295110212

assume cs:c,ds:d,es:t
d    segment
     db '1975','1976','1977','1978','1979','1980','1981','1982','1983','1984','1985'
     db '1986','1987','1988','1989','1990','1991','1992','1993','1994','1995'
     dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514,345980,590827
     dd 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,11542,14430
     dw 15257,17800
d    ends
t    segment
     db 22 dup ('year summ ne ?? ')
t    ends
c    segment
  s:mov ax,d
     mov ds,ax
     mov ax,t
     mov es,ax 
     mov bx,0 
     mov bx,00h
     mov cx,21d
  s1:push cx
     mov cx,4
     mov di,0
 s10:mov ax,0
     mov al,[si]
     mov es:[bx+di],al
     inc di
     inc si
     loop s10
 s11:mov ax,[si+50h]
     mov es:[bx+5],ax

     mov ax,[si+52h]
     mov es:[bx+7],ax
 s12:mov ax,es:[bx+5]
     mov dx,es:[bx+7]
     mov cx,ds:[bp+0a8h]
     mov es:[bx+0ah],cx
     div cx             
     mov es:[bx+0dh],ax  
     add bp,2h
     add bx,10h
     pop cx
     loop s1
         mov cx,15h
         mov bp,0
         mov bl,2
         mov bh,3
    cylc:push cx
         push bx
show_str:mov cx,0
         mov dh,bl
         mov dl,bh
         mov cl,2
         mov ax,0b800h  
         mov ds,ax
         mov ax,0 
         mov al,0a0h    
         mul dh         
         mov di,ax
         mov al,2h
         mul dl        
         sub ax,2h
         add di,ax
         mov dl,cl
         mov bx,0
         mov si,0
         mov cx,4
   dtoc1:mov al,es:[ bp+si]
         mov ah,0
         mov [bx+di],al
         mov [bx+di+1],dl
         inc bx 
         inc bx
         inc si
         loop dtoc1
         jmp near ptr data2
   dtoc2:mov bx,20h
         mov si,0
         mov dl,2h
       o:mov cl,es:[si+150h]
         mov ch,0
         mov [bx+di],cl
         mov [bx+di+1],dl
         add bx,2
         inc si
         inc cx                                                         
         loop o
         jmp near ptr data3
   dtoc3:mov bx,50h
         mov si,0
         mov dl,2h
      o1:mov cl,es:[si+150h]
         mov ch,0
         mov [bx+di],cl
         mov [bx+di+1],dl
         add bx,2
         inc si 
         inc cx
         loop o1
         jmp near ptr data4
  dtoc4:mov bx,80h
        mov si,0
        mov dl,2h
     o2:mov cl,es:[si+150h]
        mov ch,0
        mov [bx+di],cl
        mov [bx+di+1],dl
        add bx,2
        inc si
        inc cx
        loop o2
        jmp near ptr b
     data2:mov bx,0
           mov ax,es:[bp+5]
           mov dx,es:[bp+7]
           mov cx,0ah
           call divdw2
           jmp near ptr dtoc2
     data3:mov bx,0
           mov ax,es:[bp+0ah]
           mov dx,0
           mov cx,0ah
           call divdw3
           jmp near ptr dtoc3
     data4:mov bx,0
           mov ax,es:[bp+0dh]
           mov dx,0
           mov cx,0ah
           call divdw4
           jmp near ptr dtoc4
    divdw2:mov cx,0ah
           push ax
           mov ax,dx
           mov dx,0
           div cx
           mov si,ax
           pop ax
           div cx
           mov cx,dx
           mov dx,si
           add cx,30h
           push cx
           inc bx

           mov cx,ax
           inc cx
           loop divdw2
           mov cx,bx     
           mov bx,0
         a:pop ax          
           mov es:[bx+150h],al
           inc bx
           loop a
           mov ax,0
           mov es:[bx+150h],ax 
           ret
    divdw3:mov cx,0ah
           push ax
           mov ax,dx
           mov dx,0
           div cx
           mov si,ax
           pop ax
           div cx
           mov cx,dx
           mov dx,si
           add cx,30h
           push cx
           inc bx
           mov cx,ax
           inc cx
           loop divdw3
           mov cx,bx     
           mov bx,0
        a0:pop ax          
           mov es:[bx+150h],al
           inc bx
           loop a0
           mov ax,0
           mov es:[bx+150h],ax 
           ret
    divdw4:mov cx,0ah
           push ax
           mov ax,dx
           mov dx,0
           div cx
           mov si,ax
           pop ax
           div cx
           mov cx,dx
           mov dx,si
           add cx,30h
           push cx
           inc bx
           mov cx,ax
           inc cx
           loop divdw4
           mov cx,bx     
           mov bx,0
        a1:pop ax          
           mov es:[bx+150h],al
           inc bx
           loop a1
           mov ax,0
           mov es:[bx+150h],ax 
           ret
       b:add bp,10h
         pop bx
         inc bl
         pop cx
         dec cx
         jcxz e
         jmp near ptr cylc
   e:mov ax,4c00h
     int 21h
c    ends
end s

求生而学

哇！！！

独步凌波

厉害

智商负

厉害啊，我当时做不来，都是直接看的答案