برنامه زوج و فرد
.MODEL SMALL
.STACK 64
.DATA
STR1 DB "ZOJ$"
STR2 DB "FARD$"
.CODE
MAIN PROC FAR
MOV AX,@DATA
MOV DS,AX
;-----
MOV AX,4 ;ADADE MOREDE NAZAR / BL-> IF MOD IS 0 = EVEN
MOV BL,2
DIV BL
CMP AH,0
JNE LF
MOV AH,09H
LEA DX,STR1
INT 21H
JMP EXIT
LF:
MOV AH,09H
LEA DX,STR2
INT 21H
EXIT:
;----
MOV AH,00H
INT 16H
;----
MOV AX,4C00H
INT 21H
MAIN ENDP
END MAIN