- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第六章
子程序结构
过程定义伪操作 子程序的调用与返回 保存与恢复寄存器 子程序的参数传送 子程序的嵌套与递归
1
1. 过程定义伪操作
过程名 PROC . . .
过程名 ENDP （1）NEAR属性：调用程序和子程序在同一代码段中 （段内调用） （2）FAR属性：调用程序和子程序不在同一代码段中 （段间调用）
bp bp, sp
ax cx si di si,[bp+0ah] di,[bp+8] cx,[di] di,[bp+6]
ax, [si] si, 2 next [di],ax di si cx ax bp 6 endp
(di) (si) (cx) (ax)
(bp) (bp) (ip)
(cs) (bp)+6 sum
(1) 通过寄存器传送参数 (2) 通过存储器传送参数 (3) 通过地址表传送参数地址 (4) 通过堆栈传送参数或参数地址 (5) 多个模块之间的参数传送
6
例：十进制到十六进制的转换（通过寄存器传送参数）
参 数 传 递 方 法 1
decihex SEGMENT ASSUME CS:decihex main proc far start: call decibin call crlf call binihex call crlf mov ah,1 int 21h cmp al,27 jnz start mov ah,4ch int 21h main endp decihex ENDS END start
next:
proc
push push push lea mov xor add add loop mov pop pop pop ret
near
ax cx si si, ary cx, count ax, ax ax, [si] si, 2 next sum,ax si cx ax
参 数 传 递 方 法 2
14
code2 segment assume cs:code2 proadd proc far xor next: add add loop mov pop pop pop pop pop ret ax, ax
(sp)
push mov
push push push push mov mov mov mov
next:
10d 0000 (si) 20d 30d 40d 50d 60d 70d 80d 90d 100d count 10d 0014 sum 550d 0016 (di) table 0000 0018 (bx) 0014 0016
ary
proadd code
ห้องสมุดไป่ตู้
main
12
例：累加数组中的元素（通过堆栈传送参数地址）
8
例：累加数组中的元素（通过存储器传送参数）
data segment ary count sum data ends code segment main proc assume Start: mov mov call dw dw dw 1,2,3,4,5,6,7,8,9,10 10 ? proadd far cs:code,ds:data ax, data ds, ax proadd
data code main
参 数 传 递 方 法 3
main
11
proadd
proc push push push push mov mov mov mov xor add add loop mov pop pop pop pop ret endp ends end
near ax cx si di si, [bx] di, [bx+2] cx, [di] di, [bx+4] ax, ax ax, [si] si, 2 next [di],ax di si cx ax
(bp)+8 count (bp)+0ah array
tos
code2
ends end start
proadd
15
ends segment
…… far ptr subt ……
segy
call
code ends
segy
ends
3
2. 子程序的调用与返回
子程序调用：隐含使用堆栈保存返回地址 call near ptr subp
(1) 保存返回地址 (2) 转子程序
(SP)→
(IP)
call far ptr subp
2
NEAR ( FAR )
code segment
main proc …… call …… ret endp far subr1
segx
subt
segment
proc …… ret endp …… subt …… far
subt call
main
segx
subr1 proc …… ret subr1 endp near
data segment ary dw 10,20,30,40,50,60,70,80,90,100 count dw 10 sum dw ? ends
data
参 数 传 递 方 法 4
stack segment dw 100 tos label stack ends
dup (?) word
13
code1 segment main proc far assume cs:code1, ds:data, ss:stack start: mov ax, stack mov ss, ax mov sp, offset tos mov ax, data mov ds, ax mov bx, offset ary push bx mov bx, offset count push bx mov bx, offset sum push bx call far ptr proadd mov ax, 4c00h int 21h main endp code1 ends
(1) 保存返回地址 (2) 转子程序
(SP)→
(IP) (CS)
子程序返回：ret
4
3. 保存与恢复寄存器
subt proc
push push push push …… …… pop pop pop pop
ret
far
ax bx cx dx
dx cx bx ax
subt
endp
5
4. 子程序的参数传送
7
decibin proc near mov bx,0 newchar:mov ah,1 int 21h sub al,30h jl exit cmp al,9d jg exit cbw xchg ax,bx mov cx,10 mul cx add bx,ax jmp newchar exit: ret decibin endp
10,20,30,40,50,60,70,80,90,100 10 ?
如果直接访问内存变量，那么累加数组ary 和数组ary1中的元素不能用同一个子程序 proadd。
10
例：累加数组中的元素（通过地址表传送参数地址）
data segment ary dw 10,20,30,40,50,60,70,80,90,100 count dw 10 sum dw ? table dw 3 dup (?) ; 地址表 ends segment proc far assume cs:code, ds:data push ds sub ax, ax push ax mov ax, data mov ds, ax mov table, offset ary mov table+2, offset count mov table+4, offset sum mov bx, offset table call proadd ret endp
main
mov int endp
ax,4c00h 21h
code
ends end
start
proadd
endp
9
如果数据段定义如下：
data segment
ary count sum ary1 count1 sum1
data ends
dw dw dw dw dw dw
1,2,3,4,5,6,7,8,9,10 10 ?
binihex proc near mov ch,4 rotate: mov cl,4 rol bx,cl mov al,bl and al,0fh add al,30h cmp al,3ah jl printit add al,7h printit:mov dl,al mov ah,2 int 21h crlf proc near dec ch mov dl,0dh jnz rotate mov ah,2 ret int 21h binihex endp mov dl,0ah mov ah,2 int 21h ret crlf endp
