برنامه ای که 10 کاراکتر را از ورودی گرفته به صورت یکی در میان به چاپ می رساند

[دلکش]

:Dاگر میشه این سوال من را جواب دهید برنامه ای که 10 کاراکتر را از ورودی گرفته به صورت یکی در میان به چاپ می رساند

[kind_hearted]

:Dاگر میشه این سوال من را جواب دهید برنامه ای که 10 کاراکتر را از ورودی گرفته به صورت یکی در میان به چاپ می رساند


.MODEL SMALL
.STACK
.DATA
CHR DB "ABCDEFGHIJ$"
.CODE
MAIN PROC FAR

MOV AX,@DATA
MOV DS,AX
MOV ES,AX
;----

MOV BX,0

L1:
MOV AL,CHR[BX]
CMP AL,'$'
JE EXIT
MOV AL,CHR[BX-1]
CMP AL,'$'
JE EXIT
MOV AH,02H
MOV DL,CHR[BX]
INT 21H
INC BX
INC BX
JMP L1

;----
EXIT:
MOV AH,00H
INT 16H

MOV AX,4C00H
INT 21H

MAIN ENDP
END MAIN