Source Browser ?

1%D \module
2%D   [       file=font-gds,
3%D        version=2009.10.14,
4%D          title=\CONTEXT\ Font Support,
5%D       subtitle=Colorschemes,
6%D         author=Hans Hagen,
7%D           date=\currentdate,
8%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9%C
10%C This module is part of the \CONTEXT\ macro||package and is
11%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12%C details.
13
14\writestatus{loading}{ConTeXt Font Support / Colorschemes}
15
16%registerctxluafile{font-gds}{}
17
18\unprotect
19
20% this will become colorgroups and move to font-col or so
21
22\definecolor[colorscheme:1:1][s=.75]
23\definecolor[colorscheme:1:2][r=.75]
24\definecolor[colorscheme:1:3][g=.75]
25\definecolor[colorscheme:1:4][b=.75]
26\definecolor[colorscheme:1:5][c=.75]
27\definecolor[colorscheme:1:6][m=.75]
28\definecolor[colorscheme:1:7][y=.75]
29
30\definecolor[colorscheme:2:7][s=.75]
31\definecolor[colorscheme:2:6][r=.75]
32\definecolor[colorscheme:2:5][g=.75]
33\definecolor[colorscheme:2:4][b=.75]
34\definecolor[colorscheme:2:3][c=.75]
35\definecolor[colorscheme:2:2][m=.75]
36\definecolor[colorscheme:2:1][y=.75]
37
38\definecolor[colorscheme:3:1][r=.75]
39\definecolor[colorscheme:3:2][g=.75]
40\definecolor[colorscheme:3:3][b=.75]
41\definecolor[colorscheme:3:4][g=.75,b=.75]
42\definecolor[colorscheme:3:5][r=.75,b=.75]
43\definecolor[colorscheme:3:6][r=.75,g=.75]
44\definecolor[colorscheme:3:7][g=.75]
45
46\definecolor[colorscheme:4:1] [r=.6]      % a
47\definecolor[colorscheme:4:5] [g=.6]      % e
48\definecolor[colorscheme:4:9] [b=.6]      % i
49\definecolor[colorscheme:4:15][g=.6,b=.6] % o
50\definecolor[colorscheme:4:21][r=.6,b=.6] % u
51\definecolor[colorscheme:4:25][r=.6,b=.6] % y
52
53\definesystemattribute[colorscheme][public]
54
55\permanent\protected\def\loadfontgoodies[#filename]{\clf_loadfontgoodies{#filename}} % todo: public implementor
56
57\permanent\protected\def\setfontcolorscheme % will move to the lua end
58  {\clf_enablefontcolorschemes
59   \enforced\permanent\protected\xdef\setfontcolorscheme[##1]{\c_attr_colorscheme##1\relax}%
60   \setfontcolorscheme}
61
62\permanent\protected\def\resetfontcolorscheme
63  {\c_attr_colorscheme\attributeunsetvalue}
64
65\protect \endinput
66
67% \definefontfeature[husayni-colored][goodies=husayni,colorscheme=default,featureset=default]
68%
69% \starttext \righttoleft
70%
71% \definedfont[husayni*husayni-colored at 36pt]
72%
73% \setfontcolorscheme[1]
74%
75% اَلْحَمْ‍دُ لِلّٰهِ حَمْدَ مُعْتَرِفٍ بِحَمْدِهٖ، مُغْتَرِفٌ مِنْ بِحَارِ
76% مَجْدِهٖ، بِلِسَانِ ٱلثَّنَاۤءِ شَاكِرًا، وَلِحُسْنِ اٰلاۤئِهٖ نَاشِرًا؛
77% اَلَّذِيْ خَلَقَ ٱلْمَوْتَ وَٱلْحَيٰوةَ، وَٱلْخَيْرَ وَٱلشَّرَّ،
78% وَٱلنَّفْعَ وَٱلضَّرَّ، وَٱلسُّكُوْنَ وَٱلْحَرَكَةَ، وَٱلْأَرْوَاحَ
79% وَٱلْأَجْسَامَ، وَٱلذِّكْرَ وَٱلنِّسْيَانَ.
80%
81% \setfontcolorscheme[2]
82%
83% اَلْحَمْ‍دُ لِلّٰهِ حَمْدَ مُعْتَرِفٍ بِحَمْدِهٖ، مُغْتَرِفٌ مِنْ بِحَارِ
84% مَجْدِهٖ، بِلِسَانِ ٱلثَّنَاۤءِ شَاكِرًا، وَلِحُسْنِ اٰلاۤئِهٖ نَاشِرًا؛
85% اَلَّذِيْ خَلَقَ ٱلْمَوْتَ وَٱلْحَيٰوةَ، وَٱلْخَيْرَ وَٱلشَّرَّ،
86% وَٱلنَّفْعَ وَٱلضَّرَّ، وَٱلسُّكُوْنَ وَٱلْحَرَكَةَ، وَٱلْأَرْوَاحَ
87% وَٱلْأَجْسَامَ، وَٱلذِّكْرَ وَٱلنِّسْيَانَ.
88%
89% \resetfontcolorscheme
90%
91% اَلْحَمْ‍دُ لِلّٰهِ حَمْدَ مُعْتَرِفٍ بِحَمْدِهٖ، مُغْتَرِفٌ مِنْ بِحَارِ
92% مَجْدِهٖ، بِلِسَانِ ٱلثَّنَاۤءِ شَاكِرًا، وَلِحُسْنِ اٰلاۤئِهٖ نَاشِرًا؛
93% اَلَّذِيْ خَلَقَ ٱلْمَوْتَ وَٱلْحَيٰوةَ، وَٱلْخَيْرَ وَٱلشَّرَّ،
94% وَٱلنَّفْعَ وَٱلضَّرَّ، وَٱلسُّكُوْنَ وَٱلْحَرَكَةَ، وَٱلْأَرْوَاحَ
95% وَٱلْأَجْسَامَ، وَٱلذِّكْرَ وَٱلنِّسْيَانَ.
96%
97% \stoptext
98