better hardreset func

This commit is contained in:
Tolik 2024-10-19 05:17:09 +10:00
parent b30ce3cce1
commit a04553034b

View File

@ -376,13 +376,21 @@ REINIT: DEC B
;[x]
.HardReset:
DI
LD A,SYS_PORT.CNF_0
OUT (SYS_PORT.ROM),A
;
LD A,Z84.REG.Misc_Ctrl
OUT (Z84.SYS.Control),A
LD A,%0000'0011 ; CS1/CS0 enabled
OUT (Z84.SYS.Data),A
;
LD A,DCP_PAGE
OUT (SLOT1),A ; set DCP page
LD A,ACEX.RESET
LD (#4400),A ; open for WR
.loop: LD BC,#0100 ; 横« á¡à®á 
OUT (C),C
LD B,0
LD B,C
OUT (C),C
JR .loop ; ¯®«­®áâìî § æ¨ª«¨âì!
;