Запись структуры в файл

[Playa-RC]

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

Assembler, Tasm Dos16

Вот код программы:

.model small
.stack 100h

worker struc                   ;информация о сотруднике
nam db 15 dup (' ')         ;имя
lastnam db 15  dup (' ')   ; фамилия
age db 10 dup (' ')           ;возраст
worker ends

.data

bufout db 128 dup (' ')
buflen = $ - bufout
handle dw ?
fname db 'file.txt',0
point_fname dd fname

next db 10,13,'$'
Vvod3 db 'Input data >>>>>>>>> ','$'
mnam db 10,13,'Enter name: ', '$'
mlastnam db 10,13,'Enter Lastname: ','$'
mage db 10,13,'Enter Age: ','$'
mour db 10,13,10,13,'Our structur:',10,13,'$'

string db 128 dup (' ')

N=3
mas_sotr worker N dup (<>) 

.code

start:
mov ax,@data
mov ds,ax

jmp start_prog

enter_string proc ;принемает один параметр для loop - cx, и строку в si
buff1:
xor ax,ax
begin_v:
mov ah,0
int 16h 
cmp al,13
jz v1
cmp al,' '
jb begin_v
cmp al,'}'
ja begin_v
mov [si],al
int 29h
inc si
loop buff1
v1:
mov byte ptr [si],' '
add si,1
mov byte ptr [si],'$'
ret
endp

mov_to_struct proc ;принемает 4 пареметра: тип структуры в bx, размер 
xor si,si
push ds
pop es  
push di
mov di,dx
cld
lea si,string
rep movsb
pop di
ret
endp ; массива в di, размео принимаемой строки в dx, и cx для rep

start_prog:
lea dx,vvod3
mov ah,09h
int 21h
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ввод имени
mov bx, type worker
lea di,mas_sotr
mov bp,n

cycl1:
lea dx,mnam
mov ah,09h
int 21h

mov cx,15
lea si,[string]
call enter_string
lea dx,[di].nam
mov cx,15
call mov_to_struct

lea dx,mlastnam
mov ah,09h
int 21h
mov cx,15
lea si,[string]
call enter_string
lea dx,[di].lastnam
mov cx,15
call mov_to_struct

lea dx,mage
mov ah,09h
int 21h
mov cx,10
lea si,[string]
call enter_string
lea dx,[di].age
mov cx,10
call mov_to_struct

add di,bx

dec bp
cmp bp,0
ja cycl1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;вывод структуры
lea dx,mour
mov ah,09h
int 21h

mov bx, type worker
lea di,mas_sotr 
mov cx,n 
cycl2:
lea dx,[di].nam
mov ah,09h
int 21h

lea dx,[di].lastnam
mov ah,09h
int 21h

lea dx,[di].age
mov ah,09h
int 21h

lea dx,next
mov ah,09h
int 21h

add di,bx
loop cycl2
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;РАБОТА С ФАЙЛОМ
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;создание файла
mov ah,3ch;функция создания файла
mov cx,0;без атриьутов
mov dx,offset fname;адрес имени файла
int 21h
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;открытие файла
mov	al,02h	;режим доступа
lds	dx,point_fname	;формируем указатель на имя файла
mov	ah,3dh	;номер функции DOS
int	21h	;открываем файл
jc	exit	;переход, в случае ошибки
;действия при успешном открытии файла:
mov	handle,ax	;сохраним дескриптор файла
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;запись в файл
mov cx,buflen;число записуемых байт
mov bx,handle;дескриптор
mov ah,40h;функция записи
lea dx,bufout
int 21h
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;закроем файл
mov ah,3eh
mov bx,handle
int 21h
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;выход из программы
exit:
mov ax,4c00h
int 21h
end start

___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[Playa-RC]

Может хоть кто-нибудь ответит? Пожалуйста!

[Serge_Bliznykov]

ну, дык..

mov cx,buflen;число записуемых байт
mov bx,handle;дескриптор
mov ah,40h;функция записи
lea dx,bufout
int 21h

А кто-нибудь удосужился занести информацию в bufout ?!
поэтому то, что Вы в

bufout db 128 dup (' ')

задали, то и пишется в файл.


p.s. кстати, имхо, сразу после создания файла функцией 3Ch в него можно писать, можно его не переоткрывать...

[Playa-RC]

Сообщение от Serge_Bliznykov

ну, дык..

А кто-нибудь удосужился занести информацию в bufout ?!
поэтому то, что Вы в задали, то и пишется в файл.


p.s. кстати, имхо, сразу после создания файла функцией 3Ch в него можно писать, можно его не переоткрывать...

спс, это я понял! А как мне записать в файл всю структуру, все ее элементы, без знаков окончания строки '$' и всего лишнего. Вот это я понять не могу!