hejian1w 发表于 2012-1-23 19:19:45

试验7源码

assume cs:code
data segment
db '1975','1976','1977','1978','1979','1980'
db '1981','1982','1983','1984','1985','1986'
db '1987','1988','1989','1990','1991','1992'
db '1993','1994','1995';21个
       
dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
;4*21

dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800
;2*21
data ends

table segment
db 21 dup ('year summ ne ?? ');16
table ends

code segment
start:
        mov ax,data
        mov ds,ax
        mov ax,table
        mov es,ax
       
        mov bx,0
        mov bp,0
        mov si,0A8h       
       
        mov cx,21
s:
        push cx
       
       
        mov cx,2;年份
s0:
        mov ax,ds:
        mov es:,ax
       
      mov ax,ds:
        mov es:,ax
       
        add bx,2;
        add bp,2
        loop s0
       
        pop cx
       
       
        mov ax,ds:;人数
        mov es:,ax
               
        mov ax,ds:;L16位 ;人均收入
        mov dx,ds:;H16
        div word ptr ds:
        mov es:,ax
       

        add bp,12
        add si,2
       

        loop s



        mov ax,4c00h
        int 21h

code ends
end start

新的旅程 发表于 2012-11-26 22:35:21

谢谢分享！！
页: [1]
查看完整版本: 试验7源码