This commit is contained in:
Anatoliy Belyanskiy 2024-01-10 09:24:13 +10:00
parent 86e658d970
commit 4e79de923d
2 changed files with 42 additions and 80 deletions

View File

@ -8,7 +8,7 @@
DEFINE MUSIC_22khz 1 DEFINE MUSIC_22khz 1
ENDIF ENDIF
IF MUSIC_22khz IF MUSIC_22khz
; ; #5944x128 blocks for play ; #5944x128 blocks for play
DEFINE _memPagesForMuz 179 DEFINE _memPagesForMuz 179
DEFINE _ramDiskNumForMuz 3 DEFINE _ramDiskNumForMuz 3
DEFINE _lastPageMuzOffset #5E00 DEFINE _lastPageMuzOffset #5E00
@ -111,11 +111,7 @@ IM2_Handler EQU #88FF
INCLUDE 'Shared_Includes/constants/EXE_Header.z80' INCLUDE 'Shared_Includes/constants/EXE_Header.z80'
ORG org_addr ORG org_addr
; ORG #100 START: ld c,Dss.GetVMod
; .PHASE #8000
START:
ld c,Dss.GetVMod
rst ToDSS rst ToDSS
jr nc,1F jr nc,1F
ld a,3 ; ¥á«¨ ®è¨¡ª , â® áâ ¢¨¬ ¤¥ä®«â­ë¥ §­ ç¥­¨ï ०¨¬  ¨ ­®¬¥à  íªà ­  ld a,3 ; ¥á«¨ ®è¨¡ª , â® áâ ¢¨¬ ¤¥ä®«â­ë¥ §­ ç¥­¨ï ०¨¬  ¨ ­®¬¥à  íªà ­ 
@ -348,8 +344,7 @@ NEXT_STEP:
; LD C,#F3 ; LD C,#F3
; RST ToBIOS ; RST ToBIOS
BEGIN: BEGIN: DI
DI
LD SP,#BFFF LD SP,#BFFF
@ -478,11 +473,9 @@ LOOP_ALL:
; IFN MODE_CBL : EI : HALT : DI : ENDIF ; IFN MODE_CBL : EI : HALT : DI : ENDIF
; IF MODE_CBL ; IF MODE_CBL
halt_loop_repeat: halt_loop_repeat: HALT
HALT
halt_JP_address+1: JR halt_loop_repeat halt_JP_address+1: JR halt_loop_repeat
halt_loop_exit: halt_loop_exit:
; ENDIF ; ENDIF
in a,(RGMOD) in a,(RGMOD)
xor 1 xor 1
@ -530,7 +523,6 @@ begin_loop:
RET RET
SPRITE_DATA: SPRITE_DATA:
DB #FF ; PAGE_SPRITE DB #FF ; PAGE_SPRITE
dw #C000 ; ADRESS SPRITE dw #C000 ; ADRESS SPRITE
DB #78,#80 ; SIZE DB #78,#80 ; SIZE
@ -641,7 +633,6 @@ sprite_2load_loop2:
; ; WER_PLACE ; ; WER_PLACE
; ; ATRIBUTE ; ; ATRIBUTE
FON_LOAD: FON_LOAD:
IN A,(SLOT0) IN A,(SLOT0)
PUSH AF PUSH AF
IN A,(SLOT1) IN A,(SLOT1)
@ -805,7 +796,6 @@ loop_all_1:
JR NZ,NO_SCR1 JR NZ,NO_SCR1
LD BC,#4180 LD BC,#4180
NO_SCR1: NO_SCR1:
LD L,(IX+SPRITE_TBL.X) ; X coordinate LD L,(IX+SPRITE_TBL.X) ; X coordinate
LD H,(IX+SPRITE_TBL.X+1) LD H,(IX+SPRITE_TBL.X+1)
@ -1016,7 +1006,6 @@ NO_LD_SND:
*/ */
PlayMusic: PlayMusic:
LD A,2 LD A,2
OUT (BorderColor),A OUT (BorderColor),A
@ -1682,30 +1671,3 @@ EXIT_MSG: DZ 'All done)))',13,10
; ;
ASSERT IM2_Handler>$, "The code leaks into the IM2 byte address!" ASSERT IM2_Handler>$, "The code leaks into the IM2 byte address!"
; ;
;
/*
EMM_FN7: ; ¯®«ãç¨âì á«¥¤ãîéãî áâà ­¨æã ¡«®ª  ¯® ¯à¥¤ë¤ã饬ã
LD A,page ; 䨧¨ç¥áª ï áâà ­¨æ  ¡«®ª 
LD C,0C7h ; ­®¬¥à ä㭪樨
CALL 3D13h ; NC -> A - á«¥¤ãîé ï 䨧¨ç¥áª ï áâà ­¨æ  ¡«®ª 
; A=FF - ¨­¤¨æ¨àã¥â ª®­¥æ ¡«®ª 
; CF -> ®è¨¡ª  ­®¬¥à  áâà ­¨æë
; ˆ­ä®à¬ æ¨ï ® à á¯à¥¤¥«¥­¨¨ ¯ ¬ï⨠åà ­¨âáï ¢ ¢¨¤¥ RAM Allocation Table,
; ¯®å®¦¥© ­  ¤¨áª®¢ë© FAT. <20>®í⮬㠭 å®¦¤¥­¨¥ 䨧¨ç¥áª®£® ­®¬¥à  á«¥¤ãî饩
; áâà ­¨æë ¯® ¯à¥¤ë¤ã饬ã 䨧¨ç¥áª®¬ã ­®¬¥à㠯நá室¨â §­ ç¨â¥«ì­® ¡ëáâ॥,
; 祬 ¯®¨áª ¯® 㢥«¨ç¥­­®¬ã ­  ¥¤¨­¨æã «®£¨ç¥áª®¬ã ­®¬¥àã.
LD A,page
D C,BIOS.GetMemPageNext
RST ToBIOS
EMM_FN4: ; ¯®«ãç¨âì 䨧¨ç¥áª¨© ­®¬¥à áâà ­¨æë ¨§ ¡«®ª 
LD A,id_blk ; ¨¤¥­â¨ä¨ª â®à ¡«®ª 
LD B,page ; «®£¨ç¥áª ï áâà ­¨æ  ¢ ¡«®ª¥
LD C,0C4h ; ­®¬¥à ä㭪樨
CALL 3D13h ; NC -> € - 䨧¨ç¥áª¨© ­®¬¥à áâà ­¨æë
; CF -> €=0 - ­¥â â ª®£® ¡«®ª , A=FF - ª®­¥æ ¡«®ª 
*/

@ -1 +1 @@
Subproject commit 21c7eb690adb62e35c41fdcda76dc3bf97f369b4 Subproject commit a6dee8e17ae12b251f306290793a56a6b0dd5ae3