-
Notifications
You must be signed in to change notification settings - Fork 1
/
beaudiomer.sty
50 lines (43 loc) · 1.32 KB
/
beaudiomer.sty
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
% beaudiomer includes video and audio in a beamer presentation
%
% (c) 2016-2020 Jim Fowler
%
%% This program can also be redistributed and/or modified under the terms
%% of the LaTeX Project Public License version 1.3c, or later.
%
\NeedsTeXFormat{LaTeX2e}[1994/06/01]
\ProvidesPackage{beaudiomer}
[2020/06/11 v1.00 Beamer packages for the audio, video, wait commands]
\newcommand{\audioannot}[1]{\pdfannot%
{%
/Subtype /Text%
/F 1%
/T (Audio)%
/Contents (\pdfescapestring{#1})%
}}
\def\audio{\@ifnextchar<{\beaudiomer@audio}{\beaudiomer@@audio}}
\long\def\beaudiomer@audio<#1>#2{\only<#1>{\audioannot{#2}}}
\long\def\beaudiomer@@audio#1{\only<\c@beamerpauses>{\audioannot{#1}}}
\newcommand{\videoannot}[1]{\pdfannot%
{%
/Subtype /Text%
/F 1%
/T (Video)%
/Contents (\pdfescapestring{#1})%
}}
\def\video{\@ifnextchar<{\beaudiomer@video}{\beaudiomer@@video}}
\long\def\beaudiomer@video<#1>#2{\only<#1>{\videoannot{#2}}}
\long\def\beaudiomer@@video#1{\only<\c@beamerpauses>{\videoannot{#1}}}
\newcommand{\waitannot}[1]{\pdfannot%
{%
/Subtype /Text%
/F 1%
/T (Wait)%
/Contents (\pdfescapestring{#1})%
}}
\def\wait{\@ifnextchar<{\beaudiomer@wait}{\beaudiomer@@wait}}
\long\def\beaudiomer@wait<#1>#2{\only<#1>{\waitannot{#2}}}
\long\def\beaudiomer@@wait#1{\only<\c@beamerpauses>{\waitannot{#1}}}
\endinput
%%
%% End of file `beaudiomer.sty'.