if1

LARGE equ 1 ; define your memory model here

ifdef SMALL

; default, so do nothing

else

ifdef MEDIUM

LARGE_CODE equ 1

else

ifdef COMPACT

LARGE_DATA equ 1

else

ifdef LARGE

LARGE_DATA equ 1

LARGE_CODE equ 1

else

%out No memory model defined--assuming SMALL

endif ; LARGE

endif ; COMPACT

endif ; MEDIUM

endif ; SMALL

beginproc macro procname

ifdef LARGE_CODE

procname proc far

else

procname proc near

endif ; LARGE_CODE

endm ; beginproc

endif ; if1

_TEXT SEGMENT BYTE PUBLIC 'CODE'

_TEXT ENDS

_DATA SEGMENT WORD PUBLIC 'DATA'

_DATA ENDS

CONST SEGMENT WORD PUBLIC 'CONST'

CONST ENDS

_BSS SEGMENT WORD PUBLIC 'BSS'

_BSS ENDS

DGROUP GROUP CONST, _BSS, _DATA

assume cs:_text, ds:dgroup, ss:dgroup, es:dgroup

; define X as the offset of first argument on stack frame

ifdef LARGE_CODE

X equ 6 ; return offset and segment + old BP

else

X equ 4 ; return offset + old BP

endif ; LARGE_CODE