- Автор темы
- #1
Подскажите, что не так, не хочет записывать в файл
Код:
assume cs:code, ds:data
data segment
;welcome db 'Input some message:',0dh,0ah,'$'
string db 80 dup (" ")
len_string = $ - string
point_fname dd string
filename db 'g:\file.txt',0
Buffer db 128 DUP (?)
to_write db '12345'
data ends
code segment
beg:
mov ax, data
mov ds, ax
MOV AH,09h
MOV DX, offset welcome
INT 21h
mov bx, 0
mov cx, len_string
lds dx, point_fname
mov ah, 3fh
int 21h
mov bx,1
mov cx, len_string
lds dx, point_fname
mov ah, 40h
int 21h
mov dx, offset filename
mov ax,3d02h
int 21h
mov dx, offset to_write
mov cx, 5
mov ah, 40h
int 21h
mov ah, 3eh
int 21h
mov ax, 4c00h
int 21h
code ends
end beg