...

constants/SP2000.inc

@@ -9,7 +9,7 @@
 
 ;ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ;
  STRUCT	_#ZX_TASK_DATA
-.STATE		BYTE	0	; +00	b0 - ᢮¡®¤­ /á®åà ­¥­ , b1 - ¦¤ñâ/à ¡®â ¥â
+.STATE		BYTE	0	; +00	b0 - ᢮¡®¤­ /á®åà ­¥­ , b1 - ¦¤ñâ/à ¡®â ¥â, b2 - áâ ­¤ àâ­ ï/ª á⮬­ ï ¯ «¨âà  
 .SLOT3_PAGE	BYTE	0	; +01	âà¥âìï áâà ­¨æ  § ¤ ç¨
 .SP		WORD	0	; +02	㪠§ â¥«ì ­  áâíª
 .TYPE		BYTE	0	; +04	⨯ â çª¨: 0 - 48k, 1 - Pent128, 2 - Pent512, 3 - Scorp256
@@ -482,6 +482,11 @@ PORT_SCALE		EQU #FC					;
 ;VIDEO_PAGE		EQU #50
 
 Port_All_Mode		EQU	#204E
+.SPECTRUM_MODE_OFF	EQU	1	; ACC on, KBD Int on, ZX Screen off
+.MEM_WAITS_OFF		EQU	4
+.STOP_KBD_INT_OFF	EQU	8
+.RESERVED		EQU	#F2
+.DEFAULT		EQU	.RESERVED + .STOP_KBD_INT_OFF + .MEM_WAITS_OFF + .SPECTRUM_MODE_OFF
 ; bit0 - 0: ¢ëª«  ªá¥«¥à â®à  ¨ ¯à¥à뢠­¨© ®â ª« ¢¨ âãàë, ¢ª«î祭¨¥ ᯥª®¢áª®©  ¤à¥á æ¨¨ íªà ­ .
 ; bit1 - 
 ; bit2 - ¢ª«/¢ëª« original zx spectrum waits
@@ -938,10 +943,6 @@ DrivesSetup_1		EQU	#11
 .Mask.PriIDEmaster		EQU %0011'0000 * 256 + DrivesSetup_1	; IDE Pri Master  Auto/Setup/Disabled
 .Mask.PriIDEslave		EQU %1100'0000 * 256 + DrivesSetup_1	; IDE Pri Slave  Auto/Setup/Disabled
 
-DrivesSetup_2		EQU	#20
-.Mask.SecIDEmaster	EQU	%0011'0000 * 256 + DrivesSetup_2	; IDE Sec Master  Auto/Setup/Disabled
-.Mask.SecIDEslave	EQU	%1100'0000 * 256 + DrivesSetup_2	; IDE Sec Slave  Auto/Setup/Disabled
-
 IDE_Setup.PriMaster:
 .CylindersLow		EQU	#12
 .CylindersHigh		EQU	#13
@@ -954,53 +955,28 @@ IDE_Setup.PriSlave:
 .Heads			EQU	#18
 .Sectros		EQU	#19
 
-IDE_Setup.SecMaster:
-.CylindersLow		EQU	#37
-.CylindersHigh		EQU	#38
-.Heads			EQU	#39
-.Sectros		EQU	#3A
-
-IDE_Setup.SecSlave:
-.CylindersLow		EQU	#3B
-.CylindersHigh		EQU	#3C
-.Heads			EQU	#3D
-.Sectros		EQU	#3E
-
 ScreenSET		EQU	#1A
 .Mask.ColorStyle		EQU %0000'1111 * 256 + ScreenSET	; COLOR STYLE For Setup
 .Mask.Int			EQU %0011'0000 * 256 + ScreenSET	; Frame Int (Default/Pentagon/Scorpion/Original)
 .Mask.Sinc			EQU %1100'0000 * 256 + ScreenSET	; Screen V-Sinc (Default/312 lines 50 HZ/320 Lines 49 Hz)
 
