(完整word版)匯編經(jīng)典代碼

1、SHUCHU:MOV AL,30H;CF 為 0 設(shè)置結(jié)果最高位為0INCDI; 地址加 11.順序程序設(shè)計(jì)ASCH碼形式各自順序存放在以DATA1 和 DATA2 為DATASEGMENTDATA1 DB34H,35H,39H,38H,36H, ;被加數(shù)DATA2 DB37H,34H,33H,36H,32H, ; 加數(shù)DATAENDSCODESEGMENTMAINPROCFARASSUMECS:CODE,DS:DATASTART: MOV AX,DATA處。將兩個(gè)多位十進(jìn)制數(shù)相加，要求被加數(shù)、加數(shù)均以首的五個(gè)內(nèi)存單元中（低位在前） ，結(jié)果送回 DATA1MOV DS,AXLEASI,DATA

2、1; 有效地址送 SI, 為調(diào)用顯示子程序做準(zhǔn)備CALLDISPLAY; 調(diào)用顯示子程序CALLCRLF; 調(diào)用回車(chē)換行子程序LEASI,DATA2; 有效地址送 SI ，為調(diào)用顯示子程序做準(zhǔn)備，同時(shí)為加法運(yùn)算做準(zhǔn)備CALLDISPLAY; 調(diào)用顯示子程序CALLCRLF; 調(diào)用回車(chē)換行子程序LEADI,DATA1; 有效抵制送 DI ，為加法運(yùn)算做準(zhǔn)備MOV AX,0MOV BX,0MOV CL,05H; 記錄循環(huán)次數(shù); 將加數(shù)送往 ALADDS: MOV AL,SISUB AL,30HADD AL,BLMOV BL,DISUB BL,30HADD AL,BLADD AL,30HCMP AL

3、,3AHJA; 加上進(jìn)位; 將被加數(shù)送往 BL; 加法運(yùn)算SUBA; 結(jié)果 =10，跳到 SUBASUBA:NSUBAAL,0AHNSUBA:JBSUBMOV BL,01HJMP CONTINUEMOV BL,00H; 減去 10 的值，并置BL 為 1CONTINUE:MOV DI,AL; 置 BL 為 0; 將相加的結(jié)果從 AL 送往DI 的地址，即 DATA1 的地址SHUCHU2: MOV AL,31HJMP CONTINUE2;CF 為 1 設(shè)置結(jié)果最高位為INCSI; 地址加 1LOOPADDS; 循環(huán)JCSHUCHUJNCSHUCHU2RETDISPLAY ENDPCODE EN

4、DSEND STARTCONTINUE2:MOV DI,ALLEA SI,DATA1CALL DISPLAY;將 DATA1 的有效地址送往 SI，為調(diào)用；調(diào)用 DISPLAY 子程序DISPLAY 子程序做準(zhǔn)備MOV AX,4C00H; 返回 DOSINT 21HMAINENDPCRLFPROC NEARMOV DL,0DHMOV AH,02HINT 21H; 回車(chē)、換行 于功能MOV DL,0AHMOV AH,02HINT 21HRETCRLFENDPDISPLAY PROC NEARMOV BX,0006HDSL:MOV DL,SI+BX-1MOV AH,02INT21HDEC BXJN

5、ZDSL; 顯示于功能; 記錄循環(huán)次數(shù); 將有效地址內(nèi)的內(nèi)容送往 DL;2 號(hào)功能輸出;BX 自動(dòng)減 12分支程序設(shè)計(jì)實(shí)驗(yàn)接收鍵盤(pán)輸入字符，將其中的小寫(xiě)字母轉(zhuǎn)換為大寫(xiě)字母并顯示。CODESEGMENTMAINPROC FARASSUME CS:CODESTART:MOV AH,00HINT16HCMP AL,0DHJZOVERCALLJUDGEMOV DL,ALMOV AH,02HINT21HJMPSTARTOVER:MOV AH,4CHINT21HMAINENDPJUDGEPROCNEARCMP AL,aJBSTOPCMP AL,zJASTOPSUBAL,20HSTOP:RETJUDGEEN

6、DPCODEENDSEND START3循環(huán)程序設(shè)計(jì)實(shí)驗(yàn)統(tǒng)計(jì)一個(gè)有10人的班中， 男、 女生的人數(shù)各為多少。 將男生人數(shù)存入變量MAN、 女生人數(shù)存入變量WOMAN中。DATA SEGMENTMANDB0,0WOMANDB0,0STRINGDB iuput people number! (man is 0, woman is 1 ) $SMDBman is :$SWDBwoman is :$DATA ENDSCODEMAINSTART:MOV AX,DATAMOV DS,AXMOV AH,09HMOV DX,OFFSET STRINGINT 21HCALL CRLF MOV CX,10 AA:

