;LAST UPDATE: 24.05.2013 savelij
;version 08.02.2009
;ДРАЙВЕР SD-CARD ДЛЯ NGS
;+ДРАЙВЕР ДЛЯ MP3-ДЕКОДЕРА
;Входные параметры общие:
;HL-адрес загрузки в память
;BCDE-32-х битный номер сектора
;A-количество блоков (блок=512 байт)
;только для многоблочной записи/чтении
;Ошибки выдаваемые на выходе:
;A=0-инициализация прошла успешно
;A=1-карта не найдена или не ответила
;A=2-карта защищена от записи
;A=3-попытка записи в сектор 0 карты
;INCL "PORTSNGS"
CMD_12 EQU 0X4C ;STOP_TRANSMISSION
CMD_17 EQU 0X51 ;READ_SINGLE_BLOCK
CMD_18 EQU 0X52 ;READ_MULTIPLE_BLOCK
CMD_24 EQU 0X58 ;WRITE_BLOCK
CMD_25 EQU 0X59 ;WRITE_MULTIPLE_BLOCK
CMD_55 EQU 0X77 ;APP_CMD
CMD_58 EQU 0X7A ;READ_OCR
CMD_59 EQU 0X7B ;CRC_ON_OFF
ACMD_41 EQU 0X69 ;SD_SEND_OP_COND
;ОБЩАЯ ТОЧКА ВХОДА ДЛЯ РАБОТЫ С
EXX
PUSH HL
PUSH DE
ADD A,A
LD L,A
LD H,0
LD DE,TABL_SD
ADD HL,DE
EX AF,AF'
LD E,(HL)
INC HL
LD D,(HL)
EX DE,HL
POP DE
EX (SP),HL
EXX
RET
TABL_SD DW SD_INIT ;0
;параметров не требует, на выходе A
;смотри выше первые 2 значения
DW SD__OFF ;1
;просто снятие выбора SD карты
DW RDSINGL ;2 ЧИТАТЬ 1 СЕКТОР
DW EMPTY ;3 ЧИТАТЬ "A" СЕКТОРОВ
DW EMPTY ;4 ПИСАТЬ 1 СЕКТОР
DW EMPTY ;5 ПИСАТЬ "A" СЕКТОРОВ
DW AVTODET ;6-АВТОДЕТЕКТ
DW FREQNC ;7-ЗАДАЧА ЧАСТОТЫ
DW HARDMP3 ;8 INIT MP3-ДЕКОДЕРА
DW LDI_MP3 ;9 ГОН С SD НА MP3
DW COM_MP3 ;0XA RD&WR В MP3-ДЕКОД
DW SOFTMP3 ;0XB SOFT RESET MP3CHIP
DW DAT2MP3 ;0XC ГОН С GSDAT2MP3
DW ZER2MP3 ;0XD 2048 НУЛЕЙ НА MP3
EMPTY RET
ZAW003 CALL SD__OFF
LD A,1
RET
SD_INIT CALL CS_HIGH
LD BC,SD_SEND
LD DE,0X20FF
OUT (C),E
DEC D
JR NZ,$-3
LD BC,SD_RSTR
XOR A
EX AF,AF'
ZAW001 LD HL,CMD00
CALL OUTCOM
CALL IN_OOUT
EX AF,AF'
DEC A
JR Z,ZAW003
EX AF,AF'
DEC A
JR NZ,ZAW001
LD HL,CMD08
CALL OUTCOM
CALL IN_OOUT
IN H,(C)
NOP
IN H,(C)
NOP
IN H,(C)
NOP
IN H,(C)
LD HL,0
BIT 2,A
JR NZ,ZAW006
LD H,0X40
ZAW006 LD A,CMD_55
CALL OUT_COM
CALL IN_OOUT
LD BC,SD_SEND
LD A,ACMD_41
OUT (C),A
NOP
OUT (C),H
NOP
OUT (C),L
NOP
OUT (C),L
NOP
OUT (C),L
LD A,0XFF
OUT (C),A
CALL IN_OOUT
AND A
JR NZ,ZAW006
ZAW004 LD A,CMD_59
CALL OUT_COM
CALL IN_OOUT
AND A
JR NZ,ZAW004
ZAW005 LD HL,CMD16
CALL OUTCOM
CALL IN_OOUT
AND A
JR NZ,ZAW005
CS_HIGH PUSH DE
PUSH BC
LD E,M_SDNCS+M_SNCLR;0X81
LD BC,SCTRL
OUT (C),E
POP BC
POP DE
RET
SD__OFF LD A,M_SDNCS+M_SNCLR;0X81
OUT (SCTRL),A
RET
CS__LOW PUSH DE
PUSH BC
LD E,M_SDNCS;1
LD BC,SCTRL
OUT (C),E
POP BC
POP DE
RET
OUTCOM CALL CS__LOW
PUSH BC
LD BC,SD_SEND
OUTI
NOP
OUTI
NOP
OUTI
NOP
OUTI
NOP
OUTI
NOP
OUTI
POP BC
RET
OUT_COM PUSH BC
CALL CS__LOW
LD BC,SD_SEND
OUT (C),A
XOR A
OUT (C),A
NOP
OUT (C),A
NOP
OUT (C),A
NOP
OUT (C),A
DEC A
OUT (C),A
POP BC
RET
SECM200 PUSH HL
PUSH DE
PUSH BC
PUSH AF
PUSH BC
LD A,CMD_58
LD BC,SD_RSTR
CALL OUT_COM
CALL IN_OOUT
IN A,(C)
NOP
IN H,(C)
NOP
IN H,(C)
NOP
IN H,(C)
BIT 6,A
POP HL
JR NZ,SECN200
EX DE,HL
ADD HL,HL
EX DE,HL
ADC HL,HL
LD H,L
LD L,D
LD D,E
LD E,0
SECN200 POP AF
LD BC,SD_SEND
OUT (C),A
NOP
OUT (C),H
NOP
OUT (C),L
NOP
OUT (C),D
NOP
OUT (C),E
LD A,0XFF
OUT (C),A
POP BC
POP DE
POP HL
RET
IN_OOUT PUSH BC
PUSH DE
LD DE,0X20FF
LD BC,SD_RSTR
IN_WAIT IN A,(C)
CP E
JR NZ,IN_EXIT
DEC D
JR NZ,IN_WAIT
IN_EXIT POP DE
POP BC
RET
CMD00 DB 0X40,0X00,0X00,0X00,0X00,0X95
;GO_IDLE_STATE
CMD08 DB 0X48,0X00,0X00,0X01,0XAA,0X87
;SEND_IF_COND
CMD16 DB 0X50,0X00,0X00,0X02,0X00,0XFF
;SET_BLOCKEN
RD_SECT PUSH BC
PUSH DE
LD BC,SD_RSTR
INIR
INIR
JR RDSECT3
RON_MP3 PUSH BC
PUSH DE
LD BC,SD_RSTR
LD D,0X10
RDSECT2 IN A,(SSTAT)
RRA
JR NC,$-3
LD E,0X20
RDSECT1 IN A,(C)
NOP
OUT (MD_SEND),A
DEC E
JR NZ,RDSECT1
DEC D
JR NZ,RDSECT2
RDSECT3 IN A,(C)
NOP
IN A,(C)
POP DE
POP BC
RET
LDI_MP3 LD A,CMD_17
CALL SECM200
CALL IN_OOUT
CP 0XFE
JR NZ,$-5
CALL RON_MP3
CALL IN_OOUT
INC A
JR NZ,$-4
JP CS_HIGH
RDSINGL LD A,CMD_17
CALL SECM200
CALL IN_OOUT
CP 0XFE
JR NZ,$-5
CALL RD_SECT
CALL IN_OOUT
INC A
JR NZ,$-4
JP CS_HIGH
;ОЖИДАНИЕ ГОТОВНОСТИ SPI MP3 ЧИПА
NOPER DUPL 18,0
RET
IN A,(SSTAT)
AND M_MCRDY
JR Z,NOPER
RET
AVTODET IN A,(GSCFG0)
AND 0XCF
OUT (GSCFG0),A
CALL NOPER
LD D,A
IN A,(GSCFG0)
CP D
LD A,0
RET Z
NO_MP3 LD A,0XFF
RET
FREQNC LD D,C_10MHZ;0X30
AND 3
JR Z,FREQNCS
LD D,C_12MHZ;0X10
DEC A
JR Z,FREQNCS
LD D,C_20MHZ;0X20
DEC A
JR Z,FREQNCS
LD D,C_24MHZ;0
FREQNCS IN A,(GSCFG0)
AND 0XCF
OR D
OUT (GSCFG0),A
RET
;ЗАПИСЫВАЕМ 2048 НУЛЕЙ КАК ЗАВЕРШЕНИЕ
;ПЕСЕНКИ
ZER2MP3 LD D,0X40
ZR2MP31 IN A,(SSTAT)
RRA
JR NC,$-3
LD E,0X20
XOR A
OUT (MD_SEND),A
DEC E
JR NZ,$-4
DEC D
JR NZ,ZR2MP31
RET
;ПОЛНЫЙ СБРОС
HARDMP3 XOR A
CALL VOL_MOD
;ЗАГЛУШИЛИ ГРОМКОСТЬ ПОРТОВ GS
LD BC,MC_SEND
LD A,%10011100;0X9C
OUT (SCTRL),A
XOR A
CALL FREQNC
;ВЫСТАВИЛИ ЧАСТОТУ НА NGS 10 МГц
LD HL,0X0301
CALL COM_MP3
LD A,E
AND %01110000
PUSH AF
LD A,M_MPXRS
OUT (SCTRL),A
CALL NOPER
LD A,M_MPXRS+M_SNCLR;0X84
OUT (SCTRL),A
;ВЫДАЛИ СБРОС НА ДЕКОДЕР
IN A,(SSTAT)
RRA
JR NC,$-3
;ДОЖДАЛИСЬ ГОТОВНОСТИ ДЕКОДЕРА
LD HL,0X0203
LD DE,0X9B58
CALL COM_MP3
;ВЫСТАВИЛИ НА ДЕКОДЕРЕ ЧАСТОТУ 14 МГц
POP AF
;ЗДЕСЬ ПОШЛА ИНИЦИАЛИЗАЦИЯ ДЛЯ VS1001
LD HL,0X0202
LD DE,0X8008
CALL Z,COM_MP3
;ЗАПИСЬ НЕДОКУМЕНТИРОВАННОГО ПИНКА В
;НЕДОКУМЕНТИРОВАННЫЙ РЕГИСТР, ЕСЛИ
;БИТЫ 6-4 РЕГИСТРА СТАТУСА В НУЛЕ
LD A,1
JP FREQNC
;ВЫСТАВИЛИ ЧАСТОТУ НА NGS 12 МГц
;ПРОГРАММНЫЙ СБРОС MP3 ДЕКОДЕРА
;РЕКОМЕНДУЕТСЯ ВЫЗЫВАТЬ ПЕРЕД КАЖДЫМ
;НОВЫМ ФАЙЛОМ, СБРАСЫВАЕТ СЧЕТЧИК СЕКУНД
;ПОСЛЕ ПРОГРАММНОГО СБРОСА ВСЕ
;УСТАНОВЛЕННЫЕ РЕЖИМЫ ДЕКОДЕРА
;НЕ ИЗМЕНЯЮТСЯ
SOFTMP3 LD BC,MC_SEND
LD HL,0X030B
CALL COM_MP3
;СНИМАЕМ ТЕКУЩЕЕ ЗНАЧЕНИЕ ГРОМКОСТИ
PUSH DE
LD DE,0XFEFE
;И СОХРАНЯЕМ ЕГО ДО ЛУЧШИХ ВРЕМЕН
LD HL,0X020B
CALL COM_MP3
;УМЕНЬШАЕМ ГРОМКОСТЬ ДО МИНИМУМА
LD HL,0X0301
CALL COM_MP3
LD A,E
AND %01110000
PUSH AF
LD HL,0X0300
CALL COM_MP3
;ЧИТАЕМ СОСТОЯНИЕ MODE
LD A,4
XOR E
LD E,A
LD HL,0X0200
CALL COM_MP3
LD A,4
XOR E
LD E,A
LD HL,0X0200
CALL COM_MP3
;ДАЕМ КОМАНДУ СОФТ-СБРОСА
IN A,(SSTAT)
RRA
JR NC,$-3
;ЖДЕМ ОСВОБОЖДЕНИЯ ДЕКОДЕРА
LD HL,0X0203
LD DE,0X9B58
CALL COM_MP3
;ВЫСТАВЛЯЕМ ЧАСТОТУ ПОСЛЕ ИНИЦИАЛИЗАЦИИ
;MP3 ДЕКОДЕРА
POP AF
LD HL,0X0202
LD DE,0X8008
CALL Z,COM_MP3
;НЕДОКУМЕНТИРОВАННЫЙ ПИНОК MP3 ДЕКОДЕРА
POP DE
LD HL,0X020B
JR COM_MP3
;ВОССТАНАВЛИВАЕМ ГРОМКОСТЬ ДО СБРОСА
;ГЛУШИМ ГРОМКОСТЬ MOD ПОРТОВ
VOL_MOD OUT (VOL1),A
OUT (VOL2),A
OUT (VOL3),A
OUT (VOL4),A
OUT (VOL5),A
OUT (VOL6),A
OUT (VOL7),A
OUT (VOL8),A
RET
; ПРОЦЕДУРА ЧТЕНИЯ/ЗАПИСИ АДРЕСОВ
; MP3 ДЕКОДЕРА
; H-КОМАНДА ДЕКОДЕРУ 3-READ ИЛИ 2-WRITE
; L-АДРЕС В ДЕКОДЕРЕ
; D-СТАРШИЙ БАЙТ
; E-МЛАДШИЙ БАЙТ
; DE ПО ЗАПИСИ ПОДАТЬ НА ВХОД
; ПО ЧТЕНИЮ ПОЛУЧИТЬ НА ВЫХОДЕ
COM_MP3 IN A,(SSTAT)
RRA
JR NC,$-3
; ДЕКОДЕР СВОБОДЕН
LD A,M_MCNCS
OUT (SCTRL),A
; ВЫБИРАЕМ ДЕКОДЕР И ОБЪЯСНЯЕМ ЕМУ
; ЧТО ОТ НЕГО ТРЕБУЕТСЯ
CALL NOPER
LD BC,MC_SEND
LD A,H
OUT (C),H
CALL NOPER
OUT (C),L
CALL NOPER
CP 3
JR Z,MP3READ
; ПЕРЕХОДИМ НА ЧТЕНИЕ (СМОТРИ ВЫШЕ)
OUT (C),D
CALL NOPER
OUT (C),E
; ЗАПИСАЛИ В АДРЕС ДЕКОДЕРА
MP3_END CALL NOPER
LD A,M_MCNCS+M_SNCLR;0X82
; СНИМАЕМ ВЫБОР ДЕКОДЕРА
OUT (SCTRL),A
RET
MP3READ ;ЧИТАЕМ ЧТО ЗАТРЕБОВАЛИ
LD BC,MC_READ
LD A,0XFF
OUT (MC_SEND),A
CALL NOPER
IN D,(C)
CALL NOPER
OUT (MC_SEND),A
CALL NOPER
IN E,(C)
JR MP3_END
; ПРОЦЕДУРА ПЕРЕСЫЛКИ БАЙТОВ СО СПЕКА
; ЧЕРЕЗ ПОРТЫ ГС НА MP3 ДЕКОДЕР
; ПЕРЕСЫЛАЕТСЯ 512 БАЙТ
DAT2MP3 LD D,0X10
; ПЕРЕГНАТЬ НА ДЕКОДЕР 16 ПОРЦИЙ
DAT2M03 IN A,(SSTAT)
RRA
JR NC,$-3
; ДЕКОДЕР СВОБОДЕН
LD B,0X20
; ОДНА ПОРЦИЯ 32 БАЙТА
DAT2M13 IN A,(ZXSTAT)
RLA
JR NC,$-3
; ДОЖДАЛИСЬ ПОДАЧИ ОТ СПЕКА
IN A,(ZXDATRD); ЗАБРАЛИ БАЙТ
OUT (MD_SEND),A; ОТДАЛИ ДЕКОДЕРУ
NOP;ВЫДЕРЖАЛИ ПАУЗУ ПО ТАКТАМ
DJNZ DAT2M13; ПОРЦИЯ КОНЧИЛАСЬ
DEC D
JR NZ,DAT2M03
RET;512 БАЙТ ПЕРЕДАНО!!!