汇编语言-输入10个十进制数排序

DATASSEGMENTDATA0DB'Pleaseinputanumbers(0-65535):','$'DATA1DB'overflowinputagain:','$'DATA2DB'Thenumyouhaveputis:',0ah,0dh,'$'DATA3DB'Afterexchangethenumis:',0ah,0dh,'$'DATA4DB'','$'DATADW10DUP(?)DATASENDSSTACKSSEGMENTDW256DUP(?);´Ë´¦ÊäÈë¶ÑÕ»¶Î´úÂëSTACKSENDSCODESSEGMENTASSUMECS:CODES,DS:DATAS,SS:STACKS;/****************************************/;-----------³ÌÐò¿ªÊ¼------------START:MOVAX,DATASMOVDS,AXMOVSI,0MOVCX,10;----------Ñ­»·ÊäÈë------------L:CALLINPUTADDSI,2CALLNEWLINELOOPLMOVDX,OFFSETDATA2MOVAH,9INT21H;-------ÊäÈëºóÏÔʾ----------MOVCX,10MOVDI,0AGAIN:CALLPRINTCALLSPACEADDDI,2LOOPAGAIN;----------ÅÅÐò-------------MOVCX,9MOVDI,0LOOP0:CALLSORTADDDI,2LOOPLOOP0CALLNEWLINEMOVDX,OFFSETDATA3MOVAH,9INT21H;----------½»»»ºóÏÔʾ-------------MOVCX,10MOVDI,0AGAIN0:CALLPRINTCALLSPACEADDDI,2LOOPAGAIN0;----------·µ»Øϵͳ--------------EXIT:MOVAH,4CHINT21H;/**************************************/;------------ÊäÈ뺯Êý--------INPUTPROCNEARPUSHAXPUSHBXPUSHCXPUSHDX;----------ÌáʾÐÅÏ¢----------MOVDX,OFFSETDATA0MOVAH,9INT21HMOVBX,0;BX´æ·ÅÊ®½øÖÆÊýCLCMOVDX,0L0:;----------ÊäÈëÊý×Ö----------MOVAH,1INT21HCMPAL,0DHJEL1SUBAL,30HJLNEXT1CMPAL,9JGNEXT1;---------ת»»³ÉÊ®½øÖÆÊý-------MOVAH,0XCHGAX,BXMOVCX,10MULCXADDAX,BXJCNEXT1XCHGAX,BXJMPL0NEXT1:MOVDX,0MOVBX,0CALLNEWLINECALLERRORJMPL0L1:CMPDX,0JNZNEXT1MOVDATA[SI],BXMOVDX,0POPDXPOPCXPOPBXPOPAXRETINPUTENDP;/*****************************/;-------»Ø³µ»»ÐÐ--------NEWLINEPROCNEARPUSHAXPUSHDXMOVDL,0AHMOVAH,2INT21HMOVDL,0DHMOVAH,2INT21HPOPDXPOPAXRETNEWLINEENDP;/*********************************/;--------¿Õ¸ñ-------SPACEPROCNEARPUSHAXPUSHDXMOVDX,OFFSETDATA4MOVAH,9INT21HPOPDXPOPAXRETSPACEENDP;/**************************************/;----------´íÎóÌáʾ----------------ERRORPROCNEARPUSHAXPUSHDXMOVDX,OFFSETDATA1MOVAH,9INT21HPOPDXPOPAXRETERRORENDP;/************************************/;--------ðÅÝÅÅÐò×Ó³ÌÐò-----------SORTPROCNEARPUSHBXPUSHDXMOVSI,DILOOP1:ADDSI,2MOVBX,DATA[DI]CMPBX,DATA[SI]JACHANGEJMPNEXTCHANGE:MOVDX,DATA[SI]MOVDATA[DI],DXMOVDATA[SI],BXNEXT:CMPSI,18JLLOOP1POPDXPOPBXRETSORTENDP;/***********************************/;-----------ÏÔʾº¯Êý--------PRINTPROCNEARPUSHAXPUSHBXPUSHCXPUSHDXMOVCX,0MOVBX,10MOVAX,DATA[DI]LAST:MOVDX,0DIVBXPUSHDXINCCXCMPAX,0JNZLASTAGE:POPDXORDX,30HMOVAH,2INT21HLOOPAGEPOPDXPOPCXPOPBXPOPAXRETPRINTENDPCODESENDSENDSTART