Skip to content

Instantly share code, notes, and snippets.

@denisshevchenko

denisshevchenko/brickColors.hs

Last active July 10, 2019 21:37
Show Gist options
  • Save denisshevchenko/f5048b03cc4a4c963b985fedc19880f9 to your computer and use it in GitHub Desktop.
Save denisshevchenko/f5048b03cc4a4c963b985fedc19880f9 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
brickColors.hs
color240CodeToRGB :: Word8 -> Maybe (Int, Int, Int)
color240CodeToRGB n = case n of
0 -> Just (0, 0, 0) - тёмно-синий
1 -> Just (0, 0, 95) - градация вверх
2 -> Just (0, 0, 135) - градация вверх
3 -> Just (0, 0, 175) - градация вверх
4 -> Just (0, 0, 215) - градация вверх
5 -> Just (0, 0, 255) - более светло-синий
6 -> Just (0, 95, 0) - тёмно-зелёный неяркий
7 -> Just (0, 95, 95) - тёмно-лазуревый
8 -> Just (0, 95, 135) - лазурево-голубой тёмный
9 -> Just (0, 95, 175) - голубой насыщенный
10 -> Just (0, 95, 215) - голубой насыщенный светлее
11 -> Just (0, 95, 255) - ещё светлее чуток
12 -> Just (0, 135, 0) - зелёный как трава
13 -> Just (0, 135, 95) - чуть с голубинкой
14 -> Just (0, 135, 135) - в лазурь
15 -> Just (0, 135, 175) - голубой приятный
16 -> Just (0, 135, 215) - голубой приятный светлее
17 -> Just (0, 135, 255) - голубой приятный ещё светлее
18 -> Just (0, 175, 0) - зелёный как трава светлее
19 -> Just (0, 175, 95) - зелёный как трава светлее, более бледный
20 -> Just (0, 175, 135) - в лазурь
21 -> Just (0, 175, 175) - в голубину
22 -> Just (0, 175, 215) - тоже голубой почти
23 -> Just (0, 175, 255) - тоже голубой почти светлее
24 -> Just (0, 215, 0) -
25 -> Just (0, 215, 95)
26 -> Just (0, 215, 135)
27 -> Just (0, 215, 175)
28 -> Just (0, 215, 215)
29 -> Just (0, 215, 255) - тоже до голубого градация
30 -> Just (0, 255, 0)
31 -> Just (0, 255, 95)
32 -> Just (0, 255, 135)
33 -> Just (0, 255, 175)
34 -> Just (0, 255, 215)
35 -> Just (0, 255, 255) - та же градация к голубому, но более яркая
36 -> Just (95, 0, 0) - тёмно-тёмно красный
37 -> Just (95, 0, 95) - тёмно-бардовый
38 -> Just (95, 0, 135) - тёмно-фиолетовый
39 -> Just (95, 0, 175) - фиолетовый
40 -> Just (95, 0, 215) - сине-фиолетовый
41 -> Just (95, 0, 255) - синий яркий
42 -> Just (95, 95, 0) - типа тёмного хаки
43 -> Just (95, 95, 95) - тёмно-серый
44 -> Just (95, 95, 135) - серо-синий
45 -> Just (95, 95, 175) - светлее
46 -> Just (95, 95, 215) - голубоватый
47 -> Just (95, 95, 255) - голубой
48 -> Just (95, 135, 0) - типа тёмно-салатовый
49 -> Just (95, 135, 95) - чуть сероватый
50 -> Just (95, 135, 135) - дымчатый
51 -> Just (95, 135, 175) - дымчатый, но бледнее
52 -> Just (95, 135, 215) - голубее
53 -> Just (95, 135, 255) - голубой
54 -> Just (95, 175, 0) - зелёно-салатовый
55 -> Just (95, 175, 95) -
56 -> Just (95, 175, 135) -
57 -> Just (95, 175, 175)
58 -> Just (95, 175, 215)
59 -> Just (95, 175, 255)
60 -> Just (95, 215, 0)
61 -> Just (95, 215, 95)
62 -> Just (95, 215, 135)
63 -> Just (95, 215, 175)
64 -> Just (95, 215, 215)
65 -> Just (95, 215, 255)
66 -> Just (95, 255, 0)
67 -> Just (95, 255, 95)
68 -> Just (95, 255, 135)
69 -> Just (95, 255, 175)
70 -> Just (95, 255, 215)
71 -> Just (95, 255, 255)
72 -> Just (135, 0, 0)
73 -> Just (135, 0, 95)
74 -> Just (135, 0, 135)
75 -> Just (135, 0, 175)
76 -> Just (135, 0, 215)
77 -> Just (135, 0, 255)
78 -> Just (135, 95, 0)
79 -> Just (135, 95, 95)
80 -> Just (135, 95, 135)
81 -> Just (135, 95, 175)
82 -> Just (135, 95, 215)
83 -> Just (135, 95, 255)
84 -> Just (135, 135, 0)
85 -> Just (135, 135, 95)
86 -> Just (135, 135, 135)
87 -> Just (135, 135, 175)
88 -> Just (135, 135, 215)
89 -> Just (135, 135, 255)
90 -> Just (135, 175, 0)
91 -> Just (135, 175, 95)
92 -> Just (135, 175, 135)
93 -> Just (135, 175, 175)
94 -> Just (135, 175, 215)
95 -> Just (135, 175, 255)
96 -> Just (135, 215, 0)
97 -> Just (135, 215, 95)
98 -> Just (135, 215, 135)
99 -> Just (135, 215, 175)
100 -> Just (135, 215, 215)
101 -> Just (135, 215, 255)
102 -> Just (135, 255, 0)
103 -> Just (135, 255, 95)
104 -> Just (135, 255, 135)
105 -> Just (135, 255, 175)
106 -> Just (135, 255, 215)
107 -> Just (135, 255, 255)
108 -> Just (175, 0, 0)
109 -> Just (175, 0, 95)
110 -> Just (175, 0, 135)
111 -> Just (175, 0, 175)
112 -> Just (175, 0, 215)
113 -> Just (175, 0, 255)
114 -> Just (175, 95, 0)
115 -> Just (175, 95, 95)
116 -> Just (175, 95, 135)
117 -> Just (175, 95, 175)
118 -> Just (175, 95, 215)
119 -> Just (175, 95, 255)
120 -> Just (175, 135, 0)
121 -> Just (175, 135, 95)
122 -> Just (175, 135, 135)
123 -> Just (175, 135, 175)
124 -> Just (175, 135, 215)
125 -> Just (175, 135, 255)
126 -> Just (175, 175, 0)
127 -> Just (175, 175, 95)
128 -> Just (175, 175, 135)
129 -> Just (175, 175, 175)
130 -> Just (175, 175, 215)
131 -> Just (175, 175, 255)
132 -> Just (175, 215, 0)
133 -> Just (175, 215, 95)
134 -> Just (175, 215, 135)
135 -> Just (175, 215, 175)
136 -> Just (175, 215, 215)
137 -> Just (175, 215, 255)
138 -> Just (175, 255, 0)
139 -> Just (175, 255, 95)
140 -> Just (175, 255, 135)
141 -> Just (175, 255, 175)
142 -> Just (175, 255, 215)
143 -> Just (175, 255, 255)
144 -> Just (215, 0, 0)
145 -> Just (215, 0, 95)
146 -> Just (215, 0, 135)
147 -> Just (215, 0, 175)
148 -> Just (215, 0, 215)
149 -> Just (215, 0, 255)
150 -> Just (215, 95, 0)
151 -> Just (215, 95, 95)
152 -> Just (215, 95, 135)
153 -> Just (215, 95, 175)
154 -> Just (215, 95, 215)
155 -> Just (215, 95, 255)
156 -> Just (215, 135, 0)
157 -> Just (215, 135, 95)
158 -> Just (215, 135, 135)
159 -> Just (215, 135, 175)
160 -> Just (215, 135, 215)
161 -> Just (215, 135, 255)
162 -> Just (215, 175, 0)
163 -> Just (215, 175, 95)
164 -> Just (215, 175, 135)
165 -> Just (215, 175, 175)
166 -> Just (215, 175, 215)
167 -> Just (215, 175, 255)
168 -> Just (215, 215, 0)
169 -> Just (215, 215, 95)
170 -> Just (215, 215, 135)
171 -> Just (215, 215, 175)
172 -> Just (215, 215, 215)
173 -> Just (215, 215, 255)
174 -> Just (215, 255, 0)
175 -> Just (215, 255, 95)
176 -> Just (215, 255, 135)
177 -> Just (215, 255, 175)
178 -> Just (215, 255, 215)
179 -> Just (215, 255, 255)
180 -> Just (255, 0, 0)
181 -> Just (255, 0, 95)
182 -> Just (255, 0, 135)
183 -> Just (255, 0, 175)
184 -> Just (255, 0, 215)
185 -> Just (255, 0, 255)
186 -> Just (255, 95, 0)
187 -> Just (255, 95, 95)
188 -> Just (255, 95, 135)
189 -> Just (255, 95, 175)
190 -> Just (255, 95, 215)
191 -> Just (255, 95, 255)
192 -> Just (255, 135, 0)
193 -> Just (255, 135, 95)
194 -> Just (255, 135, 135)
195 -> Just (255, 135, 175)
196 -> Just (255, 135, 215)
197 -> Just (255, 135, 255)
198 -> Just (255, 175, 0)
199 -> Just (255, 175, 95)
200 -> Just (255, 175, 135)
201 -> Just (255, 175, 175)
202 -> Just (255, 175, 215)
203 -> Just (255, 175, 255)
204 -> Just (255, 215, 0)
205 -> Just (255, 215, 95)
206 -> Just (255, 215, 135)
207 -> Just (255, 215, 175)
208 -> Just (255, 215, 215)
209 -> Just (255, 215, 255)
210 -> Just (255, 255, 0)
211 -> Just (255, 255, 95)
212 -> Just (255, 255, 135)
213 -> Just (255, 255, 175)
214 -> Just (255, 255, 215)
215 -> Just (255, 255, 255)
216 -> Just (8, 8, 8)
217 -> Just (18, 18, 18)
218 -> Just (28, 28, 28)
219 -> Just (38, 38, 38)
220 -> Just (48, 48, 48)
221 -> Just (58, 58, 58)
222 -> Just (68, 68, 68)
223 -> Just (78, 78, 78)
224 -> Just (88, 88, 88)
225 -> Just (98, 98, 98)
226 -> Just (108, 108, 108)
227 -> Just (118, 118, 118)
228 -> Just (128, 128, 128)
229 -> Just (138, 138, 138)
230 -> Just (148, 148, 148)
231 -> Just (158, 158, 158)
232 -> Just (168, 168, 168)
233 -> Just (178, 178, 178)
234 -> Just (188, 188, 188)
235 -> Just (198, 198, 198)
236 -> Just (208, 208, 208)
237 -> Just (218, 218, 218)
238 -> Just (228, 228, 228)
239 -> Just (238, 238, 238)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment