匯編二進(jìn)制轉(zhuǎn)十進(jìn)制十六進(jìn)制代碼

1、特注：代碼可以優(yōu)化，請(qǐng)讀者自己思考，運(yùn)行結(jié)果絕對(duì)沒(méi)問(wèn)題！實(shí)驗(yàn)二數(shù)制轉(zhuǎn)換程序代碼二進(jìn)制到十進(jìn)制轉(zhuǎn)換DATAS SEGMENTS0 DB "please input a binary (length<16):",0AH,0DH,"$"S1 DB 18S2 DB ?;總長(zhǎng)度S3 DB 16 DUP(0);存放首地址S4 DW ? ; 存放輸入的二進(jìn)制數(shù)S5 DB "The nuber is not a binary!","$"S6 DB "Do you want to continue?(Y or N):

2、",0AH,0DH ,"$"TEMP DB 0BUF DB 5 DUP (?); 此處輸入數(shù)據(jù)段代碼DATAS ENDSSTACKS SEGMENTDB 256 DUP(?) ; 初始化堆棧大小為100;此處輸入堆棧段代碼STACKS ENDSCODES SEGMENTASSUME CS:CODES,DS:DATAS,SS:STACKSSTART:MOV AX,DATASMOV DS,AXMOV AX,STACKSMOV SS,AX; 輸入一個(gè)二進(jìn)制數(shù)LOOPP:CALL CLSCALL HCMOV DX,OFFSET S0 ; 顯示字符串s0CALL G9;&q

3、uot;please input a binary (length<16):",0AH,0DH,"$"MOV DX,OFFSET S1 ; 申請(qǐng)16個(gè)內(nèi)存空間MOV AH,0AH ; 將數(shù)輸入到緩沖區(qū)INT 21H;；將輸入的數(shù)據(jù)整合放到AXMOV SI,OFFSET S3MOV CL,S2MOV CH,0HMOV AX,0HLOOP1:CMP BYTE PTR SI,30H ; 判斷是否為二進(jìn)制數(shù)JL EXITCMP BYTE PTR SI,31HJG EXITMOV BL,SISUB BL,30HMOV BH,0HINC SISHL AX,1ADD AX

4、,BXLOOP LOOP1MOV S4,AXCALL HC; 二進(jìn)制轉(zhuǎn)換成十進(jìn)制MOV SI,5MOV AX,S4MOV CX,5MOV BX,10LP: CWDMOV DX,0DIV BXADD DL,30HMOV BUF SI-1,DLDEC SILOOP LP; 顯示結(jié)果CALL COUNT ; 找到第一個(gè)非零元的位置MOV AL,TEMPMOV AH,0MOV SI,AXMOV CX,5LOOPPP:MOV DL,BUFSIMOV AH,02HINT 21HINC SILOOP LOOPPPJMP EXIT1EXIT:CALL HCMOV DX,OFFSET S5 ; 顯示字符串S5C

5、ALL G9 ;"The nuber is not a binary!","$"EXIT1:CALL HCMOV DX,OFFSET S6 ; 顯示字符串S6CALL G9 ;"Do you want to continue?(Y or N):",0AH,0DH ,"$"MOV AH,1INT 21HCMP AL,'Y'JE LOOPPCMP AL,'y'JE LOOPPMOV AH,4CHINT 21HCOUNT:; 判斷第一個(gè)非零元的位置MOV TEMP,0MOV SI,0MOV

6、 CX,4LOO:MOV DL,BUFSICMP DL,30HJNE EXIT3MOV AL,TEMPADD AL,1MOV TEMP,ALINC SILOOP LOOEXIT3: RETG9:MOV AH,9INT 21HCALL HCRETHC:;MOV DL,0AHMOV AH,2INT 21HMOV DL,0DHMOV AH,2INT 21HRETCLS:MOV AH,6 ;MOV AL,0MOV BH,7HMOV CH,0MOV CL,0MOV DH,24MOV DL,79INT 10HMOV BH,0 ;MOV DX,0MOV AH,2INT 10HRETCODES ENDS EN

7、D START屏幕初始化置光標(biāo)位子顯示功能調(diào)用回車換行二進(jìn)制到十六進(jìn)制轉(zhuǎn)換DATAS SEGMENTS0 DB "please input a binary(length<16):",0AH,0DH,"$"S1 DB 17S2 DB ?;總長(zhǎng)度S3 DB 16 DUP(0);存放首地址S4 DW ? ; 存放輸入的二進(jìn)制數(shù)S5 DB "The nuber is not a binary!","$"S6 DB "Do you want to continue?(Y orN):",0AH,0D

8、H ,"$"S7 DB "The length of the numbei is not 16","$DATAS ENDSSTACKS SEGMENTSTACKS ENDSCODES SEGMENTASSUME CS:CODES,DS:DATAS,SS:STACKSSTART:MOV AX,DATASMOV DS,AXMOV AX,STACKSMOV SS,AX; 輸入一個(gè)二進(jìn)制數(shù)LOOPP:CALL CLSCALL HCMOV DX,OFFSET S0 ; 顯示字符串S0CALL G9 ;"please input a binary

9、(length<16):",0AH,0DH,"$"MOV DX,OFFSET S1 ; 申請(qǐng) 16個(gè)內(nèi)存空間MOV AH,0AH ; 將數(shù)輸入到緩沖區(qū)INT 21H;；將輸入的數(shù)據(jù)整合放到AXMOV SI,OFFSET S3MOV CL,S2MOV CH,0HMOV AX,0HLOOP1:CMP BYTE PTR SI,30H ; 判斷是否為2進(jìn)制JL EXITCMP BYTE PTR SI,31HJG EXITCMP S2,10H;判斷是否為16為二進(jìn)制JNE EXIT2MOV BL,SISUB BL,30HMOV BH,0HINC SISHL AX,1A

10、DD AX,BXLOOP LOOP1MOV S4,AXCALL HC; 二進(jìn)制變16進(jìn)制并輸出MOV BX,S4CMP BX,0JZ ZEROMOV CH,04HMOV CL,04HNEXT:ROL BX,CLMOV DL,BLAND DL,0FHADD DL,30HCMP DL,3AH JB LADD DL,7HL:CALL XSDEC CHJNZ NEXTJMP WEISHUZERO:MOV DL,'0'CALL XSWEISHU:MOV DL,'H'CALL XSJMP EXIT1; ; 選擇用的程序EXIT:CALL HCMOV DX,OFFSET S5

11、 ; 顯示字符串S5CALL G9 ; "The nuber is not a binary!","$"JMP EXIT1EXIT2:CALL HCMOV DX,OFFSET S7 ; 顯示字符串S7CALL G9 ; "The lengthof the numbei is not16","$"EXIT1:CALL HCMOV DX,OFFSET S6CALL G9 ;顯示字符串S6MOV AH,1 ;"Do you want to continue?(Y orN):",0AH,0DH ,"$"INT 21HCMP AL,'Y'JE LOOPPCMP AL,'y'JE LOOPPMOV AH,4CHINT 21HG9:MOV AH,9 INT 21HCALL HCRETHC:MOV DL,0AHMOV AH,2INT 21HMOV DL,0DHMOV AH,2INT