-;!FIXIT <EFBFBD>… ˆ‘<EFBFBD>Ž‹œ‡“…’‘Ÿ
+;;;;;;;;;;;;;;;;;;;;;;; CONFIG_DE ;;;;;;;;;;;;;;;;;;;;;;;
-HardwareConfiguration	EQU	#1B ; !!!!! or #36
+;‘â à®¥ §­ ç¥­¨¥.
-.Mask.TurboMode		EQU	%0000'0001	; TURBO MODE (D0..D3 - 6 OR 7)
+;HardwareConfiguration	EQU	#1B
-.Mask.TurboExchange	EQU	%0000'0010	; TURBO EXCHANGE ON/OFF - 1
+;.Mask.TurboMode		EQU %0000'0001				; TURBO MODE (D0..D3 - 6 OR 7)
-.Mask.PortExchange	EQU	%0000'0100	; PORT EXCHANGE ON/OFF - 1
+;.Mask.TurboExchange		EQU %0000'0010				; TURBO EXCHANGE ON/OFF - 1
-.Mask.Computer		EQU	%0001'1000	; COMPUTER: 0-SPRINTER, 1-Scorpion 256, 2-PENTAGON 128, 3-Pentagon 512 ;!FIXIT ZX_CONFIG
+;.Mask.PortExchange		EQU %0000'0100				; PORT EXCHANGE ON/OFF - 1
-
+;.Mask.Computer			EQU %0001'1000				; COMPUTER: 0-SPRINTER, 1-Scorpion 256, 2-PENTAGON 128, 3-Other
-;!FIXIT <EFBFBD>… ˆ‘<EFBFBD>Ž‹œ‡“…’‘Ÿ
+;
-;REGISTER #35 - BASIC SETTING 1 (SYS_PAGE.CONFIG_DE+1 = #C13B on PAGE #FE) 
+;‘â à®¥ §­ ç¥­¨¥.
-;ZX_RST_TO		EQU	#001C  - old variant
+;ZX_RST_TO		EQU	#1C
-ZX_RST_TO		EQU	#35
+;.BASIC_128			EQU 0
-.BASIC_128		EQU	0
+;.BASIC_48_RAM128		EQU 1
-.BASIC_48_RAM128	EQU	1
+;.TRDOS				EQU 2
-.TRDOS			EQU	2
+;.EXPANSION			EQU 3
-.EXPANSION		EQU	3
+;.TRDOS_48			EQU 4
-.TRDOS_48		EQU	4
+;.BASIC_48			EQU 5
-.BASIC_48		EQU	5
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-;!FIXIT <EFBFBD>… ˆ‘<EFBFBD>Ž‹œ‡“…’‘Ÿ
-;REGISTER #36 - BASIC SETTING 2		; áâ àë¥ §­ ç¥­¨ï ­¥¨§¢¥áâ­ë
-; %0000 0111
-ZX_CONFIG		EQU	#36
-	; ­®¢ë¥ §­ ç¥­¨ï:		;!FIXIT HardwareConfiguration
-.ZX_Sprinter		EQU	0
-.Pentagon_48		EQU	1
-.Pentagon_128		EQU	2
-.Pentagon_512		EQU	3
-.Scorpion_256		EQU	4
-.ZX_Spectrum_48		EQU	5
-.ZX_Spectrum_128 	EQU	6
 
 Options			EQU	#1D
 .Mask.HDDwriteProtect		EQU %0000'0001 * 256 + Options ; [x] ã¡à ­®. à ¡®â «® ⮫쪮 á äã­ªæ¨ï¬¨ 5å ¨ ¯®áâ®ï­­® ¤ñ࣠«® CMOS ¯à¨ § ¯¨á¨
@@ -1017,8 +993,51 @@ ScreenPosition 		EQU	#1F
 .Mask.X				EQU %1111'0000 * 256 + ScreenPosition
 .Mask.Y				EQU %0000'1111 * 256 + ScreenPosition
 
+DrivesSetup_2		EQU	#20
+.Mask.SecIDEmaster		EQU %0011'0000 * 256 + DrivesSetup_2	; IDE Sec Master  Auto/Setup/Disabled
+.Mask.SecIDEslave		EQU %1100'0000 * 256 + DrivesSetup_2	; IDE Sec Slave  Auto/Setup/Disabled
+
+
+
+; <EFBFBD>… ˆ‘<EFBFBD>Ž‹œ‡“…’‘Ÿ, â㤠 áàãâ áâ àë¥ ¯à®£¨ ¨ vROM
+;REGISTER #35 - BASIC SETTING 1 (SYS_PAGE.CONFIG_DE+1 = #C13B on PAGE #FE), §­ ç¥­¨¥ ¤«ï CNF_PORT
+HardwareConfiguration	EQU	#35
+
+; <EFBFBD>… ˆ‘<EFBFBD>Ž‹œ‡“…’‘Ÿ ¯®ª 
+;REGISTER #36 - BASIC SETTING 2
+; %0000 0111
+ZX_CONFIG		EQU	#36
+.ZX_Sprinter		EQU	0
+.Pentagon_48		EQU	1
+.Pentagon_128		EQU	2
+.Pentagon_512		EQU	3
+.Scorpion_256		EQU	4
+.ZX_Spectrum_48		EQU	5
+.ZX_Spectrum_128 	EQU	6
+
+IDE_Setup.SecMaster:
+.CylindersLow		EQU	#37
+.CylindersHigh		EQU	#38
+.Heads			EQU	#39
+.Sectros		EQU	#3A
+
+IDE_Setup.SecSlave:
+.CylindersLow		EQU	#3B
+.CylindersHigh		EQU	#3C
+.Heads			EQU	#3D
+.Sectros		EQU	#3E
+
 CheckSum		EQU	CMOS.Cell.CheckSum
 
+; Disabled use word CONFIG_DE
+;
+;	LD	A,#1C
+;	CALL	READCMS
+;	PUSH	AF
+;	LD	A,#1B
+;	CALL	READCMS
+;	POP	DE
+;	LD	E,A
  ENDMODULE
 ;-----------------------------------------------------------------------
 
@@ -1618,13 +1637,6 @@ Config_PG:
 ; %11000000 - IDE Secondary SLAVE		-----//------
 ; .
 ; .
-;REGISTER#35 -	BASIC SETTING 1 (SYS_PAGE.CONFIG_DE+1 = #C13B on PAGE #FE) 
-; 0 - RESET TO BASIC 128
-; 1 - RESET TO BASIC 48 (RAM128)
-; 2 - RESET TO TRDOS
-; 3 - RESET TO EXPANSION (DON'T USE)
-; 4 - RESET TO 48 TRDOS
-; 5 - RESET TO 48 BASIC (RAM48)
 
 ;REGISTER#36 -	BASIC SETTING 2		; áâ àë¥ §­ ç¥­¨ï ­¥¨§¢¥áâ­ë
 ; %0000 0111