7、MOV AH,01HINT21HCMP AL,30H JNZADDWINCMANBB: LOOP AAJMP DISPLYADDW: INC WOMANJMP BBDISPLY: CALL CRLFMOV AH,09H MOVDX,OFFSET SMINT 21HMOV AH,02H;將 STRING 的內(nèi)容輸出; 男女生總?cè)藬?shù); 從鍵盤(pán)輸入， 0 為男， 1 為女; 與 0 比較; 不為 0, 女生人數(shù)加 1; 否則男生人數(shù)加 1; 打印; 字符串輸出; 男生人數(shù)統(tǒng)計(jì)結(jié)果輸出SEGMENTPROC FARASSUME CS:CODE,DS:DATACALL CRLF; 調(diào)用回車(chē)換行子程序MO

8、V DL,MAN ADDDL,30H CALL JUDGECALL CRLF MOVAH,09H MOVDX,OFFSET SW INT21H MOV AH,02HMOV DL,WOMAN ADDDL,30H CALL JUDGEMOV AH,4CH INT 21HMAIN ENDP; 字符串輸出; 女生人數(shù)統(tǒng)計(jì)結(jié)果輸出; 返回 DOSJUDGE PROC NEAR; 判斷結(jié)果是否為 39HCMP DL,3AHJZSHICC:INT21HRETSHI:MOV DL,31HINT21HMOV DL,30HJMP CCJUDGE ENDPCRLF PROC NEARMOV AH,02HMOV DL

9、,0DHINT21HMOV DL,0AHINT21HRETCRLF ENDPCODE ENDSEND START; 回車(chē)換行子程序 ; 回車(chē); 換行4子程序設(shè)計(jì)實(shí)驗(yàn)1 鍵盤(pán)輸入字符，依次顯示在行的最左端（即每接受一個(gè)字符，顯示在屏幕上并回車(chē)換行。）2 對(duì)頻繁使用的回車(chē)換行編寫(xiě)為子程序，在主程序中調(diào)用完成分行顯示。CODESEGMENTMAINPROC FARASSUME CS:CODESTART: MOV CX,10; 設(shè)置循環(huán)次數(shù)NEXT:MOV AH,01H; 從鍵盤(pán)輸入一個(gè)字符INT 21HCALL CRLF; 調(diào)用回車(chē)換行子程序XCHG AX,BX；AX 為本次輸入的值，BX 為之前的

10、結(jié)果END START5碼制轉(zhuǎn)換程序?qū)嶒?yàn)將 ASCn碼數(shù)據(jù)轉(zhuǎn)換成二進(jìn)制數(shù)據(jù)。要求從鍵盤(pán)上輸入十進(jìn)制整數(shù)（假定范圍 二進(jìn)制格式存儲(chǔ)。PLEASE INPUT A NUMBER(032767):$ THE ASCII IS:$CMP AL,39HLOOPNEXTMOV AH,4CHINT21HENDPPROCNEARMOV AH,02HMOV DL,0DHINT21HMOV DL,0AHINT21HRETENDPENDSMAINCRLFCRLFCODE; 返回 DOS; 回車(chē)換行子程序; 回車(chē); 換行DATASEGMENT032767），然后轉(zhuǎn)換成STRING1 DBSTRING2DBDATACO

11、DEMAINSTART:INPUT:STRING3 DBTHE BINARY IS:$ENDSSEGMENTASSUME CS:CODE,DS:DATAPROC FARMOV AX,DATAMOV DS,AXMOV DX,OFFSET STRING1MOV AH,09HINT 21HCALL CRLFMOV AH,01HINT 21H; 輸入數(shù)據(jù)CMP AL,0DHJZNEXTSUBJLAL,30HINPUTXCHG AX,BXMOV DX,10DMUL DXMUL 故準(zhǔn)備XCHG AX,BX；AX 為本次輸入的值，BX 為之前的結(jié)果JG INPUTCBW;AX 為輸入值， BX 保存結(jié)果，兩

12、個(gè)對(duì)調(diào)為 ; 將上一次結(jié)果乘 10ADD BX,AXJMP INPUTNEXT: CALL CRLFMOV CL,4DMOV CH,4DMOV DX,OFFSET STRING2MOV AH,09HINT 21HCALL CRLFLOOP0: ROL BX,CL; 循環(huán)左移，將最高為存到MOV AL,BLAND AL,0FH;ADD AL,30HCMP AL,3AHJL OUTPUTADD AL,07HOUTPUT:MOV AH,02HMOV DL,ALINT 21HDEC CHJNZ LOOP0CALL CRLFMOV DX,OFFSET STRING3MOV AH,09HINT 21HCA

13、LL CRLFMOV CH,16DMOV CL,1DLOOP1: ROL BX,CLMOV AL,BLAND AL,01HADD AL,30HMOV AH,02HMOV DL,ALINT 21HDEC CHJNZ LOOP1MOV AH,4CHINT 21HMAIN ENDPOUTS PROC NEAR; 字符串輸出子程序MOV AH,09HINT 21HRETOUTS ENDPBL 的低四位cRLFPROc NEAR; 回車(chē)換行子程序MOV AH,02H; 回車(chē)INT 21HMOV DL,0AH; 換行INT 21HRETcRLFENDPcODEENDsENDsTART6兩個(gè)數(shù)相乘的實(shí)驗(yàn)實(shí)現(xiàn)

