"Народный" AY (YM) звук для УКНЦ (параллельный порт)

[S_V_B]

Начну тему чтобы не потерялась, буду выкладывать по мере продвижения:
схема от Ув. Titus

инфа BB55
https://yadi.sk/i/NXKje_dOEVPU7w
инфа от RDC:

Скрытый текст

[свернуть]

распиновка параллельного порта:
https://yadi.sk/i/kKKXiWjXNKADZQ

- - - Добавлено - - -
Схема ЦАП на порт А:

Скрытый текст

[свернуть]

- - - Добавлено - - -

Видео "девайс в работе":
https://yadi.sk/i/fiMU2h9dZNBMwA

[Advertiser]

[Titus]

Вопрос к Ув. Titus, помнится вы говорили об оптимизаации записи.. (я не спешу, просто идет процесс накопления информации и укладывания в ячейки моей памяти )
А на БК как сделано, что первое обращение (177714) селект - регистр второе -данные, там какой-то аппаратный ксор воткнули? (Схему не смотрел, не просите, все равно не пойму).
Если нужно четыре операции.. вынесем в отдельную процедуру.

Я не знаю, как на БК, схему там не видел. Но у нас нет никаких аппаратных средств для сокращения числа записей в порт для засылки данных в каждый регистр. Ну может быть одну команду можно сократить.
Не надо выносить в отдельную процедуру, лучше ее сделать развернутой, чтобы не было лишних тормозов.

[S_V_B]

Поигрался со светодиодами:
1. Порт работает.
2. Запись словами.

Осталось допаять и вывод PSG доделать.

[S_V_B]

Процедура проигрывания PSG:

MUZA::
	MOV	R0,-(SP)
 	MOV	PC,R0		;Вычислить адрес программы обработки
	ADD	#Sndm-.,R0	;прерываний от программируемого таймера
	MOV	R0,@#100	;Загрузить этот адрес в вектор прерывания
	MOV	PC,R0		;Вычислить адрес программы обработки
	ADD	#MUZON-.,R0	;музыкой
	MOV	R0,BEGIN	;Загрузить этот адрес в ячейку BEGIN
	MOV	R0,ADRESS	;Загрузить этот адрес в ячейку ADRESS
	MOV	(SP)+,R0		
	RTS	PC
BEGIN:	.WORD	0		;Ячейка хранения начального адреса массива
ADRESS:	.WORD	0		;Ячейка хранения текущего адреса

Sndm: 
	BIS	#400,@#177054
        	MTPS	#0 ; Разрешить все прерывания
	MOV	R0,-(SP)
	MOV	R1,-(SP)
	MOV	R2,-(SP)
	MOV	R3,-(SP)
	MOV	ADRESS, R1
	MOV	#177101, R2
	MOV	#177102, R3
1$: 
	CLR	R0
	BISB	(R1)+,R0
	CMPB	R0 , #375 ;375
	BNE	2$
	MOV	BEGIN,R1	
	BR	4$
2$:
 	CMPB	R0, #377
	BEQ	4$	
3$:
	MOV	#177777, (R3); @#177102 COM #0	подготавливаем шину
	COM	R0
	MOV	R0, (R2)	;@#177101   ; передали № регистра
	MOV	#177774,(R3) ; @#177102 ; COM #3 записали № регистра
	CLR	R0
	BISB	(R1)+,R0
	MOV	#177777,(R3) ; @#177102 ; COM #0	подготавливаем шину
	COM	R0
	MOV	R0, (R2)	;@#177101   ; передали данные регистра
	MOV	#177775,(R3) ; @#177102 ; COM #2 записали данные регистра
	BR	1$
4$:
	MOV	R1, ADRESS
	MOV	(SP)+,R3		
	MOV	(SP)+,R2		
	MOV	(SP)+,R1		
	MOV	(SP)+,R0		
	MTPS	#340 ; Запрет для гарантии окончания V100
	BIC	#400,@#177054 ; Включить сетевой таймер в ПП
	RTI                  
MUZON: 	
.BYTE  377,0, 337, 1, 3, 2, 65, 4, 12, 5, 1, 7, 20, 10, 17, 11
.BYTE 13, 12, 17, 13, 120, 15, 14, 377, 1, 5, 2, 117, 4, 326, 5, 0
.BYTE 7, 70, 11, 14, 12, 16, 377, 1, 7, 2, 237, 4, 76, 5, 1, 10
.BYTE 16, 11, 15, 12, 15, 377, 1, 11, 4, 12, 10, 14, 377, 1, 1, 4
.BYTE 326, 5, 0, 7, 71, 10, 20, 12, 14, 377, 2, 236, 4, 76, 5, 1

проверено - работает.

- - - Добавлено - - -

Структура PSG-формата

Offset Number of byte Description
+0 3 Identifier 'PSG'
+3 1 Marker “End of Text” (1Ah)
+4 1 Version number
+5 1 Player frequency (for versions 10+)
+6 10 Data

Data — последовательности пар байтов записи в регистр.
Первый байт — номер регистра (от 0 до 0x0F), второй — значение.
Вместо номера регистра могут быть специальные маркеры: 0xFF, 0xFE или 0xFD
0xFD — конец композиции.
0xFF — маркер начала прерывания.
0xFE — следующий байт показывает сколько раз выждать по 80 мс.

[S_V_B]

Схему собрал, только что-то пиликает когда пальцем AYка касаешься. Кварц не работает?

[Titus]

Схему собрал, только что-то пиликает когда пальцем AYка касаешься. Кварц не работает?

Осциллограф на CLK поможет это определить отцу русской демократии)

[S_V_B]

Был бы осциллограф.. не было бы вопросов

[hobot]

Был бы осциллограф..

[Titus]

Хобот, он не подойдет, он низкочастотный.

[NEO SPECTRUMAN]

Хобот, он не подойдет, он низкочастотный.

а "народные" умельцы не освоили пиляние стробирующих осциллографов из говна и палок?
тут можно было бы обойтись и одной звуковой картой