beamleeto.cls

\NeedsTeXFormat{LaTeX2e}
\ProvidesClass{beamleeto}[2022/05/16 Not Ugly Simple Presentations]

\DeclareOption{twocolumn}{\OptionNotUsed}
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{article}}
\ProcessOptions\relax
\LoadClass{article}

\RequirePackage{graphicx}
\RequirePackage{geometry}
\RequirePackage{fontsize}
\RequirePackage{varwidth}
\RequirePackage{etoolbox}
\RequirePackage{catchfile}

% Size of the slide
\geometry{
    paperwidth=6.4 in,
    paperheight=4.4 in,
    total={6in, 4in},
    left=.2 in,
    right=.2 in,
    top=0 in,
    bottom=0 in,
}

% Generic page settings
\changefontsize{14pt}
\pagenumbering{gobble}
\setlength{\parindent}{0pt}
\topskip=0pt
\raggedright

% Redefinition of \maketitle and related commands

%  \author{author name}
\makeatletter
\let\@authors\@empty
\renewcommand{\author}[1]{%
    \ifx\@empty\@authors%
        % Author list empty
        \global\def\@authors{#1}%
    \else%
        % Other authors already present
        \global\protected@edef\@authors{\@authors, #1}%
    \fi}
\makeatother

%  \affiliation{affiliation name}
% With thanks to zaugin and gus_massa of HackerNews, who pointed out that this
% could be accomplished without another auxiliarly file. Cheers!
\makeatletter
\newcounter{@affilcounter}
\let\@affils\@empty
\newcommand{\affiliation}[1]{%
    \protected@edef\affilarg{%
        \detokenize\expandafter{#1}}%
    \ifcsundef{affil@\affilarg}%
        {\stepcounter{@affilcounter}%
         \expandafter\global\expandafter\protected@edef\csname affil@\affilarg\endcsname{%
            \fnsymbol{@affilcounter}}%
         \ifx\@empty\@affils%
            \global\protected@edef\@affils{%
                ${}^{\csname affil@\affilarg\endcsname}$#1}%
        \else%
            \global\protected@edef\@affils{%
                \@affils, %
                ${}^{\csname affil@\affilarg\endcsname}$#1}%
        \fi}{} % else nothing
    \expandafter\let\expandafter\affilsymb\csname affil@\affilarg\endcsname %
    \global\protected@edef\@authors{\@authors${}^\affilsymb$}}
\makeatother

%  \title{title}
\makeatletter
\let\@title\@empty
\renewcommand{\title}[1]{%
    \ifx\@empty\@title%
        \global\def\@title{#1}%
    \else%
        \GenericError{}%
            {More than one title definition.}%
            {Make sure you are only calling \noexpand\title once. (Before this it said '\@title'.)}%
    \fi}
\makeatother

%  \date{date}
\makeatletter
\let\@date\@empty
\renewcommand{\date}[1]{%
    \ifx\@empty\@date%
        \global\def\@date{#1}%
    \else%
        \GenericError{}%
            {More than one date definition.}%
            {Make sure you are only calling \noexpand\date once. (Before this it said '\@date'.)}%
    \fi}
\makeatother

%  \logo[graphicx options]{path to image}
\makeatletter
\let\@logoalign\@empty
\let\@logoentries\@empty
\newcommand{\logo}[2][]{%
    \ifx\@empty\@logoentries%
        \global\def\@logoalign{c}%
        \global\def\@logoentries{\includegraphics[#1]{#2}}%
    \else%
        \global\protected@edef\@logoalign{\@logoalign c}%
        \global\protected@edef\@logoentries{\@logoentries & \includegraphics[#1]{#2}}%
    \fi}
\makeatother

% \maketitle{}
\makeatletter
\renewcommand{\maketitle}{%
    \vspace*{0pt plus 1fil}%
    \begin{center}%
    {\Large\textsc{\baselineskip=.8em\@title}\par}\vskip .3em%
    \textsc{\@authors}\par%
    \ifx\@empty\@affils%
        \relax% No affiliations
    \else%
        {\vspace{.5em}\baselineskip=1pt{\tiny%
            \vspace*{-.5em}%
            \textsc{\@affils}}\par}
    \fi%
    {\footnotesize\textsc{\@date}}\par%
    \end{center}%
    \ifx\@empty\@logoentries%
        \relax% No logos defined
    \else%
        \par%
        \begin{center}%
        \begin{tabular}{\@logoalign}%
            \@logoentries%
        \end{tabular}%
        \end{center}%
    \fi%
    \newpage}
\makeatother

% \maketopics{}
%
% Typesets an itemize environment with the slide titles (below \maketopics)
\makeatletter
\newif\if@aftertopics
\@aftertopicsfalse
\newcommand{\maketopics}[1][]{%
    \global\@aftertopicstrue%
    \IfFileExists{topics.aux}{%
        \CatchFileDef{\@slidetopics}{topics.aux}{}}%
        {\global\def\@slidetopics{}}%
    \global\let\@slidetopics\@slidetopics%
    \global\newwrite\@buftopics%
    \immediate\openout\@buftopics=topics.aux%
    \AtEndDocument{\immediate\closeout\@buftopics}%
    \setbox0=\hbox{\def\item{}\@slidetopics\unskip}\ifdim\wd0=0pt\relax\else%
        \begin{itemize}%
            \@slidetopics%
        \end{itemize}%
    \fi}
\makeatother

% \slide[Slide title]
%
% Creates a new slide with a title.
% Omit slide title argument to continue previous slide.
% To create a new slide but suppress the title completely, provide an empty arg.
\makeatletter
\newcommand{\@slidetitle}{}
\newcommand{\@slide}[1][]{%
    \clearpage%
    \vspace*{10pt minus 10pt}%
    \newif\if@suppresstitle%
    \global\@suppresstitlefalse%
    \ifx\@titlearg[%
        \if&#1&%
            \global\@suppresstitletrue%
        \fi%
    \fi%
    \if@suppresstitle\relax\else%
        \setbox0=\hbox{#1\unskip}\ifdim\wd0=0pt%
            % Empty title
            {\scriptsize\textsc{\@slidetitle}}%
        \else%
            % New title
            \textsc{#1}%
            \renewcommand{\@slidetitle}{#1}%
            \if@aftertopics%
                \immediate\write\@buftopics{\noexpand\item #1}%
            \fi%
        \fi%
    \fi\par}
\newcommand{\slide}{%
    \futurelet\@titlearg\@slide}
\makeatother

% \subtitle[Slide subtitle]
%
% Very similar to \slide, but typesets a subtitle.
\makeatletter
\newcommand{\@subtitle}{}
\newcommand{\@makesubtitle}[1]{%
    \hspace*{5pt}{$\hookrightarrow$\quad\small\textsc{#1}}}
\newcommand{\subtitle}[1][]{%
    \ifx&#1&\relax\else%
        \renewcommand{\@subtitle}{#1}%
    \fi%
    \@makesubtitle{\@subtitle}%
    \par}
\makeatother