data            segment
file             db    'c:\masm\l.txt' , 0       ;文件名
buf             db   256 dup(0)        ;文件內容暫存區
error_message    db   0ah , 'error !' , '$'    ;出錯時的提示
handle           dw  ?                ;保存文件號
data             ends
code            segment
                assume  cs:code  , ds:data
start:
              mov ax , data
              mov ds , ax
              mov dx , offset file
              mov al , 0
              mov ah , 3dh
              int 21h                  ;打開文件
              jc error                  ;若打開出錯，轉error
              mov handle , ax           ;保存文件號
              mov bx , ax
              mov cx , 255
              mov dx , offset buf
              mov ah , 3fh
              int 21h                  ;從文件中讀255字節→buf
              jc error                  ;若讀出錯，轉error
              mov bx , ax              ;實際讀到的字符數送入bx
              mov buf[bx] , '$'          ;在文件結束處放置一“$”符
              mov dx , offset buf
              mov ah , 9
              int 21h                            ;顯示文件內容
              mov bx , handle
              mov ah , 3eh
              int 21h                            ;關閉文件
              jnc end1             ;若關閉過程無錯，轉到end1處返回dos
error:
              mov dx , offset error_message
              mov ah , 9
              int 21h                            ;顯示錯誤提示
end1:
             mov ah , 4ch
             int 21h
code   ends
             end  start