Code segment

Comdata ends

PUBLIC put

Модуль 2

End main

Code ends

Int21h

Mov ax,4c00h;выход

Int 21h

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

Int 21h

Mov dx, si

Mov ah, 9h

Push cx

Push ax

Count proc near

Main endp

Mov ax, 4c00h

Call count

int 21h…

…

EXTRN put: far

comdata segment common 'data'

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

assume cs:code, ds:comdata

comdata segment common 'data'

buf db ‘ $’

assume cs:code, ds:comdata

Дата добавления: 2013-12-12