【汇编语言】（第三版）课程设计1

程序功能：将实验7中的数据转换为十进制数的字符后，按照表格的方式显示在屏幕上

用到的子程序：divdw(做不会溢出的除法运算)，show_str(显示字符串)，dtoc(将二进制的数据转换为十进制数的字符形式)

assume cs:code

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'
	;以上是表示21年的21个字符串
	
	dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
	dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
	;以上是表示21年公司总收入的21个dword型数据

	dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
	dw 11542,14430,15257,17800
	;以上是表示21年公司雇员人数的21个word型数据
data ends

stack segment 
	db 128 dup (0)
stack ends

table segment
	db 21 dup ('                                        ')	;存放转换后的字符
table ends

code segment
start:
	mov ax,data
	mov es,ax	;es指向data段

	mov ax,table
	mov ds,ax	;ds指向table

	mov bx,0	;bx指向es的偏移地址
	mov si,0	;si指向ds的偏移地址
	mov di,640	;di指向显示缓冲区的偏移地址
	mov bp,0	;bp指向雇员人数的偏移地址
	mov cx,21	;把table中的内容当作共21行的数据
s:	
	push cx		;cx入栈，在这个循环中有修改cx的操作
	;年份
	mov ax,es:[bx]
	mov ds:[si],ax
	mov ax,es:[bx+2]
	mov ds:[si+2],ax

	;每年公司总收入
	mov ax,es:[bx+84]
	mov dx,es:[bx+86]
	call dtoc_ci

	;每年公司的雇员人数
	mov ax,es:[bp+168]
	mov dx,0
	call dtoc_p

	;每年的人均收入
	mov ax,es:[bx+84]
	mov dx,es:[bx+86]
	mov cx,es:[bp+168]
	call divdw
	call dtoc_pi

	call show_str		;每做一次循环，显示一行的内容

	add bx,4
	add si,40
	add di,160
	add bp,2
	pop cx
	loop s

	mov ax,4c00h
	int 21h

;将公司的每年总收入转化为十进制字符的子程序
dtoc_ci:
	push bp
	push bx
	push cx
	push ax
	push ds
	push si

	mov bp,0
s2:	
	mov cx,10
	call divdw
	mov bx,cx
	mov cx,ax
	jcxz s3
	push bx
	inc bp
	jmp short s2

s3:	add bx,30h
	mov ds:[si+10],bl
	inc si
	mov cx,bp
	jcxz s5
s4:	pop bx
	add bx,30h
	mov ds:[si+10],bl
	inc si
	loop s4


s5:
	pop si
	pop ds
	pop ax
	pop cx
	pop bx
	pop bp
	ret

;做不会产生溢出的除法子程序
divdw:
	push bx

	mov bx,ax
	mov ax,dx
	mov dx,0
	div cx
	push ax

	mov ax,bx
	div cx

	mov cx,dx
	pop dx

	pop bx
	ret

;显示字符的子程序
show_str:
	push ax
	push es
	push dx
	push bx		;相关寄存器入栈
	push cx
	push si
	push di

	mov ax,0b800h
	mov es,ax	;es指向显示缓冲区
	mov ah,2	;色值
sx:	
	mov cl,ds:[si]	
	mov ch,0	
	jcxz sy		;读取字符串，如果字符串结束，末尾为0，结束读取，跳转至程序返回处
	mov al,ds:[si]	;低位存放字符，此时ah中存放的是色值
	mov es:[di],ax	;将字符信息存入显示缓冲区对应的位置
	inc si		;si指向数据段中的下一个字符
	add di,2	;di指向当前显示缓冲区偏移地址的下一个字单元
	jmp sx
sy:
	pop di
	pop si
	pop cx
	pop bx		;相关寄存器出栈
	pop dx
	pop es
	pop ax
	ret

;将公司每年雇员的人数转化为十进制字符的子程序
dtoc_p:
	push bp
	push bx
	push cx
	push ax
	push ds
	push si

	mov bp,0
s20:	
	mov cx,10
	call divdw
	mov bx,cx
	mov cx,ax
	jcxz s21
	push bx
	inc bp
	jmp short s20

s21:	add bx,30h
	mov ds:[si+24],bl
	inc si
	mov cx,bp
	jcxz s23
s22:	pop bx
	add bx,30h
	mov ds:[si+24],bl
	inc si
	loop s22


s23:
	pop si
	pop ds
	pop ax
	pop cx
	pop bx
	pop bp
	ret

;将人均收入转化为字符的子程序
dtoc_pi:
	push bp
	push bx
	push cx
	push ax
	push ds
	push si

	mov bp,0
s10:	
	mov cx,10
	call divdw
	mov bx,cx
	mov cx,ax
	jcxz s11
	push bx
	inc bp
	jmp short s10

s11:	add bx,30h
	mov ds:[si+34],bl
	inc si
	mov cx,bp
	jcxz s13
s12:	pop bx
	add bx,30h
	mov ds:[si+34],bl
	inc si
	loop s12


s13:	mov bx,0
	mov ds:[si+34],bl	;注意这里，因为人均收入在每一行的末尾，
				;为了让读取字符的子程序知道每一行的结尾，
				;这里要将每一行的最后一个字节替换为0
	pop si
	pop ds
	pop ax
	pop cx
	pop bx
	pop bp
	ret


code ends
end start