2_2_3.asm

taxis of combined BCD codes

DATA 	SEGMENT
 FIG		DB		23H, 85H, 95H, 42H, 78H, 35H, 67H, 89H, 99H, 0E3H, 0FH, 8AH, 34H, 01H, 0B5H, 9CH, 0D3H, 9CH, 3FH, '$'
DATA 	ENDS

STACK 	SEGMENT
    
STACK 	ENDS

CODE 	SEGMENT
    	ASSUME 	CS:CODE,DS:DATA,SS:STACK
START	PROC
    	MOV 	AX,DATA
    	MOV 	DS,AX
	LEA		SI,FIG
	MOV		CX,13H

CMP1:
	LEA		SI,FIG
	CMP		CX,0H
	JZ		OVER
	MOV		DI,CX

CMP2:
	MOV		AL,[SI]
	MOV		BL,[SI+1]
	CMP		DI,0H
	JZ		MID
	CMP		AL,BL
	JNA		NXCH
	MOV		[SI],BL
	MOV		[SI+1],AL

NXCH:
	INC		SI
	DEC		DI
	JMP		CMP2
MID:
	DEC		CX
	JMP		CMP1

OVER:
	LEA		SI,FIG
	MOV		DX,SI
	MOV		AH,09H
	INT		21H

    	MOV 	AH,4CH
    	INT 	21H
START	ENDP
CODE 	ENDS
    	END 	START