文件.txt

来自「汇编语言」· 文本 代码 · 共 34 行

DATA           SEGMENT   
  BUFFER       DB     'ABCDEF'   
  FILENAME   DB     'A.TXT'   
  EMSG           DB     'ERROR!','$'   
  DATA           ENDS   
  STACK1       SEGMENT   PARA   STACK   
  DW               20H   DUP(0)   
  STACK1       ENDS   
  CODE           SEGMENT   
  ASSUME       DS:DATA,SS:STACK1,CS:CODE   
  START:   
  MOV     AX,DATA   
  MOV     DS,AX   
  MOV     AH,3CH                       ;3CH号功能，创建文件，也可以用5BH号功能   
  MOV     CX,0                           ;文件属性   
  LEA     DX,FILENAME   
  INT     21H   
  JZ       ERROR                         ;若CF=1则出错处理   
  MOV     BX,AX                         ;AX中为文件句病   
  MOV     CX,6                           ;要写的字节数   
  LEA     DX,BUFFER   
  MOV     AH,40H                       ;40H好功能调用，写文件   
  INT     21H   
  JMP     END0   
  ERROR:   
  MOV     AH,9   
  LEA     DX,EMSG   
  INT     21H   
  END0:   
  MOV     AH,4CH   
  INT     21H   
  CODE             ENDS   
                      END       START