輸入一串字符串，判斷字符串里面是否包含數(shù)字，如果包含數(shù)字輸出把cl的第五位設(shè)置為1，否則設(shè)置為0

程序運(yùn)行：

?

代碼：

datas segmentSTRING_maxLength db 0ffhSTRING_Length db ?STRING db 100h dup(?)inputPrompt db 'input a line:$'outputPrompt db 'cl=$'nextLine db 0dh,0ah,'$'datas endsstacks segment stackdb 100h dup(?)stacks endscodes segmentassume cs:codes,ds:datas,ss:stacks main proc far start:push dsmov ax,0hpush axmov ax,datas ;初始化dsmov ds,ax;輸出輸入一行字符lea dx,inputPromptmov ah,9int 21h;輸入一行字符lea dx,STRING_maxLengthmov ah,10int 21h;輸出換行l(wèi)ea dx,nextLinemov ah,9int 21h;mov dl,cl;call toBinaryPrintmov ch,STRING_Length ;把字符串的長(zhǎng)度移至chand cl,11011111b ;初始化cl第5位為0;若字符串長(zhǎng)度為0，直接輸出clcmp ch,0 jz breakmov bx,0 s:mov al,STRING[bx] ;將STRING中單元移至alcmp al,'0' ;比較al與'0'的大小jl next ;若al<'0'，則跳轉(zhuǎn)cmp al,'9' ;否則，比較al與'9'的大小jg next ;若al>'9'，則跳轉(zhuǎn)or cl,00100000b ;否則，設(shè)置cl的第五位為1jmp break ;跳出循環(huán) next:add bx,type STRING ;STRING索引移至下一個(gè)單元dec ch ;計(jì)數(shù)器減1 cmp ch,0 ;比較ch與0ja s ;若ch>0，則循環(huán)繼續(xù)break:;輸出cl的二進(jìn)制提示lea dx,outputPromptmov ah,9int 21h;輸出clmov dl,cl ;將cl移至dlcall toBinaryPrintretmain endptoBinaryPrint proc near;保存寄存器push dspush axpush cxpush dxpush bx;設(shè)置ds為cspush cspop ds;把目的數(shù)dl轉(zhuǎn)換成二進(jìn)制字符串mov cx,8 ;設(shè)置循環(huán)次數(shù)mov bx,0 ;設(shè)置binaryArray下標(biāo)bin:shl dl,1 ;左移一位jnc zero ;移除的位不為1（即0），跳轉(zhuǎn)mov binaryArray[bx],'1' ;若移除的位為1，則設(shè)置binaryArray[bx]為‘1’jmp next ;跳轉(zhuǎn)至zero:mov binaryArray[bx],'0' ;若移除的位為0，則設(shè)置binaryArray[bx]為‘0’next:add bx,type binaryArray ;binaryArray數(shù)組下標(biāo)移至下一個(gè)元素loop binmov binaryArray[bx],'b' ;在二進(jìn)制字符串后加上二進(jìn)制單位mov binaryArray[bx+1],'$' ;設(shè)置字符串的結(jié)束標(biāo)志;輸出目的數(shù)的二進(jìn)制lea dx,binaryArraymov ah,9int 21h;恢復(fù)寄存器 pop bx pop dx pop cxpop axpop dsretbinaryArray db 16 dup(?) toBinaryPrint endp codes endsend main

?

總結(jié)

以上是生活随笔為你收集整理的汇编语言（十四）之判断字符串是否包含数字的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。