;--------------------------------------------;;Name:平均數計算;;Desccription:連續輸入十個10以下的數，程序計-;;算去掉一個最小數，去掉一個最大數后八個數的平;;均值，從顯示器顯示出來，結果保留3位小數-----;;Author:160409108;Date:2011-11-12;--------------------------------------------;;;DATASEGMENTBUFDB?ORG10HTABLEDB?BUF1DB'PLEASEENTER10NUMBERS$'BUF2DB'THEAVERAGEIS$'DATAENDSCODESEGMENTASSUMECS:CODE,DS:DATASTART:MOVAX,DATAMOVDS,AXLEADX,BUF1MOVAH,9INT21H;顯示提示信息‘PLEASEENTER10NUMBERS’;換行MOVAH,02HMOVDL,0AHINT21HMOVCX,10LEADI,BUFLP1:;連續輸入10個數;asc碼轉bcd碼MOVAH,1INT21HSUBAL,30HMOV[DI],ALINCDIMOVDL,20HMOVAH,02HINT21H;輸入中插入空格LOOPLP1MOVCH,10DECCHLOP0:MOVSI,OFFSETBUF;冒泡排序法MOVCL,CHXORBL,BLLOP1:MOVAL,[SI]CMPAL,[SI+1]JLENEXTXCHGAL,[SI+1]MOV[SI],ALORBL,01HNEXT:INCSIDECCLJNZLOP1ANDBL,BLJZSTOPDECCHJNZLOP0STOP:MOVSI,OFFSETBUFMOVDI,OFFSETTABLEINCSI;從第二個數開始存數據MOVCX,8MOVAX,0LOP3:ADDAL,[SI]INCSI;相加得到和LOOPLOP3MOV[DI],ALMOVCL,8DIVCL;和存入DL;CL=8;AX/CL商>AL余數>AHINCDIMOV[DI],ALINCDI;商MOV[DI],AHMOVAL,AHMOVAH,0;余數;余數存入ALMOVCX,3LOP4:MOVBL,10MULBL;余數x10MOVBH,8DIVBH;除8求商求余INCDIMOV[DI],ALINCDIMOV[DI],AHMOVAL,AHMOVAH,0LOOPLOP4MOVDI,OFFSETTABLEMOVAH,02HMOVDL,0AHINT21H;換行LEADX,BUF2MOVAH,9INT21H;顯示提示信息‘THEAVERAGEIS’;換行MOVAH,02HMOVDL,0AHINT21HMOVDL,[DI+1]ADDDL,30HMOVAH,2INT21H;依次顯示數據;個位數MOVDL,2EHMOVAH,2INT21H;小數點MOVDL,[DI+3]ADDDL,30HMOVAH,2INT21H;第一位小數MOVDL,[DI+5]ADDDL,30HMOVAH,2INT21H;第二位小數;第三位小數;返回