;PROGRAM TO SEPERATE EVEN AND ODD NUMBERS
;AND SORTING THEM IN ASCENDING ORDER
MOV CL,[1500h]
MOV SI,2000h
MOV BP,2100h
MOV BX,2200h
MOV SI,2000h
LOC2: MOV AL,[SI]
RCR AL,01h
JNB LOC1
INC DH
MOV AL,[SI]
MOV [BP],AL
INC BP
INC SI
DEC CL
JNZ LOC2
JMP LOC3
LOC1: INC AH
MOV AL,[SI]
MOV [BX],AL
INC BX
INC SI
DEC CL
JNZ LOC2
LOC3: MOV CH,DH
MOV DX,2100h
CALL SORT
MOV CH,AH
MOV DX,2200h
CALL SORT
HLT
SORT:
DEC CH
loc6: MOV CL,CH
MOV BX,DX
loc5: MOV AL,[BX]
CMP [BX+01h],AL
JNC loc4
XCHG AL,[BX+01h]
MOV [BX],AL
loc4: INC BX
DEC CL
JNZ loc5
DEC CH
No comments:
Post a Comment