Форум программистов, компьютерный форум, киберфорум
Assembler для начинающих
Форум программистов и сисадминов Киберфорум > Форум программистов > Низкоуровневое программирование > Assembler, MASM, TASM > Assembler для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 24.01.2017
Сообщений: 1

Поиск и замена заданной последовательности символов в заданном файле

16.03.2017, 13:09. Показов 1099. Ответов 2
Метки нет (Все метки)
Студворк — интернет-сервис помощи студентам
Программа должна выполнять поиск заданной последовательности символов в заданном файле, менять ее на другую заданную последовательность (того же размера) и измененный текст вводить в другой файл. Моя программа работает только для небольших файлов, так как считывает буфером только один раз и ищет в нем. Необходимо чтобы программа работала и для больших файлов, то есть считывала текст в цикле. Ни как не получается добавить цикл, прошу помогите!

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225

code_seg segment
assume cs:code_seg, ds:code_seg
.386
org 100h
 
start:
 
FileNamePrint:
 
    mov ah,09h 
    mov dx,offset msg1
    int 21h
    
    mov AH, 0Ah
    mov DX, offset FileName
    int 21h
 
    xor BH, BH
    mov BL, FileName[1]
    mov FileName[BX+2], 0
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
OpenFile: 
 
    mov ax, 3D02h 
    mov dx, offset filename + 2
    int 21h 
    jc OpenError 
 
    mov handle, ax 
 
    mov ah,09h 
    mov dx,offset msg4
    int 21h
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
InputOne: ;Ввод первой строки
 
    mov ah,09h 
    mov dx, offset msg2
    int 21h 
    
    mov ah,0ah 
    mov dx, offset string
    int 21h 
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
InputTwo:   ; строка на которую заменять
 
    mov ah,09h 
    mov dx, offset msg3
    int 21h 
    
    mov ah,0ah 
    mov dx, offset newstr
    int 21h 
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
 
ReadFromFile:
 
    mov    ah,3fh
    lea    dx,buffer    
    mov    bx,handle     
    mov    cx,60000       
    int    21h
    jc     Error_Read
 
    lea    di,buffer
    
Inspection:        ;сравнение строк
    mov    cx,60000
    mov    al,string + 2
    repne  scasb          ;Сравнить байт по адресу ES:(E)DI с AL(пока !=)
    je     Found          ;Условие перехода:ZF=1
    jmp    Failed
 
Found:      ;замена подстроки если нашлось
    push   ax
    mov    al, string + 1
    dec    di
    lea    si,string + 2
    mov    cx, ax
    repe   cmpsb
    pushf                  ; значения флагов в стек
    dec    di
    popf
    jne    Inspection
 
    mov    cx, ax
    sub    di,cx
    inc    di
    lea    si,newstr + 2
    rep    movsb            ;Переслать байт из строки в строку
    pop    ax
 
 
FileName2Print:
 
    mov ah,09h 
    mov dx,offset msg7
    int 21h
    
    mov AH, 0Ah
    mov DX, offset FileName2
    int 21h
 
    xor BH, BH
    mov BL, FileName2[1]
    mov FileName2[BX+2], 0
    
    lea dx, ent               ;Перенос каретки
    mov ah, 9
    int 21h
 
OpenFile2: 
 
    
    mov ax, 3D02h 
    mov dx, offset filename2 + 2
    int 21h 
    jc OpenError
 
    mov handle2, ax 
 
    mov ah,09h 
    mov dx,offset msg4
    int 21h
    
    lea dx, ent                ;Перенос каретки
    mov ah, 9
    int 21h
 
File2Pointer:
    ; DOS Fn 42H: установить указатель файла -- LSEEK.
    ; output: AX = код ошибки если CF установлен.
    ; DX:AX = новая позиция указателя файла.
    mov    cx,0           
    mov    dx,0         ; CX:DX = на сколько передвинуть указатель: (CX * 65536) + DX 
    mov    bx,handle2    ; BX = описатель файла.
    mov    ax,4200h     ; AL = 0 переместить к началу файла + CX:DX.
    int    21h
    
WriteToFile2:
    
    mov    ah,40h
    lea    dx,buffer    
    mov    bx,handle2    
    mov    cx, 60000      
    int    21h
    jmp    CloseFile2
 
;------------------Errors--------------------;
OpenError:
    mov    ah,09h
    lea    dx,error_msg1
    int    21h
    jmp    Exit
 
Failed:
    mov    ah,09h
    lea    dx,msg5
    int    21h
    jmp    CloseFile
  
Error_Read:
    mov    ah,09h
    lea    dx,error_msg2
    int    21h
    jmp    CloseFile
 
CloseFile:
    mov    ah,3Eh
    mov    bx,handle    
    int    21h
    
CloseFile2:
    mov    ah,3Eh
    mov    bx,handle2    
    int    21h
    
Exit:
    mov    ah, 1
    int    21h
    mov    ax,4c00h
    int    21h
    
;------------------Data---------------------;
    
