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
ENDIF
IF MUSIC_22khz
; ; #5944x128 blocks for play
; #5944x128 blocks for play
DEFINE _memPagesForMuz 179
DEFINE _ramDiskNumForMuz 3
DEFINE _lastPageMuzOffset #5E00
@ -111,11 +111,7 @@ IM2_Handler EQU #88FF
INCLUDE 'Shared_Includes/constants/EXE_Header.z80'
ORG org_addr
; ORG #100
; .PHASE #8000
START:
ld c,Dss.GetVMod
START: ld c,Dss.GetVMod
rst ToDSS
jr nc,1F
ld a,3 ; ¥á«¨ ®è¨¡ª , â® áâ ¢¨¬ ¤¥ä®«â­ë¥ §­ ç¥­¨ï ०¨¬  ¨ ­®¬¥à  íªà ­ 
@ -348,8 +344,7 @@ NEXT_STEP:
; LD C,#F3
; RST ToBIOS
BEGIN:
DI
BEGIN: DI
LD SP,#BFFF
@ -478,11 +473,9 @@ LOOP_ALL:
; IFN MODE_CBL : EI : HALT : DI : ENDIF
; IF MODE_CBL
halt_loop_repeat:
HALT
halt_loop_repeat: HALT
halt_JP_address+1: JR halt_loop_repeat
halt_loop_exit:
; ENDIF
in a,(RGMOD)
xor 1
@ -530,7 +523,6 @@ begin_loop:
RET
SPRITE_DATA:
DB #FF ; PAGE_SPRITE
dw #C000 ; ADRESS SPRITE
DB #78,#80 ; SIZE
@ -641,7 +633,6 @@ sprite_2load_loop2:
; ; WER_PLACE
; ; ATRIBUTE
FON_LOAD:
IN A,(SLOT0)
PUSH AF
IN A,(SLOT1)
@ -805,7 +796,6 @@ loop_all_1:
JR NZ,NO_SCR1
LD BC,#4180
NO_SCR1:
LD L,(IX+SPRITE_TBL.X) ; X coordinate
LD H,(IX+SPRITE_TBL.X+1)
@ -1016,7 +1006,6 @@ NO_LD_SND:
*/
PlayMusic:
LD A,2
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!"
;
;
/*
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