This commit is contained in:
Анатолий Белянский 2026-03-06 04:30:07 +10:00
parent ee91527944
commit fb2deeb8f2
4 changed files with 12 additions and 12 deletions

View File

@ -1083,10 +1083,10 @@ PORTS_INIT:
; set HDD1/not-HDD2
LD A,IDE.Chanel.Primary
OUT (IDE.Chanel.Set),A
LD BC,#7FFD
LD BC,ZX_MEM_PORT.Pentagon
LD A,#10
OUT (C),A ; BASIC_48 mode
LD B,#1F
LD B,high ZX_MEM_PORT.Scorpion
LD A,1
OUT (C),A ; RAM-0 mode !!!
; ®ç¨á⪠ ¡ãä¥à®¢ ª« ¢¨ âãàë ¨ ¬ëè¨ ¢ SIO

View File

@ -491,9 +491,9 @@ REINIT: DEC B
;[x]
.Restart: DI
XOR A
LD BC,#1FFD
LD BC,ZX_MEM_PORT.Scorpion
OUT (C),A
LD B,#7F
LD B,high ZX_MEM_PORT.Pentagon
OUT (C),A
OUT (RGADR),A
OUT (RGMOD),A
@ -515,7 +515,7 @@ REINIT: DEC B
;
.SoftReset: DI
LD A,#10
LD BC,#1FFD
LD BC,ZX_MEM_PORT.Scorpion
OUT (C),A ; 8-ï áâà ­¨æ  !!
;
LD A,RESET_PAGE

View File

@ -162,10 +162,10 @@ C_1601: ; OPEN CHANEL
;‚•Ž„: HL - ᯨ᮪ áâà ­¨æ
; E - 0 = 128kb, 1 = 512kb
INIT_vRAM: XOR A
.set_1ffd: LD BC,#1FFD
.set_1ffd: LD BC,ZX_MEM_PORT.Scorpion
OUT (C),A
; set 128
LD B,#7F
LD B,high ZX_MEM_PORT.Pentagon
LD D,%0000'0000
CALL SET_7FFD
;
@ -700,7 +700,7 @@ INIT_PAGES: LD A,SYS_PAGE
LD A,#10
CALL MANAGE_ZX_PAGES.INIT_vRAM.set_1ffd
; A = 0, BC = #7FFD
LD B,#1F
LD B,high ZX_MEM_PORT.Scorpion
OUT (C),A
INC A ; reset ZF
;
@ -773,7 +773,7 @@ RES128_PROG:
OUT (C),A
;
XOR A
LD BC,#1FFD
LD BC,ZX_MEM_PORT.Scorpion
OUT (C),A ; Scorp ¯®àâ
;LD B,#7F
;OUT (C),A ; 128 ¯®àâ
@ -798,7 +798,7 @@ RES128_PROG:
;XOR A
;OUT (C),A ; 7FFD
LD A,#02
LD B,#1F
LD B,high ZX_MEM_PORT.Scorpion
OUT (C),A
XOR A
DEC D
@ -827,7 +827,7 @@ RES128_PROG:
JR Z,.noLock48
;
SET 5,A
.noLock48: LD B,#7F
.noLock48: LD B,high ZX_MEM_PORT.Pentagon
OUT (C),A
LD A,E ; ãáâ ­®¢ª  ª®­ä¨£ãà æ¨¨ ¨ ०¨¬  TURBO
OUT (SYS_PORT.RAM),A ; CONFIG_SET

View File

@ -397,7 +397,7 @@ GOTO_TRDOS:
;SR_48:
.m48: LD A,#30 ; ‘⮯®à ­  PORT_128 !!!
;SR_48A:
.RUN: LD BC,#7FFD
.RUN: LD BC,ZX_MEM_PORT.Pentagon
OUT (C),A
LD BC,0 ; <20>€ 0 !!
PUSH BC