KTUG마당은 KTUG를 방문하는 모든 이용자가 대화를 나누고 소식을 전하는 곳입니다.

  • 로그인 없이 자유롭게 글을 읽고 쓸 수 있는 철학은 처음과 같이 계속됩니다.
  • Team Blog의 글을 이곳 게시판의 "정보글"로 모았습니다. Team blog는 기고자가 올린 글에 질문을 받는 부담을 줄이기 위하여 댓글을 허용하지 않았습니다. 그러나 이곳 게시판으로 모으면서 댓글을 달 수 있습니다. 게시물을 작성하실 때 댓글을 원하지 않으시면 댓글을 허용하시지 않으시기를 바랍니다. 또한 불필요한 소모성 댓글을 달지 않도록 주의하여 주시기를 바랍니다.
  • TeX과 관련된 질문이나 답변은 QnA 마당을 이용하십시오. TeX과 관련된 질문은 지웁니다
  • MathJax를 이용한 수식조판을 사용하실 수 있습니다. 여기를 참조하세요.
  • 스팸 글을 막기 위하여 짧은 시간 내에 다시 글이 등록되는 IP를 막거나, 광고 글을 막기 위하여 금지어로 .com, .net 등을 설정하고 있습니다. 다소간의 불편함이 있으시더라도 양해 바랍니다.
    • 금지어에서 stackexchange, stackoverflow, ctan, overleaf, , github, google.com, gmail.com, .org, .io, sil.org, wiki.com, tistory.com등은 해제하였습니다.
  • 사용하는 편집기는 CKeditor입니다. 편집기에서 [enter]를 누르면 <p> 태그가 들어가고, 문단으로 생각하고 한줄을 비웁니다. 글줄만 바꾸려면 shift-enter 를 누르시면 <BR>가 들어가므로 용도에 맞게 나누어 쓸 수 있습니다.

정보글 화첩 만들기

2015.10.15 17:31

yihoze 조회 수:6369

이렇게 묻는 사람은

"한 폴더에 많은 이미지 파일들이 있다. 어느 파일이 무슨 그림인지 한 눈에 보고 싶은데 좋은 방법이 있을까?"


이런 핀잔을 들을 것이다.

"바보야, 탐색기에서 미리보기를 켜면 되잖아!"


탐색기는, 적어도 내 윈도우즈의 탐색기는 비트맵 이미지들만 보여준다. 이 문제에서 어도비 브릿지만큼 편리한 것은 없다. 그러나 어도비 CS를 갖고 있는 사람은 많지 않을 것이다. 있다고 해도 몇몇 그림을 찾거나 대조하는 목적으로 다소 무거운 브릿지를 띄우는 것이 성가시다. 


좀 더 복잡한 상황을 생각해 보자. A가 만든 문서에 꽤 많은 그림들이 사용되었다. 그 그림들을 A가 직접 만들었다. B가 A 의 허락을 받고 그 그림들 가운데 많은 것들을 그대로 갖다 쓰거나 살짝 고쳐 쓰고자 한다. (저자가 텍 원고와 이미지 파일들을 출판사에 보내는 상황도 이와 비슷할 것이다.) 그 이미지들 가운데 절반 가량이 벡터 PDF이고, 그것들의 원본인 EPS와 AI 파일들이 같은 폴더에 들어 있다. 비트맵 이미지의 원본인 PSD 파일들도 함께 들어 있다. 이 때 A가 B에게 아래 그림과 같은 화첩을 만들어 준다면 ...?


Album.PNG


수작업으로 이런 친절을 베풀 이가 없을 것이다.  이를 구현하는 발상은 그다지 복잡하지 않다.


1) 배치나 다른 스크립트를 이용하여 그림 파일 목록이 담긴 파일을 만든다. 

2) 텍 파일을 만든다. 이 텍 파일은 그림 목록 파일에서 파일 이름을 하나씩 읽고 그 이미지 파일을 삽입한다. 이것도 배치 스크립트 따위가 자동으로 처리하게 한다.


배치보다 더 많은 재주를 갖고 있는 파워셀을 사용해 보자.


MakeAlbum.ps1


