test.asm

汇编语言写的程序

DATAS SEGMENT
    ;此处输入数据段代码
    messgsourStr db 'Source String: $'
    messgtarStr db 'Target String: $'
    messgResult db 'Show Source String?(y or no) $'
    count db 0
    clrf db 13,10,'$'
    Str db 20 dup(?) 
DATAS ENDS

STACKS SEGMENT
    ;此处输入堆栈段代码
STACKS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
    MOV AX,DATAS
    MOV DS,AX
    ;此处输入代码段代码
    
    mov cx,20
    xor si,si
    
    lea dx,messgsourStr
    mov ah,09h
    int 21h
    
input:
	mov ah,01h
	int 21h
	cmp al,13
	je result
		
	inc count
		
	xor al,0fh
	mov [Str+si],al
	inc si
	
	loop input    
	
	lea dx,clrf
    mov ah,09h
    int 21h
    
result:
	mov [Str+si],'$'
    
    lea dx,messgtarStr
    mov ah,09h
    int 21h
    
    lea dx,Str
    mov ah,09h
    int 21h
    
    lea dx,clrf
    mov ah,09h
    int 21h
    
    lea dx,messgResult
    mov ah,09h
    int 21h
    
    mov ah,01h
    int 21h
    cmp al,'y'
    jne exit
    
    mov ch,0
    mov cl,count
    
    lea si,Str
change:  
    xor [si],0fh
    inc si
    loop change
    
    lea dx,clrf
    mov ah,09h
    int 21h
    
    lea dx,messgsourStr
    mov ah,09h
    int 21h
    
    lea dx,Str
    mov ah,09h
    int 21h
    
    mov ah,07h
    int 21h
    
exit:
    MOV AH,4CH
    INT 21H
CODES ENDS
    END START