Небольшие примеры Создание файла

; Определения

CR EQU 0Dh ;Возврат каретки

LF EQU 0Ah ;Перевод строки

TEXT SEGMENT 'CODE'

ASSUME CS:TEXT,DS:DATA

MYPROG PROC

MOV AX,DATA

MOV DS,AX

; Создадим файл

MOV AH,3Ch ;Функция создания файла

MOV CX,0 ;Без атрибутов

MOV DX,OFFSET FNAME ;Адрес имени файла

INT 21h

MOV HANDLE,AX ;Сохраним дескриптор файла

; Запишем строку в файл

MOV AH,40h ;Функция записи

MOV BX,HANDLE ;Дескриптор

MOV CX,STRINGLN ;Длина сторки

MOV DX,OFFSET STRING ;Адрес строки

INT 21h

; Закроем файл (нет необходимости, если файл не надо читать повторно)

MOV AH,3Eh ;Функция закрытия

MOV BX,HANDLE ;Дискриптор

INT 21h

; Завершим программу

OUTPROG: MOV AX,4C00h ;Функция завершения, код

INT 21h

MYPROG ENDP

TEXT ENDS

; Поля данных

DATA SEGMENT

STRING db 'Текст',cr,lf ;Строка для записи в файл

STRINGLN equ $-string ;Ее длина

HANDLE dw ? ;Ячейка для дескриптора

FNAME db 'MYFILE.001',0 ;Имя файла в формате ASCIIZ

DATA ENDS

STACK SEGMENT PARA STACK 'STACK'

db 128 dup (?)

ATACK ENDS

END MYPROG

Домашнее задание

1. Составить краткий конспект лабораторной работы и подготовить тексты необходимых программ.

Порядок выполнения работы

Написать и отладить следующие программы:

1. Создания файла с именем XXXXXXXX.LAB, где XXXXXXXX - Ваша фамилия.

2. Записи в файл строки: - фамилия, имя, номер группа.

3. Чтения файла и вывода содержимого на экран.

4. Изменения атрибутов файла - сделать его скрытым.

5. Записи в режиме прямой адресации в файл на место элемента 5 цифры 8.

6. Чтения из файла элементов с номерами 3 - 10 и вывода их на экран.

Литература

1. Джордейн Р. Справочник программиста персональных компьютеров типа IBM PC, XT и AT; Пер. с англ. - М.; Финансы и статистика, 1992. Шифр: 681.32(033) Д-426.

2. Фигурнов К.Г. Самоучитель по системным функциям MS-DOS. М., МП “МАЛИП”, 1993

3. Скэнлон Л. Персональные ЭВМ IBM PC и XT. Программирование на языке ассемблера: Пер. с англ. - М.; Радио и связь, 1991. - 366 с.

4. А.Шнайдер. Язык ассемблера для персонального компьютера фирмы IBM: Пер.с англ. -М.: Мир, 1988. - 406 с.