From 92a2c65987c5904d764b62daed9fe4bcc5db3cbc Mon Sep 17 00:00:00 2001
From: Tolik <85737314+Tolik-Trek@users.noreply.github.com>
Date: Tue, 1 Oct 2024 05:00:04 +1000
Subject: [PATCH] =?UTF-8?q?=D0=BF=D1=80=D0=B0=D0=B2=D0=BA=D0=B8=20=D0=BF?=
 =?UTF-8?q?=D0=BE=D0=B4=20free=20zx=20pages?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 SP__48.ASM         | 3 ++-
 TRDOS/TR_MSD_2.ASZ | 3 ---
 TRDOS/TR_MSD_3.ASZ | 3 ++-
 ZX_EXP/SERVICE.ASM | 4 ++--
 4 files changed, 6 insertions(+), 7 deletions(-)

diff --git a/SP__48.ASM b/SP__48.ASM
index a983d9a..fd074d5 100644
--- a/SP__48.ASM
+++ b/SP__48.ASM
@@ -19273,9 +19273,10 @@ L3C97:
         ;чтоб можно было компилить vROM как для работы с ПЗУ, так и полностью без него
          LD HL,#C0               ; POINT - вход в MENU из BASIC 48.  for ZX_MODE.ASM - RET_FROM_BIOS_TO_BASIC48
          //LD HL,#3CF0           ; POINT - вход в MENU из BASIC 48.  for ZX_MODE.ASM - RET_FROM_BIOS_TO_BASIC48
-        ;
         JR JMP_EX
+;> > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > >;
 
+;> > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > >;
         BLOCK   #3CF8-$,0
 JMP_EX:	PUSH HL
         PUSH AF
diff --git a/TRDOS/TR_MSD_2.ASZ b/TRDOS/TR_MSD_2.ASZ
index 4c74a04..97d955e 100644
--- a/TRDOS/TR_MSD_2.ASZ
+++ b/TRDOS/TR_MSD_2.ASZ
@@ -644,9 +644,6 @@ SP_1:	LD A,(DE)
 	CCF
 	RET C
 	CALL EXP_FNS
-	;!TEST 06/01/2024 сохраняем состояние прерываний зачем-то
-	 ;EI
-	;
 	CALL AUTO_1D97
 	AND A
 	RET
diff --git a/TRDOS/TR_MSD_3.ASZ b/TRDOS/TR_MSD_3.ASZ
index 6da06c7..34e9097 100644
--- a/TRDOS/TR_MSD_3.ASZ
+++ b/TRDOS/TR_MSD_3.ASZ
@@ -2,7 +2,8 @@ File_Start DEFL	$
  DISPLAY "===================================================="
 ;███████████████████████████████████████████████████████████████████████
 INIT_RMD:
-	LD	C,BIOS.FullInit
+	DI
+	LD	BC,BIOS.REINIT.FREE_NO_ZX_MEM	; [ ] free zx pages!
 	;!TEST 06/01/2024 сохраняем состояние прерываний зачем-то
 	 CALL	EXP_FNS
 	; [ ] 23/02/2024 грохаем перехват ресета
diff --git a/ZX_EXP/SERVICE.ASM b/ZX_EXP/SERVICE.ASM
index 3919a07..567fc72 100644
--- a/ZX_EXP/SERVICE.ASM
+++ b/ZX_EXP/SERVICE.ASM
@@ -626,12 +626,12 @@ SCORPION:
 
 PENTAGON:
 	CALL CNF_PN_320
-	LD DE,CNF_2+D_TBON
+	LD DE,CNF_1+D_TBON
 	JR CONFIG_SET1
 
 PENTAGON512:
 	CALL CNF_PN_320
-	LD DE,CNF_2+D_TBON+CNF_512
+	LD DE,CNF_1+D_TBON+CNF_512
 ;	JR CONFIG_SET1
 
 CONFIG_SET1: