%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                          %
% Physical praktics on MFF CUNI stylesheet %
%            for plain TeX                 %
%                                          %
% author: Chali Ahmul M.P.U                %
% last change: 20.02.09 (by Jakub Benda)   %
% encoding: cp1250                         %
%                                          %
% This code is fully free. enjoy!          %
% Any questions or notes mail-to:          %
%                                          %
%           ahmul@matfyz.cz                %
%        jakub.benda@seznam.cz             %
%                                          %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Pouzitz:
% Staci "inputnout" tento soubor na zacatku vaseho dokumentu
% 		\input praktika.sty
% nasledne naplnit registry
%		\praktikum
%		\uloha
%		\nazev
%		\pracant
%		\skupina
%		\denprace
%		\denodevzdani
% necim jako
%		\praktikum    {Praktikum I - Mechanika a molekulova fyzika}
%		\uloha        {III}
%		\nazev        {Studium proudeni viskozni kapaliny trubicemi kruhoveho prurezu}
%		\pracant      {Chali Ahmul M.P.U}
%		\skupina      {X-13}
%		\denprace     {28.2.2006}
%		\denodevzdani {29.2.2006}
% a o zbytek se postara vystupni rutina.
%
% Dale je v tomto stylu zadefinovano makro \chapter pro tisk sekce
% (s automatickym cislovanim)
% 		\chapter Teorie  % prazdny radek je nutny! (eventuelne staci \par)
%
% a preddefinováno zahlavi stranky obsahujici registry na zacátku vyplnene registry.
% Zahlavi je mozno predefinovat podle uvazeni s pouzitim registru dle vlastniho uvazeni.
%
%

%%%%%%%%%%%%%%%%%%% CODE %%%%%%%%%%%%%%%%%%%
\input czech.sty % pripadne slovak.sty
\input epsf.sty  % na vkladani obrazku budeme potrebovat epsf makra

\catcode`\@=11

%% fonty
\font\fchapter = csbx12 % font pro sazbu sekci
\font\ftext = csr10 % font pro sazbu textu

% .titulka - bezpatkova 13pt zaklad
\font\ftitul = csss14
\font\fpraktikum = csssbx15 % bezpatkovy
\font\ftit = csss13
\font\fbtit = csssbx13

\font\ffill = cssl12

%% STYLEsheet -- tuhle cast je vhodne editovat

\parindent10pt %nemam rad moc velka odsazeni

\newcount\chapternum	\chapternum=0
\def\chapter#1{\par\penalty -200{\noindent\global\advance\chapternum by 1 \fchapter\expandafter\uppercase\expandafter{\romannumeral\chapternum}. #1\medskip}}

% .titulka
% registry se volaji az v dobe,kdy jsou registry \praktiku -- \denodevzdani naplnena, takze je muzem pouzit
\headline{\ftext Úloha č. \the\uloha\hfill\the\pracant /\the\skupina}
%\footline{\hss\tenrm\folio\hss}

%% end STYLEsheet



%% TITULKA.sazba

\newtoks\praktikum
\newtoks\uloha
\newtoks\nazev
\newtoks\pracant
\newtoks\skupina
\newtoks\denprace
\newtoks\denodevzdani

% Makro na sazbu titulky

\def\titulk@{{%lokalni skupina

	\ftit %font pro titulku je bezpatkovy. zbytek budem delat v computer-modern
	\parindent0pt % v titulce nebudeme delat odsazeni prvniho radku
	%\parfillskip0pt

	\baselineskip=2\baselineskip

	\vbox{\hrule\hbox{\vrule\vbox{%
		\medskip
		\centerline{\ftitul Oddělení fyzikálních praktik při Kabinetu výuky obecné fyziky MFF UK}%
		\centerline{\fpraktikum\the\praktikum}%

		\leftskip10pt % zbytek trochu odsadime at neni prilepeny na ramecku
		\rightskip10pt
		Úloha~č.  \the\uloha \par
		% tahle zmet je tu proto, ze nevim jak jinak vyresit pripad, kdy nazev bude mit vic jak dva radky
		\line{\hskip10pt\vbox{\halign{##&\vtop{\leftskip0pt\rightskip0pt\baselineskip=1\baselineskip \hsize=.8\hsize##}\cr Název: &\the\nazev\cr}}\hfil}%
		\bigskip
		Pracoval:~    {\ffill \the\pracant}\hskip 1em plus 1fill
		stud.~sk.:~	  {\ffill \the\skupina}\hskip 1em
		dne:~			  {\ffill \the\denprace}\par
		Odevzdal~ dne:~{\ffill \the\denodevzdani}%
		\medskip
	}\vrule}\hrule
	}%

	{\fbtit Hodnocení:}%

	Připomínky:

	\vfill

	% hodnoceni

	% potreba pro vyssi tabulku
	\def\sstrut{\relax\vrule height 17pt depth 7pt width 0pt}

	\centerline{\vbox{\offinterlineskip
		\halign{\vrule\sstrut\hfil\quad##\quad\hfil\vrule&\hfil\quad##\quad\hfil&\vrule\hfil\quad##\quad\hfil\vrule\cr
			\noalign{\hrule}%
			kapitola referátu &  možný počet bodů & udělený počet bodů \cr
			\noalign{\hrule}%
			Práce při měření           &0--5&\cr
			\noalign{\hrule}%
			Teoretická část            &0--1&\cr
			\noalign{\hrule}%
			Výsledky měření            &0--8&\cr
			\noalign{\hrule}%
			Diskuze výsledků           &0--4&\cr
			\noalign{\hrule}%
			Závěr                      &0--1&\cr
			\noalign{\hrule}%
			Seznam použité literatury  &0--1&\cr
			\noalign{\hrule}%
			{\fbtit Celkem}            &max. 20&\cr
			\noalign{\hrule}%
			}%
		}%
	}%
	\bigskip

	\centerline{Posuzoval: \leaders \hbox{.\kern.125em} \hskip160pt \hskip5em dne: \leaders \hbox{.\kern.125em} \hskip100pt \null}%
	}%konec skupiny
}

%% trochu poupravime OUTPUT, abychom meli prijemnejsi pouzivani. Nejdrive pujde na vystup titulka a az pak zbytek.
\output={\tit@utput}

\newbox\titb@x
\def\tit@utput{% provadi se jen pri prvnim \outputu
	\setbox\titb@x=\vbox{\unvbox255}% schovam si obsah prvni strany
	{%
		\headline{\hfill}\footline{\hfill}% vyprazdnime zahlavi a zapati
		\setbox255 = \vbox to \vsize{\titulk@}% vysazim titulku
		\plainoutput % provedu vystup
	}%
	\pageno=1
	\setbox255 = \vbox to \vsize{\unvbox\titb@x}% vratim zpet obsah boxu
	\plainoutput % provedu vystup druhe strany
	\global\output={\plainoutput}% dal uz budu provadet normalni output rutinu
}

\catcode`\@=12

