SpectrumProgress#3

[goodboy]

похоже на старое новьё ?

[Advertiser]

[Crash Nicker]

Надо б почитать, гы.

[baxter]

goodboy, положи сюда.

[goodboy]

кусок журнального кода выполняется некорректно. мне пока трудно понять кто виноват: некорректный FDIобраз или эмуляция ВГшки.
знатоки объясните что тут делается

	PUSH HL
	PUSH BC
	PUSH DE
	XOR  A
	LD   C,#3F
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret
	LD   A,#0A
	LD   C,#5F
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret
	LD   D,#01
	LD   IX,#3F33 ; ???
	CALL #DOS
	LD   A,#02
	LD   C,#3F
	LD   IX,#2A53 ; out (c(a)
	CALL #DOS     ; ret
	LD   A,B
	POP  DE
	POP  BC
	POP  HL
	
        AND  #1F
        CP   #08
        JP Z,NEXT
ERROR

DOS это выполнение программы в ПЗУtrdos по-адресу в IX.

[Blade]

объясните что тут делается

Чтение порта #1F ВГ93.

[Лас]

кусок журнального кода выполняется некорректно. мне пока трудно понять кто виноват: некорректный FDIобраз или эмуляция ВГшки.
знатоки объясните что тут делается

	PUSH HL
	PUSH BC
	PUSH DE
	XOR  A
	LD   C,#3F
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret
	LD   A,#0A
	LD   C,#5F
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret
	LD   D,#01
	LD   IX,#3F33 ; ???
	CALL #DOS
	LD   A,#02
	LD   C,#3F
	LD   IX,#2A53 ; out (c(a)
	CALL #DOS     ; ret
	LD   A,B
	POP  DE
	POP  BC
	POP  HL
	
        AND  #1F
        CP   #08
        JP Z,NEXT
ERROR

DOS это выполнение программы в ПЗУtrdos по-адресу в IX.

ТС, проверь, защищен ли диск (образ) от записи.

[Лас]

знатоки объясните что тут делается

	PUSH HL
	PUSH BC
	PUSH DE
	XOR  A                           ;нулевая
	LD   C,#3F                      ;дорожка
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret    
	LD   A,#0A                      ;десятый
	LD   C,#5F                      ;сектор
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret
	LD   D,#01
	LD   IX,#3F33 ; ???
	CALL #DOS                    ;чтение состояния ВГ
	LD   A,#02                     ;вторая
	LD   C,#3F                     ;дорожка
	LD   IX,#2A53 ; out (c(a)
	CALL #DOS     ; ret
	LD   A,B                         ;восстанавливаем состояние ВГ
	POP  DE                   
	POP  BC
	POP  HL
	
        AND  #1F                       ;сброс прочих битов состояния ВГ
        CP   #08                        ;была ошибка контрольной суммы?
        JP Z,NEXT                      ;если была она и только она, то все ОК
ERROR                                   ;иначе ERROR
;варианты прихода сюда:
;1. ошибок ВГ не было, а это не ожидается.
;2.  была ошибка, и это не ошибка КС

DOS это выполнение программы в ПЗУtrdos по-адресу в IX.

Я не знаток, но прокомментировал в коде.

Надо ставить точку останова на ERROR, и смотреть, что в аккумуляторе и запостить сюда. Еще интересно знать, какую команду выполняла ВГэйка.
Посмотреть в анриле. Запостить.
Как? На скриншоте выделено. Красный квадратик - код команды ВГ, желтый квадратик состояние ВГ.
P.S. Желательно отключить trap и no_delay в анриле.

[Faster]

кусок журнального кода выполняется некорректно. мне пока трудно понять кто виноват: некорректный FDIобраз или эмуляция ВГшки.
знатоки объясните что тут делается

	PUSH HL
	PUSH BC
	PUSH DE
	XOR  A
	LD   C,#3F
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret
	LD   A,#0A
	LD   C,#5F
	LD   IX,#2A53 ; out (c),a
	CALL #DOS     ; ret
	LD   D,#01
	LD   IX,#3F33 ; ???
	CALL #DOS
	LD   A,#02
	LD   C,#3F
	LD   IX,#2A53 ; out (c(a)
	CALL #DOS     ; ret
	LD   A,B
	POP  DE
	POP  BC
	POP  HL
	
        AND  #1F
        CP   #08
        JP Z,NEXT
ERROR

DOS это выполнение программы в ПЗУtrdos по-адресу в IX.

В этом листинге приведен классический алгоритм процедуры чтения регистра состояний #1f ("ZX-Spectrum & TR-DOS Для пользователей и программистов" А.Ларченко и Н.Родинов. Питер'93, с.211:

(c) Andrew MOA Larchenko
in_1f  out (#3f),0
       out (#5f),#a
       ld d,#01
       jp #3f33

На выходе, в регистре b будет находиться значение регистра состояний #1f, т.е. таким способом эмулируется команда in b,(#1f). Однако, при выполнении данной процедуры будут запорчены регистры дорожки #3f и сектора #5f, поэтому, при необходимости, следует восстановить в них исходные значения.

Расшифровка данных из регистра b, полученных после чтения регистра состояний #1f:

[John North]

goodboy, а на реале пробовал?
ну а вдруг?)

[goodboy]

goodboy, а на реале пробовал?
ну а вдруг?)

у меня сейчас один рабочий дисковод (mitsumi), я пол-дня колдовал с перемычками и в итоге заставив его работать на PC снял образ с помощью zxDiskStudio под XP. образ под эмулем я в итоге запустил (правя на ходу код). снимать дисковод на реал сейчас затруднительно.