;使用 ifndef--G7_9
　　　;---------------------------------------------------------------
　　　divide 　　　macro 　　dividend,divisor,quotient
　　　　　　　　　 local 　　comp,out
　　　　　　　　　 cntr=0
　　　;AX=div'nd, BX=div'r, CX=quot't
　　　　　　　　　 ifndef 　 dividend
　　　; dividend 没有定义
　　　　　　　　　 cntr=1
　　　　　　　　　 endif
　　　;
　　　　　　　　　 ifndef 　 divisor
　　　; divisor 没有定义
　　　　　　　　　 cntr=1
　　　　　　　　　 endif
　　　;
　　　　　　　　　 ifndef 　 quotient
　　　; quotient 没有定义
　　　　　　　　　 cntr=1
　　　　　　　　　 endif
　　　;
　　　　　　　　　 if 　　　 cntr
　　　; 宏扩展结束
　　　　　　　　　 exitm
　　　　　　　　　 endif
　　　;
　　　　　　　　　 mov 　　　ax,dividend
　　　　　　　　　 mov 　　　bx,divisor
　　　　　　　　　 sub 　　　cx,cx
　　　comp: 　　　 cmp 　　　ax,bx
　　　　　　　　　 jb 　　　 out
　　　　　　　　　 sub 　　　ax,bx
　　　　　　　　　 inc 　　　cx
　　　　　　　　　 jmp 　　　comp
　　　out: 　　　　mov 　　　quotient,cx
　　　　　　　　　 endm
　　 ;--------------------------------------------------
　　　 　　　　　　if1
　　　　　　　　　 include 　macro.mac
　　　　　　　　　 endif
　　　　　　　　　 purge 　　prompt
　　 ;--------------------------------------------------
　　　　　　　　　 .model 　 small
　　　　　　　　　 .386
　　　　　　　　　 .stack 200h 　　;定义堆栈段
　　　　　　　　　 .data 　　　　　;定义数据段
　　　　　　　　　 divdnd 　dw 200 ;dividend
　　　　　　　　　 divsor 　dw 25　;divisor
　　　　　　　　　 quotnt 　dw ? 　;quotient
　　 ;--------------------------------------------------
　　　　　　　　　 .code 　　　　　;定义代码段
　　　　　　　　　　main 　 proc 　far
　　　　　　　　　 .sall
　　　　　　　　　　initz
　　　　　　　　　 .xall
　　　　　　　　　　divide　divdnd,divsor,quotnt
　　;
　　　　　　　　　 .lall
　　　　　　　　　　divide　divdnd,divsor,quont
　　;
　　　　　　　　　 .sall
　　　　　　　　　　finish
　　　　　　　　　　main 　 endp
　　;------------------------------------------------------
　　　　　　　　　　end 　　main


　;使用 if1--g7_10
　　　;---------------------------------------------------------------
　　　divide　　　macro 　　dividend,divisor,quotient
　　　　　　　　　local 　　comp,out
　　　　　　　　　cntr=0
　　　; 　　　　　AX=div'nd, BX=div'r, CX=quot't
　　　　　　　　　ifndef dividend
　　　; 　　　　　dividend 没有定义
　　　　　　　　　cntr=1
　　　　　　　　　endif
　　　;
　　　　　　　　　i fndef divisor
　　　; 　　　　　divisor 没有定义
　　　　　　　　　cntr=1
　　　　　　　　　endif
　　　;
　　　　　　　　　ifndef quotient
　　　; 　　　　　quotient 没有定义
　　　　　　　　　cntr=1
　　　　　　　　　endif
　　　;
　　　　　　　　　if cntr
　　　; 　　　　　宏扩展结束
　　　　　　　　　exitm
　　　　　　　　　endif
　　　;
　　　　　　　　　mov 　　　ax,dividend
　　　　　　　　　mov 　　　bx,divisor
　　　　　　　　　sub 　　　cx,cx
　　　　　　comp: cmp 　　　ax,bx
　　　　　　　　　jb 　　　 out
　　　　　　　　　sub 　　　ax,bx
　　　　　　　　　inc 　　　cx
　　　　　　　　　jmp 　　　comp
　　　　　　 out: mov 　　　quotient,cx
　　　　　　　　　endm
　　 ;-----------------------------------------------------------
　　　　　　　　　endif
　　 purge prompt
　　 ;----------------------------------------------------------
　　　　　　　　 .model 　　small
　　　　　　　　 .386
0200 　　　　　　.stack 　　200h 　　;定义堆栈段
0000 　　　　　　.data 　　　　　　　;定义数据段
0000 00C8 divdnd dw 200 　　　　　　 ;dividend
0002 0019 divsor dw 25 　　　　　　　;divisor
0004 ???? quotnt dw ? 　　　　　　　 ;quotient
　　;----------------------------------------------------------------
0000 　　　　　　.code 　　　　　　　;定义代码段
0000 　　　　　　main 　　　proc far
　　　　　　　　 .sall
　　　　　　　　 initz
　　　　　　　　 .xall
　　　　　　　　 divide 　　　 divdnd,divsor,quotnt
0007 A1 0000 R 　 1 mov 　　　 ax,divdnd
000A 8B 1E 0002 R 1 mov 　　　 bx,divsor
000E 2B C9 　　　 1 sub 　　　 cx,cx
0010 3B C3 　　　 1 ??0000: 　 cmp ax,bx
0012 0F 82 001B R 1 jb ??0001
0016 2B C3 　　　 1 sub 　　　 ax,bx
0018 41 　　　　　1 inc 　　　 cx
0019 EB F5 　　　 1 jmp ??0000
001B 89 0E 0004 R 1 ??0001: 　mov quotnt,cx
　　　　　　　　 .lall
　　　　　　　　　　divide 　　divdnd,divsor,quont
　　　　　 = 0000 1 　　　　　 cntr=0
　　　　　　　　　1 　　　　 ; AX=div'nd, BX=div'r, CX=quot't
　　　　　　　　　1 endif
　　　　　　　　　1 　　　　 ;
　　　　　　　　　1 endif
　　　　　　　　　1 　　　　 ;
　　　　　　　　　1 ifndef 　　quont
　　　　　　　　　1 　　　　 ; quotient 没有定义
　　　　　 = 0001 1 　　　　　 cntr=1
　　　　　　　　　1 endif
　　　　　　　　　1 　　　　 ;
　　　　　　　　　1 if cntr
　　　　　　　　　1 　　　　 ; 宏扩展结束
　　　　　　　　　1 exitm
　　　　　　　　　　　　　　 ;
　　　　　　　　　.sall
　　　　　　　　　 finish
0024 　　　　　　　main 　　　endp
　　　;---------------------------------------------------------
0024 　　　　　　　end 　　　 main

　　这里给出了一个宏定义中所用的伪操作EXITM。从上例可见，EXITM的作用可使汇编程序在宏指令的展开过程中遇到EXITM时，将不继续进行宏展开而直接退出该宏定义。从g7_10的LST清单中可以看出，第一次DIVIDE的宏调用因三个参数均被定义使CNTR=0,因而不执行EXITM而作了宏展开，这样可在程序中实现除法；第二次DIVIDE宏调用因商的参数未被定义而使CNTR=1, 因而执行了EXITM，致使停止其后的宏展开，造成第二次除法操作不能进行。