Начал учить ASM, но никак не могу врубиться как осуществлять запись в файл. Мож кто поможет в решении тривиальной задачи:

-открыть файл (допустим этот файл лежит здесь - C:\foldder\file.txt)
-очистить его содержимое
-записать три слова, каждое из которых будет начинаться с новой строки(н-р: 1\n 2\n 3\n; \n - здесь символ перевода строки).
-ну и закрыть файл

Сом бари хелп ми !

Особенно хотелось бы услышать совет могучего Чингачгука

Цитата

text segment byte   assume cs:text,ds:text   org 100h begin:   mov  ax,3d02h   mov  dx,offset MyFile   int  21h   jnc  @@FileOpen   push offset FileNotOpenMsg   call Message   jmp  @@Exit @@FileOpen: ; Save descriptor in bx   mov  bx,ax ; Clear file ; 1. Set pointer at begin of file   mov  ax,4200h   xor  cx,cx   xor  dx,dx   int  21h ; 2. Write 0 bytes   mov  ah,40h   xor  cx,cx   int  21h ; Write 3 string to file   push offset MyData1   call StrLen   mov  dx,offset MyData1   call WriteToFile   push offset MyData2   call StrLen   mov  dx,offset MyData2   call WriteToFile   push offset MyData3   call StrLen   mov  dx,offset MyData3   call WriteToFile ; Close file   mov  ah,3Eh   int  21h @@Exit:   retn Message proc near ; Pascal - type procedure   push bp   mov  bp,sp   mov  dx,[bp+4]   mov  ah,09h   int  21h   pop  bp   retn 2 Message endp StrLen proc near ; Pascal - type procedure: get size of C-string in cx   push bp   mov  bp,sp   mov  si,[bp+4]   cld   xor  cx,cx @@StrLen:   lodsb   inc  cx   test al,al   jnz  @@StrLen   dec  cx   pop  bp   retn 2 StrLen endp WriteToFile proc near ; dx=offset of data, cx=data lenght   mov  ah,40h   int  21h   retn WriteToFile endp MyFile  db 'C:\BORLAND\BP.550\COM_NEW\test.txt',0 MyData1 db '-1-',13,10,0 MyData2 db '==2==',13,10,0 MyData3 db '<<<3>>>',13,10,0 FileNotOpenMsg db 'File not open !',13,10,'$' text ends   end begin

; Открыть файл на запись.
; Получить указатель на файл
push 0
push 00000080h ; FILE_ATTRIBUTE_NORMAL
push 2 ; CREATE_ALWAYS
push 0 ; security attributes
push 0 ; share mode
push 40000000h ; GENERIC_WRITE
push source_filename_ptr ; offset на текст.путь,имя файла/нуль
call CreateFile
mov source_file_handle, eax
; Запись в файл.
push 0
push offset bytes_written; offset на 32b число
push 32 ; кол-во байт.
push offset key ; offset на начало записываемых данных
push eax ;source_file_handle
call WriteFile


Это с использованием Win API.
sergey_0777

О! Спасибо господа ! Буду разбираться..

А как добраться до переменных окружения ОС не подскажите? Ну например вывести тип операционной системы, или системную директорию и.т.д

The GetSystemInfo function returns information about the current system.
VOID GetSystemInfo(
LPSYSTEM_INFO lpSystemInfo // address of system information structure
);
------
если под вындос делать