8086汇编读入字符串并复制（不使用 movsb 指令）

Posted 2022-12-09 u25th_engineer

图 1 程序运行示意

getstr 	macro str
		mov ah,0ah
		lea dx,str
		int 21h
endm

printstr macro str
		mov ah,09h
		lea dx,str
		int 21h
endm

stack   segment stack
        db 512 dup(?)
stack   ends

data 	segment
        str1 db 80,80 dup('$')
        str2 db 80,80 dup('$')
        msg1 db 10,13,'enter the string :$'
        msg2 db 10,13,'the copied string is :$'
data 	ends
code segment
        assume cs:code,ds:data
start:
		mov ax, stack
		mov ss, ax
		mov ax,data
        mov ds,ax
        
        printstr msg1
        getstr str1
        lea si,str1+2
        lea di,str2+2
        
        mov cl,str1+1 ;for storing the length of the string
        mov ch,00h
lab1:   
		mov al,ds:byte ptr[si]
        mov ds:byte ptr[di],al
        inc di
        inc si  ;for going to the end of the string
        loop lab1
        
        printstr msg2
        printstr str2+2
              
        mov ax,4c00h
        int 21h
code ends
        end start