|
- assume cs:code
- data segment
- db '1975','1976','1977','1978','1979','1980','1981','1982','1983','1984','1985','1986','1987','1988','1989','1990','1991','1992','1993','1994','1995';年份
- dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514;84
- dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000;收入
- dw 3,7,9,13,28,38,130,220,476,778,1001,1441,2258,2793,4037,5635,8226,11542,14430,15257,17800;人数168
- db 16 dup(0);
- data ends
- stack segment
- dw 16 dup(0)
- stack ends
- code segment
- start: mov ax,stack
- mov ss,ax
- mov sp,20h
- mov ax,data
- mov ds,ax
- mov bp,sp
- sub sp,4
- mov word ptr [bp-2],0
- mov word ptr [bp-4],00001111b
- mov cx,21
- mov bx,0 ;w类型
- mov si,210 ;dw类型
- mov di,0 ;行数
- s1: push cx
-
- mov byte ptr [bp-2],15
- mov ax,[bx]
- mov dx,[bx+2]
- mov [si],ax
- mov [si+2],dx
- mov byte ptr [si+4],0
- mov dx,[bp-2]
- mov cl,[bp-4]
- call show_str
-
- mov ax,[bx+84]
- mov dx,[bx+86]
- call dtoc
- add byte ptr [bp-2],15
- mov dx,[bp-2]
- mov cl,[bp-4]
- call show_str
-
- mov cx,[di+168]
- mov dx,[bx+86]
- call divdw
- call dtoc
- add byte ptr [bp-2],30
- mov dx,[bp-2]
- mov cl,[bp-4]
- call show_str
-
- mov ax,[168+di]
- mov dx,0
- call dtoc
- sub byte ptr [bp-2],15
- mov dx,[bp-2]
- mov cl,[bp-4]
- call show_str
-
- pop cx
- add bx,4
- add di,2
- inc byte ptr [bp-1]
- loop s1
- mov ax,4c00h
- int 21h
- ;除法
- ;dx:ax/cx
- ;dx:ax,cx
- divdw: push bp
- mov bp,sp
- push ax
- mov ax,dx
- mov dx,0
- div cx
- push ax
- mov ax,[bp-2]
- div cx
- mov cx,dx
- pop dx
- mov sp,bp
- pop bp
- ret
- ;显示字符串
- ;dh 行号,dl列号
- ;cl 颜色
- show_str: push es
- push di
- push si
- push cx
- push ax
- mov ax,0b800h
- mov es,ax
- mov ax,00a0h
- mul dh
- mov di,ax
- mov ax,2
- mul dl
- add di,ax
- mov al,cl
- mov ch,0
- check: mov cl,[si]
- jcxz ok_show_str
- mov es:[di],cl
- mov es:[di+1],al
- add di,2
- inc si
- jmp check
- ok_show_str:pop ax
- pop cx
- pop si
- pop di
- pop es
- ret
- ;将16进制转化为10进制字符串
- ;dx:ax,ds:si
- dtoc: push si
- push di
- push dx
- push ax
- push cx
- mov di,si
- s_dtoc: mov cx,10
- call divdw
- add cl,30h
- mov [si],cl
- inc si
- push cx
- mov cx,ax
- jcxz ok_dtoc
- pop cx
- jmp s_dtoc
- ok_dtoc:pop cx
- mov byte ptr [si],0
- mov ax,si
- sub ax,di
- mov cl,2
- div cl
- dec si
- mov cl,al
- jcxz done_dtoc
- s1_dtoc:mov al,[di]
- mov ah,[si]
- mov [di],ah
- mov [si],al
- inc di
- dec si
- loop s1_dtoc
- done_dtoc: pop cx
- pop ax
- pop dx
- pop di
- pop si
- ret
- code ends
- end start
复制代码 |
|