Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- \documentclass{article}
- \usepackage[]{xparse}
- \usepackage{pdfpages}
- \ExplSyntaxOn
- \NewDocumentCommand \crosspdf { O{#1-en} m }
- {
- \int_set:Nn \l_tmpa_int { 1 }
- \int_new:N \l_tmpone_int
- \int_new:N \l_tmptwo_int
- \int_new:N \l_min_int
- \int_new:N \l_max_int
- \pdfximage{#1.pdf}
- \exp_args:NNx \int_set:Nn \l_tmpone_int { \the\pdflastximagepages }
- \pdfximage{#2.pdf}
- \exp_args:NNx \int_set:Nn \l_tmptwo_int { \the\pdflastximagepages }
- \int_compare:nNnTF { \l_tmpone_int } > { \l_tmptwo_int }
- {
- \int_set_eq:NN \l_min_int \l_tmptwo_int
- \int_set_eq:NN \l_max_int \l_tmpone_int
- \tl_set:Nn \l_min_tl { #2 }
- \tl_set:Nn \l_max_tl { #1 }
- }
- {
- \int_set_eq:NN \l_min_int \l_tmpone_int
- \int_set_eq:NN \l_max_int \l_tmptwo_int
- \tl_set:Nn \l_min_tl { #1 }
- \tl_set:Nn \l_max_tl { #2 }
- }
- \int_do_until:nn { \l_tmpa_int > \l_min_int }
- {
- \includepdf[pages={\int_use:N \l_tmpa_int}]{#1.pdf}
- \includepdf[pages={\int_use:N \l_tmpa_int}]{#2.pdf}
- \int_incr:N \l_tmpa_int
- }
- \int_compare:nNnT { \l_max_int } > { \l_min_int }
- {
- \int_incr:N \l_min_int
- \includepdf[pages={\int_use:N \l_min_int - last}]{\tl_use:N \l_max_tl}
- }
- }
- \ExplSyntaxOff
- \begin{document}
- % 先插 #1, 再插 #2, #1 默认值是 #2-en
- \crosspdf[test]{my}
- \end{document}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement