Однобуквенные слова

13.12.2011, 22:58. **Показов** 1105. **Ответов** 0

Author24 — интернет-сервис помощи студентам

Приветствую всех форумчан,уже 2 неделю сижу как не зарегистрировавший пользователь, вот решил все таки задать вопрос по программе

Задание: дан символьный файл(имя вводится с клавиатуры). Группы
символов, разделенные пробелами(одним или несколькими) называются
словами. Удалить из файла все однобуквенные слова и лишние пробелы.
Результат записать в новый файл.

Данная программа разбиралась на этом форуме в разделе Pascal,но как не странно мне нужно её сделать на assembler*е
Алгоритм вроде как бы я понял:
Находим файл--> Открываем---> Считываем его, выполняя алгоритм проверки(находим пробел в строке, считываем дальше, снова пробел то удаляем, если нет пробела, то считаем сколько символов после него, +1 тогда дальше проверяем до пробела, если =1, то удаляем, заносим в буфер все это и из него в новый файл записываем)
Как обычно логически все понятно, а когда берешься делать появляется ступор.
На данный момент я даже не написал проверку на 2 пробела и один символ и наврятле сам напишу(( проблема с открытием файла.
На данный момент что имею:

Assembler

d_seg segment
buf db 160 dup(?)   ;byfer dl9 4teni9 faila
max db 8        ;maks.4islo vvodimix simvolov
namepar label byte  ;spisok parametrov
 
msg1 db "Vvedite im9 faila",10,13,"$"
 
lnt  db 20 dup(?)       ;vvedenii simvoli
 
fname db ?
    
real db ?           ;realbna9 dlina
    
chten db 127 dup(?)
 
Path db 10 dup(0)       ;pyt k faily
 
d_seg  ends
c_seg segment
assume cs: c_seg, ds: d_seg
start:  
    mov ax, d_seg
    mov ds, ax 
soobsh:
    mov ah,09h
    mov dx,offset msg1
    int 21h
vvod:
    mov ah, 0Ah
        lea dx, namepar
        int 21h  
    xor bx, bx 
        mov bl, real
        mov lnt[bx], 0
poisk:  
    lea dx,Path
    mov ax, 3d02h
    int 21h
    
    
otkritie: 
     mov ah, 3dh
         mov al, 2
     lea dx,lnt
         int 21h
     mov fname,  al
         mov bl, fname
chtenie: 
     mov    ah, 3fh
         mov    dx, offset chten
         mov    cx, 10
         int    21h
   
     mov     ah,1   
     int     21h
     mov     ax, 4c00h
     int     21h
 
3akritie: 
    mov ah,3eh
    int 21h
    
vihod:
    mov ah, 4ch
        int  21h
c_seg  ends
end  start

Содержимое файла не выводится на экран, и нету алгоритма проверки на 2 пробела и на то что одна буква или нет
Буду благодарен любой помощи, расскажите пожалуйста что по чем.
Заранее спасибо

	13.12.2011, 22:58