汇编 实验报告5 字符串输入输出

;实验报告内容,输入一个字符串,去掉数字,输出ASSUME DS:DATA,CS,CDOE,SS,STACK
DATA SEGMENT
    MAXLEN DB 15
    INPUTLEN DB 0
    STR1 DB 15 DUP(0)
    STR2 DB 15 DUP(0)
DATA ENDS
STACK1 SEGMENT STACK
    DW 40H DUP(0)
STACK1 ENDS
CODE SEGMENT
    START:
    MOV AX,DATA                   ;INITIAL THE DS,SS
    MOV DS,AX
    MOV AX,STACK1
    MOV SS,AX

    LEA DX,MAXLEN                  ;INPUT THE STRING
    MOV AH,0AH
    INT 21H

    CALL NEWLINE
                                   ;SET THE LOOP
    MOV AL,INPUTLEN
    MOV AH,0
    MOV CX,AX
    MOV SI,0
    MOV DI,0
    LOOP1:
    MOV AL,STR1[SI]
    CMP AL,30H                     ;CMP
    JZ BREAK
    JC OK

    CMP AL,39H
    JZ BREAK
    JNC OK
    JMP BREAK

    OK:
    MOV STR2[DI],AL                 ;TRANSFER STR1 TO STR2
    INC DI

    BREAK:
    INC SI
    LOOP LOOP1

    MOV AL,24H                      ;ADD THE ‘$‘
    MOV STR2[DI],AL

    MOV AL,0

    LEA DX,STR2
    MOV AH,09H
    INT 21H

    MOV AH,4CH
    INT 21H
NEWLINE PROC
    MOV AH,02H
    MOV DL,0DH
    INT 21H
    MOV AH,02H
    MOV DL,0AH
    INT 21H
    RET
NEWLINE ENDP
CODE ENDS
END START