6153.asm

来自「汇编语言复习资料」· 汇编 代码 · 共 51 行

;6_15(3).asm

;*******************************************************************
         extrn  compute:far
         public x,y,r
;********************************************************************
d_seg    segment
x        dw 1
y        dw 4
d_seg    ends
;******************************************************************
e_seg    segment
r        dw ?
e_seg    ends
;****************************************************************
c_seg    segment
;------------------------------------------------------------------
main     proc  far
         assume cs:c_seg,ds:d_seg,es:e_seg
start:
         mov  ax,d_seg
         mov  ds,ax
         mov  ax,e_seg
         mov  es,ax
         call far ptr compute
         mov  ax,4c00h
         int  21h
main     endp
;-------------------------------------------------------------------
c_seg    ends
;*******************************************************************
         end   start
;*****************************************************************
         extrn  x:word,y:word,r:word
         public compute
;*****************************************************************
prognam  segment
         assume cs:prognam
;-----------------------------------------------------------------
compute  proc far
         mov  ax,x
         add  ax,y
         sub  ax,3
         mov  es:r,ax
         ret
compute  endp
;-----------------------------------------------------------------
prognam  ends
;****************************************************************
         end