exp72.asm

汇编语言 参考书 包含作业与答案 从入门到精通 通俗易懂

STACK   SEGMENT STACK
        DW      100H DUP(?)
STACK   ENDS

DATA    SEGMENT PARA
S1      DB      'IN PROC P1',0DH,0AH,'$'
S2      DB      'IN PROC P2',0DH,0AH,'$'
S3      DB      'IN PROC P3',0DH,0AH,'$'
DATA    ENDS

CODE1   SEGMENT PARA
        ASSUME  CS:CODE1,SS:STACK


MAIN    PROC    FAR

        MOV     AX,DATA
        MOV     DS,AX

        CALL    P1

        CALL    NEAR PTR P1

        CALL    FAR PTR P1
        ADD     SP,2

        CALL    FAR PTR P2

        CALL    P2

        MOV     AX,SEG P3
        PUSH    AX
        CALL    FAR PTR P3

        MOV     AX,4C00H
        INT     21H
MAIN    ENDP

P1      PROC    NEAR
        PUSH    DX
        LEA     DX,S1
        MOV     AH,9
        INT     21H
        RET
P1      ENDP

P3      PROC    FAR
        PUSH    DX
        LEA     DX,S3
        MOV     AH,9
        INT     21H
        POP     DX
        RET
P3      ENDP
CODE1   ENDS

CODE2   SEGMENT PARA
        ASSUME  CS:CODE2
P2      PROC    FAR
        PUSH    DX
        LEA     DX,S2
        MOV     AH,9
        INT     21H
        POP     DX
        RET
P2      ENDP
CODE2   ENDS
        END     MAIN