.MODEL SMALL
.386
.STACK 200h
.DATA
block db 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15
.CODE
ENTRY_POINT:
mov ax, @DATA
mov ds, ax
mov DX, 0302h ;регистр управления
mov AL, 00001001h ;разрешаем устройство и включаем автоинкримент при записи
out DX, AL
call WAIT ;ожидаем готовность устройства
mov DX, 0301h ;регистр адреса
mov AL, 10h ;будем писать с адреса 10h
out DX, AL
call WAIT ;ожидаем готовность устройства
lea si, block ;адрес передаваемого блока
mov cx, 10h ;количество
mov DX, 0300h ;регистр данных
copy_loop:
lodsb ;читаем очередной
out DX, AL
call WAIT ;ожидаем готовность
loop copy_loop ;по всем
mov AX, 4C00h
int 21h
;Wait while device busy - bit F
WAIT: mov DX, 303h ;регистр состояния
WAIT_LOOP: in AL, DX
test AL, 01h ;ждем 1
jz WAIT_LOOP
ret
END ENTRY_POINT
Если Вы уже зарегистрированы на Портале - войдите в систему, если Вы еще не регистрировались - пройдите простую процедуру регистрации.