Возврат результата из процедуры

Ret6

Pop bp

Add bx,ax

Mov bp,sp

Push bp

Фрагмент модуля 2

End main

Codesg ends

Main endp

Mov ax,4c00h

Call far ptr submul

Push dat3

Push dat2

Push dat1

Mov ds, ax

Mov ax, datasg

Main proc far

Codesg segment para public

Datasg ends

Dat3 dw 5h

Dat2 dw 2h

Dat1 dw 10h

Stk ends

Stk segment para stack

Extrn submul far

Передача параметров в дальнюю процедуру через стек

End

Code ends

Put endp

Ret

Put proc far

Code segment

Comdata ends

PUBLIC put

Модуль 2

End main

Code ends

Int21h

Mov dx, offset buf

Mov ah,9

Call put

Mov ds, ax

Mov ax, comdata

Main

Code segment

Comdata ends

Модуль 1

Передача параметров в процедуру через общую память

End main

Count endp

Ret

Pop ax

Pop cx

Mov dx, si

Mov ah, 9h

Push cx

Push ax

Count proc near

Main endp

Mov ax, 4c00h

Call count

Mov ds,ax

Main proc

Code

Data

Передачи параметров в процедуру через регистры

Seg2 ends

Ret

Add endp

Mov res, al

Add proc far

Dseg2 ends

End start

Code ends

;модуль2

GLOBAL res:byte, add:far

EXTRN fix:byte

dseg2 segment 'data'

res db?

seg2 segment 'сode'

…….

mov al, fix; fix в другом модуле

…

Через регистры целесообразно передавать в ближнюю процедуру. Необходимо заботиться о том, чтобы применять те регистры, которые не используются при передаче управления.

Процедура должна записать в стек содержимое регистров, которые будут использованы для передачи параметров, и в конце - восстановить их содержимое.

Пример.

string db 'строка, $'

mov ax,@data

…

lea si, string;загрузка регистра

int 21h…

int 21h

…

EXTRN put: far

comdata segment common 'data'

buf db ‘ $’; в буфере пробелы

assume cs:code, ds:comdata

int 21h

mov ax,4c00h;выход

comdata segment common 'data'

buf db ‘ $’

assume cs:code, ds:comdata

mov buf,’a’

mov buf+1,’s’

mov buf+2,’u’

Пример

Модуль 1

dw 64 dup(?)

datasg segment para ‘data’

assume cs:codesg, ds:datasg, ss:stk

int 21h

mov ax,[bp+6]

mov bx,[bp+8]

mov cx,[bp+10]

sp

bp+6

bp+8

bp+10

Способы возврата:

1) Через свободный регистр.

2) С использованием общей памяти, когда объем передаваемой информации велик. Способ требует внимания программиста при чтении возвращаемых результатов.

3) Через стек. Программист резервирует некоторую область стека с целью возврата в этой области результата работы процедуры.

На рисунке показан вариант резервирования стека для возврата двух параметров.

BP

CS

IP

Dat3

Dat2

Dat1

SP

VAR2

VAR1

Дата добавления: 2014-01-04