$job = $args[0]

$scale = $args[1]


if (!($job)) {$job = "Album"}

$tex = $job + ".tex"

$dir = $job + ".txt"

$pdf = $job + ".pdf"


if (!($scale)) {$scale=0.5}


if (Test-Path($pdf)) {

Write-Output "$pdf already exists."

$answer = Read-Host "Do you want to overwrite it? (Enter Y or N)"

if (($answer -ne 'y') -or ($answer -ne 'Y')) {

Write-Output "This job is canceled"; break

} else {

Remove-Item $pdf

}

}


$ImageTypes = @("pdf", "jpg", "png") # 이것은 dir *.pdf >> album.txt와 동일하다.

foreach ($element in $ImageTypes) {

Get-ChildItem "*.$element" -name | Add-Content $dir -Encoding UTF8

}


$src = "\documentclass[twocolumn]{hzguide}

\LayoutSetup{paper=A4}

\begin{document}

\MakeAlbum[$scale]{$dir} 

\end{document}"


Set-Content $tex -Encoding UTF8 $src

xelatex -interaction=batchmode $tex

delaux

Remove-Item $dir

Remove-Item $tex


hzguide라는 클래스가 \MakeAlbum이라는 명령을 갖고 있다. 그것은 이렇게 정의되어 있다.


\ior_new:N \l_txt_ior


\NewDocumentCommand \MakeAlbum { O {0.5} m }

{

\PlaceImageSetup{scale=#1, showfilename=true}

\ior_open:Nn \l_txt_ior { #2 } 

\ior_map_inline:Nn \l_txt_ior 

{

\tl_set:Nn \l_tmpa_tl { ##1 }

\tl_trim_spaces:N \l_tmpa_tl

\tl_if_empty:NF { \l_tmpa_tl }

{

\placeimage{\l_tmpa_tl}\par

}

\ior_close:N \l_txt_ior 

}


\placeimage는 \includegraphics를 포함한다.

명령형이나 탐색기에서 makealbum.ps1을 실행하면 위의 그림과 같은 album.pdf가 만들어진다.
번호 제목 글쓴이 날짜 조회 수
965 20 개어 조판 [8] file yihoze 2010.09.29 37700
964 메므와 한국어판 설명서 중에서 [2] yihoze 2010.03.19 37679
963 사랑하는 progress님.. 아직도 삐치셨나.. ㅡ.ㅜ~ [1] 2011.11.03 37655
962 RevTeX에 무슨 일이 일어났을까? karnes 2009.12.24 37641
961 서울디자인센터 타이포그래피 워크숍 yihoze 2010.10.27 37575
960 [잡담] 명조체의 로마자 표기 [1] yihoze 2010.10.11 37437
959 [알림] 문서작성워크숍 2010 [6] 한국텍학회 2010.10.16 37392
958 최근 texlive 2012의 hyperref/puenc.def 버그... file ndh 2012.08.14 37264
957 PDF form [3] file yihoze 2010.05.02 37217
956 ConTeXt 샘플과 한글 typescript file. [7] file 정달영 2011.03.21 37052
955 홈페이지 통합 개편에 즈음하여 조인성 2009.12.20 37038
954 한글 폰트 [1] yihoze 2010.09.10 36961
953 [제안] 묻고답하기 게시판에 답글을 달아주십시오. [5] karnes 2010.03.18 36869
952 [잡담] 2도 문서를 만들 때: 내 눈을 믿지 말자 [2] yihoze 2010.10.07 36804
951 시작페이지의 게시판 최근 글 보기에 대한 의견을 구함 [17] karnes 2009.12.24 36715
950 KTUG 10주년 기념행사? [3] nova de hi 2011.10.10 36444
949 Arch Linux 사용자를 위한 은글꼴/나눔바른고딕 글꼴 패키지 [5] xylosper 2013.08.08 36434
948 SageTeX에 대하여 [9] yunjkim72 2010.04.10 36254
947 [후기] 공주대 문서작성 워크숍 2013 [8] Progress 2013.11.11 36226
946 SSD로 TeX를 돌리다 [4] dynamics 2011.06.05 36063



XE Login