long equ 0		;long doesnt work yet

;
;Define a function as near or far.
;
 func macro procname
  public procname
  procname proc near
	push	bp
	mov	bp,sp
	push	ds
	push	es
	mov	ax,ds
	mov	es,ax
 endm
;
;Close a function declaration.
;
 endf macro procname
	pop	es
	pop	ds
	pop	bp
	ret
  procname endp
 endm

;
;Define the args on the stack.
;
arg0	equ	[bp+4]
arg1	equ	[bp+6]
arg2	equ	[bp+8]
arg3	equ	[bp+10]
arg4	equ	[bp+12]
arg5	equ	[bp+14]
arg6	equ	[bp+16]
arg7	equ	[bp+18]
arg8	equ	[bp+20]