Assembler äëÿ íà÷èíàþùèõ
Áëîê óïðàâëåíèÿ ôàéëîì (FCB) - ÷àñòü 6
01E1 8D 16 0108 R LEA DX, FILE_ERROR_MSG ; Ñîîáùåíèå î íåïðàâèëüíîì
01E5 ERROR_EXIT: ; èìåíè ôàéëà
01E5 B4 09 MOV AH, 9H ; Âûâîä ñîîáùåíèÿ íà ýêðàí
01E7 CD 21 INT 21H ; è âûõîä èç ïðîãðàììû
01E9 CD 20 INT 20H
;----- Ñîçäàíèå íîâîãî ôàéëà
01EB NO_FILE:
01EB B4 16 MOV AH, 16H ; Ñîçäàíèå ôàéëà
01ED 8D 16 005C R LEA DX, FCB
01F1 CD 21 INT 21H
01F3 0A C0 OR AL, AL ; Ïðîâåðêà íà óñïåõ
01F5 74 06 JZ CREATE_OK
01F7 8D 16 011E R LEA DX, BAD_OPEN_MSG ; Ñîîáùåíèå îá îøèáêå ïðè
01FB EB E8 JMP ERROR_EXIT ; ñîçäàíèè ôàéëà
;----- Óñòàíîâêà ïàðàìåòðîâ FCB
01FD CREATE_OK:
01FD C6 06 007C R 00 MOV FCB_CURRENT_RECORD, 0 ; Èíèöèàëèçàöèÿ íîìåðà
0202 C7 06 007D R 0000 MOV WORD PTR FCB_RANDOM_RECORD, 0 ; çàïèñè
0208 C7 06 007F R 0000 MOV WORD PTR FCB_RANDOM_RECORD+2, 0
020E C7 06 006A R 0020 MOV WORD PTR FCB_RECORD_SIZE, RECORD_SIZE
Ôèã. 5.6 Ïðèìåð èñïîëüçîâàíèÿ ôóíêöèÿìé DOS (ïðîäîëæåíèå)
;----- Âûâîä â ôàéë
0214 B0 41 MOV AL, 'A' ; Â ýòîì öèêëå âûâîäÿòñÿ
0216 CHARACTER_LOOP: ; ñèìâîëû àëôàâèòà
