從鍵盤(pán)輸入一串字符,分別統(tǒng)計(jì)其中的字母,數(shù)字字符和其他

匯編編程:從鍵盤(pán)輸入一串字符,分別統(tǒng)計(jì)其中的字母(不區(qū)分大小寫(xiě))、數(shù)字字符和其他鍵盤(pán)輸入一串字符，統(tǒng)計(jì)出其中的數(shù)字字符個(gè)數(shù)，字母字符（不區(qū)分大小寫(xiě)）個(gè)數(shù)，其他字符個(gè)數(shù)，并顯示出這三類(lèi)統(tǒng)計(jì)結(jié)果（輸入字符串以回車(chē)結(jié)束），可連續(xù)對(duì)多個(gè)字符串統(tǒng)計(jì)，用戶(hù)輸入N時(shí)退出程序。要求：題目分析（如何實(shí)現(xiàn)，以及實(shí)現(xiàn)的關(guān)鍵技術(shù)或步驟）2.要有流程圖3.寫(xiě)出程序代碼4.寫(xiě)出上機(jī)操作步驟，給出輸入的數(shù)據(jù)及程序運(yùn)行結(jié)果。; 題目名稱(chēng)：分類(lèi)統(tǒng)計(jì)字符; 題目來(lái)源：/question/131013276.html; 本程序在MASMPlus 1.2集成環(huán)境下通過(guò)編譯，經(jīng)過(guò)調(diào)試，運(yùn)行正確。Code Segment Assume CS:Code,DS:Code; ; 功能：顯示指定地址（Str_Addr）的字符串; 入口：; Str_Addr字符串地址（要求在數(shù)據(jù)段）; 用法: Output Str_Addr; 用法舉例：Output PromptStrOutput MACRO Str_Addr lea dx,Str_Addr mov ah,9 int 21h EndM; ; 功能：在當(dāng)前光標(biāo)位置顯示一個(gè)字符; 入口：dl=要顯示的字符 Output_Chr proc Near push ax mov ah,02h int 21h pop ax ret Output_Chr Endp ; ; 功能：顯示、輸出一個(gè)回車(chē)、換行Output_CTLF proc Near push ax push dx mov ah,02h mov dl,0dh int 21h mov dl,0ah int 21h pop dx pop ax retOutput_CTLF Endp ; ; 功能：把AX中的二進(jìn)制無(wú)符號(hào)數(shù)轉(zhuǎn)換成顯式的十進(jìn)制ASCII碼，并送顯示屏顯示; 入口：AX=二進(jìn)制數(shù) ; 出口：在當(dāng)前光標(biāo)位置顯示轉(zhuǎn)換后的ASCII碼數(shù)字 Unsi_Dec_ASCII Proc Near push dx push bx push di mov bx,10 lea di,Temp_Save5 mov BYTE PTR di,$ dec di cld Divide: xor dx,dx div bx or dl,30h mov di,dl dec di test ax,ax jnz Divide inc di push di pop dx mov ah,9 int 21h pop di pop bx pop dx ret Temp_Save db 6 dup(?)Unsi_Dec_ASCII EndP; ; 功能：鍵盤(pán)輸入一個(gè)字符，若輸入的是y或n（不分大小寫(xiě)），則顯示并返回; 入口：無(wú); 出口：若輸入的是y，進(jìn)位標(biāo)志置位；若輸入的是n，進(jìn)位標(biāo)志復(fù)位。Yes_or_No proc Near push dx push axInput_Chr: mov ah,7 ;不帶回顯的鍵盤(pán)輸入 int 21h mov dl,al and al,0dfh cmp al,Y jnz $+5 stc jmp $+7 cmp al,N jnz Input_Chr clc mov ah,2 int 21h pop ax pop dx retYes_or_No Endp; Letters dw ? ;字母?jìng)€(gè)數(shù)Dights dw ? ;數(shù)字個(gè)數(shù)Others dw ? ;其它字符個(gè)數(shù)Letters_sum db 13,10,Letters: $Dights_sum db 13,10,Digits : $Others_sum db 13,10,Others : $Prompt_Str db Please input a string:$Prompt_Con db 13,10,13,10,Continue(Y/N)?$Press_Key db 7,13,10,13,10,The complated. Press any key to exit.$ Start: push cs pop ds push cs pop es; ; 從鍵盤(pán)上連續(xù)輸入一串字符（字符個(gè)數(shù)不超過(guò)80個(gè)，該字符串用回車(chē)符結(jié)束）Input_Str: Output Prompt_Str ;提示輸入一串字符 lea dx,Buffer ;輸入字符串緩沖區(qū)地址 mov ah,0ah ;從鍵盤(pán)接收字符串 int 21h call Output_CTLF ;輸出一個(gè)回車(chē)、換行; ; 按字母、數(shù)字、其它字符分類(lèi)統(tǒng)計(jì)計(jì)數(shù) lea si,Buffer1 ;實(shí)際輸入的字符數(shù)地址 lodsb ;讀入實(shí)際輸入的字符數(shù) xor ah,ah mov cx,ax ;實(shí)際輸入的字符數(shù)送計(jì)數(shù)器 jcxz Continue mov Letters,0 ;字母計(jì)數(shù)單元清零 mov Dights,0 ;數(shù)字計(jì)數(shù)單元清零 mov Others,0 ;其它字符計(jì)數(shù)單元清零Classify: lodsb ;當(dāng)前字符AL cmp al,0 ;當(dāng)前字符9? ja $+8 ;大于，轉(zhuǎn)去判斷是否字母 inc Dights ;數(shù)字計(jì)數(shù) jmp Other_Chr4 mov ah,al ;alah，用于判斷是否字母 and ah,0dfh ;屏蔽第5位，按大寫(xiě)字母處理 cmp ah,A ;當(dāng)前字符Z? ja Other_Chr ;大于，轉(zhuǎn)去按其它字符處理 inc Letters ;字母計(jì)數(shù) jmp $+6Other_Chr: inc Others ;其它字符計(jì)數(shù) loop Classify; ; 顯示分類(lèi)統(tǒng)計(jì)結(jié)果 Output Letters_sum mov ax,Letters ;字母?jìng)€(gè)數(shù) call Unsi_Dec_ASCII ;把AX中的二進(jìn)制無(wú)符號(hào)數(shù)轉(zhuǎn)換成顯式的十進(jìn)制ASCII碼，并送顯示屏顯示 Output Dights_sum mov ax,Dights ;數(shù)字個(gè)數(shù) call Unsi_Dec_ASCII Output Others_sum mov ax,Others ;其它字符個(gè)數(shù) call Unsi_Dec_ASCIIContinue: Output Prompt_Con call Yes_or_No jnc Exit_Proc call Output_CTLF call Output_CTLF jmp Input