8086实现数组从小到大的程序

1、DATA SEGMENTDAI DB ODH, OAH,' ARRAY NUMBER', ODH, OAH,' $'DA5 DB ODH, OAH,，THE ORDER OF THE NUMBER ',ODH,OAH,' $' ARRAY DB 10 DUP (0)PRO DB 20 DUP (0)DATA ENDSSTACK SEGMENTDB 500 DUP(0)STACK ENDSCODE SEGMENTSTART PROC FARASSUME DS:DATA, SS:STACK, CS:CODEMAIN: MOV AX, DATA

2、MOV DS, AXMOV AX, STACKMOV SS,AXMOV CX, 10MOV SI,OFFSET ARRAYMOV AX, 0MOV DX, 0PUSH AXPUSH CXPUSH SIPUSH BXPUSH DXMOV CX, 20MOV SI,OFFSET PROMOV AX, 0AGAIN:MOV AH, 1INT 21HMOV AH, 0MOV SI, ALINC SIMOV AX, 0MOV AL, CLINC ALAND AL, O1HJNZ L5MOV DL, OAHMOV AH, 2INT 21HMOV DL, ODHMOV AH, 2INT 21HMOV AX,

3、 0POP BXL5: LOOP AGAINMOV BX,OFFSET ARRAYMOV CX, 10MOV SI,OFFSET PROAGAIN2:M0V AL, SIAND AL, OFHPUSH CXMOV CH, 0MOV CL, 10MUL CLMOV CL, 0POP CXINC SIAND SI, OFH ADD AL, SI MOV BX,AL INC BXINC SILOOP AGAIN2POP DXPOP BXPOP SIPOP CXPOP AXMOV AH, 9MOV DX,OFFSET DAIINT 21HMOV CX, 10 ;在进行下一段程序运行前需要的进行初始化M

4、OV BX,OFFSET ARRAYNEO: MOV DL, BXCALL ASCILL ;调用函数来处理输出七个成绩 INC BX;前面的第一个数组MOV DX, 0LOOP NEO；排序MOV SI,OFFSET ARRAYMOV CX, 10 ;输入该数组元素的个数DEC CX ;需要比较的次数L3: MOV DX, CXMOV SI,OFFSET ARRAYMOV AX, 0MOV AL, SILI: MOV AL, SIMOV AH, SISUB AL, SI+1 ;AL 减去 SI+1 为负数时 JS 为 JS L2XCHG AH, SI+1MOV SI, AHL2: INC SI

5、LOOP LIMOV CX, DXLOOP L3MOV DX,OFFSET DA5MOV AH, 9INT 21HMOV CX, 10;在进行下一段程序运行前需要的进行初始化MOV BX,OFFSET ARRAY;调用函数来处理输出七个成绩NE3: MOV 叽，BXCALL ASCILLINC BXMOV DX, 0LOOP NE3;前面的第一个数组；这里每次都要清零为什么RETSTART ENDPASCILL PROC NEARPUSH AXPUSH BXPUSH CXMOV AX, DXMOV BX, 100DIV BLMOV CL, AL ；把除数的商付给CLMOV AL, AHMOV AH, 0MOV BX, 10DIV BLMOV CH, AHMOV DH, ALMOV AH, 2MOV DL, CLCMP DL,0 ;当高位是零的时候跳过转去执行下一位 的输出JE SSTADD DL,30HINT 21HSST: MOV DL, DHADD DL,30HINT 21HMOV DL, CHADD DL,30HINT 21HMOV AH, 2MOV DL,','INT 21HPOP CXPOP BXPOP AXRETASCILL END PCODE ENDSEND MAIN另73902243