ВУЗ:
Составители:
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
- …
- следующая ›
- последняя »