امل الحب
09-05-2007, 08:47 PM
لو سمحتوا ياشباب محتاجة مساعدة ..
كتبت برنامج بالاسمبلي..
بس في شي ناقص.. ابي الاسم الي انا بدخله يطلع مباشرة عقب ال Hello
وابي طريقة لحساااب الباسورد بيحث يظهرها لي
وهذا هو البرنامج الي انا كتبته.. ياريت تساعدوني..
.MODEL SMALL
.STACK 100
.DATA
MSG DB 'WHAT IS YOUR NAME?','$'
MSG2 DB 'HELLO....','$'
MSG3 DB 'YOUR PW IS:','$'
MYNAME DB 32 dup(0)
.CODE
W1 PROC FAR
MOV AX ,@DATA
MOV DS ,AX
CALL MY_READ
CALL NEWLINE
CALL MY_HELLO
CALL NEWLINE
CALL MY_PW
MOV AX,4C00H
INT 21H
ENDP
NEWLINE PROC NEAR
MOV AH,02
MOV DL,0DH
INT 21H
MOV DL,0AH
INT 21H
RET
ENDP NEWLINE
MY_READ PROC NEAR
LEA DX,MSG
LEA SI,MYNAME
MOV AH,09
INT 21H
MOV CX,32
bb: MOV AH,01
INT 21H
MOV [SI], AL
INC SI
DEC CX
CMP AL,0DH
JNZ bb
RET
ENDP MY_READ
MY_HELLO PROC NEAR
LEA DX,MSG2
MOV AH,09
INT 21H
RET
ENDP MY_HELLO
MY_PW PROC NEAR
LEA DX,MSG3
MOV AH,09
INT 21H
RET
ENDP MY_PW
END W1
بكون شااكرة لكم جدا..
كتبت برنامج بالاسمبلي..
بس في شي ناقص.. ابي الاسم الي انا بدخله يطلع مباشرة عقب ال Hello
وابي طريقة لحساااب الباسورد بيحث يظهرها لي
وهذا هو البرنامج الي انا كتبته.. ياريت تساعدوني..
.MODEL SMALL
.STACK 100
.DATA
MSG DB 'WHAT IS YOUR NAME?','$'
MSG2 DB 'HELLO....','$'
MSG3 DB 'YOUR PW IS:','$'
MYNAME DB 32 dup(0)
.CODE
W1 PROC FAR
MOV AX ,@DATA
MOV DS ,AX
CALL MY_READ
CALL NEWLINE
CALL MY_HELLO
CALL NEWLINE
CALL MY_PW
MOV AX,4C00H
INT 21H
ENDP
NEWLINE PROC NEAR
MOV AH,02
MOV DL,0DH
INT 21H
MOV DL,0AH
INT 21H
RET
ENDP NEWLINE
MY_READ PROC NEAR
LEA DX,MSG
LEA SI,MYNAME
MOV AH,09
INT 21H
MOV CX,32
bb: MOV AH,01
INT 21H
MOV [SI], AL
INC SI
DEC CX
CMP AL,0DH
JNZ bb
RET
ENDP MY_READ
MY_HELLO PROC NEAR
LEA DX,MSG2
MOV AH,09
INT 21H
RET
ENDP MY_HELLO
MY_PW PROC NEAR
LEA DX,MSG3
MOV AH,09
INT 21H
RET
ENDP MY_PW
END W1
بكون شااكرة لكم جدا..