Удаление конкретных символов из строки, запись результатов в файл - Assembler

Узнай цену своей работы

Формулировка задачи:

Добрый день, присутствует такая проблема, условие задачи стоит так: Ввести с клавиатуры название файла, затем ввести строку, из которой необходимо удалить конкретный символ (в данном случае пробел) и записать результаты в файл с именем из первого ввода и содержанием в виде двух строк: 1. Введенная строка, 2. Результирующая строка без символов (пробела). На данный момент имеется такой код, прошу помогите найти причину. Этот пример имеет фиксированный файл и путь, он выполняет все действия КРОМЕ УДАЛЕНИЯ СИМВОЛА, тут он просто заменяется тем же, только на регистр выше. Помогите изменить код так, чтобы он удовлетворял условию задачи.
Листинг программы 
  1. data segment
  2.     msg db 255, 0, 255 dup ('$'), '$'
  3.     file_name db 'C:\output.txt',0
  4.     error_msg db 'Error! Could not handle file $'
  5.     msg_size db 0
  6.     handler dw 0
  7. data ends
  8.  
  9. code segment
  10. assume cs:code, ds:data
  11. read_from_keyboard proc
  12.     mov ah, 0ah
  13.     lea dx, msg
  14.     int 21h 
  15.     ret
  16. read_from_keyboard endp
  17.  
  18. replace_a proc
  19.     mov si, offset msg + 2 ; move to register si offset of msg's 
  20.     ; data (we do not need first 2 bytes)
  21.     mov al, [si] ; move current (first) symbol from pointer si 
  22.     ;to register al
  23.  
  24. met:
  25.     cmp al, 'a' ; compare current symbol with 'a'
  26.     jne skip ; if current symbol is not equal to 'a' then 
  27.     ; go to skip label
  28.     mov al, 'A'
  29.     mov [si], al ; change current symbol to 'A'
  30. skip:    
  31.     inc si ; go to the next symbol
  32.     mov al, [si] ; move current symbol from pointer si 
  33.     ;to register al
  34.     cmp al, '$' ; compare current symbol with '$'
  35.     jne met ;if current symbol is not equal to '$' then 
  36.     ;go to met label
  37.     ret
  38. replace_a endp
  39.  
  40. print_error proc
  41.     ;write error
  42.     mov ah, 09h
  43.     lea dx, error_msg
  44.     int 21h
  45.     ret
  46. print_error endp
  47.  
  48. handle_file proc  
  49.     ;create file
  50.     mov ah, 3ch
  51.     xor cx, cx     ; cx = 0
  52.     lea dx, file_name
  53.     int 21h
  54.     jc error_file ;check if error occured
  55.  
  56.     mov handler, ax
  57.  
  58.     ;write to file
  59.     mov ah, 40h
  60.     mov bx, handler
  61.     xor cx, cx         ; cx = 0
  62.     mov cl, [msg_size] ; number of bytes to write
  63.     lea dx, msg + 2
  64.     int 21h
  65.   
  66.     jc error_file ;check if error occured
  67.     mov msg + 1, 0ah; change second byte to new line symbol  
  68.     call replace_a
  69.     
  70.     ;write to file
  71.     mov ah, 40h
  72.     mov bx, handler
  73.     xor cx, cx         ; cx = 0
  74.     mov cl, [msg_size] ; number of bytes to write
  75.     inc cl
  76.     lea dx, msg + 1
  77.     int 21h
  78.   
  79.     jc error_file ;check if error occured
  80.  
  81.     cmp ax, cx
  82.     jne error_file ;check if string is completely written to file
  83.     
  84.     ;close file
  85.     mov ah, 3Eh
  86.     mov bx, handler
  87.     int 21h
  88.  
  89.     jc error_file ;check if error occured
  90.     ret 
  91.  
  92. error_file:    
  93.     call print_error
  94.     ret
  95. handle_file endp
  96.  
  97. start:
  98.     mov ax, ax
  99.     mov bx, data
  100.     mov ds, bx
  101.     
  102.     ;read string from keybord
  103.     call read_from_keyboard
  104.     ;get msg size
  105.     lea si, msg + 1
  106.     mov al, [si]
  107.     mov msg_size, al
  108.  
  109.     ; first 2 bytes of msg is max length and length, 
  110.     ; we do not need this data anymore
  111.     ; change second byte to new line symbol and
  112.     ; don't use first byte
  113.  
  114.     ;write result to file
  115.     call handle_file
  116.     
  117.     mov ah, 4ch
  118.     int 21h
  119. code ends
  120. end start

Решение задачи: «Удаление конкретных символов из строки, запись результатов в файл»

