8086汇编程序,实现对输入字符进行冒泡排序后输出.docx

STACK1 SEGMENT STACK DW 256 DUP(?)STACK1 ENDSDATA SEGMENT USE16MES1 DB Welcome!,0AH,0DH,0AH,0DH,Please input several alphabets:,0AH,0DH,Press ENTER to finish!,0AH,0DH,0AH,0DH,$MES2 DB Number of total input letters(Decimal):,$MES3 DB Number of big letters(Decimal):,$MES4 DB Number of small letters(Decimal):,$ALPHA DB 100 DUP(0)SUM DW 3 DUP(0)DATA ENDSCRLF MACRO MOV DL,0AH MOV AH,02H INT 21H MOV DL,0DH MOV AH,02H INT 21H ENDMOUTCHAR MACRO X MOV DL,X MOV AH,02H INT 21H ENDMOUTSTR MACRO X LEA DX,X;提示显示开始 MOV AH,09H INT 21H;提示显示结束 ENDMSHOWNUM MACRO X MOV AX,X MOV CL,0AH DIV CL MOV CL,AL MOV CH,AH ADD CH,30H ADD CL,30H OUTCHAR CL OUTCHAR CH CRLF ENDMSHOWRLT MACRO X,Y,Z,K CMP X,0H JE K MOV CX,X MOV BX,Y Z: OUTCHAR ALPHA[BX] INC BX LOOP Z K: CRLF CRLF ENDMCODE SEGMENT USE16ASSUME CS:CODE,DS:DATASTART:MOV AX,DATA MOV DS,AX OUTSTR MES1;输出提示语 MOV BX,0HAGAIN: MOV AH,07H;键盘输入开始 INT 21H CMP AL,0DH ;ENTER键 JE OVER CMP AL,41H ;是否小于A JB AGAIN CMP AL,7AH;是否大于z JA AGAIN CMP AL,5AH;是否大于Z JA C1 ADD SUM[02H],01H MOV ALPHA[BX],AL INC BX JMP C2 C1: CMP AL,61H;是否小于a JB AGAIN ADD SUM[04H],01H MOV ALPHA[BX],AL INC BX C2: OUTCHAR AL JMP AGAINOVER: CRLF;输入结束 CMP BX,0H;输入0个字母 JE EXIT MOV SUM[00H],BX MOV BX,0H MOV AX,0H LEA DI,ALPHASORT: INC AX CMP AX,SUM[00H] JE EXIT MOV DL,[DI] MOV BX,AXNEXT: CMP DL,ALPHA[BX] JB NO XCHG DL,ALPHA[BX] NO: INC BX CMP BX,SUM[00H] JE RANK JMP NEXTRANK: MOV [DI],DL INC DI JMP SORT JMP EXIT;TOKEY:JMP KEYEXIT: CRLF OUTSTR MES2;输出提示语 SHOWNUM SUM[00H] CRLF OUTSTR MES3;输出提示语 SHOWNUM SUM[02H] SHOWRLT SUM[02H],0H,BIG,OBIG OUTSTR MES4;输出提示语 SHOWNUM SUM[04H] SHOWRLT SUM[04H],SUM[02H],SML,OSMLKEY: MOV AH,1;程序功能结束 INT 16H JZ KEY MOV AX,4C00H INT 21HCODE ENDSEND START