الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عاااااااااااااجل ارجو المساعدة

مغلق
بدأه SHIFT في 11 أبريل 2005 · 1 رد · 496 مشاهدة · في لغة Assembly لأنظمة 16, 32, 64 بت
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته........

اول مشاركة لي في المنتدى وارجو ماتردوني خايب لاني بصراحة اريد الحل باقرب فرصة........

برنامج يحتوي على two string بحيث نخزن في الاول ثم نقوم بعمل نسخ للstring1 في string2ولكن بالترتيب العكسي باستخدام امر MOVSB

وهدا كود قراءة ال string1 وتخزينه :

STACKSEG SEGMENT

DW 32 DUP(?)

STACKSEG ENDS

;============================

DATASEG SEGMENT

LF EQU 0AH

CR EQU 0DH

MSG2_ DB CR,LF, 'Enter a string$'

COPY DB CR,LF,'The string after copy $'

STR1 DB 9 DUP(?)

STR2 DB 9 DUP(?)

DATASEG ENDS

;===========================

CODESEG SEGMENT

BEGIN PROC FAR

ASSUME SS:STACKSEG,DS:DATASEG,CS:CODESEG

MOV AX,DATASEG

MOV DS,AX

MOV ES,AX

;===========================

LEA DX,MSG2_

MOV AH,9

INT 21H

;===========================

;READING STRING1

MOV CX,0

CLD

LEA DI,STR1

MOV AH,1

REPEATE:

INT 21H

STOSB

INC CX

UNTIL:

CMP AL,0DH

JNE REPEATE

DEC DI

MOV AL,'$'

STOSB

;=============================

end_prog:

MOV AH,4CH

INT 21H

BEGIN ENDP

CODESEG ENDS

END BEGIN

#2

عنوان الموضوع مخالف وسيتم إغلاقه

لا إله إلا الله محمد رسول الله

busbar : يجب ان تدرك انه هناك حد ادنى للمعرفة المطلوبة قبل البدء في عمل أي شئ.

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…