mirror of
https://github.com/Tolik-Trek/Shared_Includes.git
synced 2026-06-15 09:01:33 +03:00
...
This commit is contained in:
Anatoliy Belyanskiy
parent
6c92964be4
commit
947627f58f
@ -1,3 +1,6 @@
|
|||||||
|
; DEFINE StandartZXpallete 1
|
||||||
|
; DEFINE _DebuG_SAVEpallete 1
|
||||||
|
; DEFINE _DebuG_NumOfPallete 1
|
||||||
;-----------------------------------------------------------------------;
|
;-----------------------------------------------------------------------;
|
||||||
MODULE COLORS
|
MODULE COLORS
|
||||||
IFDEF StandartCGApallete
|
IFDEF StandartCGApallete
|
||||||
@ -22,6 +25,8 @@ CGA:
|
|||||||
DB #FC, #FC, #FC, #00 ; 15 WHITE <09>…‹›‰
|
DB #FC, #FC, #FC, #00 ; 15 WHITE <09>…‹›‰
|
||||||
ENDIF
|
ENDIF
|
||||||
|
|
||||||
|
; CGA
|
||||||
|
FLASH EQU #80
|
||||||
; CGA
|
; CGA
|
||||||
INC:
|
INC:
|
||||||
.BLACK EQU #00 ; —…<E28094><E280A6>›‰
|
.BLACK EQU #00 ; —…<E28094><E280A6>›‰
|
||||||
@ -59,8 +64,6 @@ PAPER:
|
|||||||
.YELLOW EQU 16*INC.YELLOW
|
.YELLOW EQU 16*INC.YELLOW
|
||||||
.WHITE EQU 16*INC.WHITE
|
.WHITE EQU 16*INC.WHITE
|
||||||
; CGA
|
; CGA
|
||||||
FLASH EQU #80
|
|
||||||
; CGA
|
|
||||||
BORDER:
|
BORDER:
|
||||||
.BLACK EQU INC.BLACK
|
.BLACK EQU INC.BLACK
|
||||||
.BLUE EQU INC.BLUE
|
.BLUE EQU INC.BLUE
|
||||||
@ -81,6 +84,9 @@ BORDER:
|
|||||||
; 7 - CYAN color index #3F #3F/#10 = 3
|
; 7 - CYAN color index #3F #3F/#10 = 3
|
||||||
|
|
||||||
ZX:
|
ZX:
|
||||||
|
.BRIGHT EQU #40
|
||||||
|
.FLASH EQU #80
|
||||||
|
;
|
||||||
.BLACK EQU #00 ; —…<E28094><E280A6>›‰
|
.BLACK EQU #00 ; —…<E28094><E280A6>›‰
|
||||||
.BLUE EQU #01 ; ‘ˆ<E28098>ˆ‰
|
.BLUE EQU #01 ; ‘ˆ<E28098>ˆ‰
|
||||||
.RED EQU #02 ; Š<>€‘<E282AC>›‰
|
.RED EQU #02 ; Š<>€‘<E282AC>›‰
|
||||||
@ -91,21 +97,172 @@ ZX:
|
|||||||
.WHITE EQU #07 ; <20>…‹›‰
|
.WHITE EQU #07 ; <20>…‹›‰
|
||||||
;
|
;
|
||||||
IFDEF StandartZXpallete
|
IFDEF StandartZXpallete
|
||||||
; ª ¦¤ë© 梥⠤«ï ᯥªâà㬮¢áª®£® ०¨¬ ¯®¢â®àï¥âáï 8 à §
|
|
||||||
; ¯ «¨âà ¯®¢â®àï¥âáï ¤«ï ª ¦¤®£® ०¨¬ :
|
MACRO _mZX_COLOR dup_num, blue, green, red, bw
|
||||||
; Paper
|
DUP dup_num
|
||||||
; Ink
|
DB blue, green, red, bw
|
||||||
; Flash Paper
|
EDUP
|
||||||
; Flash Ink
|
ENDM
|
||||||
.PALETTE: ; B G R x
|
|
||||||
DB #00, #00, #00, #00 ; 0 BLACK —…<E28094><E280A6>›‰
|
.PALETTE:
|
||||||
DB #C8, #00, #00, #19 ; 1 BLUE ‘ˆ<E28098>ˆ‰
|
include 'zx_colors.inc'
|
||||||
DB #00, #00, #C8, #32 ; 2 RED Š<>€‘<E282AC>›‰
|
_mSET_PALLET_NUMBER _DebuG_NumOfPallete
|
||||||
DB #C8, #00, #C8, #4B ; 3 MAGENTA <09>“<EFBFBD><E2809C>“<EFBFBD><E2809C>›‰
|
|
||||||
DB #00, #C8, #00, #64 ; 4 GREEN ‡…‹…<E280B9>›‰
|
IFDEF _DebuG_SAVEpallete
|
||||||
DB #C8, #C8, #00, #7D ; 5 CYAN ƒŽ‹“<E280B9>Ž‰
|
ORG 0
|
||||||
DB #00, #C8, #C8, #96 ; 6 YELLOW †…‹’›‰
|
OUTPUT 'Build/new_pall.bin'
|
||||||
DB #C8, #C8, #C8, #AF ; 7 WHITE <09>…‹›‰
|
|
||||||
ENDIF
|
ENDIF
|
||||||
|
; Paper
|
||||||
|
DUP 2
|
||||||
|
_mZX_COLOR 8, ZX_BLACK
|
||||||
|
_mZX_COLOR 8, ZX_BLUE
|
||||||
|
_mZX_COLOR 8, ZX_RED
|
||||||
|
_mZX_COLOR 8, ZX_MAGENTA
|
||||||
|
_mZX_COLOR 8, ZX_GREEN
|
||||||
|
_mZX_COLOR 8, ZX_CYAN
|
||||||
|
_mZX_COLOR 8, ZX_YELLOW
|
||||||
|
_mZX_COLOR 8, ZX_WHITE
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_BLACK
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_BLUE
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_RED
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_MAGENTA
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_GREEN
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_CYAN
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_YELLOW
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_WHITE
|
||||||
|
EDUP
|
||||||
|
|
||||||
|
; Ink
|
||||||
|
DUP 2
|
||||||
|
DUP 8
|
||||||
|
_mZX_COLOR 1, ZX_BLACK
|
||||||
|
_mZX_COLOR 1, ZX_BLUE
|
||||||
|
_mZX_COLOR 1, ZX_RED
|
||||||
|
_mZX_COLOR 1, ZX_MAGENTA
|
||||||
|
_mZX_COLOR 1, ZX_GREEN
|
||||||
|
_mZX_COLOR 1, ZX_CYAN
|
||||||
|
_mZX_COLOR 1, ZX_YELLOW
|
||||||
|
_mZX_COLOR 1, ZX_WHITE
|
||||||
|
EDUP
|
||||||
|
;
|
||||||
|
DUP 8
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_BLACK
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_BLUE
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_RED
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_MAGENTA
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_GREEN
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_CYAN
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_YELLOW
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_WHITE
|
||||||
|
EDUP
|
||||||
|
EDUP
|
||||||
|
|
||||||
|
; Flash Paper
|
||||||
|
_mZX_COLOR 8, ZX_BLACK
|
||||||
|
_mZX_COLOR 8, ZX_BLUE
|
||||||
|
_mZX_COLOR 8, ZX_RED
|
||||||
|
_mZX_COLOR 8, ZX_MAGENTA
|
||||||
|
_mZX_COLOR 8, ZX_GREEN
|
||||||
|
_mZX_COLOR 8, ZX_CYAN
|
||||||
|
_mZX_COLOR 8, ZX_YELLOW
|
||||||
|
_mZX_COLOR 8, ZX_WHITE
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_BLACK
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_BLUE
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_RED
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_MAGENTA
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_GREEN
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_CYAN
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_YELLOW
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_WHITE
|
||||||
|
;
|
||||||
|
DUP 8
|
||||||
|
_mZX_COLOR 1, ZX_BLACK
|
||||||
|
_mZX_COLOR 1, ZX_BLUE
|
||||||
|
_mZX_COLOR 1, ZX_RED
|
||||||
|
_mZX_COLOR 1, ZX_MAGENTA
|
||||||
|
_mZX_COLOR 1, ZX_GREEN
|
||||||
|
_mZX_COLOR 1, ZX_CYAN
|
||||||
|
_mZX_COLOR 1, ZX_YELLOW
|
||||||
|
_mZX_COLOR 1, ZX_WHITE
|
||||||
|
EDUP
|
||||||
|
;
|
||||||
|
DUP 8
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_BLACK
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_BLUE
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_RED
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_MAGENTA
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_GREEN
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_CYAN
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_YELLOW
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_WHITE
|
||||||
|
EDUP
|
||||||
|
;
|
||||||
|
|
||||||
|
; Flash Ink
|
||||||
|
DUP 8
|
||||||
|
_mZX_COLOR 1, ZX_BLACK
|
||||||
|
_mZX_COLOR 1, ZX_BLUE
|
||||||
|
_mZX_COLOR 1, ZX_RED
|
||||||
|
_mZX_COLOR 1, ZX_MAGENTA
|
||||||
|
_mZX_COLOR 1, ZX_GREEN
|
||||||
|
_mZX_COLOR 1, ZX_CYAN
|
||||||
|
_mZX_COLOR 1, ZX_YELLOW
|
||||||
|
_mZX_COLOR 1, ZX_WHITE
|
||||||
|
EDUP
|
||||||
|
;
|
||||||
|
DUP 8
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_BLACK
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_BLUE
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_RED
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_MAGENTA
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_GREEN
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_CYAN
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_YELLOW
|
||||||
|
_mZX_COLOR 1, ZX_BRIGHT_WHITE
|
||||||
|
EDUP
|
||||||
|
;
|
||||||
|
_mZX_COLOR 8, ZX_BLACK
|
||||||
|
_mZX_COLOR 8, ZX_BLUE
|
||||||
|
_mZX_COLOR 8, ZX_RED
|
||||||
|
_mZX_COLOR 8, ZX_MAGENTA
|
||||||
|
_mZX_COLOR 8, ZX_GREEN
|
||||||
|
_mZX_COLOR 8, ZX_CYAN
|
||||||
|
_mZX_COLOR 8, ZX_YELLOW
|
||||||
|
_mZX_COLOR 8, ZX_WHITE
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_BLACK
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_BLUE
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_RED
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_MAGENTA
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_GREEN
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_CYAN
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_YELLOW
|
||||||
|
_mZX_COLOR 8, ZX_BRIGHT_WHITE
|
||||||
|
;
|
||||||
|
IFDEF _DebuG_SAVEpallete
|
||||||
|
OUTEND
|
||||||
|
ENDIF
|
||||||
|
|
||||||
|
UNDEFINE ZX_BLACK
|
||||||
|
UNDEFINE ZX_BLUE
|
||||||
|
UNDEFINE ZX_RED
|
||||||
|
UNDEFINE ZX_MAGENTA
|
||||||
|
UNDEFINE ZX_GREEN
|
||||||
|
UNDEFINE ZX_CYAN
|
||||||
|
UNDEFINE ZX_YELLOW
|
||||||
|
UNDEFINE ZX_WHITE
|
||||||
|
UNDEFINE ZX_BRIGHT_BLACK
|
||||||
|
UNDEFINE ZX_BRIGHT_BLUE
|
||||||
|
UNDEFINE ZX_BRIGHT_RED
|
||||||
|
UNDEFINE ZX_BRIGHT_MAGENTA
|
||||||
|
UNDEFINE ZX_BRIGHT_GREEN
|
||||||
|
UNDEFINE ZX_BRIGHT_CYAN
|
||||||
|
UNDEFINE ZX_BRIGHT_YELLOW
|
||||||
|
UNDEFINE ZX_BRIGHT_WHITE
|
||||||
|
UNDEFINE StandartZXpallete
|
||||||
|
|
||||||
|
IFDEF _DebuG_SAVEpallete
|
||||||
|
UNDEFINE _DebuG_SAVEpallete
|
||||||
|
ENDIF
|
||||||
|
ENDIF
|
||||||
ENDMODULE
|
ENDMODULE
|
||||||
;-----------------------------------------------------------------------;
|
;-----------------------------------------------------------------------;
|
||||||
45
constants/zx_colors.inc
Normal file
45
constants/zx_colors.inc
Normal file
@ -0,0 +1,45 @@
|
|||||||
|
MACRO _mSET_PALLET_NUMBER number
|
||||||
|
|
||||||
|
IF number = 0
|
||||||
|
; ; B G R x
|
||||||
|
DEFINE ZX_BLACK #00, #00, #00, #00
|
||||||
|
DEFINE ZX_BLUE #C8, #00, #00, #19
|
||||||
|
DEFINE ZX_RED #00, #00, #C8, #32
|
||||||
|
DEFINE ZX_MAGENTA #C8, #00, #C8, #4B
|
||||||
|
DEFINE ZX_GREEN #00, #C8, #00, #64
|
||||||
|
DEFINE ZX_CYAN #C8, #C8, #00, #7D
|
||||||
|
DEFINE ZX_YELLOW #00, #C8, #C8, #96
|
||||||
|
DEFINE ZX_WHITE #C8, #C8, #C8, #AF
|
||||||
|
DEFINE ZX_BRIGHT_BLACK #00, #00, #00, #00
|
||||||
|
DEFINE ZX_BRIGHT_BLUE #F0, #00, #00, #1E
|
||||||
|
DEFINE ZX_BRIGHT_RED #00, #00, #F0, #3C
|
||||||
|
DEFINE ZX_BRIGHT_MAGENTA #F0, #00, #F0, #5A
|
||||||
|
DEFINE ZX_BRIGHT_GREEN #00, #F0, #00, #78
|
||||||
|
DEFINE ZX_BRIGHT_CYAN #F0, #F0, #00, #96
|
||||||
|
DEFINE ZX_BRIGHT_YELLOW #00, #F0, #F0, #B4
|
||||||
|
DEFINE ZX_BRIGHT_WHITE #F0, #F0, #F0, #D2
|
||||||
|
;
|
||||||
|
ELSEIF number = 1
|
||||||
|
; ; B G R x
|
||||||
|
DEFINE ZX_BLACK #25, #11, #11, #00
|
||||||
|
DEFINE ZX_BLUE #c4, #c9, #b0, #00
|
||||||
|
DEFINE ZX_RED #72, #22, #24, #00
|
||||||
|
DEFINE ZX_MAGENTA #62, #20, #9f, #00
|
||||||
|
DEFINE ZX_GREEN #bf, #3a, #96, #00
|
||||||
|
DEFINE ZX_CYAN #4b, #7e, #2c, #00
|
||||||
|
DEFINE ZX_YELLOW #c4, #98, #43, #00
|
||||||
|
DEFINE ZX_WHITE #37, #85, #d2, #00
|
||||||
|
DEFINE ZX_BRIGHT_BLACK #6d, #4b, #52, #00
|
||||||
|
DEFINE ZX_BRIGHT_BLUE #f1, #fc, #ff, #00
|
||||||
|
DEFINE ZX_BRIGHT_RED #be, #70, #34, #00
|
||||||
|
DEFINE ZX_BRIGHT_MAGENTA #39, #5e, #ff, #00
|
||||||
|
DEFINE ZX_BRIGHT_GREEN #f6, #69, #ff, #00
|
||||||
|
DEFINE ZX_BRIGHT_CYAN #5f, #c3, #a0, #00
|
||||||
|
DEFINE ZX_BRIGHT_YELLOW #e5, #ff, #93, #00
|
||||||
|
DEFINE ZX_BRIGHT_WHITE #6b, #f5, #fe, #00
|
||||||
|
;
|
||||||
|
ELSE
|
||||||
|
ASSERT 1,"ERROR!!! No required color set!"
|
||||||
|
ENDIF
|
||||||
|
ENDM
|
||||||
|
;;;
|
||||||
Loading…
Reference in New Issue
Block a user