汇编--将以0结尾的字符串中的小写字母转变成大写字母

assume cs:codesg
datasg segment
	db "Beginner's All-purpose Symbolic Instruction Code.",0
datasg ends
codesg segment
	begin:mov ax,datasg
	      mov ds,ax
	      mov si,0
	      call letterc
	      mov ax,4c00h
	      int 21h
	letterc:mov cl,[si]
	        mov ch,0
	        jcxz ok
	        mov bl,[si]
	        cmp bl,61h
	        jb s
	        cmp bl,91h
	        ja s
	        and byte ptr [si],11011111b
	
	        jmp short letterc
	        
	        ok :ret
	        s:inc si
	         jmp short letterc
	
	codesg ends
	end begin