summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/litetable/tex/litetable.cls
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/litetable/tex/litetable.cls')
-rw-r--r--macros/latex/contrib/litetable/tex/litetable.cls737
1 files changed, 378 insertions, 359 deletions
diff --git a/macros/latex/contrib/litetable/tex/litetable.cls b/macros/latex/contrib/litetable/tex/litetable.cls
index a87d3cb9bd..caa7059a98 100644
--- a/macros/latex/contrib/litetable/tex/litetable.cls
+++ b/macros/latex/contrib/litetable/tex/litetable.cls
@@ -1,5 +1,5 @@
%% ***********************************************************
-%% Copyright 2024 by Mingyu XIA <xiamyphys@gmail.com> *
+%% Copyright 2024 by M.Y. XIA <xiamyphys@gmail.com> *
%% *
%% This work may be distributed and/or modified under *
%% the conditions of the LaTeX Project Public License *
@@ -11,410 +11,429 @@
%% *
%% This work has the LPPL maintenance status `maintained'. *
%% *
-%% The Current Maintainer of this work is Mingyu XIA. *
+%% The Current Maintainer of this work is M.Y. XIA. *
%% *
%% This work consists of the files litetable.cls, *
%% and README.md. *
%% available at https://github.com/xiamyphys/litetable *
%% ***********************************************************
-\ProvidesExplClass{litetable}{2024/09/25}{3.0B}{Course Schedule}
-
-\ExplSyntaxOff
+\ProvidesExplClass{litetable}{2024/09/30}{3.1A}{Course Schedule}
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{article}}
\ProcessOptions\relax
+
\LoadClass{article}
+
\pagestyle{empty}
-\RequirePackage{listofitems,tikz,xcolor}
-\ignoreemptyitems\setsepchar{,/->}
-\usetikzlibrary{calc}
-\definecolor{darkergray}{HTML}{F4F6F8}% Blocks
+\RequirePackage{tikz}
+\definecolor{darkergray}{HTML}{F4F6F8}
-\ExplSyntaxOn
+% Module for texlive 2021 and later: by @ljguo
+\cs_if_exist:NF \clist_put_right:Ne
+{ \cs_generate_variant:Nn \clist_put_right:Nn { Ne } }
+\cs_if_exist:NF \clist_set:Ne
+{ \cs_generate_variant:Nn \clist_set:Nn { Ne } }
+\cs_if_exist:NT \clist_count:e
+{ \cs_generate_variant:Nn \clist_count:n { e } }
+\cs_if_exist:NF \exp_args:NNNe
+{
+ \cs_new:Npn \exp_args:NNNe #1#2#3#4
+ {
+ \exp_after:wN #1
+ \exp_after:wN #2
+ \exp_after:wN #3
+ \tex_expanded:D { {#4} }
+ }
+}
-\int_new:N \l_time_num_int
+% Module for left -> right data structure: by @ljguo
+\cs_new_protected_nopar:Npn \__litetable_get_left:nN #1#2
+{
+ \group_begin:
+ \seq_set_split:Nnn \l__litetable_tmpa_seq { -> } { #1 }
+ \exp_args:NNNe \group_end: \tl_set:Nn #2
+ { \seq_item:Nn \l__litetable_tmpa_seq { 1 } }
+}
+\cs_new_protected_nopar:Npn \__litetable_get_right:nN #1#2
+{
+ \group_begin:
+ \seq_set_split:Nnn \l__litetable_tmpa_seq { -> } { #1 }
+ \exp_args:NNNe \group_end: \tl_set:Nn #2
+ { \seq_item:Nn \l__litetable_tmpa_seq { 2 } }
+}
+\cs_generate_variant:Nn \__litetable_get_left:nN { e }
+\cs_generate_variant:Nn \__litetable_get_right:nN { e }
+
+\int_new:N \l__time_num_int
\dim_new:N \l__time_vunit_dim
-\msg_new:nnn {litetable} {timelist}
-{\noexpand\timelist~extra~time~group(s)~were~ignored}
-\NewDocumentCommand{\timelist}{om}
+\cs_new_protected:Npn \litetable_msg_new:nn #1#2
+{ \msg_new:nnn { litetable} { #1 } { #2 } }
+\cs_new_protected:Npn \litetable_msg_warning:n #1
+{ \msg_warning:nn { litetable } { #1 } }
+\litetable_msg_new:nn { timelist }
+{ \exp_not:N \timelist~extra~time~group(s)~were~ignored }
+\cs_new_protected_nopar:Npn \litetable_timelist:nn #1#2
{
- \IfBlankTF{#2}
+ \clist_set:Nn \l__litetable_timelist_clist { #2 }
+ \tl_if_empty:nTF { #1 }
+ {
+ \int_set:Nn \l__time_num_int
{
- \int_set:Nn \l_time_num_int { #1 }
- \tl_clear:N \@timelist
- }{
- \readlist*\@timelist{#2}
- \IfNoValueTF{#1}
- {
- \int_set:Nn \l_time_num_int {\@timelistlen}
- }{
- \int_set:Nn \l_time_num_int { #1 }
- \int_compare:nNnT {\@timelistlen} > {#1}
- {
- \msg_warning:nn {litetable} {timelist}
- }
- }
+ \clist_count:N \l__litetable_timelist_clist
}
- \dim_set:Nn \l__time_vunit_dim
+ }
+ {
+ \int_set:Nn \l__time_num_int { #1 }
+ \int_compare:nNnTF { #1 } <
+ { \clist_count:N \l__litetable_timelist_clist }
{
- \fp_eval:n {1/(2*\l_time_num_int+3.5)}\paperheight
- }
+ \int_set:Nn \l__time_num_int
+ {
+ \clist_count:N \l__litetable_timelist_clist
+ }
+ \litetable_msg_warning:n { timelist }
+ } { \int_set:Nn \l__time_num_int { #1 } }
+ }
+ \dim_set:Nn \l__time_vunit_dim
+ {
+ \fp_eval:n {1/(2*\l__time_num_int+3.5)}\paperheight
+ }
}
+\NewDocumentCommand \timelist { O{} m O{} }
+{ \litetable_timelist:nn { #1#3 } { #2 } }
-\clist_new:N \l__week_ratios_clist
+\clist_new:N \l__week_ratio_clist
\clist_new:N \l__week_accum_clist
\int_new:N \l__week_num_int
\dim_new:N \l__week_hunit_dim
-\NewDocumentCommand{\weeklist}{om}
-{
- \IfValueT{ #1 }{\tl_set:Nn \l_weeks_tl { #1 }}
- \readlist*\@weeklist{#2}
- \int_step_inline:nn {\@weeklistlen}
+\cs_new_protected_nopar:Npn \litetable_weeklist:nn #1#2
+{
+ \tl_set:Nn \l__default_weeks_tl { #1 }
+ \clist_set:Nn \l__litetable_weeklist_clist { #2 }
+ \int_step_inline:nn
+ {
+ \clist_count:N \l__litetable_weeklist_clist
+ }
+ {
+ \__litetable_get_right:eN
+ {
+ \clist_item:Nn \l__litetable_weeklist_clist {##1}
+ } \l__litetable_tmpb_tl
+ \clist_put_right:Ne \l__week_ratio_clist
{
- \clist_put_right:Ne \l__week_ratios_clist
- {
- \@weeklist[##1,2]
- }
+ \l__litetable_tmpb_tl
}
- \int_step_inline:nn {\@weeklistlen}
+ }
+ \int_step_inline:nn
+ {
+ \clist_count:N \l__litetable_weeklist_clist
+ }
+ {
+ \clist_clear:N \l__week_accumtmp_clist
+ \int_step_inline:nn { ##1 }
{
- \clist_clear:N \l__week_accumtmp_clist
- \int_step_inline:nn { ##1 }
- {
- \clist_put_right:Ne \l__week_accumtmp_clist
- {
- \clist_item:Nn \l__week_ratios_clist { ####1 }
- }
- }
- \clist_put_right:Ne \l__week_accum_clist
- {
- \int_eval:n
- {
- \clist_use:Nn \l__week_accumtmp_clist { + }
- }
- }
+ \clist_put_right:Ne \l__week_accumtmp_clist
+ {
+ \clist_item:Nn \l__week_ratio_clist { ####1 }
+ }
}
- \int_set:Nn \l__week_num_int
+ \clist_put_right:Ne \l__week_accum_clist
{
- \clist_item:Nn \l__week_accum_clist
- {
- \@weeklistlen
- }
+ \int_eval:n { \clist_use:Nn \l__week_accumtmp_clist { + } }
}
- \dim_set:Nn \l__week_hunit_dim
+ }
+ \int_set:Nn \l__week_num_int
+ {
+ \clist_item:Nn \l__week_accum_clist
{
- \fp_eval:n {1/\l__week_num_int*14/15}\paperwidth
+ \clist_count:N \l__litetable_weeklist_clist
}
+ }
+ \dim_set:Nn \l__week_hunit_dim
+ {
+ \fp_eval:n {1/\l__week_num_int*14/15}\paperwidth
+ }
}
+\NewDocumentCommand \weeklist { O{} m O{} }
+{ \litetable_weeklist:nn { #1#3 } { #2 } }
+
+\NewDocumentCommand \more { m }
+{ \tl_set:Nn \l__litetable_comment_tl { #1 } }
-\int_new:N \l__week_day_int
-\newcommand{\newday}{\int_incr:N \l__week_day_int}
-\NewDocumentCommand{\maketable}{om}{
- % Gray Block at top
- \fill [ darkergray ] (current~page.north~west)
- rectangle + (\paperwidth,{-1.5*\l__time_vunit_dim})
- node [ midway, black, font = \huge\bfseries ] {#2};
- \IfValueT{#1}% Semester
+\int_new:N \l__litetable_week_day_int
+\int_set:Nn \l__litetable_week_day_int {1}
+\NewDocumentCommand \newday { O {1} }
+{ \int_add:Nn \l__litetable_week_day_int { #1 } }
+
+\cs_new_protected_nopar:Npn \litetable_maketable:nn #1#2
+{
+ % Darker Block at top
+ \fill [ darkergray ] (current~page.north~west)
+ rectangle + (\paperwidth,-1.5\l__time_vunit_dim)
+ node [ midway, black, font = \huge\bfseries ] {#1};
+ \tl_if_empty:nF { #2 }% Semester
+ {
+ \node [ shift = {(-.02\paperwidth,-.75\l__time_vunit_dim)},
+ left, rectangle, fill = DarkBlue!10,
+ text = DarkBlue!60, inner~sep = 2ex,
+ rounded~corners = 8pt, font = \large
+ ] at (current~page.north~east)
+ {\ensuremath\rightleftharpoons\ #2};
+ }
+ % Darker Blocks
+ \int_step_inline:nnnn {0} {2} {\l__time_num_int}
+ {
+ \filldraw [ fill = darkergray, draw = gray, thick,
+ densely~dashed, line~cap = round
+ ] ([shift = {(-.4pt,{\fp_eval:n {
+ -2*##1-2.5}\l__time_vunit_dim})
+ }]current~page.north~west) rectangle +
+ ({\paperwidth+.8pt},-2*\l__time_vunit_dim);
+ }
+ % Classes numbering
+ \clist_if_empty:NTF {\l__litetable_timelist_clist}
+ {
+ \int_step_inline:nn {\l__time_num_int}
{
- \node [ left, rectangle, fill = DarkBlue!10,
- text = DarkBlue!60, inner~sep = 2ex,
- rounded~corners = 8pt, font = \large
- ] at ($
- (current~page.north~east)+
- (-.02\paperwidth,-.75*\l__time_vunit_dim)
- $) {\ensuremath\rightleftharpoons\ #1};
+ \node [ shift = {(\paperwidth/30,{\fp_eval:n {
+ -2*##1-1.5}\l__time_vunit_dim})
+ }, darkgray!80, font = \large\ttfamily\bfseries
+ ] at (current~page.north~west) {##1};
}
- % Darker Blocks
- \int_step_inline:nnnn {0} {2} {\l_time_num_int} {
- \filldraw [ fill = darkergray, draw = gray, thick,
- densely~dashed, line~cap = round
- ] ([yshift = -2*##1*\l__time_vunit_dim]$
- (current~page.north~west)+(-.4pt,0)+
- (0,-2.5*\l__time_vunit_dim)
- $) rectangle + ($
- (\paperwidth,-2*\l__time_vunit_dim)+
- (.8pt,0)
- $);
+ }
+ {
+ \int_step_inline:nn {\l__time_num_int}
+ {
+ \node [ shift = {(\paperwidth/30,\fp_eval:n {
+ -2*##1-1}\l__time_vunit_dim)
+ }, darkgray!80, font = \large\ttfamily\bfseries
+ ] at (current~page.north~west) {##1};
}
- \tl_if_empty:NTF {\@timelist}% Classes numbering
+ % Classes time
+ \int_step_inline:nn
{
- \int_step_inline:nn {\l_time_num_int} {
- \node [ yshift = -2*##1*\l__time_vunit_dim,
- darkgray!80, font = \bfseries\large\ttfamily
- ] at ($
- (current~page.north~west)+
- (\paperwidth/30,-1.5*\l__time_vunit_dim)
- $) {##1};
- }
- }{
- \int_step_inline:nn {\l_time_num_int} {
- \node [ yshift = -2*##1*\l__time_vunit_dim,
- darkgray!80, font = \bfseries\large\ttfamily
- ] at ($
- (current~page.north~west)+
- (\paperwidth/30,-\l__time_vunit_dim)
- $) {##1};
- }
- % Classes time
- \int_step_inline:nn {\@timelistlen} {
- \node [ yshift = -2*##1*\l__time_vunit_dim,
- gray, font = \ttfamily ,align = center]
- at ($
- (current~page.north~west)+
- (\paperwidth/30,-1.9*\l__time_vunit_dim)
- $) {\@timelist[##1,1]\\\@timelist[##1,2]};
- }
+ \clist_count:N \l__litetable_timelist_clist
}
- % Weekdays
- \int_step_inline:nn {\@weeklistlen}
{
- \node [ font = \large\bfseries,
- xshift = \clist_item:Nn \l__week_accum_clist {##1}/
- \l__week_num_int*14/15*\paperwidth
- ]
- at ($
- (current~page.north~west)-
- (\fp_eval:n {(
- \clist_item:Nn
- \l__week_ratios_clist { ##1 }
- /2)/\l__week_num_int*14/15-1/15
- }*\paperwidth,2*\l__time_vunit_dim)
- $) {\@weeklist[##1,1]};
+ \__litetable_get_left:eN
+ {
+ \clist_item:Nn \l__litetable_timelist_clist {##1}
+ } \l__litetable_tmpa_tl
+ \__litetable_get_right:eN
+ {
+ \clist_item:Nn \l__litetable_timelist_clist {##1}
+ } \l__litetable_tmpb_tl
+ \node [ shift = {(\paperwidth/30,\fp_eval:n {
+ -1.9-2*##1}\l__time_vunit_dim)
+ }, gray, font = \ttfamily ,align = center
+ ] at (current~page.north~west)
+ {\l__litetable_tmpa_tl\\\l__litetable_tmpb_tl};
}
+ }
+ % Weekdays
+ \int_step_inline:nn
+ {
+ \clist_count:N \l__litetable_weeklist_clist
+ }
+ {
+ \__litetable_get_left:eN
+ {
+ \clist_item:Nn \l__litetable_weeklist_clist {##1}
+ } \l__litetable_tmpa_tl
+ \node [ font = \large\bfseries,
+ shift = {({\fp_eval:n {
+ (\clist_item:Nn \l__week_accum_clist {##1}
+ -\clist_item:Nn \l__week_ratio_clist {##1}/2)/
+ \l__week_num_int*14/15+1/15}\paperwidth},
+ -2\l__time_vunit_dim)}
+ ] at (current~page.north~west)
+ { \l__litetable_tmpa_tl };
+ }
+ % Comment
+ \cs_if_exist:NT \l__litetable_comment_tl
+ {
+ \node [ yshift = .5*\l__time_vunit_dim,
+ left = 1ex, darkgray, font = \small\bfseries
+ ] at (current~page.south~east)
+ { \l__litetable_comment_tl };
+ }
+ \tl_gclear:N \l__litetable_comment_tl
}
+\NewDocumentCommand \maketable { O{} m O{} }
+{ \litetable_maketable:nn { #2 } { #1#3 } }
-\keys_define:nn{course}{
- color.tl_set:N = \l_color_tl,
- color.initial:n = teal,
- subject.tl_set:N = \l_subject_tl,
- teacher.tl_set:N = \l_teacher_tl,
- location.tl_set:N = \l_location_tl,
- weeks.tl_set:N = \l_weeks_tl,
- weeks.initial:n = \l_weeks_tl,
+\keys_define:nn { litetable / course }
+{
+ color.tl_set:N = \l__course_color_tl,
+ color.initial:n = teal,
+ subject.tl_set:N = \l__course_subject_tl,
+ teacher.tl_set:N = \l__course_teacher_tl,
+ location.tl_set:N = \l__course_location_tl,
+ weeks.tl_set:N = \l__default_weeks_tl,
+ weeks.initial:n = \l__default_weeks_tl,
}
\dim_new:N \l__course_infoshift_dim
-\NewDocumentCommand{\course}{O{}mm}
+\cs_new_protected_nopar:Npn \__litetable_course_block_aux:nn #1#2
{
- \group_begin:
- \keys_set:nn { course } { #1 }
- % Course block fg
- \fill [ \l_color_tl!60, rounded~corners = 8pt ] ($
- (current~page.north~west)+(.4pt,-.4pt)+
- (\fp_eval:n
- {
- \clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }-
- \clist_item:Nn \l__week_ratios_clist
- {
- \l__week_day_int
- }
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-.5-2*#2}*\l__time_vunit_dim)
- $) rectangle ($
- (current~page.north~west)+(-.4pt,.4pt)+
- (\clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-2.5-2*#3}*\l__time_vunit_dim)
- $);
- % Course block bg
- \fill [ \l_color_tl!10 ] ($
- (current~page.north~west)+(1.2pt,-.4pt)+
- (\fp_eval:n
- {
- \clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }-
- \clist_item:Nn \l__week_ratios_clist
- {
- \l__week_day_int
- }
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-1-2*#2}*\l__time_vunit_dim)
- $) -- ($
- (current~page.north~west)+(-1.2pt,-.4pt)+
- (\clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-1-2*#2}*\l__time_vunit_dim)
- $) {[rounded~corners = 7.2pt] -- ($
- (current~page.north~west)+(-1.2pt,1.2pt)+
- (\clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-2.5-2*#3}*\l__time_vunit_dim)
- $) -- ($
- (current~page.north~west)+(1.2pt,1.2pt)+
- (\fp_eval:n
- {
- \clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }-
- \clist_item:Nn \l__week_ratios_clist
- {
- \l__week_day_int
- }
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-2.5-2*#3}*\l__time_vunit_dim)
- $)} -- cycle;
- % Course info
- \tl_if_eq:NNTF {#2} {#3}% Single-unit height course block
+ % Course block fg
+ \begin{scope}
+ \clip [ preaction = {draw, ultra~thick, \l__course_color_tl!60},
+ preaction = {fill, \l__course_color_tl!10},
+ rounded~corners = 8pt ]
+ ([shift = {(\fp_eval:n {
+ \clist_item:Nn \l__week_accum_clist
+ {\l__litetable_week_day_int}-
+ \clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int}
+ }\l__week_hunit_dim+\paperwidth/15+1.2pt,
+ \fp_eval:n {-.5-2*#1}\l__time_vunit_dim-1.2pt)
+ }]current~page.north~west) rectangle +
+ (\clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int}\l__week_hunit_dim-2.4pt,
+ \fp_eval:n {2*(#1-#2-1)}\l__time_vunit_dim+2.4pt);
+ % Course block bg
+ \fill [ \l__course_color_tl!60 ]
+ ([shift = {(\fp_eval:n {
+ \clist_item:Nn \l__week_accum_clist
+ {\l__litetable_week_day_int}-
+ \clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int}
+ }\l__week_hunit_dim+\paperwidth/15,
+ \fp_eval:n {-.5-2*#1}\l__time_vunit_dim)
+ }]current~page.north~west) rectangle +
+ (\clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int}\l__week_hunit_dim,
+ -.5*\l__time_vunit_dim);
+ \end{scope}
+ % Course info
+ \tl_if_eq:NNTF {#1} {#2}% Single-unit height course block
+ {
+ \bool_if:nTF
+ {
+ \tl_if_empty_p:N \l__course_location_tl &&
+ \tl_if_empty_p:N \l__course_teacher_tl
+ }
+ {\tl_set:Nn \l_shortcourse_anchor_tl { }}
+ {\tl_set:Nn \l_shortcourse_anchor_tl { above }}
+ \cs_if_exist:NT {\l__course_subject_tl }
{
- \bool_if:nTF
- {
- \tl_if_empty_p:N \l_location_tl &&
- \tl_if_empty_p:N \l_teacher_tl
- }{
- \tl_set:Nn \l_shortcourse_anchor_tl { }
- }{
- \tl_set:Nn \l_shortcourse_anchor_tl { above }
- }
- \cs_if_exist:NT {\l_subject_tl }
- {
- \node [ \l_shortcourse_anchor_tl,
- \l_color_tl!60, align = center,
- font = \large\bfseries ]
- at ($
- (current~page.north~west)+
- (\fp_eval:n
- {
- \clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }-
- \clist_item:Nn \l__week_ratios_clist
- {
- \l__week_day_int
- }/2
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-1.75-#2-#3}*\l__time_vunit_dim)
- $) { \l_subject_tl };
- }
- \bool_if:nTF
- {
- !\tl_if_empty_p:N \l_location_tl &&
- !\tl_if_empty_p:N \l_teacher_tl
- }{
- \tl_set:Nn \l_shortcourse_sep_tl { ,~ }
- }{
- \tl_set:Nn \l_shortcourse_sep_tl { }
- }
- \node [ below, \l_color_tl!60, align = center ]
- at ($
- (current~page.north~west)+
- (\fp_eval:n
- {
- \clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }-
- \clist_item:Nn \l__week_ratios_clist
- {
- \l__week_day_int
- }/2
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-1.75-#2-#3}*\l__time_vunit_dim)
- $) {
- \tl_if_exist:NT
- { \l_location_tl } { \l_location_tl }
- \l_shortcourse_sep_tl
- \tl_if_exist:NT
- { \l_teacher_tl } { \l_teacher_tl }
- };
- }{
- \bool_if:nTF% Multiply-unit height course block
- {
- \tl_if_empty_p:N \l_location_tl &&
- \tl_if_empty_p:N \l_teacher_tl
- }{
- \tl_set:Nn \l_course_anchor_tl {}
- \dim_set:Nn \l__course_infoshift_dim { 0pt }
- }{
- \tl_set:Nn \l_course_anchor_tl { above }
- \dim_set:Nn \l__course_infoshift_dim
- {
- .125\l__time_vunit_dim
- }
- }
- \cs_if_exist:NT { \l_subject_tl }
- {
- \node [ \l_course_anchor_tl,
- yshift = \l__course_infoshift_dim,
- \l_color_tl!60, align = center,
- font = \large\bfseries
- ] at ($
- (current~page.north~west)+
- (\fp_eval:n
- {
- \clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }-
- \clist_item:Nn \l__week_ratios_clist
- {
- \l__week_day_int
- }/2
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-1.5-#2-#3}*\l__time_vunit_dim)
- $) { \l_subject_tl };
- }
- \bool_if:nTF
- {
- !\tl_if_empty_p:N \l_location_tl &&
- !\tl_if_empty_p:N \l_teacher_tl
- }{
- \tl_set:Nn \l_courseinfo_sep_tl { \\ }
- }{
- \tl_set:Nn \l_courseinfo_sep_tl { }
- }
- \node [ below, \l_color_tl!60, align = center ]
- at ($
- (current~page.north~west)+
- (\fp_eval:n
- {
- \clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }-
- \clist_item:Nn \l__week_ratios_clist
- {
- \l__week_day_int
- }/2
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-1.625-#2-#3}*\l__time_vunit_dim)
- $) {
- \tl_if_exist:NT
- { \l_location_tl } { \l_location_tl }
- \l_courseinfo_sep_tl
- \tl_if_exist:NT
- { \l_teacher_tl } { \l_teacher_tl }
- };
- \node [ above~left, \l_color_tl!60, outer~sep = .5ex ]
- at ($
- (current~page.north~west)+
- (\clist_item:Nn \l__week_accum_clist
- {
- \l__week_day_int
- }*\l__week_hunit_dim+\paperwidth/15,
- \fp_eval:n {-2.5-2*#3}*\l__time_vunit_dim)
- $) { \l_weeks_tl };
+ \node [ shift = {(\fp_eval:n {
+ \clist_item:Nn \l__week_accum_clist
+ {\l__litetable_week_day_int}-
+ \clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int}/2
+ }\l__week_hunit_dim+\paperwidth/15,
+ \fp_eval:n {-1.75-#1-#2}\l__time_vunit_dim)},
+ \l_shortcourse_anchor_tl, \l__course_color_tl!60,
+ align = center, font = \large\bfseries
+ ] at (current~page.north~west)
+ { \l__course_subject_tl };
}
- \group_end:
+ \bool_if:nTF
+ {
+ !\tl_if_empty_p:N \l__course_location_tl &&
+ !\tl_if_empty_p:N \l__course_teacher_tl
+ }
+ {\tl_set:Nn \l_shortcourse_sep_tl { ,~ }}
+ {\tl_set:Nn \l_shortcourse_sep_tl { }}
+ \node [ shift = {(\fp_eval:n {
+ \clist_item:Nn \l__week_accum_clist
+ {\l__litetable_week_day_int}-
+ \clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int}/2
+ }\l__week_hunit_dim+\paperwidth/15,
+ \fp_eval:n {-1.75-#1-#2}\l__time_vunit_dim)},
+ below, \l__course_color_tl!60, align = center
+ ] at (current~page.north~west)
+ {
+ \tl_if_exist:NT { \l__course_location_tl }
+ { \l__course_location_tl }
+ \l_shortcourse_sep_tl
+ \tl_if_exist:NT { \l__course_teacher_tl }
+ { \l__course_teacher_tl }
+ };
+ }
+ {
+ \bool_if:nTF% Multiply-unit height course block
+ {
+ \tl_if_empty_p:N \l__course_location_tl &&
+ \tl_if_empty_p:N \l__course_teacher_tl
+ }
+ {
+ \tl_set:Nn \l_course_anchor_tl {}
+ \dim_set:Nn \l__course_infoshift_dim { 0pt }
+ }
+ {
+ \tl_set:Nn \l_course_anchor_tl { above }
+ \dim_set:Nn \l__course_infoshift_dim { \l__time_vunit_dim/8 }
+ }
+ \cs_if_exist:NT { \l__course_subject_tl }
+ {
+ \node [ font = \large\bfseries, \l_course_anchor_tl,
+ shift = {(\fp_eval:n {
+ \clist_item:Nn \l__week_accum_clist
+ {\l__litetable_week_day_int}-
+ \clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int }/2
+ }\l__week_hunit_dim+\paperwidth/15,
+ \fp_eval:n {-1.5-#1-#2}\l__time_vunit_dim)},
+ yshift = \l__course_infoshift_dim,
+ \l__course_color_tl!60, align = center,
+ ] at (current~page.north~west)
+ { \l__course_subject_tl };
+ }
+ \bool_if:nTF
+ {
+ !\tl_if_empty_p:N \l__course_location_tl &&
+ !\tl_if_empty_p:N \l__course_teacher_tl
+ }
+ {
+ \tl_set:Nn \l_courseinfo_sep_tl { \\ }
+ }
+ {
+ \tl_set:Nn \l_courseinfo_sep_tl { }
+ }
+ \node [ below, \l__course_color_tl!60, align = center,
+ shift = {(\fp_eval:n {
+ \clist_item:Nn \l__week_accum_clist
+ {\l__litetable_week_day_int}-
+ \clist_item:Nn \l__week_ratio_clist
+ {\l__litetable_week_day_int}/2
+ }\l__week_hunit_dim+\paperwidth/15,
+ \fp_eval:n {-1.625-#1-#2}\l__time_vunit_dim
+ )}] at (current~page.north~west)
+ {
+ \tl_if_exist:NT { \l__course_location_tl }
+ { \l__course_location_tl }
+ \l_courseinfo_sep_tl
+ \tl_if_exist:NT { \l__course_teacher_tl }
+ { \l__course_teacher_tl }
+ };
+ \node [ above~left, \l__course_color_tl!60, outer~sep = .5ex,
+ shift = {(
+ \clist_item:Nn \l__week_accum_clist
+ {\l__litetable_week_day_int}
+ \l__week_hunit_dim+\paperwidth/15,
+ \fp_eval:n {-2.5-2*#2}\l__time_vunit_dim
+ )}] at (current~page.north~west) { \l__default_weeks_tl };
+ }
}
-
-\newcommand{\more}[1]% Additional info
-{
- \node [ left = 1ex, darkgray, font = \small\bfseries ]
- at ($
- (current~page.south~east)+(0,.5*\l__time_vunit_dim)
- $) {#1};
+\litetable_msg_new:nn { course }
+{ \exp_not:N \course~block(s)~exceed~workdays~were~ignored }
+\NewDocumentCommand \course { O{} m m }
+{
+ \group_begin:
+ \int_compare:nNnTF {\l__litetable_week_day_int-1} <
+ {\clist_count:N \l__litetable_weeklist_clist}
+ {
+ \keys_set:nn { litetable / course } { #1 }
+ \__litetable_course_block_aux:nn { #2 } { #3 }
+ }{
+ \litetable_msg_warning:n { course }
+ }
+ \group_end:
}
-\endinput \ No newline at end of file
+\endinput
+
+% End of file litetable.cls \ No newline at end of file
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-03 03:19:57 +0000