☰

如何制作看起来像是在投影仪上进行的演示？

tag-icon • tag-icon typography presentations fun
如何制作看起来像是在投影仪上进行的演示？

我想做一个演示，模拟我当数学学生时一些教授使用的投影仪。

我找不到可以模仿投影仪背景的图像。我还尝试使用以下方法使文本变得模糊一点：模糊文本，使其不可读，但如果整个文档（背景和图像）有点模糊和发黄，那就更好了。我使用不同的字体来模拟手工注释（http://www.google.com/fonts/specimen/Permanent+Marker）。

更具体地说：

  • 投影仪产生的背景。

  • 模糊且微黄的文件。

  • 文本中的手工注释。

编辑：没有文本模糊的最小示例

\documentclass{article}
\usepackage[pages=all]{background}
\usepackage{fontspec}
\usepackage{color}
\newfontfamily\myfont[Scale=2.5]{PermanentMarker}
\usepackage{lipsum}

\backgroundsetup{
opacity=0.4,
angle=0,
contents={%
\includegraphics[width=\paperwidth,height=\paperheight]{background-image}
}%
}

\usepackage[overlay,absolute]{textpos}

\begin{document}
\lipsum[1-5]
\begin{textblock}{5}(6,6)
    {\myfont {\color{blue} Some annotations}}
\end{textblock}
\end{document}

答案1

根据@James 的评论，我尝试了一种 imagemagick 方法来回答我自己的问题。

这是一个小例子（用XeLaTeX编译），需要Google永久标记字体（http://www.google.com/fonts/specimen/Permanent+Marker）

\documentclass{article}
\usepackage{fontspec}
\usepackage{color}
\newfontfamily\myfont[Scale=2.5]{PermanentMarker}
\usepackage{polyglossia}
\setdefaultlanguage{english}
\usepackage{blindtext}

\usepackage[overlay,absolute]{textpos}

\begin{document}
\begin{textblock}{8}(4,6)
    {\myfont {\color{blue} Some annotations...}}
\end{textblock}
\blindmathpaper
\blindmathpaper
\begin{textblock}{8}(2,8)
    {\myfont {\color{blue} More annotations...}}
\end{textblock}
\end{document}

对于 imagemagick 部分，我使用了（http://www.fmwconcepts.com/imagemagick/colorfilter/index.php）

#!/bin/bash

if [ $# -ne 2 ] ; then
   echo -e "You  must specify two parameters: filename and corner option s (square) or r (round)."
   exit 1
fi

if [ ! -f $1 ]; then
    echo "File not found!"
    exit 1
fi

if [ "$2" != "s" ] && [ "$2" != "r" ] ; then
   echo "Error in corner option, must be s or r"
   exit 1
fi

output="op_$1"
convert -density 200 $1 -quality 00 -background white -alpha remove page-%d.png

for img in `ls page-*.png`
do
if [ $2 == "s" ]
then
convert $img\
        \( -size 300x200 xc:none -draw "fill black polygon 0,0 0,200 200,0" \
       -write mpr:triangle  +delete \) \
        \( mpr:triangle             \) -gravity northwest -composite \
        \( mpr:triangle -flip       \) -gravity southwest -composite \
        \( mpr:triangle -flop       \) -gravity northeast -composite \
        \( mpr:triangle -rotate 180 \) -gravity southeast -composite \
        $img
fi
if [ $2 == "r" ]
then
convert $img \
        \( +clone -alpha extract \
           -draw 'fill black polygon 0,0 0,300 300,0 fill white circle 300,300 300,0' \
        \( +clone -flip \) -compose Multiply -composite \
        \( +clone -flop \) -compose Multiply -composite \
        \) -alpha off -compose CopyOpacity -composite -compose \
        over -background black -flatten \
        $img
fi
./colorfilter -m 1 -c warming81 -d 45 $img $img
convert $img -blur 3x1 $img
done

convert page*.png -gravity center $output
rm -f page*.png

请随意纠正或改进我的答案。

编辑：添加了屏幕截图。

截屏

相关内容