Excel中如何计算字符串的长度(excel求字符串长度)
623
2022-05-29
(1)从键盘输入一个字符串(串长不大于80)。
(2)以十进制输出字符串中非字母字符的个数(不是a to z或 A to Z)。
(3)输出原字符串且令非字母字符闪烁显示。
(4)找出字符串中ASCII码值最大的字符,在字符串中用红色显示。
(5)字符串的输入和结果的输出都要有必要的提示,且提示独占一行。
(6)要使用到子程序。
data segment hintinput db "please input a string:$" hintoutput1 db "The number of non-alphabetic characters:$";输出非字母字符的个数 hintoutput2 db "flashes non-alphabetic characters:$";输出原字符串并闪烁 hintoutput3 db "The character with the largest ASCII value in a string:$";ascill最大字符 buf db 200 db ? db 200 dup(?) count db 0 crlf db 0ah,0dh,'$' data ends stack segment stack string db 500 dup(?) stack ends extra segment ;定义附加段 extra ends codes segment assume cs:codes,ds:data,ss:stack,es:extra main proc far start: mov ax,data ;分别将数据段,堆栈段,附加段送入代码段 mov ds,ax mov ax,stack mov ss,ax mov ax,extra mov es,ax ;---------------------------输入字符串提示语并进行回车换行 lea dx,hintinput ;输入提示语 mov ah,9;输出功能入口在dx int 21h lea dx,crlf;输入提示语后,回车换行 mov ah,09 int 21h ;---------------------------通过a号功能进行字符串输入操作并回车换行 mov ah,0ah;输入功能入口在dx lea dx,buf int 21h lea dx,crlf ;输入后回车换行 mov ah,9 int 21h ;------------------------------------首先用cl储存字符串长度,si源变址寄存器指向串真正开始的地方 mov cl,buf+1;cl中放置实际字符串长度 lea si,buf+2;si放置字符串首地址 ;------------------------------------首先输出提示语回车换行,以十进制输出字符串中非字母字符的个数(不是a to z或 A to Z)。 call print1 ;-------------------------------------- call print2 ;---------=---------------------------- call print3 ;-------------------------------------- mov ah,4ch int 21h main endp print1 proc near ;-----------------子程序一入口 push cx push si lea dx,hintoutput1 ;输出提示语 mov ah,09h;输出功能入口在dx int 21h lea dx,crlf;输入提示语后,回车换行 mov ah,09 int 21h mov dl,0 ;用dl来计数,统计符串中非字母字符的个数 L0: mov al,[si] cmp al,'A' jb L1 ;如果字符<'A',跳转到L1 cmp al,'Z' jbe L2 ;如果字符<='Z',跳转到L2 cmp al,'a' jb L1 ;如果字符<'a',跳转到L1 cmp al,'z' jbe L2 ;如果字符<='Z',跳转到L2 L1: inc dl ;计数器加1 L2: inc si dec cl jnz L0 ;----------------------------------输出非字母字符的个数dl cmp dl,9h jbe L ;如果非字母个数小于10,则直接加30输出 mov dh,0 ;否则把dx存入ax中 mov ax,dx mov bl,10 ;ax除以10后,ah作为商 div bl ;al作为余数 mov dl,al mov ch,al ;防止ah中的商被02h冲掉,先把商转移到ch中 add dl,30h ;先输出商,再输出余数,就是10进制了 mov ah,02h int 21h mov dl,ch L: add dl,30h mov ah,02h int 21h lea dx,crlf ;输出后,回车换行 mov ah,09 int 21h pop si pop cx ret print2 proc near lea dx,hintoutput2 ;输出提示语 mov ah,09h ;输出功能入口在dx int 21h lea dx,crlf ;输入提示语后,回车换行 mov ah,09h int 21h push cx push si cld ;方向标志位df清零 L3: push cx lodsb ;从字符串串中取数据至al cmp al,'A' jb L4 ;如果字符<'A',跳转到L4 cmp al,'Z' jbe L5 ;如果字符<='Z',跳转到L5 cmp al,'a' jb L4 ;如果字符<'a',跳转到L4 cmp al,'z' jbe L5 ;如果字符<='Z',跳转到L5 L4: ;如果不是字母,则进行闪烁输出 mov bl,10000111b ;bl属性闪烁输出 mov bh,0 ;显示页为0 mov cx,1 ;显示字符为1个 mov ah,09h int 10h ;输出bl属性的字符串 mov ah,03h int 10h ;读光标位置 inc dl ;输出列+1 mov ah,02h int 10h ;置光标位置 jmp L6 L5: mov bl,00000111b ;bl属性为平常输出 mov bh,0 ;显示页为0 mov cx,1 ;显示字符个数为1个 mov ah,09h int 10h ;输出属性为bl的字符 mov ah,03h int 10h ;读光标位置 inc dl ;输出列+1 mov ah,02h int 10h ;置光标位置 L6: pop cx loop L3 lea dx,crlf ;输入提示语后,回车换行 mov ah,09 int 21h pop si pop cx ret print3 proc near lea dx,hintoutput3 ;输出提示语 mov ah,09h ;输出功能入口在dx int 21h lea dx,crlf ;输入提示语后,回车换行 mov ah,09 int 21h push cx push si ;count用来存放ascill最大的字符 L7: mov al,[si] cmp al,count ;比较al和count的大小,如果al>count,则令al=count jbe L8 mov count,al L8: inc si dec cl jnz L7 pop si pop cx cld L9: push cx lodsb ;从串中取数据至al cmp al,count jz L11 ;如果字符==ascill码最大字符 L10: mov bl,00000111b ;bl属性正常输出 mov bh,0 ;显示页为0 mov cx,1 ;显示字符为1个 mov ah,09h int 10h ;输出bl属性的字符串 mov ah,03h int 10h ;读光标位置 inc dl ;输出列+1 mov ah,02h int 10h ;置光标位置 jmp L12 L11: mov bl,00000100b ;bl属性为红色输出 mov bh,0 ;显示页为0 mov cx,1 ;显示字符个数为1个 mov ah,09h int 10h ;输出属性为bl的字符 mov ah,03h int 10h ;读光标位置 inc dl ;输出列+1 mov ah,02h int 10h ;置光标位置 L12: pop cx loop L9 lea dx,crlf ;输出后,回车换行 mov ah,09 int 21h ret codes ends end start ;--------------------------------------
希望大家不吝赐教,在下面支出我的错误,谢谢
汇编语言
版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。