FileName    DB  14,0,14 dup  (0)
FileName2   DB  14,0,14 dup  (0)
msg1        db  'Enter FileName   $'
msg2        db  'Enter word you want to replace: $' 
msg3        db  'Enter second word: $'
msg4        db  'File was open.$' 
msg5        db  'Not found$'
msg7        db  'Enter FileName to write $'
;msg        db  'Word found$'
 
error_msg1  db  'File wasnt open.$'
error_msg2  db  'Cant read from file.$'
 
buffer      db  60010 dup (?)
string      db  200 dup ('$')
newstr      db  200 dup ('$')
strlen      db  ?
handle      dw  0
handle2     dw  0
ent         db  10, 13, '$'
 
ret
code_seg ends
end start

Вот так пытался сделать цикл: ======================================== ===========

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272

code_seg segment
assume cs:code_seg, ds:code_seg
.386
org 100h
 
start:
 
FileNamePrint:
 
    mov ah,09h 
    mov dx,offset msg1
    int 21h
    
    mov AH, 0Ah
    mov DX, offset FileName
    int 21h
 
    xor BH, BH
    mov BL, FileName[1]
    mov FileName[BX+2], 0
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
OpenFile: 
 
    mov ax, 3D02h 
    mov dx, offset filename + 2
    int 21h 
    jc OpenError 
 
    mov handle, ax 
 
    mov ah,09h 
    mov dx,offset msg4
    int 21h
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
InputOne:
 
    mov ah,09h 
    mov dx, offset msg2
    int 21h 
    
    mov ah,0ah 
    mov dx, offset string
    int 21h 
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
InputTwo:
 
    mov ah,09h 
    mov dx, offset msg3
    int 21h 
    
    mov ah,0ah 
    mov dx, offset newstr
    int 21h 
    
    lea dx, ent         ;Перенос каретки
    mov ah, 9
    int 21h
    
    FileName2Print:
 
    mov ah,09h 
    mov dx,offset msg7
    int 21h
    
    mov AH, 0Ah
    mov DX, offset FileName2
    int 21h
 
    xor BH, BH
    mov BL, FileName2[1]
    mov FileName2[BX+2], 0
    
    lea dx, ent               ;Перенос каретки
    mov ah, 9
    int 21h
 
OpenFile2: 
 
    
    mov ax, 3D02h 
    mov dx, offset filename2 + 2
    int 21h 
    jc OpenError
 
    mov handle2, ax 
 
    mov ah,09h 
    mov dx,offset msg4
    int 21h
    
    lea dx, ent                ;Перенос каретки
    mov ah, 9
    int 21h
    
    File2Pointer:
 
    mov    cx,0           
    mov    dx,0         ; CX:DX = на сколько передвинуть указатель: (CX * 65536) + DX 
    mov    bx,handle2    ; BX = описатель файла.
    mov    ax,4200h     ; AL = 0 переместить к началу файла + CX:DX.
    int    21h
    
FilePointer:
   
    mov    cx,0           
    mov    dx,0         ; CX:DX = на сколько передвинуть указатель: (CX * 65536) + DX 
    mov    bx,handle    ; BX = описатель файла.
    mov    ax,4200h     ; AL = 0 переместить к началу файла + CX:DX.
    int    21h
metka:
    
    mov ah,09h 
    mov dx,offset msg10
    int 21h
    
ReadFromFile:
 
    mov    ah,3fh
    lea    dx,buffer    
    mov    bx,handle     
    mov    cx,10    
    int    21h
    
     jc     Error_Read
    
    push ax
   
 
    lea    di,buffer
    
    
 
Inspection:
    mov    cx,10
    mov    al,string + 2
    repne  scasb          ;Сравнить байт по адресу ES:(E)DI с AL(пока !=)
    je     Found          ;Условие перехода:ZF=1
    
    jmp    WriteToFile2
 
Found:
 
    mov ah,09h 
    mov dx,offset msg11
    int 21h
    
    
    mov    al, string + 1
    dec    di
    lea    si,string + 2
    mov    cx, ax
    repe   cmpsb
    pushf                  ; значения флагов в стек
    dec    di
    popf
    jne    Inspection
 
    mov    cx, ax
    sub    di,cx
    inc    di
    lea    si,newstr + 2
    rep    movsb            ;Переслать байт из строки в строку
 
 
 
 
    
WriteToFile2:
    
    mov    ah,40h
    lea    dx,buffer    
    mov    bx,handle2    
    mov    cx, 10    
    int    21h
    
    mov ah,09h 
    mov dx,offset msg13
    int 21h
    
 
    
Looper: 
    ;mov cx, 1
    pop ax
    cmp ax, 0
    jne metka
    ;loop metka
    
    mov ah,09h 
    mov dx,offset msg12
    int 21h
    
    jmp    CloseFile2
 
;------------------Errors--------------------;
OpenError:
    mov    ah,09h
    lea    dx,error_msg1
    int    21h
    jmp    Exit
 
