1

1、多字節(jié)BCD加法

.MODELSMALL

.STACK

.DATA

FIRST DB11,22,33,44

SECONDDB55,66,77,88

SUM DB20dup(?)

.CODE

START:MOVAX,@DATA

MOVDS,AX

MOVES,AX

4.5常見(jiàn)程序設(shè)計(jì)舉例

2 MOVSI,OFFSETFIRST

MOVBX,OFFSETSECOND MOVDI,OFFSETSUM MOVCX,4 CLD CLCLP1:LODSB ADCAL,[BX] DAA STOSB INCBX LOOPLP1 MOVAH,4CH INT21H ENDSTART32.碼制轉(zhuǎn)換十、二進(jìn)制數(shù)、ASCII碼之間的互相轉(zhuǎn)換。①BCD數(shù)→2進(jìn)制數(shù)

算法：Dn-1*10n-1+……+D0*100=(…(Dn-1*10+Dn-2)*10+…)*10+D=(…((0*10+Dn-1)*10+Dn-2)*10+…)*10+D0

即：新的中間結(jié)果=中間結(jié)果*10+本位數(shù)字

(中間結(jié)果初值為0)4程序1：將≤65535的非壓縮BCD數(shù)轉(zhuǎn)換成2進(jìn)制數(shù)。程序如下。

;數(shù)據(jù)段定義

mydataSEGMENTdecnumDB5,3,0,1,9;BCD數(shù)53019binnumDW? mydataENDS5progSEGMENT

ASSUMECS:prog，DS:mydatabegin： MOVAX,mydata MOVDS,AX

MOVSI,OFFSETdecnum MOVCX,5;5位BCD數(shù)

MOVBX,10 XOR AX,AX;中間結(jié)果初始值為0Next： MULBX;中間結(jié)果*10+本位數(shù)字

ADDAL,[SI]ADCAH,0

INCSI;指向下位BCD數(shù)

LOOPnext

MOVbinnum,AX;保存結(jié)果

MOVAH,4CHINT21Hprog ENDS

ENDbegin6思考：1、每次乘法結(jié)果的DX為什么沒(méi)作處理？2、被轉(zhuǎn)換的BCD數(shù)是如何存放的？如果高位在高地址單元如何處理？3、可否循環(huán)4次？4、MULBX可否改為MULBL？7程序2：把≤255的非壓縮BCD數(shù)轉(zhuǎn)換成2進(jìn)制數(shù)

decnumDB1，5，9;BCD數(shù)159binnumDB? ……MOVAX，decnumXCHGAH,AL;百位在AH,十位在ALAAD;百位數(shù)*10+十位數(shù)

MOVAH,AL;中間結(jié)果送AHMOVAL,decnum+2AAD;中間結(jié)果*10+個(gè)位數(shù)

MOVbinnum,AL……8例：從鍵盤輸入兩個(gè)整數(shù),并求其和。因鍵入為整數(shù),故要進(jìn)行如下轉(zhuǎn)換：

ASCII→BCD→二進(jìn)制數(shù)

ASCII→BCD碼很簡(jiǎn)單,高4位清零即可得到非壓縮的BCD碼。

BCD→二進(jìn)制數(shù)在本例中采用用以下方法：

((((0+千位數(shù))*10+百位數(shù))*10)+十位數(shù))*10+個(gè)位數(shù)②ASCII碼→二進(jìn)制數(shù)(用于輸入)第一次中間結(jié)果第二次中間結(jié)果第三次中間結(jié)果最終結(jié)果9開(kāi)始兩個(gè)數(shù)分別轉(zhuǎn)換成二進(jìn)制數(shù)鍵入兩個(gè)數(shù)相加結(jié)束返回DOS如有溢出則提示開(kāi)始取第一個(gè)ASCII碼是負(fù)號(hào)嗎？數(shù)字符個(gè)數(shù)－1，指針＋1指針定位字符個(gè)數(shù)－1=0？取數(shù)字，與中間結(jié)果相加，再乘以10指向下一個(gè)數(shù)字字符加個(gè)位數(shù)是負(fù)數(shù)則求補(bǔ)存結(jié)果結(jié)束NYYN轉(zhuǎn)換子程序10程序如下：DATA SEGMENTSTR1 DB10,?,10DUP(?);第1個(gè)數(shù)的輸入緩沖區(qū)

STR2 DB10,?,10DUP(?);第2個(gè)數(shù)的輸入緩沖區(qū)

NUM DW?,? ;存轉(zhuǎn)換后的二進(jìn)制數(shù)SUM DW0 ;存和OVER DB‘Overflow!’,13,10,’$’DATA ENDS;CODE SEGMENT ASSUMECS:CODE,DS:DATAMAIN PROC FAR11START:MOV AX,DATA MOV DS,AX MOV AH,0AH LEA DX,STR1 INT 21H ;輸入第一個(gè)數(shù)字串(設(shè)為26) MOV AH,0AH LEA DX,STR2 INT 21H ;輸入第二個(gè)數(shù)字串(設(shè)為33) LEA BX,STR1;串1的首地址送BX LEA DI,NUM;存二進(jìn)制首地址送DI CALL CHANGE;將串1ASCII碼→二進(jìn)制

LEA BX,STR2;串2的首地址送BX 12 LEA DI,NUM+2 ;指向

CALL CHANGE ;將串2ASCII碼→二進(jìn)制

MOV AX,NUM;(AX)=[NUM]=001AH ADD AX,NUM+2 ;兩數(shù)相加,(AX)=003BH MOV SUM,AX ;存和

JNO NEXT ;無(wú)溢出,轉(zhuǎn)NEXT LEA DX,OVER MOV AH,9 INT 21H ;顯示’Overflow!’NEXT: MOV AH,4CH INT 21H ;返回DOS MAIN ENDP13CHANGE PROC MOV CL,[BX+1] ;實(shí)際字符數(shù)送CL MOV AL,[BX+2] ;第一個(gè)字符送AL MOV CH,AL ;暫存在CH CMP AL,’-’ ;第一個(gè)字符是負(fù)號(hào)嗎? JNZ NEXT1 ;不是,轉(zhuǎn)NEXT1 DEC CL ;字符數(shù)減1 INC BXNEXT1:ADD BX,2 ;指向第一個(gè)數(shù)字字符

MOV AX,0 ;清零AX,存二進(jìn)制數(shù)LP1:DEC CL JZ NEXT2 ;若(CL)=0,轉(zhuǎn)NEXT2 MOV DL,[BX];取字符

AND DL,0FH ;轉(zhuǎn)換成BCD碼

ADDAL,DL;加到中間結(jié)果上

ADCAH,0 14MOVDX,10MULDX;*10INCBX;指向下一個(gè)字符

JMPSHORTLP1NEXT2:MOVDL,[BX];取個(gè)位數(shù)

ANDDL,0FH;個(gè)位ASCII→未組合BCDADDAX,DX;加個(gè)位數(shù),(AX)=001AHCMPCH,’-’;是’-’?JNZNEXT3;該數(shù)非負(fù),轉(zhuǎn)NEXT3NEGAX;若為負(fù),求補(bǔ)NEXT3:MOV[DI],AX;存二進(jìn)制結(jié)果

RETCHANGEENDP;CODEENDSENDSTART15020A32360D…020A33330D…001A21003B00STR1STR2NUMSUM10個(gè)10個(gè)‘O’……OVER??040A313234…STR1若鍵入‘1234’330D‘1’‘2’‘3’‘4’…設(shè)鍵入第1個(gè)數(shù)為26,第2個(gè)數(shù)為33,則在內(nèi)存各變量分配如下:16本例題重點(diǎn)掌握:＊如何從鍵盤輸入一個(gè)字符串＊ASCII→未組合BCD→二進(jìn)制＊有符號(hào)數(shù)的運(yùn)算,對(duì)負(fù)數(shù)和溢出如何處理思考題:

若鍵入第一個(gè)數(shù)26,第二個(gè)數(shù)為-4,填寫各變量結(jié)果。17方法1

計(jì)算二進(jìn)制數(shù)中所包含的1000的個(gè)數(shù)、100的個(gè)數(shù)、10的個(gè)數(shù)和1的個(gè)數(shù)。方法2

除10取余。下面舉例介紹第一種方法。流程圖如下：③二進(jìn)制數(shù)→BCD18YN二進(jìn)制數(shù)AX令（DL）＝0(AX)-1000<0?(DL)+1(AX)(AX)DL存至緩沖區(qū)令(DL)＝0YN(AX)-10<0?(DL)+1(AX)+10(AX)存DL存AL返回DOS求100的個(gè)數(shù)，結(jié)構(gòu)同上A19匯編程序如下：DATA SEGMENTBNUM DB 270FHDNUM DB 4DUP(?);存放BCD碼的緩沖區(qū)DATA ENDSCODE SEGMENT ASSUMECS:CODE,DS:DATABEGIN:MOV AX,DATA MOV DS,AX MOV AX,BNUM;取二進(jìn)制數(shù)

LEA BX,DNUM;BCD碼緩沖區(qū)首地址送BX20;計(jì)算百位的個(gè)數(shù) MOVDL,0;千位的個(gè)數(shù)計(jì)數(shù)器AGAIN1:SUBAX,1000;(AX)-1000JCNEXT1;若≤0,則退出循環(huán)INCDL;(DL)+1JMPAGAIN1NEXT1:ADDAX,1000;(AX)←(AX) MOV[BX],DL;存千位的個(gè)數(shù);計(jì)算百位的個(gè)數(shù)MOVDL,0;百位的個(gè)數(shù)計(jì)數(shù)器AGAIN2:SUBAX,100;(AX)-100JCNEXT2INCDLJMPAGAIN2NEXT2:ADDAX,100MOV[BX+1],DL;存百位的個(gè)數(shù)21MOVDL,0;十位的個(gè)數(shù)計(jì)數(shù)器AGAIN3:SUBAX,10;(AX)-10JCNEXT3INCDL JMPAGAIN3NEXT3:ADDAX,10MOV[BX+2],DL;存十位的個(gè)數(shù)

MOV[BX+3],AL;存?zhèn)€位的個(gè)數(shù)

MOVAH,4CHINT21HCODEENDS ENDBEGIN22用子程序?qū)崿F(xiàn)二進(jìn)制數(shù)→BCD

編寫一個(gè)子程序，將AX中的16位二進(jìn)制數(shù)轉(zhuǎn)換成壓縮BCD數(shù)B2BCDWPROC CMPAX,9999 JBEVALID JMPB2BEXITVALID:PUSHCX PUSHDX XORDX,DX MOVCX,1000 DIVCX XCHGAX,DX ;商－DX，余數(shù)－AX MOVCL,4 SHLDX,CL ；千位數(shù)－DL高4位

MOVCL,100 DIVCL ADDDL,AL ;千、白位數(shù)－DL23 MOVCL,4 SHLDX,4 XCHGAL,AH XORAH,AH MOVCL,10 DIVCL ADDDL,AL MOVCL,4 SHLDX,CL ADDDL,AL MOVAX,DX POPDX POPCXB2BEXIT:RETB2BCD2ENDP24④BCD→ASCII

略⑤二進(jìn)制串轉(zhuǎn)換為ASCII碼一個(gè)二進(jìn)制位串若要送顯示或打印,需把串中每一位(0或1)化為ASCII碼。思路：先將目標(biāo)串全部預(yù)置為30H，再把每個(gè)二進(jìn)制位逐位左移至CF，然后判CF=0?若是，取下一位；若不是，將31H送此單元。流程圖如下：25初始化用’0’填滿串取要轉(zhuǎn)換的數(shù)左移1位存入‘1’結(jié)束CF=1?轉(zhuǎn)換完？調(diào)整指針NN26匯編程序如下：DATA SEGMENTNUM DW 6F78HSTRING DB 16DUP(?)DATA ENDS;CODE SEGMENT ASSUMECS:CODE,DS:DATABINCA PROC FARBEGIN: MOV AX,DATA MOV DS,AX MOV ES,AX CLD LEA DI,STRING MOV CX,16;串的長(zhǎng)度27 MOV AL,30H REP STOSB;串中全部填充為‘0’ MOV CX,16 LEA DI,STRING MOV AL,’1’ MOV BX,NUM;(BX)=6F78HAGAIN: RCL BX,1;含進(jìn)位位循環(huán)左移

JNC NEXT;若為0,轉(zhuǎn)

MOV[DI],AL;若為1,對(duì)應(yīng)位送入’1’NEXT: INC DI LOOP AGAIN28 MOV AH,4CH INT 21HBINCA ENDPCODE ENDS END BEGIN

29子程序的參數(shù)傳遞編寫子程序時(shí),很重要的一個(gè)工作是如何把參數(shù)傳給子程序,這個(gè)過(guò)程叫參數(shù)傳送。傳送方法有：把參數(shù)放在CPU內(nèi)部寄存器中把參數(shù)放在變量中把參數(shù)放在地址表中利用堆棧傳送參數(shù)30例：求以TABLE開(kāi)始的若干個(gè)無(wú)符號(hào)數(shù)的平均值，用子程序?qū)崿F(xiàn)。子程序入口條件：SI指向多字節(jié)表的首地址，cx為表的字節(jié)數(shù)；返回結(jié)果：ax存放平均值，dx為余數(shù)。AVRGPROC JCXZEXIT PUSHCX XOXAX,AX SUBDX,DXLP1: ADDAL,[SI] ADCAH,0 ADCDX,0 INCSI LOOPLP1 POPCX DIVCXEXIT: RETAVRG ENDP31例：將ax和bx中的兩個(gè)4位非壓縮BCD數(shù)相乘，結(jié)果為非壓縮的BCD數(shù)存于DX:AX

32將十進(jìn)制數(shù)3037和2048相加－>cx movax,3037h movbx,2048h addax,bx movbl,ah daa movcl,al moval,bl adcal,0 daa movch,al hlt33將十進(jìn)制數(shù)3037和2048相加－>cx moval,37h addal,48h daa movcl,al moval,30h adcal,20h daa movch,al hlt34編寫子程序，將dx：ax中