Системное программное обеспечение. Рощин А.В. - 128 стр.

UptoLike

Составители: 

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                  ; Пробел