ورود

View Full Version : سوال: ادغام دو رشته با هم



arashmidos200x
یک شنبه 01 شهریور 1388, 13:41 عصر
سلام چطوری میشه 2 رشته از ورودی خوند و یکیش کرد؟ اگه توضیح کامل باشه ممنون میشم من اماتورم

tdkhakpur
یک شنبه 01 شهریور 1388, 16:03 عصر
stacksg segment para stack 'stack'
stacksg ends
datasg segment para 'data'
s1 db "str1$ "; ÇÕáÇÍ
s2 db "str2$"
datasg ends
codes segment para 'code'
main proc far
assume ss:stacksg, ds:datasg, cs:codes
mov ax, datasg
mov ds, ax
;------------ ur programm
lea bp, s1
label1:
mov dl, byte ptr [bp]
inc bp
cmp dl,'$'
jne label1
lea bx, s2
dec bp
label2:
mov dl, byte ptr [bx] ;bx reshte 2
mov byte ptr [bp], dl ;bp reshte 1
inc bp
inc bx
cmp dl, '$'
jne label2
;print s1+s2
lea dx,s1
mov ah,9h
int 21h
;------------ end of program
mov ax, 4c00h
int 21h
main endp
codes ends
end main