DATA 	SEGMENT
  	BUF   DB  23H09H14H53H67H89H4FH20HA5H10H
     CN   EQU $-BUF
DATA  	ENDS
CODE  	SEGMENT
       	ASSUME  CSCODEDSDATA
START	MOV   AXDATA 			
       	MOV   DSAX 
       	MOV   CXCN-1					
LP1  	MOV   SI0 					
       	PUSH  CX						
LP2  	MOV   AL BUF[SI]				
       	CMP   AL BUF[SI+1]			
       	JLE   NEXT						
       	XCHG  ALBUF[SI+1]			
       	MOV   BUF [SI]AL 
NEXT	INC   SI						
       	LOOP  LP2						
       	POP   CX 						
       	LOOP  LP1						
       	MOV   AH4CH					
       	INT   21H 
CODE  	ENDS
  	   	END   START						
