ParsX.com
پذیرش پروژه از دانشجویی ... تا سازمانی 09376225339
 
   ProfileProfile   Log in to check your private messagesLog in to check your private messages  |  FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups Log inLog in   RegisterRegister 

دومين كمك پروژه

 
Post new topic   Reply to topic    ParsX.com Forum Index -> ساختمان و زبان ماشين
View previous topic :: View next topic  
Author Message
somayeh
مهمون يكي دو روزه


Joined: 16 Jul 2006
Posts: 24

PostPosted: Fri Jul 21, 2006 7:43 am    Post subject: دومين كمك پروژه Reply with quote

سلام. لطف كنيد اشكالات برنامه زير رو بگيريد.برنامه حساب كردن يك جمله.
 stack 'stack'stacksg segment
      dw 100h dup(0)
stacksg ends
datasg segment 'data'
msg1  db 13,10,'please enter one number two digits:','$',13,10
msg2 db 13,10,'result is',13,10,'$'
strlst label byte
max db 3
len db ?
buffer db 0,0
datasg ends
codesg segment 'code'
assume cs:codesg,ds:datasg,ss:stacksg
sdd: mov ax,datasg
mov ds,ax
mov ah,09h
lea dx,msg1
int 21h
mov ah,0ah
lea dx,strlst
int 21h
mov ah,09h
lea dx,msg2
int 21h
mov al,buffer
add al,30
mov bl,al
mov ah,bl
sub bl,14
mul bl
add ax,5
mov cl,4
mov bl,al
and al,0fh
sub al,30h
shr bl,cl
and bl,0fh
sub bl,30h
or al,ah
mov dx,ax
mov ah,02h
int 21h
mov ah,4ch
int 21h
codesg ends
end  sdd

 
Back to top
Display posts from previous:   
Post new topic   Reply to topic    ParsX.com Forum Index -> ساختمان و زبان ماشين All times are GMT + 3.5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum