!ВНИМАНИЕ! Исходник взят с сайта www.void.ru. В файле picture.dat, было написано слово ПИВО.

jmp beg

errmsg db 'Error: no such file - picture.dat.$'

fname db 'picture.dat'

handle dw ?

picbuf db 704 dup (?)

vers db '25th frame,version 2.1 void 1995'

olds db ?

v_page db ?

h_sec equ 3

; -мы создаём хэндл файла picture.dat

; -и затем, поочерёдно считывая оттуда

; -байты, копируем их в 3-ю страницу ; -видеопамяти, которая демонстрируется

; -жертве 25 кадром.

beg:

mov ah,3dh

mov al,00

lea dx,fname ; создать хендл

int 21h

jc esrr

mov handle,ax

mov ah,3fh

mov bx,handle

mov cx,704

lea dx,picbuf

; скопировать файл (704 байта)

; в буфер picbuf

int 21h

jc esrr ; - в случае ошибки открытия

; перейти на метку esrr

mov ah,0fh

int 10h mov si,10

mov v_page,bh

mov ah,05

mov al,03 ;

int 10h

mov ah,09

mov bh,03

mov bl,01101110b

mov al,' '

mov cx,2000

int 10h

mov ah,09

lea dx,picbuf

; скопировать картинку из

; picbuf в 3-ю страницу

int 21h

mov ah,05

mov al,v_page

int 10h