Skip to content
Snippets Groups Projects

Generování protokolů a zpracování scanů

Merged Martin Mareš requested to merge mj/protokoly into devel
2 files
+ 60
0
Compare changes
  • Side-by-side
  • Inline

Files

+ 50
0
\input ltluatex.tex
\input luatex85.sty
\input ucwmac2.tex
\setmargins{15mm}
\setuppage
\nopagenumbers
\ucwmodule{luaofs}
\settextsize{12}
\baselineskip=18pt
\uselanguage{czech}
\frenchspacing
\newbox\logobox
\setbox\logobox=\putimage{width 20mm}{mo-logo.epdf}
\input qrcode.tex
\qrset{height=25mm, level=H, tight, silent}
\newbox\codebox
\def\kolo{TODO}
% \proto{kód}{jméno}{třída}{škola}{příklad}
\def\proto#1#2#3#4#5{
\setbox\codebox=\hbox{\qrcode{#1}}
\line{%
\copy\logobox
\qquad
\raise 7pt\hbox{\bf\kolo}%
\hfil
\llap{\smash{\lower 16mm\box\codebox}}%
}
\medskip
\leftline{Jméno: {\bf #2}}
\leftline{Třída: {\bf #3}}
\leftline{Škola: {\bf #4}}
\halign{##\hfil&##\hfil\cr
Příklad: {\bf #5}&Hodnocení:\cr
Počet listů: \qquad Číslo listu:\qquad\qquad&Hodnotil:\cr
}
\bigskip
\hrule
\vfill\eject
}
Loading