汇编语言实验子程序设计与系统调用.docVIP

1.实验内容：编写一完整程序，该程序接受长度小于30的字符串后，将串中的小写字母变成大写后重显该串。 小写字母转换成大写字母的功能以一子程序的形式实现。 3．实验提示 编写一个子程序，比如Uppercase，它的功能是：判断[DI]的内容是否为小写字母，如果是将其变成大写；否则原值返回。 “小 — 大”变换处理就在0AH功能的串缓存字段进行； 为使09H功能直接、方便地显示0AH功能串缓存字段的内容，需在定义将该字段处做什么改变？ 问题补充： stack0 segment para stack stack dw 40h dup(?) stack0 ends data segment para MAXLEN DB 30 INPTLEN DB ? STR1 DB 31 DUP(0) STR2 DB 31 DUP(0);在此定义Dos功能9和0a共用的缓冲区 data ends code segment para assume cs:code,ds:data;ss:stack0 main: mov ax,data mov ds,ax LEA DX,MAXLEN MOV AH,0AH INT 21H XOR CX,CX MOV CL,INPTLEN LEA SI,STR1 LEA DI,STR2;①字符串输入 LOP1: MOV AL,[SI] CALL UPCASE;小写变大写子程序 MOV [DI],AL INC DI L6: INC SI LOOP LOP1 MOV [DI],$ CALL NEWLINE;换行 LEA DX,STR2;在新行显示转换后的字符串 mov ah,09H int 21h mov ah,4ch int 21h NEWLINE PROC PUSH AX PUSH DX MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21H POP DX POP AX RET NEWLINE ENDP data segment para MAXLEN DB 30 INPTLEN DB ? STR1 DB 31 DUP(0) STR2 DB 31 DUP(0);在此定义Dos功能9和0a共用的缓冲区 data ends code segment para assume cs:code,ds:data main: mov ax,data mov ds,ax LEA DX,MAXLEN MOV AH,0AH INT 21H XOR CX,CX MOV CL,INPTLEN LEA SI,STR1 LEA DI,STR2;①字符串输入 LOP1: MOV AL,[SI] CALL UPCASE;小写变大写子程序 MOV [DI],AL INC DI L6: INC SI LOOP LOP1 MOV byte ptr [DI],$ CALL NEWLINE;换行 LEA DX,STR2;在新行显示转换后的字符串 mov ah,09H int 21h mov ah,1;按任意键结束 int 21h mov ah,4ch int 21h NEWLINE PROC PUSH AX PUSH DX MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21H POP DX POP AX RET NEWLINE ENDP upcase proc cmp al,61h jb tj cmp al,7ah ja tj sub al,20h tj: ret upcase endp code ends end main