ايران ويج

نسخه‌ی کامل: ستاره به جای فاصله
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
سلام
اول ببخشید که من خیلی سئوال دارم. چون این سئوال ها را تا حالا کسی نبوده که جواب بدهد.
متشکرم اگر کسی لطف کند و تمام سئوالات من را جواب بدهد.

برنامه ای بنویسید که یک رشته از ورودی دریافت کند و بجای کاراکتر فاصله که در رشته وجود دارد کاراکتر ستاره قرار دهد و دوباره همان رشته را با ستاره چاپ کند.
سلام دوست عزیز:
چند خط اول باید در سگمنت داده تعریف شوند.
کد:
CCCP LABEL BYTE  ;SEGMENT 'DATA'
      MAX DB 20        ;SEGMENT 'DATA'
      LEN DB ?         ;SEGMENT 'DATA'
      BUFFRE DB 20 DUP('$'),'$' ;SEGMENT 'DATA'
      KGB DB 'Enter String:','$' ;SEGMENT 'DATA'
      
      PPP DB 'Result:','$'  ;SEGMENT 'DATA'



      
      MOV AH,09H
      LEA DX,KGB
      INT 21H
      
      MOV AH,0AH
      LEA DX,CCCP
      INT 21H
      
      
      MOV CL,LEN
      MOV CH,0
      
      MOV SI,0
      
      MOV BL,BUFFRE[SI]
      
        
      
      L:
      
      CMP BL,20H
      JE K
      
      INC SI
      MOV BL,BUFFRE[SI]
              
          
      LOOP L
      
      JMP F
      
      
      
      K:
      MOV BUFFRE[SI],'*'
      INC SI
      MOV BL,BUFFRE[SI]
      LOOP L    
      
      
      F:
      
      
      MOV AH,02H
      MOV DL,0AH
      INT 21H
      
      MOV AH,02H
      MOV DL,0DH
      INT 21H
      
      
      MOV AH,09H
      LEA DX,PPP
      INT 21H
      
      MOV AH,09H
      LEA DX,BUFFRE
      INT 21H