PDA

View Full Version : سوال: String & File \n



mhsmity
دوشنبه 03 خرداد 1389, 10:35 صبح
سلام
متغیر های زیر را در قطعه داده تجسم کنید.
UserName db 4,?,4 dup(0),"$"
Password db 4,?,4 dup(0),"$"
این متغیرها هر کدام جداگانه دریافت می شود .
حالا چه طوری این رشته ها رو ادغام کنیم

UserName Password
ali 1245565

تا یک رشته بزرگ تولید شود.
می خوام رشته بدست آمده را در یک فایل متنی چاپ کنم بعد از چاپ رشته بدست آمده چه طوری به خط بعد بروم.

tdkhakpur
سه شنبه 04 خرداد 1389, 12:05 عصر
کد زیر برای ادغام رشته هاست و برای فایل هم یک سری وقفه و توابع وجود دارد هم تحقیق و هم تست میتواند برایتان مفید باشد.


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