textual
Листинг программы 
  1. LOCALS
  2.  
  3. .model small
  4.  
  5. .stack 100h
  6.  
  7. .data
  8.  
  9.         FileName        db      80, 0, 81 dup(?)
  10.         String          db      255, 0, 256 dup(?)
  11.         Handle          dw      ?
  12.  
  13.         msgGetFileName  db      'File name: ', '$'
  14.         msgGetString    db      'String: ', '$'
  15.         CrLf    db      0Dh, 0Ah, '$'
  16.         errFileOpen     db      'File open error', '$'
  17.  
  18. .code
  19.  
  20. main    proc
  21.         mov     ax,     @data
  22.         mov     ds,     ax
  23.  
  24.         ;ввод имени файла
  25.         mov     ah,     09h
  26.         lea     dx,     msgGetFileName
  27.         int     21h
  28.         mov     ah,     0Ah
  29.         lea     dx,     FileName
  30.         int     21h
  31.         mov     ah,     09h
  32.         lea     dx,     CrLf
  33.         int     21h
  34.  
  35.         ;добавление 0 в конец строки
  36.         lea     si,     FileName+2
  37.         mov     al,     FileName+1
  38.         mov     ah,     0
  39.         add     si,     ax
  40.         mov     [si],   byte ptr 0
  41.         ;ввод строки
  42.         mov     ah,     09h
  43.         lea     dx,     msgGetString
  44.         int     21h
  45.         mov     ah,     0Ah
  46.         lea     dx,     String
  47.         int     21h
  48.         mov     ah,     09h
  49.         lea     dx,     CrLf
  50.         int     21h
  51.  
  52.         ;открытие файла
  53.         mov     ah,     3Ch
  54.         mov     cx,     00h
  55.         lea     dx,     FileName+2
  56.         int     21h
  57.         jnc     @@FileOpenOk
  58.         mov     ah,     09h
  59.         lea     dx,     errFileOpen
  60.         jmp     @@Exit
  61. @@FileOpenOk:
  62.         mov     Handle, ax
  63.         ;вывод исходной строки в файл
  64.         mov     ah,     40h
  65.         lea     dx,     String+2
  66.         mov     cl,     String+1
  67.         mov     ch,     0
  68.         mov     bx,     Handle
  69.         int     21h
  70.         ;вывод перевода строки в файл
  71.         mov     ah,     40h
  72.         lea     dx,     CrLf
  73.         mov     cx,     2
  74.         mov     bx,     Handle
  75.         int     21h
  76.         ;преобразование строки
  77.         lea     si,     String+1
  78.         call    RemoveChar
  79.         ;вывод обработанной строки в файл
  80.         mov     ah,     40h
  81.         lea     dx,     String+2
  82.         mov     cl,     String+1
  83.         mov     ch,     0
  84.         mov     bx,     Handle
  85.         int     21h
  86.         ;вывод перевода строки в файл
  87.         mov     ah,     40h
  88.         lea     dx,     CrLf
  89.         mov     cx,     2
  90.         mov     bx,     Handle
  91.         int     21h
  92.         ;закрытие файла
  93.         mov     ah,     3Eh
  94.         mov     bx,     Handle
  95.         int     21h
  96.  
  97. @@Exit:
  98.         mov     ax,     4C00h
  99.         int     21h
  100. main    endp
  101.  
  102. RemoveChar      proc
  103.         push    ax
  104.         push    bx
  105.         push    cx
  106.         push    dx
  107.         push    si
  108.         push    di
  109.  
  110.         mov     cx,     0       ;текущая длина строки
  111.         mov     cl,     [si]
  112.         mov     bx,     si      ;адрес ячейки с длиной строки
  113.         mov     dx,     0       ;новая длина строки
  114.         inc     si
  115.         mov     di,     si
  116. @@For:
  117.         mov     al,     [si]
  118.         cmp     al,     ' '
  119.         je      @@Skip
  120.         mov     [di],   al
  121.         inc     di
  122.         inc     dx
  123. @@Skip:
  124.         inc     si
  125.         loop    @@For
  126.  
  127.         mov     [bx],   dl
  128.  
  129.         pop     di
  130.         pop     si
  131.         pop     dx
  132.         pop     cx
  133.         pop     bx
  134.         pop     ax
  135.         ret
  136. RemoveChar      endp
  137.  
  138. end     main

Объяснение кода листинга программы

  1. Создаются локальные переменные
  2. Определение модели и размера стека
  3. Определение переменных данных:
    • FileName - хранит имя файла
    • String - хранит введенную строку
    • Handle - хранит обработанный файл
    • msgGetFileName - сообщение для ввода имени файла
    • msgGetString - сообщение для ввода строки
    • CrLf - символ перевода строки
    • errFileOpen - сообщение об ошибке открытия файла
  4. Начало процедуры main
  5. Ввод имени файла и строки
  6. Добавление символа завершения строки в FileName
  7. Открытие файла
  8. Вывод исходной строки в файл
  9. Вывод перевода строки в файл
  10. Преобразование строки с использованием процедуры RemoveChar
  11. Вывод обработанной строки в файл
  12. Вывод перевода строки в файл
  13. Закрытие файла
  14. Процедура завершения программы
  15. Процедура RemoveChar для удаления определенных символов из строки
  16. Конец программы

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 4.333 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы