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' |