This commit is contained in:
Anatoliy Belyanskiy 2023-09-10 06:01:10 +10:00
parent 90f4b54edb
commit 6c92964be4
2 changed files with 95 additions and 63 deletions

View File

@ -260,31 +260,19 @@ KEMPSTON:
;---------------[Border]---------------- ;---------------[Border]----------------
BorderColor EQU #FE BorderColor EQU #FE
; bit 2..0:
; bit 0 - ᨭ¨©
; bit 1 - ªà á­ë©
; bit 2 - §¥«ñ­ë©
; 0 - çñà­ë©
; 1 - ᨭ¨©
; 2 - ªà á­ë©
; 3 - ¯ãà¯ãà­ë©
; 4 - §¥«ñ­ë©
; 5 - £®«ã¡®©
; 6 - ¦ñ«âë©
; 7 - ¡¥«ë©
;
; 梥⠡®à¤îà  ¢ ०¨¬¥ á¯à¨­â¥à  ¡¥àñâáï ¨§ 4 ¯ «¨âàë. ; 梥⠡®à¤îà  ¢ ०¨¬¥ á¯à¨­â¥à  ¡¥àñâáï ¨§ 4 ¯ «¨âàë.
; 梥⠢ ¯ «¨âॠ¢ëç¨á«ï¥âáï ¤ã¡«¨à®¢ ­¨¥¬ ¢ ¡ ©â¥ æ¢¥â  bit2..0 ¢ bit5..3 ; 梥⠢ ¯ «¨âॠ¢ëç¨á«ï¥âáï ¤ã¡«¨à®¢ ­¨¥¬ ¢ ­®¬¥à¥ æ¢¥â  ¡®à¤îà  bit2..0 ¢ bit5..3
; ¬®¦­® ¢ëç¨á«ïâì ¨â®£®¢ë© ¨­¤¥ªá ¢ ¯ «¨âॠ㬭®¦¥­¨¥¬ æ¢¥â  ­  9, «¨¡® ; ¬®¦­® ¢ëç¨á«ïâì ¨â®£®¢ë© ¨­¤¥ªá ¢ ¯ «¨âॠ㬭®¦¥­¨¥¬ æ¢¥â  ­  9, «¨¡®
; âਠᤢ¨£  æ¢¥â  ¢«¥¢® ¯«îá ¨á室­ë© æ¢¥â æ¢¥â ; âਠᤢ¨£  æ¢¥â  ¢«¥¢® ¯«îá ¨á室­ë© 梥â. Š ¦¤ë© 梥⠢ ¤¥ä®«â­®© ¯ «¨âà¥
; 0 - BLACK color index #00 ; ¯®¢â®àï¥âáï 16 à §:
; 1 - BRIGHT BLUE color index #09 ; 0 - BLACK color index #00 #00/#10 = 0
; 2 - GREEN color index #12 ; 1 - BLACK color index #00 #00/#10 = 0
; 3 - BRIGHT CYAN color index #1B ; 2 - BLUE color index #12 #12/#10 = 1
; 4 - RED color index #24 ; 3 - BLUE color index #1B #1B/#10 = 1
; 5 - BRIGHT MAGENTA color index #2D ; 4 - GREEN color index #24 #24/#10 = 2
; 6 - BROWN color index #36 ; 5 - GREEN color index #2D #2D/#10 = 2
; 7 - WHITE color index #3F ; 6 - CYAN color index #36 #36/#10 = 3
; 7 - CYAN color index #3F #3F/#10 = 3
;--------------------------------------- ;---------------------------------------
;-------------[ZX keyboard]------------- ;-------------[ZX keyboard]-------------

View File

@ -1,43 +1,46 @@
;-----------------------------------------------------------------------; ;-----------------------------------------------------------------------;
MODULE COLORS MODULE COLORS
IFDEF StandartCGApallete IFDEF StandartCGApallete
; ª ¦¤ë© 梥⠤«ï ⥪á⮢®£® ०¨¬  ¯®¢â®àï¥âáï 16 à §
CGA: CGA:
; B G R _ ; B G R x
.PALETTE: DB #00,#00,#00,#00 ; 0 BLACK .PALETTE: DB #00, #00, #00, #00 ; 0 BLACK —…<E28094><E280A6>
DB #A8,#00,#00,#00 ; 1 BLUE DB #A8, #00, #00, #00 ; 1 BLUE ˆ<E28098>ˆ
DB #00,#A8,#00,#00 ; 2 GREEN DB #00, #A8, #00, #00 ; 2 GREEN ‡…<E280B9>
DB #A8,#A8,#00,#00 ; 3 CYAN DB #A8, #A8, #00, #00 ; 3 CYAN ƒŽ<E280B9>މ
DB #00,#00,#A8,#00 ; 4 RED DB #00, #00, #A8, #00 ; 4 RED Š<><E282AC>
DB #A8,#00,#A8,#00 ; 5 MAGENTA DB #A8, #00, #A8, #00 ; 5 MAGENTA <09><EFBFBD><E2809C><EFBFBD><E2809C>
DB #00,#54,#A8,#00 ; 6 BROWN DB #00, #54, #A8, #00 ; 6 BROWN ŠŽ<C5A0>ˆ<CB86>
DB #A8,#A8,#A8,#00 ; 7 WHITE DB #A8, #A8, #A8, #00 ; 7 WHITE <09>
DB #54,#54,#54,#00 ; 8 GRAY DB #54, #54, #54, #00 ; 8 GRAY <E28098>
DB #FC,#54,#54,#00 ; 9 BRIGHT BLUE DB #FC, #54, #54, #00 ; 9 BRIGHT BLUE Ÿ<>ŠŽ-ƒŽ<E280B9>މ
DB #54,#FC,#54,#00 ; 10 BRIGHT GREEN DB #54, #FC, #54, #00 ; 10 BRIGHT GREEN Ÿ<>ŠŽ-‡…<E280B9>
DB #FC,#FC,#54,#00 ; 11 BRIGHT CYAN DB #FC, #FC, #54, #00 ; 11 BRIGHT CYAN Ÿ<>ŠŽ-ƒŽ<E280B9>މ
DB #54,#54,#FC,#00 ; 12 BRIGHT RED DB #54, #54, #FC, #00 ; 12 BRIGHT RED Ÿ<>ŠŽ-Š<><E282AC>
DB #FC,#54,#FC,#00 ; 13 BRIGHT MAGENTA DB #FC, #54, #FC, #00 ; 13 BRIGHT MAGENTA Ÿ<>ŠŽ-<2D><EFBFBD><E2809C><EFBFBD><E2809C>
DB #54,#FC,#FC,#00 ; 14 YELLOW DB #54, #FC, #FC, #00 ; 14 YELLOW †…‹’›‰
DB #FC,#FC,#FC,#00 ; 15 WHITE DB #FC, #FC, #FC, #00 ; 15 WHITE <09>
ENDIF ENDIF
;
; CGA
INC: INC:
.BLACK EQU #00 .BLACK EQU #00 ; —…<E28094><E280A6>
.BLUE EQU #01 .BLUE EQU #01 ; ˆ<E28098>ˆ
.GREEN EQU #02 .GREEN EQU #02 ; ‡…<E280B9>
.CYAN EQU #03 .CYAN EQU #03 ; ƒŽ<E280B9>މ
.RED EQU #04 .RED EQU #04 ; Š<><E282AC>
.MAGENTA EQU #05 .MAGENTA EQU #05 ; <20><EFBFBD><E2809C><EFBFBD><E2809C>
.BROWN EQU #06 .BROWN EQU #06 ; ŠŽ<C5A0>ˆ<CB86>
.LGRAY EQU #07 .LGRAY EQU #07 ; <20>
.DGRAY EQU #08 .DGRAY EQU #08 ; <E28098>
.LBLUE EQU #09 .LBLUE EQU #09 ; Ÿ<>ŠŽ-ƒŽ<E280B9>މ
.LGREEN EQU #0A .LGREEN EQU #0A ; Ÿ<>ŠŽ-‡…<E280B9>
.LCYAN EQU #0B .LCYAN EQU #0B ; Ÿ<>ŠŽ-ƒŽ<E280B9>މ
.LRED EQU #0C .LRED EQU #0C ; Ÿ<>ŠŽ-Š<><E282AC>
.LMAGENT EQU #0D .LMAGENT EQU #0D ; Ÿ<>ŠŽ-<2D><EFBFBD><E2809C><EFBFBD><E2809C>
.YELLOW EQU #0E .YELLOW EQU #0E ; †…‹’›‰
.WHITE EQU #0F .WHITE EQU #0F ; <20>
; CGA
PAPER: PAPER:
.BLACK EQU 16*INC.BLACK .BLACK EQU 16*INC.BLACK
.BLUE EQU 16*INC.BLUE .BLUE EQU 16*INC.BLUE
@ -55,13 +58,54 @@ PAPER:
.LMAGENTA EQU 16*INC.LMAGENT .LMAGENTA EQU 16*INC.LMAGENT
.YELLOW EQU 16*INC.YELLOW .YELLOW EQU 16*INC.YELLOW
.WHITE EQU 16*INC.WHITE .WHITE EQU 16*INC.WHITE
; ; CGA
FLASH EQU #80 FLASH EQU #80
; ; CGA
BORDER: BORDER:
.BLACK EQU #00 ; 01 .BLACK EQU INC.BLACK
.BLUE EQU #02 ; 03 .BLUE EQU INC.BLUE
.GREEN EQU #04 ; 05 .GREEN EQU INC.GREEN
.GRAY EQU #06 ; 07 .CYAN EQU INC.CYAN
; 梥⠡®à¤îà  ¢ ०¨¬¥ á¯à¨­â¥à  ¡¥àñâáï ¨§ 4 ¯ «¨âàë.
; 梥⠢ ¯ «¨âॠ¢ëç¨á«ï¥âáï ¤ã¡«¨à®¢ ­¨¥¬ ¢ ­®¬¥à¥ æ¢¥â  ¡®à¤îà  bit2..0 ¢ bit5..3
; ¬®¦­® ¢ëç¨á«ïâì ¨â®£®¢ë© ¨­¤¥ªá ¢ ¯ «¨âॠ㬭®¦¥­¨¥¬ æ¢¥â  ­  9, «¨¡®
; âਠᤢ¨£  æ¢¥â  ¢«¥¢® ¯«îá ¨á室­ë© 梥â. Š ¦¤ë© 梥⠢ ¤¥ä®«â­®© ¯ «¨âà¥
; ¯®¢â®àï¥âáï 16 à §:
; 0 - BLACK color index #00 #00/#10 = 0
; 1 - BLACK color index #00 #00/#10 = 0
; 2 - BLUE color index #12 #12/#10 = 1
; 3 - BLUE color index #1B #1B/#10 = 1
; 4 - GREEN color index #24 #24/#10 = 2
; 5 - GREEN color index #2D #2D/#10 = 2
; 6 - CYAN color index #36 #36/#10 = 3
; 7 - CYAN color index #3F #3F/#10 = 3
ZX:
.BLACK EQU #00 ; —…<E28094><E280A6>
.BLUE EQU #01 ; ˆ<E28098>ˆ
.RED EQU #02 ; Š<><E282AC>
.MAGENTA EQU #03 ; <20><EFBFBD><E2809C><EFBFBD><E2809C>
.GREEN EQU #04 ; ‡…<E280B9>
.CYAN EQU #05 ; ƒŽ<E280B9>މ
.YELLOW EQU #06 ; †…‹’›‰
.WHITE EQU #07 ; <20>
;
IFDEF StandartZXpallete
; ª ¦¤ë© 梥⠤«ï ᯥªâà㬮¢áª®£® ०¨¬  ¯®¢â®àï¥âáï 8 à §
; ¯ «¨âà  ¯®¢â®àï¥âáï ¤«ï ª ¦¤®£® ०¨¬ :
; Paper
; Ink
; Flash Paper
; Flash Ink
.PALETTE: ; B G R x
DB #00, #00, #00, #00 ; 0 BLACK —…<E28094><E280A6>
DB #C8, #00, #00, #19 ; 1 BLUE ˆ<E28098>ˆ
DB #00, #00, #C8, #32 ; 2 RED Š<><E282AC>
DB #C8, #00, #C8, #4B ; 3 MAGENTA <09><EFBFBD><E2809C><EFBFBD><E2809C>
DB #00, #C8, #00, #64 ; 4 GREEN ‡…<E280B9>
DB #C8, #C8, #00, #7D ; 5 CYAN ƒŽ<E280B9>މ
DB #00, #C8, #C8, #96 ; 6 YELLOW †…‹’›‰
DB #C8, #C8, #C8, #AF ; 7 WHITE <09>
ENDIF
ENDMODULE ENDMODULE
;-----------------------------------------------------------------------; ;-----------------------------------------------------------------------;