home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c082_144 / 5.ddi / TASMEXMP.ZIP / CALLPROC.ASM < prev    next >
Encoding:
Assembly Source File  |  1992-06-10  |  991 b   |  33 lines
  1. ; Turbo Assembler    Copyright (c) 1988, 1991 By Borland International, Inc.
  2.  
  3. ; CALLPROC.ASM
  4.  
  5. ; From the Turbo Assembler Users Guide
  6.  
  7. DATA     SEGMENT WORD PUBLIC
  8.          ASSUME DS:DATA
  9.          EXTRN  A:WORD            ;variable from the unit
  10. DATA     ENDS
  11.  
  12.  
  13. CODE     SEGMENT BYTE PUBLIC
  14.          ASSUME CS:CODE
  15.          EXTRN  PublicProc : FAR  ;far procedure
  16.                                   ; (exported by the unit)
  17.          EXTRN  NearProc : NEAR   ;near procedure (local to unit)
  18.          EXTRN  FarProc  : FAR    ;far procedure
  19.                                   ; (local but forced far)
  20.  
  21. AsmProc  PROC NEAR
  22.          PUBLIC AsmProc
  23.          call   FAR PTR PublicProc
  24.          call   NearProc
  25.          call   FAR PTR FarProc
  26.          mov    cx,ds:A           ;pull in var A from the unit
  27.          sub    cx,2              ;do something to change it
  28.          mov    ds:A,cx           ;store it back
  29.          ret
  30. AsmProc  ENDP
  31. CODE     ENDS
  32.          END
  33.