Subversion Repositories ngs

Rev

Rev 165 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 165 Rev 181
Line 1... Line 1...
1 
 
 1 
 
2 
; LAST UPDATE: 13.01.2024 savelij
 2 
; LAST UPDATE: 17.05.2025 savelij
3 
 
 3 
 
4 
STACK_CURR_DIR          EQU 0x6000      ; стек номеров дир перед входом в нее
 4 
STACK_CURR_DIR          EQU 0x6000      ; стек номеров дир перед входом в нее
5 
 
 5 
 
6 
; FAT функции по номерам
 6 
; FAT функции по номерам
7 
 INIT_VAR
 7 
 INIT_VAR
Line 83... Line 83...
83 
 
 83 
 
84 
ERR_DRV         LD SP,(ERORDRV)
 84 
ERR_DRV         LD SP,(ERORDRV)
85 
EXITDRV         POP IY
 85 
EXITDRV         POP IY
86 
                POP IX
 86 
                POP IX
87 
                PUSH AF
 87 
                PUSH AF
88 
                LD A,(INT_MODE)
 88 
                LD A,(VAR_INT_MODE)
89 
                AND A
 89 
                AND A
90 
                JR Z,EXITDRV1
 90 
                JR Z,EXITDRV1
91 
                EI
 91 
                EI
92 
EXITDRV1        POP AF
 92 
EXITDRV1        POP AF
93 
                RET
 93 
                RET
Line 947... Line 947...
947 
                LD (RootDIRCluster + 2),BC      ; номер корневого кластера
 947 
                LD (RootDIRCluster + 2),BC      ; номер корневого кластера
948 
                LD (TEK_LEV),A
 948 
                LD (TEK_LEV),A
949 
                POP AF
 949 
                POP AF
950 
                JP INIRTSC
 950 
                JP INIRTSC
951 
 
 951 
 
- 
 
 952 
F_EXT           DW F_EXT_VS1001                 ; 0 for VS1001  (MA8201)        9B58
- 
 
 953 
                DW F_EXT_VS1011                 ; 1 for VS1011  (MA8201A)       9B58
- 
 
 954 
                DW 0    ; 2 for VS1002  ; не поддерживается, не проверялся
952 
F_EXT           DZ "MP3MOD"
 955 
                DW F_EXT_VS1003                 ; 3 for VS1003
- 
 
 956 
                DW F_EXT_VS1053                 ; 4 for VS1053 and VS8053       ; пока не доделан
- 
 
 957 
                DW 0    ; 5 for VS1033  ; не поддерживается, не проверялся
- 
 
 958 
                DW F_EXT_VS1063                 ; 6 for VS1063  ; пока не доделан
- 
 
 959 
                DW 0    ; 7 for VS1103  ; не поддерживается, не проверялся
953 
 
 960 
 
954 
CP_EXT          PUSH BC
 961 
CP_EXT          PUSH BC
955 
                PUSH DE
 962 
                PUSH DE
956 
                PUSH HL
 963 
                PUSH HL
- 
 
 964 
                PUSH HL
957 
                LD C,0
 965 
                LD C,0
- 
 
 966 
                LD A,(VAR_CHIP_TYPE)
- 
 
 967 
                ADD A,A
- 
 
 968 
                ADD A,LOW (F_EXT)
- 
 
 969 
                LD L,A
- 
 
 970 
                ADC A,HIGH (F_EXT)
- 
 
 971 
                SUB L
- 
 
 972 
                LD H,A
958 
                LD DE,F_EXT
 973 
                LD E,(HL)
- 
 
 974 
                INC HL
- 
 
 975 
                LD D,(HL)
- 
 
 976 
                POP HL
959 
.L3             LD A,(DE)
 977 
.L3             LD A,(DE)
960 
                AND A
 978 
                AND A
961 
                JR Z,.L2
 979 
                JR Z,.L2
962 
                INC C
 980 
                INC C
963 
                PUSH DE
 981 
                PUSH DE
Line 1323... Line 1341...
1323 
                JR LD_F5
 1341 
                JR LD_F5
1324 
 
 1342 
 
1325 
LD_E            IN A,(GSCFG0)
 1343 
LD_E            IN A,(GSCFG0)
1326 
                RES B_EXPAG,A
 1344 
                RES B_EXPAG,A
1327 
                OUT (GSCFG0),A
 1345 
                OUT (GSCFG0),A
1328 
                LD A,(PAGE_PLAYER)
 1346 
                LD A,(VAR_PAGE_PLAYER)
1329 
                OUT (MPAG),A
 1347 
                OUT (MPAG),A
1330 
                LD A,(BUF_PAG+0xFF)
 1348 
                LD A,(BUF_PAG+0xFF)
1331 
                SRL A
 1349 
                SRL A
1332 
                ADC A,0
 1350 
                ADC A,0
1333 
                RET
 1351 
                RET
Line 1512... Line 1530...
1512 
                RR L
 1530 
                RR L
1513 
                SRL H
 1531 
                SRL H
1514 
                RR L
 1532 
                RR L
1515 
                LD DE,2
 1533 
                LD DE,2
1516 
                LD (KOLVMP3),HL
 1534 
                LD (KOLVMP3),HL
1517 
                LD (COUNT_MP3),HL
 1535 
                LD (VAR_COUNT_MP3),HL
1518 
                AND A
 1536 
                AND A
1519 
                SBC HL,DE
 1537 
                SBC HL,DE
1520 
                EX AF,AF'
 1538 
                EX AF,AF'
1521 
                ADD HL,DE
 1539 
                ADD HL,DE
1522 
                EX AF,AF'
 1540 
                EX AF,AF'