14、十進(jìn)制數(shù)的乘法，被乘數(shù)和乘數(shù)均以ASCn碼形式放在內(nèi)存中，乘積在屏幕上顯示出來(lái)。DATAsEGMENTMBcsDW0Mcs DW 0REsULTDW 0sTRING1 DBTHE BEIcHENGsHU Is:$sTRING2 DBTHE cHENGsHU Is:$sTRING3 DBTHE REsULT Is:$sTRINGDBTHE AscII Is:$DATAENDscODEMAINsEGMENTPROc FARAssUME cs:cODE,Ds:DATAsTART:MOV AX,DATAMOV Ds,AXMOV DX,OFFsET sTRING1cALL OUTscALL INPUT;

15、 輸入被乘數(shù)MOV DX,OFFsET sTRINGcALL OUTscALL cRLFcALL AscII; 被乘數(shù)轉(zhuǎn)化為 AscII 碼輸出cALL cRLFMOV MBCS,BX;被乘數(shù)保存到 MBCSMOV DX,OFFsET sTRING2CALLOUTSCALL INPUT; 輸入乘數(shù)MOV DX,OFFSET STRINGCALLOUTSCALLCRLFCALL ASCII; 乘數(shù)轉(zhuǎn)化為 ASCII 碼輸出CALLCRLFMOV MCS,BX;乘數(shù)保存到 MCS 中MOV DX,OFFSET STRING3CALL OUTSCALLCRLFMOV AX,MBCSMUL BXMOV

16、 RESULT,AXMOV BX,DXCALLASCIIMOV BX,RESULTCALLASCII；被乘數(shù)；乘數(shù)與被乘數(shù)相乘，結(jié)果咼位DX 低位 AX;將 AX 中的內(nèi)容保存到 RESUL 沖;將高位 DX 的值送給 BX 輸出；將低位 AX 的值送給 BX 輸出MOV AH,4CHINT 21HMAIN ENDPINPUTPROC NEARCALLCRLFMOV BX,0AA:MOV AH,01HINT 21HCMP AL,0DHJZSTOPSUBAL,30HJLAACMP AL,39HJGAACBWXCHG AX,BXMOV DX,10DMUL DXXCHG AX,BXADD BX,AX

17、JMPAASTOP:CALLCRLFRETINPUTENDP; 輸入十進(jìn)制數(shù)，將其轉(zhuǎn)化為 ASCII 碼存到 BX 中；AX 為輸入值，BX 保存結(jié)果，兩個(gè)對(duì)調(diào)為MUL 故準(zhǔn)備; 將上一次結(jié)果乘 10；AX 為本次輸入的值，BX 為之前的結(jié)果ASCII PROC NEARMOV CL,4DMOV CH,4DCC:ROL BX,CL;循環(huán)左移，將最高為存到BL 的低四位MOV AL,BLAND AL,0FH；ADD AL,30HCMP AL,3AHJLBBADD AL,07HBB: MOV AH,02H MOV DL,AL INT 21H DEC CH JNZ CC RETASCII ENDPO

18、UTS PROC NEAR MOV AH,09H INT 21H RETOUTS ENDPCRLF PROC NEARMOV AH,02HMOV DL,0DHINT21HMOV DL,0AHINT21HRETCRLF ENDPCODE ENDSEND START7從鍵盤(pán)輸入數(shù)據(jù)并顯示的程序編寫(xiě)程序?qū)㈡I盤(pán)接收到的四位十六進(jìn)制數(shù)據(jù)轉(zhuǎn)換為等值的二進(jìn)制數(shù)，再顯示在終端上。DATA SEGMENTSTRING1 DB Please enter a four-digit hexadecimal number:$DATAENDSCODESEGMENTASSUME CS:CODE,DS:DATAMAINPRO

19、C FARSTART:MOV AX,DATAMOV DS,AXMOV DX,OFFSET STRING1MOV AH,09HINT 21HCALL CRLFMOV CL,4DINPUT:MOV AH,01HINT21HCMP AL,0JBINPUT; 回車(chē)換行子程序; 回車(chē); 換行CMP AL,9JA ZIMUSUB AL,30HJMP NEXT ZIMU:CMP AL,AJBINPUTCMP AL,ZJAINPUTSUB AL,37HNEXT: CBWXCHG AX,BXMOV DX,16DMUL DXXCHG AX,BXADD BX,AXLOOP INPUTCALL CRLFMOV CL,1DMOV CH,16DTO: ROL BX,1MOV DL,BLAND DL,01HADD DL,30HMOV AH,02HINT 21H DEC CHJNZ TOMOV AH,4CHINT 21H MAINENDPCRLF PROC NEARMOV AH,02HMOV DL