Failed:
    mov    ah,09h
    lea    dx,msg5
    int    21h
    jmp    CloseFile
  
Error_Read:
    mov    ah,09h
    lea    dx,error_msg2
    int    21h
    jmp    CloseFile
 
CloseFile:
    mov    ah,3Eh
    mov    bx,handle    
    int    21h
    jmp   Exit
    
CloseFile2:
    mov    ah,3Eh
    mov    bx,handle2    
    int    21h
    jmp    CloseFile
    
Exit:
    mov    ah, 1
    int    21h
    mov    ax,4c00h
    int    21h
    
;------------------Data---------------------;
    
FileName    DB  14,0,14 dup  (0)
FileName2   DB  14,0,14 dup  (0)
msg1        db  'Enter FileName   $'
msg2        db  'Enter word you want to replace: $' 
msg3        db  'Enter second word: $'
msg4        db  'File was open.$' 
msg5        db  'Not found$'
msg7        db  'Enter FileName to write $'
;msg        db  'Word found$'
msg10       db ' cycle $'
msg11      db '  found $'
msg12      db '  vyhod $'
msg13      db '  write $'
error_msg1  db  'File wasnt open.$'
error_msg2  db  'Cant read from file.$'
 
buffer      db  11 dup (?)
string      db  200 dup ('$')
newstr      db  200 dup ('$')
strlen      db  ?
handle      dw  0
handle2     dw  0
ent         db  10, 13, '$'
 
ret
code_seg ends
end start
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
 16.03.2017, 13:09
Ответы с готовыми решениями:

Поиск в файле заданной последовательности символов
Друзья, помогите плиз!!! Нужно написать программу поиска в файле заданной последовательности символов не превышающей по длине 10 знаков....

Поиск заданной последовательности символов в бинарном файле
Допустим в файле написано "raz dva tri dva raz raz dva". Нужно произвести поиск и подсчёт введёной пользователем последовательности...

В последовательности символов заданной в текстовом файле, посчитать общее кол-во символов
В последовательности символов, заданной в текстовом файле, посчитать общее кол-во символов + - *

2
Эксперт Hardware
Эксперт Hardware
 Аватар для R71MT
6209 / 2443 / 403
Регистрация: 29.07.2014
Сообщений: 3,174
Записей в блоге: 4
17.03.2017, 07:22
60Кб потолок у тебя.
Выделяй память под буфер
0
Asm/C++/Delphi/Py/PHP/VBA
 Аватар для Jin X
6812 / 2052 / 238
Регистрация: 14.12.2014
Сообщений: 4,304
Записей в блоге: 12
17.03.2017, 19:24
Сделай функцию типа getchar, которая будет читать и возвращать следующий символ. Если символов больше нет, устанавливается какой-нибудь флаг, например, CF.
Assembler
1
2
3
4
5
6
7
8
9
10
11

call getchar
jc EndOfFile
. . .
getchar proc
  . . .
  clc  ; сбросить флаг CF
  ret
  . . .
  stc  ; установить флаг CF
  ret
getchar endp
А чтобы работа шла быстрее, читай из буфера по 16 Кб, например (потому что читать из файла по 1 байту будет очень медленно).
Объявляются 2 переменные:
curpos - текущая позиция в буфере (изначально = 2)
readcount - кол-во прочитанных байт (изначально = 1)
getchar проверяет:
• если curpos > readcount, читаем следующий блок 16 кб и записываем в readcount кол-во прочитанных байт, а в curpos = 0
• если readcount = 0 (проверить после прочтения), значит конец файла (stc/ret)
• иначе читаем байт из позиции curpos буфера (памяти) и увеличиваем curpos на 1 (clc/ret)

Добавлено через 3 минуты
Собственно, на первом этапе можно сделать дополнительную проверку: читать следующий блок только если readcount = 16 кб, иначе обнулять readcount (т.к. если при попытке чтения было прочитано < 16 кб, значит конец файла достигнут). Но тогда начальные значения должны быть такими: curpos = 16кб+1, readcount=16кб
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
 17.03.2017, 19:24
Помогаю со студенческими работами здесь

В последовательности символов, заданной в текстовом файле, посчитать общее кол-во символов
В последовательности символов, заданной в текстовом файле, посчитать общее кол-во символов + - *

Поиск и замена символов в файле
Добрый вечер(день)! Пытаюсь разобраться с задачей, есть файл в нем нужно найти слово и заменить на другое,замена может быть разной длины и...

Поиск и замена последовательности байт в файле
Ребят, умеет ли кто-то из вас работать с бинарниками? Нужно найти определенную последовательность байт, вот она: и заменить...

Поиск, считывание и замена символов в файле [C++]
И снова здраствуйте! Нужно, чтобы программа находила в файле число от 0 до 5120, а после считывала оттуда данные после точки, присваивала...

Поиск и замена указаной последовательности байтов в файле
Здравствуйте уважаемые коллеги программисты! Сам я в основном пишу программы на ООП языках программирования и с ассемблером столкнулся...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Условия использования - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru