ВУЗ:
Составители:
128
mov cx,0 ; Без атрибутов
lea dx,filename ; Адрес спецификации файла
int 21h
jc noform
mov handle,ax ; Сохранение дескриптора файла
jmp write
sdwig: mov ax,3d01h ; Открытие файла с записью
lea dx,filename
int 21h
jc noform
mov handle,ax
mov ax,4200h ; Установка указателя файла
mov bx,handle
mov cx,0
mov dx,num
add word ptr num,2050
int 21h
; Запись файла
write: mov ah,40h ; Функция записи в файл
mov bx,handle ; Дескриптор файла
mov cx,2050 ; Длина записываемого массива
lea dx,buf ; Адрес записываемого массива
int 21h
jc noform
;Закрытие файла
mov ah,3eh ; Функция закрытия файла
mov bx,handle ; Дескриптор файла
int 21h
jmp prend
noform: mov ah,9
mov dx,offset mes
int 21h
prend: mov outflag,0
mov iniflag,0
ret
writef endp
resprog endp
ressize equ $-resprog ; Размер в байтах резидентной части
init proc near
; Проверка ключа /u
mov bx,80h
mov cx,[bx] ; Кол. символов в командной строке
inc bx ; Начало командной строки
cmd: mov al,[bx]
cmp al,20h
jz cmd1 ; Пробел
128
mov cx,0 ; Без атрибутов
lea dx,filename ; Адрес спецификации файла
int 21h
jc noform
mov handle,ax ; Сохранение дескриптора файла
jmp write
sdwig: mov ax,3d01h ; Открытие файла с записью
lea dx,filename
int 21h
jc noform
mov handle,ax
mov ax,4200h ; Установка указателя файла
mov bx,handle
mov cx,0
mov dx,num
add word ptr num,2050
int 21h
; Запись файла
write: mov ah,40h ; Функция записи в файл
mov bx,handle ; Дескриптор файла
mov cx,2050 ; Длина записываемого массива
lea dx,buf ; Адрес записываемого массива
int 21h
jc noform
;Закрытие файла
mov ah,3eh ; Функция закрытия файла
mov bx,handle ; Дескриптор файла
int 21h
jmp prend
noform: mov ah,9
mov dx,offset mes
int 21h
prend: mov outflag,0
mov iniflag,0
ret
writef endp
resprog endp
ressize equ $-resprog ; Размер в байтах резидентной части
init proc near
; Проверка ключа /u
mov bx,80h
mov cx,[bx] ; Кол. символов в командной строке
inc bx ; Начало командной строки
cmd: mov al,[bx]
cmp al,20h
jz cmd1 ; Пробел
Страницы
- « первая
- ‹ предыдущая
- …
- 126
- 127
- 128
- 129
- 130
- …
- следующая ›
- последняя »
