汇编语言从键盘输入一个字符串（串长不大于80）以十进制输出字符串中非字母字符的个数（不是a to z或 A to Z）

汇编语言， 即第二代计算机语言，用一些容易理解和记忆的缩写单词来代替一些特定的指令，例如：用"ADD"代表加法操作指令，"SUB"代表减法操作指令，以及"INC"代表增加1，"DEC"代表减去1，"MOV"代表变量传递等等，通过这种方法，人们很容易去阅读已经完成的程序或者理解程序正在执行的功能，对现有程序的bug修复以及运营维护都变得更加简单方便。但计算机的硬件不认识字母符号，这时候就需要一个专门的程序把这些字符变成计算机能够识别的二进制数或机器语言。因为汇编语言只是将机器语言做了简单编译，所以并没有根本上解决机器语言的特定性，所以汇编语言和机器自身的编程环境息息相关，推广和移植很难，但是还是保持了机器语言优秀的执行效率，因为他的可阅读性和简便性，汇编语言到现在依然是常用的编程语言之一。 [2] 汇编语言不像其他大多数的程序设计语言一样被广泛用于程序设计。在今天的实际应用中，它通常被应用在底层，硬件操作和高要求的程序优化的场合。驱动程序、嵌入式操作系统和实时运行程序都需要汇编语言。

（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
;----------------------2020年5月18日14:29:33----------------

希望大家不吝赐教，在下面支出我的错误，谢谢