小写字母变大写字母（汇编语言实现） (2008-05-14 21:57:52)

标签：杂谈



DATA SEGMENT

PMT1 DB INPUT Small letter : ,0AH,0DH, $

STR1 DB 40H,0,40H DUP(0)

PMT2 DB 0AH,0DH, Display capital letter : ,0AH,0DH

STR2 DB 40H DUP(0), $

DATA ENDS

STACK1 SEGMENT PARA STACK

DW 20h DUP(0)

STACK1 ENDS



CODE SEGMENT

ASSUME CS:CODE,DS:DATA

START: MOV DX,DATA

MOV DS,DX

MOV DX, OFFSET PMT1

MOV AH,09H 提示输入小写字符

INT 21H

MOV DX,OFFSET STR1

MOV AH,0AH 输入小写字符

INT 21H

MOV CL,STR1+1

MOV CH,0

LEA SI,STR1+2

LEA DI,STR2

LOP:MOV AL,[SI]

SUB AL,20H

MOV [DI],AL

INC SI

INC DI

LOOP LOP

MOV DX,OFFSET PMT2

MOV AH,09H 输出大写字母

INT 21H

MOV AH,4CH

INT 21H

CODE ENDS

END START-Lowercase letters variable capital letters (compiled language) (2008-05-14 21:57:52) Tags: Talking DATA SEGMENT PMT1 DB INPUT Small letter:, 0AH, 0DH, $ STR1 DB 40H, 0,40 H DUP (0 ) PMT2 DB 0AH, 0DH, Display capital letter:, 0AH, 0DH STR2 DB 40H DUP (0), $ DATA ENDSSTACK1 SEGMENT PARA STACK DW 20h DUP (0) STACK1 ENDSCODE SEGMENT ASSUME CS: CODE, DS: DATASTART: MOV DX, DATA MOV DS, DX MOV DX, OFFSET PMT1 MOV AH, 09H prompted to enter lowercase characters INT 21H MOV DX, OFFSET STR1 MOV AH, 0AH enter lowercase characters INT 21H MOV CL, STR1+ 1 MOV CH, 0 LEA SI, STR1+ 2 LEA DI, STR2 LOP: MOV AL, [SI] SUB AL, 20H MOV [DI], AL INC SI INC DI LOOP LOP MOV DX, OFFSET PMT2 MOV AH, 09H output capital letters INT 21H MOV AH, 4CH INT 21HCODE ENDSEND START