+ защита от утечек памяти флага ZX
This commit is contained in:
		
							parent
							
								
									0379d0c9b1
								
							
						
					
					
						commit
						5c8e58eb99
					
				| @ -701,9 +701,30 @@ POST_5_OK: | ||||
| 
 | ||||
| ;-------------[Save IX:IY]-------------- | ||||
| ; Don't use IY before this point if it`s normal booting!!! | ||||
| 	LD IX,0 | ||||
| 	AND A | ||||
| 	ADD IX,SP							; ¢®ááâ ®¢¨âì § ç¥¨¥ ¯¥à¥¤ ®¥ § £àã§ç¨ª®¬ ª®äë (¥á«¨ áâ àâ ¯®á«¥ à¥á¥â ) | ||||
| 	LD	IX,0 | ||||
| 	XOR	A | ||||
| 	ADD	IX,SP							; ╳摽<E295B3>陋◢碪 妣删平言 砲鄍<E7A0B2>限恭 <20>␡膇蝔狙<E89D94> 狙凋<E78B99> (丟咧 摵恷<E691B5> 祚嶉<E7A59A> 鄍嵽<E9848D>) | ||||
| 	;!TEST 31/12/23 祚戶瘔惩恥<E683A9> 栽 蜾亦爸 <20>穿漼 | ||||
| 	 LD	R,A | ||||
| 	 ; | ||||
| 	 LD	D,YH | ||||
| 	 LD	E,YL | ||||
| 	 EX	DE,HL | ||||
| 	 LD	DE,SP2000_Loader_Flag | ||||
| 	 SBC	HL,DE | ||||
| 	 JR	NZ,.no_conf_reload | ||||
| 	 ; | ||||
| 	 LD	D,XH | ||||
| 	 LD	E,XL | ||||
| 	 EX	DE,HL | ||||
| 	 LD	DE,SP2000_ConfID | ||||
| 	 SBC	HL,DE | ||||
| 	 JR	NZ,.no_conf_reload | ||||
| 	 ; | ||||
| 	 LD	A,#80 | ||||
| 	 LD	R,A | ||||
| .no_conf_reload: | ||||
| 	; | ||||
| ;	 | ||||
| ; ‚ í⮬ ¬¥áâ¥ ã  á IX:IY ¨§ Loader.asm | ||||
| ; | ||||
| @ -775,9 +796,8 @@ set_config: | ||||
| ;[---------------------------------------------------------------------] | ||||
| 
 | ||||
| 	MODULE Reset_Handler | ||||
| start: | ||||
| 	IN A,(SLOT3) | ||||
| 	push af | ||||
| start:	IN	A,(SLOT3) | ||||
| 	PUSH	AF | ||||
| ;----[¯¥à¥å¢ â soft reset #EE port]----- | ||||
| Check_EE_Port: | ||||
| 	LD	A,ACEX.RET_PORT | ||||
| @ -819,18 +839,29 @@ Check_Spec_Page: | ||||
| 
 | ||||
| 	LD A,(#FFF7) | ||||
| 	CP 'R' | ||||
| 	JR NZ,Spec_Page_handler_OK		 | ||||
| 	;JR NZ,Spec_Page_handler_OK		 | ||||
| 	JR NZ,Spec_Page_handler_Next	;!TEST 31/12/23 祚戶瘔惩恥<E683A9> 栽 蜾亦爸 <20>穿漼	 | ||||
| 	LD A,(#FFF8) | ||||
| 	CP 'S' | ||||
| 	JR NZ,Spec_Page_handler_OK | ||||
| 	;JR NZ,Spec_Page_handler_OK | ||||
| 	JR NZ,Spec_Page_handler_Next	;!TEST 31/12/23 祚戶瘔惩恥<E683A9> 栽 蜾亦爸 <20>穿漼 | ||||
| 	LD A,(#FFF9) | ||||
| 	CP 'T' | ||||
| 	JR NZ,Spec_Page_handler_OK | ||||
| 	;JR NZ,Spec_Page_handler_OK | ||||
| 	JR NZ,Spec_Page_handler_Next	;!TEST 31/12/23 祚戶瘔惩恥<E683A9> 栽 蜾亦爸 <20>穿漼 | ||||
| 
 | ||||
| 	XOR A | ||||
| 	LD (#FFF7),A | ||||
| 
 | ||||
| 	JR Check_EE_Port.After_Hard_Rst | ||||
| 	; | ||||
| 	;!TEST 31/12/23 祚戶瘔惩恥<E683A9> 栽 蜾亦爸 <20>穿漼 | ||||
| Spec_Page_handler_Next: | ||||
| 	LD	A,R | ||||
| 	AND	#80 | ||||
| 	JR	Z,Spec_Page_handler_OK | ||||
| 	XOR	A | ||||
| 	LD	R,A | ||||
| ;--------------------------------------- | ||||
| No_Reset_handlers: | ||||
| init_rom_address        EQU #8200                                       ;!HARDCODE | ||||
| @ -870,8 +901,8 @@ init_rom_address        EQU #8200                                       ;!HARDCO | ||||
| ;--------------------------------------- | ||||
| 
 | ||||
| Spec_Page_handler_OK: | ||||
| 	pop af | ||||
| 	OUT (SLOT3),A | ||||
| 	POP	AF | ||||
| 	OUT	(SLOT3),A | ||||
| 
 | ||||
| 	ENDMODULE | ||||
| ;[---------------------------------------------------------------------] | ||||
|  | ||||
| @ -100,7 +100,7 @@ | ||||
| 	DEC D								; multiple config! | ||||
| 
 | ||||
| .ONES_CONFIG: | ||||
| 	LD      IY,#0107	;!HARDCODE				;!!!!! ¯®¤ã¬ âì))) | ||||
| 	LD      IY,SP2000_Loader_Flag | ||||
|         ;!TEST | ||||
|          ;LD    IX,#FFFD | ||||
|          LD     IX,SP2000_ConfID					;!!!!! ¯®¤ã¬ âì))) | ||||
|  | ||||
| @ -2,6 +2,7 @@ | ||||
| ;---------[All shared defines]----------  | ||||
| 	DEFINE	DEBUG			1			; ¤®¡ ¢«ï¥â áâப㠨 á®®¡é¥¨¥ ® â¥á⮢®© ᡮથ   áâ à⮢®¬ íªà ¥ | ||||
| 	DEFINE	PACKED_MAIN		0			; ¯ ª®¢ âì MAIN ¨«¨ ¢«¥§ ¥â ¡¥§ í⮣®? | ||||
| 	DEFINE	SP2000_Loader_Flag	#0107 | ||||
| 	DEFINE	SP2000_ConfID		#FEFF			;  | ||||
| 	DEFINE	IDE_Optimization	1			; á«¥£ª  ®¯â¨¬¨§¨àã¥â ¥ª®â®àë¥ ¯à®æ¥¤ãàë à ¡®âë á HDD | ||||
| 	DEFINE	NeedSafePort_Y		1			; !!!!! ¥á«¨ 0, â® ¢ ०¨¬¥ sp-ᯥªâà㬠 ¥ª®â®àë¥ ¯à®æ¥¤ãàë ¬®£ãâ § áà âì íªà  | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user
	 Anatoliy Belyanskiy
						Anatoliy Belyanskiy