ДВК (и всё, что с ними связано)

[Korchagin]

Итого для однозадачки пусть будет этот вариант. Нажатие клавиши в принципе неважно - юзер забытое сделает при следующем включении машины.

.TITLE PARK2016.MAC
.MCALL .PRINT, .EXIT, .MTPS ;используемые вызовы библиотеки

STARTF: CMP @#174000, #401 ;сравнить содержимое регистра идентификации 174000 с кодом 401(восьмеричное)
BNE CNTRLRNOTFOUND ;контроллер не обнаружен, выходим

CHECK1: BIT #100000, 174020 ;проверка занятости
BEQ CHECK1 ;занят, ждем

BIS #8., 174020 ;начальная установка с выводом головок на нулевой трек
CHECK2: BIT #100000, 174020
BEQ CHECK2 ;занят, ждем
CHECK3: BIT #1, 174020
BNE CHECK3 ;ждем, пока операция не будет завершена

MOV LANDZONE, 174012 ;поместить в регистр адреса цилиндра 174012 номер цилиндра для парковки
MOV #7, 174006 ;сектор 7 (любой)
MOV #0, 174014 ;поверхность 0 (любая)
MOV #40, 174016 ;команда чтения сектора
.PRINT #SHUTDOWNMSG
.MTPS #340
BR .

CNTRLRNOTFOUND:
.PRINT #NOTFOUNDMSG
.EXIT

NOTFOUNDMSG: .ASCIZ /MFM CONTROLLER NOT FOUND/
SHUTDOWNMSG: .ASCIZ /TURN THE POWER OFF/
LANDZONE: .WORD 1230 ;664 цилиндр у моего HDD парковочный

.END STARTF