تاريخ التسجيل: May 2008
التخصص: علوم حاسبات
نوع الدراسة: إنتظام
المستوى: التاسع
الجنس: ذكر
المشاركات: 12
|
مشاركة: مشروع ال 313 تاريخ التسليم يوم 22 شعبان ضروري اللي عندو الحل
السلام عليكم ورحمة الله وبركاته
شباب انا اخذت المادة عند فادي فوز الترم اللي راح والحمدالله فهمت المادة معاه من دون عربي أو شريف
بس المشكلة مو في الدكتور المشكلة فينا حنا
دام انت مو فاهم ليه ماتسأل الدكتور عن اللي ما فهمته وحتى لو ما رضى يشرحلك روح له المكتب راح يشرح لك غصبا عنه
المهم اللي يبي المشروع حق الترم هذا انا راح انزله هناكل مع عليك التعديل في البيانات عليه
لما تسوي التنفيذ راح تطلع معاك اربع ملفات انسخها وسلمها للدكتور
هذا البرنامج
TITLE Add (1.asm)
INCLUDE Irvine16.inc
.data
str0 BYTE " * * * *",0Ah,0Dh
BYTE " * * * * * * * * * * * * * * * * * * ",0Ah,0Dh
BYTE " * * * * * * * * * * * * ",0Ah,0Dh
BYTE " * * * * * * * * * * * ",0Ah,0Dh
BYTE " * * * * * * * * * * * * * * * * * ",0Ah,0Dh
BYTE " * * * * * * ",0
str1 BYTE "Date: ",0
str2 BYTE 0Ah,0Dh,"Time: ",0
str3 BYTE "-",0
str4 BYTE ":",0
str5 BYTE " ebrahim sleem alblawi",0
str6 BYTE " 0250820",0
.code
main PROC
call clrscr
mov ax,@data
mov ds,ax
mov ah,06h
mov al,00h
mov bh,11110000b
mov cx,0000h
mov dx,254fh
int 10h
mov ah,06h
mov al,04h
mov bh,00011111b
mov cx,0033h
mov dx,254fh
int 10h
mov ah,06h
mov al,04h
mov bh,00011111b
mov cx,0000h
mov dx,2510h
int 10h
mov ah,06h
mov al,00h
mov bh,00001111b
mov cx,0805h
mov dx,0d49h
int 10h
;-----
mov ah,2 ; set cursor position
mov dx,0800h ; row 7, col 20
mov bh,00h ; video page 0
int 10h
mov dx,OFFSET str0
call WriteString
;------Time&Date
mov ah,2 ; set cursor position
mov dx,1600h ; row 7, col 20
mov bh,00h ; video page 0
int 10h
mov dx,OFFSET str1
call WriteString
mov ah,2Ah ; get system date
int 21h
movzx eax,dl ;day
call WriteDec
mov dx,OFFSET str3
call WriteString
mov ah,2Ah ; get system date
int 21h
movzx eax,dh ;month
call WriteDec
mov dx,OFFSET str3
call WriteString
mov ah,2Ah ; get system date
int 21h
movzx eax,cx ;year
call WriteDec
mov dx,OFFSET str5
call WriteString
;-----------------------
mov dx,OFFSET str2
call WriteString
mov ah,2Ch ; get system time
int 21h
movzx eax,ch ;hh
call WriteDec
mov dx,OFFSET str4
call WriteString
movzx eax,cl ;mm
call WriteDec
mov dx,OFFSET str4
call WriteString
mov ah,2Ch ; get system time
int 21h
movzx eax,dh ;ss
call WriteDec
mov dx,OFFSET str6
call WriteString
; Wait for a keypress.
mov ah,10h
int 16h
exit
main ENDP
END main
بس سوي نسخ على المفكرة ونفذه
|