CDDESE SEGEMENT ; 定义代码段
MAIN PROC FAR ;定义主过程
ASSUME CS:CODESG,...
MOV AX,...
MOV DS,AX ;设置数据段地址
CALL SUBR1 ;调用子过程
CALL SUBR2
CALL SUBR3
MOV AH,4CH ;返回dos
INT 21H
MAIN ENDP
SUBR1 PROC NEAR ;子过程
...
SUBR1 ENDP
SUBR2 PROC NEAR
...
SUBR2 ENDP
SUBR3 PROC NEAR
...
SUBR3 ENDP
CODESG ENDS ;代码段结束
END MAIN ;源程序结束