[汇编] 大小写转换

 

data segment       
    ;定义字符串缓冲区
    ;MAXLEN 表示允许输入的最大字符数量
    ;ACTLEN 表示实际输入的数量
    ;STR 用于存储输入的字符串
    ;以下面为例，允许最大输入5个字符，如果STR后面的长度也定义为5，则实际输入的字符数量仅为4，
    ;因为最后一个字符会用于存储0Dh(回车符号)
    ;例如：输入"1234"，然后回车，此时内存的情况为: 05 00 31 32 33 34 0D
    ;因此，为了满足实际的最大数量，通常将MAXLEN定义得比实际的多1个。       
    MAXLEN db 6         ;允许最大长度
    ACTLEN db 0         ;实际长度
    STR dw 6 dup('')    ;存放字符串
    ;提示语句
    PROMPT1 db 0DH,0AH,"Please input a string:$"
    PROMPT2 db 0DH,0AH,"Your string is :$" 
    CHOOSE  db 0DH,0AH,"chose 1 or 2:$"     
ends

code segment
start:
    ;设置数据段寄存器
    mov ax, data
    mov ds, ax 
input:
    ;提示输入，提示语句位于ds:dx处 
    lea dx, CHOOSE
    mov ah, 9
    int 21h  
    mov ah,01H  ;输入跳转
    int 21h
    cmp al,31H   
    mov dl,0AH 
    mov ah,02H
    int 21h
    mov dl,0DH 
    mov ah,02H
    int 21h
    jz  tosmall
    jmp tobig
tosmall: 
    call input_str 
    mov si,0;指针
    mov cl,ACTLEN;循环次数
    mov ch,0
    call tosmall_print
    jmp next 
tobig:
    call input_str
    mov si,0;指针
    mov cl,ACTLEN;循环次数
    mov ch,0
    call tobig_print
    jmp next 
next:    
    JMP input
    ;返回操作系统 
    mov ax, 4c00h
    int 21h    
ends  
;---------------------
tosmall_print proc near 
    ;输出结果的提示语句
    lea dx,PROMPT2
    mov ah, 9
    int 21h 
xunhuan1:
    mov ax,STR[si]
    cmp al,5BH
    jnb  nochange 
    add ax,20H
nochange:
    mov dl,al
    mov ah,02H
    int 21H
    inc     si          ;加1不影响cf
    loop xunhuan1
    ret
tosmall_print endp
;---------------------      
tobig_print proc near 
    ;输出结果的提示语句
    lea dx,PROMPT2
    mov ah, 9
    int 21h 
xunhuan2:
    mov ax,STR[si]
    cmp al,5BH
    jnb  nochange2 
    add ax,20H
nochange2: 
    sub ax,20H
    mov dl,al
    mov ah,02H
    int 21H
    inc     si          ;加1不影响cf
    loop xunhuan2
    ret
tobig_print endp
;---------------------
input_str proc near
    ;调用AH=0ah的21H中断程序，获取输入的字符串;
    ;(ds:dx)=缓冲区最大字符数 
    ;(ds:dx+1)=实际输入字符数
    ;ds:dx=缓冲区首址
    lea dx,MAXLEN
    mov ah,0ah
    int 21h
    
    ;取得实际输入的字符串数目
    mov bl,ACTLEN
    mov bh,0 
    ;将结尾处改为'$'以便调用AH=09H功能，即输出刚输入的字符串
    mov STR[bx],'$'
    ret    
    
    lea dx, PROMPT1
    mov ah, 9
    int 21h
    ret
input_str endp
;------------------------
end start ; set entry point and stop the assembler.