.model tiny
.code
.startup
jmp continue
FName db 'c:\file1.txt',0
Num db 'dan$'
ErrNotFound db 'File not found$'
ErrRead db 'Read error$'
continue:
mov ax, 3d00h
mov dx, offset FName
int 21h
jc ErrorNotFound ;файл не найден
mov bx, ax
mov ah, 3fh
mov cx, 3
mov dx, offset Num
int 21h
jc ErrorRead ;ошибка чтения
mov ah, 3eh
int 21h
mov al, Num ;меняем местами 1 и 3 байты :)
xchg al, Num+2
mov Num, al
mov ah,9 ;dx указывает на число
int 21h
ret
ErrorRead:
mov dx, offset ErrRead
jmp PrintError
ErrorNotFound:
mov dx, offset ErrNotFound
PrintError:
mov ah, 9
int 21h
ret
end
Если Вы уже зарегистрированы на Портале - войдите в систему, если Вы еще не регистрировались - пройдите простую процедуру регистрации.