reset ZX flag in Spec_Page when RAM BlockID #1 is freed
This commit is contained in:
		
							parent
							
								
									67d48d6ae5
								
							
						
					
					
						commit
						9f164542df
					
				| @ -231,7 +231,8 @@ EMM.FreeMem: | ||||
| 	AND A | ||||
| 	SCF | ||||
| 	RET Z | ||||
| 
 | ||||
| 	CP	ZX_RAM_ID | ||||
| 	CALL	Z,SET_ROM_FLAG_ZX | ||||
| 	LD L,A | ||||
| 	IN A,(SLOT3) | ||||
| 	EX AF,AF' | ||||
|  | ||||
| @ -331,4 +331,22 @@ REINIT:	DEC     B | ||||
| 	JR .loop2 | ||||
| ; | ||||
| ;----------------------------------------------------------------------; | ||||
| ; | ||||
| 
 | ||||
| ; | ||||
| ;----------------------------------------------------------------------; | ||||
| SET_ROM_FLAG_ZX: | ||||
| 	LD	C,A | ||||
| 	IN	A,(SLOT3) | ||||
| 	PUSH	AF | ||||
| 	LD	A,Spec_Page | ||||
| 	OUT	(SLOT3),A | ||||
| 	XOR	A | ||||
| 	LD	(Spec_Page.flag_Z),A | ||||
| 	LD	(Spec_Page.flag_X),A | ||||
| 	POP	AF | ||||
| 	OUT	(SLOT3),A | ||||
| 	LD	A,C | ||||
| 	RET | ||||
| ;----------------------------------------------------------------------; | ||||
| ; | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user
	 Anatoliy Belyanskiy
						Anatoliy Belyanskiy