Tolik-Trek/Shared_Includes
1
0
Fork 0
mirror of https://github.com/Tolik-Trek/Shared_Includes.git synced 2026-06-15 00:51:32 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity
main
Shared_Includes/constants/standart_colors.inc
Tolik 1b6a539aea ...
2025-05-22 22:51:41 +10:00

262 lines
6.5 KiB
PHP
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

;DEFINE StandartZXpallete 1
;DEFINE _DebuG_SAVEpallete 1
;DEFINE _DebuG_NumOfPallete 2
;-----------------------------------------------------------------------;
MODULE COLORS
MODULE CGA
IFDEF StandartCGApallete
; ª ¦¤ë© 梥⠤«ï ⥪á⮢®£® ०¨¬  ¯®¢â®àï¥âáï 16 à §
; B G R x
PALETTE: DB #00, #00, #00, #00 ; 0 BLACK —…<E28094><E280A6>›‰
DB #A8, #00, #00, #00 ; 1 BLUE ‘ˆ<E28098>ˆ‰
DB #00, #A8, #00, #00 ; 2 GREEN ‡…‹…<E280B9>›‰
DB #A8, #A8, #00, #00 ; 3 CYAN ƒŽ‹“<E280B9>Ž‰
DB #00, #00, #A8, #00 ; 4 RED Š<>€‘<E282AC>›‰
DB #A8, #00, #A8, #00 ; 5 MAGENTA <09>“<EFBFBD><E2809C>“<EFBFBD><E2809C>›‰
DB #00, #54, #A8, #00 ; 6 BROWN ŠŽ<C5A0>ˆ—<CB86>…‚›‰
DB #A8, #A8, #A8, #00 ; 7 WHITE <09>…‹›‰
DB #54, #54, #54, #00 ; 8 GRAY ‘…<E28098>›‰
DB #FC, #54, #54, #00 ; 9 BRIGHT BLUE Ÿ<>ŠŽ-ƒŽ‹“<E280B9>Ž‰
DB #54, #FC, #54, #00 ; 10 BRIGHT GREEN Ÿ<>ŠŽ-‡…‹…<E280B9>›‰
DB #FC, #FC, #54, #00 ; 11 BRIGHT CYAN Ÿ<>ŠŽ-ƒŽ‹“<E280B9>Ž‰
DB #54, #54, #FC, #00 ; 12 BRIGHT RED Ÿ<>ŠŽ-Š<>€‘<E282AC>›‰
DB #FC, #54, #FC, #00 ; 13 BRIGHT MAGENTA Ÿ<>ŠŽ-<2D>“<EFBFBD><E2809C>“<EFBFBD><E2809C>›‰
DB #54, #FC, #FC, #00 ; 14 YELLOW †…‹’›‰
DB #FC, #FC, #FC, #00 ; 15 WHITE <09>…‹›‰
.ColNum EQU ($-PALETTE)/4
ENDIF
; CGA
FLASH EQU #80
; CGA
INK:
.BLACK EQU #00 ; —…<E28094><E280A6>›‰
.BLUE EQU #01 ; ‘ˆ<E28098>ˆ‰
.GREEN EQU #02 ; ‡…‹…<E280B9>›‰
.CYAN EQU #03 ; ƒŽ‹“<E280B9>Ž‰
.RED EQU #04 ; Š<>€‘<E282AC>›‰
.MAGENTA EQU #05 ; <20>“<EFBFBD><E2809C>“<EFBFBD><E2809C>›‰
.BROWN EQU #06 ; ŠŽ<C5A0>ˆ—<CB86>…‚›‰
.LGRAY EQU #07 ; ‘‚…’‹Ž-‘…<E28098>›‰
.DGRAY EQU #08 ; ‘…<E28098>›‰
.LBLUE EQU #09 ; Ÿ<>ŠŽ-ƒŽ‹“<E280B9>Ž‰
.LGREEN EQU #0A ; Ÿ<>ŠŽ-‡…‹…<E280B9>›‰
.LCYAN EQU #0B ; Ÿ<>ŠŽ-ƒŽ‹“<E280B9>Ž‰
.LRED EQU #0C ; Ÿ<>ŠŽ-Š<>€‘<E282AC>›‰
.LMAGENT EQU #0D ; Ÿ<>ŠŽ-<2D>“<EFBFBD><E2809C>“<EFBFBD><E2809C>›‰
.YELLOW EQU #0E ; †…‹’›‰
.WHITE EQU #0F ; <20>…‹›‰
; CGA
PAPER:
.BLACK EQU 16*INK.BLACK
.BLUE EQU 16*INK.BLUE
.GREEN EQU 16*INK.GREEN
.CYAN EQU 16*INK.CYAN
.RED EQU 16*INK.RED
.MAGENTA EQU 16*INK.MAGENTA
.BROWN EQU 16*INK.BROWN
.LGRAY EQU 16*INK.LGRAY
; CGA
BORDER:
.BLACK EQU 0
.BLUE EQU 2
.GREEN EQU 4
.CYAN EQU 6
; 梥⠡®à¤îà  ¢ ०¨¬¥ á¯à¨­â¥à  ¡¥àñâáï ¨§ 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
ENDMODULE ; CGA
ZX:
.BRIGHT EQU #40
.FLASH EQU #80
;
.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
MACRO _mZX_COLOR dup_num, blue, green, red, bw
DUP dup_num
DB blue, green, red, bw
EDUP
ENDM
.PALETTE:
include 'zx_colors.inc'
_mSET_PALLET_NUMBER _DebuG_NumOfPallete
IFDEF _DebuG_SAVEpallete
ORG 0
OUTPUT 'Build/new_pall.bin'
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
;-----------------------------------------------------------------------;
Reference in New Issue View Git Blame Copy Permalink