#action Blog Add Blog ##Blog {{{#!blog Karnes 2006-06-10T03:04:15 올리지 않은 답변 KTUGOperate:18145''''''에 답변은 lineno를 소개하는 것으로 달았지만, 답변을 작성하는 과정에서 *문단 개수*를 세는 짧은 코드를 작성하였기 때문에 여기에 적어둔다. 여기서는 everypar를 이용해서 *문단*의 개수를 세었는데, everyline 비슷한 명령을 만들어서 진짜로 행의 개수를 세는 방법도 있지 않을까 한다. {{{#!vim tex \documentclass{article} \newcounter{mycnt}\setcounter{mycnt}{0} \newwrite\myOutput \def\OutputName{\jobname.tmp} \makeatletter \newcommand\showmethenumber{% \IfFileExists{\jobname.tmp}{\input{\jobname.tmp}~}{??}% } \newenvironment{countthelines}% {\setcounter{mycnt}{0}\everypar\expandafter{\stepcounter{mycnt}}% \openout\myOutput\OutputName } {\everypar{\empty}\par We have \themycnt~lines. \protected@write{\myOutput}{}{\themycnt\string\ignorespaces}% \closeout\myOutput } \makeatletter \begin{document} The following paragraph has \showmethenumber lines. \begin{countthelines} a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line\par a line \end{countthelines} \end{document} \}}} }}} {{{#!blog Karnes 2006-06-08T21:34:38 논리 연산(?) 신기한 코드 KTUGOperate:18135''''''의 [hoze]님의 질문에 답변을 작성하다가 만든 신기한 코드. {{{\iffoo\}}}의 진리값을 부정연산(NOT)한다. {{{#!vim tex \newif\iffoo\newif\ifNOTfoo \def\OprNOT#1{% \csname \csname if#1\endcsname NOT#1fals\else NOT#1tru\fi e\endcsname } \OprNOT{foo} \}}} \OprNOT{foo}를 실행한 결과는 \iffoo가 true이면 \ifNOTfoo를 false로, \iffoo가 false이면 \ifNOTfoo를 true로 바꾸는 것이다. 일반적인 상황에서 \csname if...\endcsname ~~~\else ~~~\fi는 문제를 겪게 되기 쉬운데 이 경우에는 두번째 \csname이 먼저 전개되어 \if \else \fi 구문을 완성하고 그 다음에 바깥쪽 \csname가 매크로를 완성한다. 다음은 예제. {{{ \documentclass{article} \newif\ifA\newif\ifNOTA \newif\ifB\newif\ifNOTB \def\OprNOT#1{% \csname \csname if#1\endcsname NOT#1fals\else NOT#1tru\fi e\endcsname } \newcommand\testtest{ \ifA a true \else a false\fi \quad \ifB b true \else b false\fi \OprNOT{A}\OprNOT{B} \ifNOTA not a true \else not a false\fi \quad \OprNOT{A}\OprNOT{B} \ifNOTB not b true \else not b false\fi AND: \ifA\ifB tttt\else ffff\fi\else ffff\fi OR: \ifNOTA\ifNOTB ffff\else tttt\fi\else tttt\fi } \begin{document} NOW: \bigskip \Afalse\Bfalse \testtest \bigskip \Atrue\Btrue \testtest \bigskip \Atrue\Bfalse \testtest \bigskip \Afalse\Btrue \testtest \end{document} \}}} }}} {{{#!blog Karnes 2006-06-08T14:06:51 hypua2jamo, jamo2hypua KTUGFaqMook 5월호 부록에 포함된 자모 <-> 한양PUA 변환 스크립트의 윈도 실행파일을 여기 올려두기로 한다. 이 스크립트는 여러 가지로 요긴하게 쓰일 것으로 기대. * attachment:hypua2jamo.zip hypua2jamo는 복잡한 옵션이 주어져 있지만 jamo2hypua는 자모 문자만 찾아서 변환하면 되는 것이기 때문에 별 옵션이 필요가 없다. {{{ $ hypua2jamo [options] output.file $ jamo2hypua output.file \}}} 스크립트를 만들어주신 김도현 교수께 감사. }}} {{{#!blog Karnes 2006-06-07T23:44:00 메모. Hangul-ucs의 폰트 선택 {{{\SetHangulFonts\}}} 등의 명령을 자주 쓰다보니 구차나져서... {{{ \makeatletter \def\FirstTwoOfFour#1#2#3#4{#1#2} \newcommand*\SelectHfonts[2]{% \ifx#2* \hangul@fontmap#1\@nil\hanja@fontmap#1\@nil \else \hangul@fontmap#1\@nil\hanja@fontmap#2\@nil \fi } \def\hangul@fontmap#1,#2,#3\@nil{% \ifx#1*\def\h@ng@ls@rif{unbt}\else\def\h@ng@ls@rif{#1}\fi \ifx#2*\def\h@ng@ls@ns{ungt}\else\def\h@ng@ls@ns{#2}\fi \ifx#3*\def\h@ng@lt@z@{untz}\else\def\h@ng@lt@z@{#3}\fi \SetHangulFonts{\h@ng@ls@rif}{\h@ng@ls@ns}{\h@ng@lt@z@}% \def\hfontfamilynameprefix{\expandafter\FirstTwoOfFour\h@ng@ls@rif}% } \def\hanja@fontmap#1,#2,#3\@nil{% \ifx#1*\def\h@nj@s@rif{unbt}\else\def\h@nj@s@rif{#1}\fi \ifx#2*\def\h@nj@s@ns{ungt}\else\def\h@nj@s@ns{#2}\fi \ifx#3*\def\h@nj@t@z@{ungt}\else\def\h@nj@t@z@{#3}\fi \SetHanjaFonts{\h@nj@s@rif}{\h@nj@s@ns}{\h@nj@t@z@}% } \makeatother \}}} 사용법은 다음과 같음 * 전체 정의 {{{ \SelectHfonts{utbt,utgt,uttz}{utbt,utgt,utgt} \}}} * 한자 부분을 한글 부분과 같게. 주의. 은타자는 한자가 없으므로 타자체로 은타자를 설정한 경우 이 방식을 쓰면 ttfamily에서 오류. {{{ \SelectHfonts{utbt,utgt,utgt}{*} \}}} * 몇 개만 바꿀 때. 별표 부분은 모두 기본폰트(은글꼴)로 설정됨. {{{ \SelectHfonts{utbt,*,*}{*,*,utgt} \}}} 특히 \hfontfamilynameprefix를 자동으로 설정해주는데, 이 변수가 설정되면 memhangul-ucs의 경우 문장부호 등에 약간의 변화가 생김. 예를 들면 \bnm, \cntrdot 등이 이 변수에 영향을 받으므로 미리 설정해둠. }}} {{{#!blog Karnes 2006-06-07T09:05:36 다시 돌아보는 피씨방알바 우스개 오래된 유머이기는 하지만.... 오늘 "MiKTeX을 다시 설치하세요"라는 답변을 달고 나니 문득 생각이 났다. (Windows에서) 가히 만병통치약인 "껐다켜기"와 "다시 설치"... {{| PC방 알바의 대답 Q : 캠 화면이 안뜹니다. 어떻게 해야 합니까? A : 캠은 시스템 과부하를 가져옵니다. 껐다 켜십시오. Q : 캠 화면은 뜨는데 목소리가 안들리는데요. 어떻게 해야 하죠? A : 일시적인 서버의 렉 현상입니다. 껐다 켜십시오. Q : 베넷 접속이 안됩니다. 해결책은? A : 베넷 서버의 문제이던지 피시방 회선의 일시적인 렉입니다. 껐다 켜십시오 Q : 베넷 접속에는 성공했는데.. 패스워드가 틀렸다고 자꾸 지랄입니다. A : 베틀넷 서버는 이중 데이터베이스 구조를 가지고 있고, 5월달 동안 아시아 서버 분리 작업을 하고 있습니다. 그러므로... 껐다 켜십시오. Q : 갑자기 치명적 오류라는 말이 뜨면서 컴이 먹통이 됐습니다. 어떻게 해야 합니까? A : 껐다 켜십시오. Q : 앗! 이번엔 치명적 오류라는 말 대신에 익스플로러 에러가 나는데요? A : 껐다 켜십시오. Q : MP3가 나오다가 딕딕 거리면서 노래가 안나오는데요? A : 시스템 과부하입니다. 껐다 켜십시오. Q : 나우누리 접속이 안되는데요. 해결책은? A : 나우 원래 그런거야 뻔하지 않습니까. 껐다 켜십시오. Q : 이번에는 유니텔 접속도 안되는데요? A : 다른 통신사라고 별 수 있습니까. 껐다 켜십시오. Q : 갑자기 키보드가 안 먹혀요. 어떻게 하죠? A : 가끔 키보드가 맛이 가는 경우가 있습니다. 껐다 켜십시오. Q : 로그스피어가 엄청 느린데요. 어떻게 하죠? A : 시스템 리소스 부족입니다. 껐다 켜십시오. Q : 게이밍 존에서 레인보우가 실행이 안되요. 어떻게 하죠? A : 접속 불량입니다. 껐다 켜십시오. Q : 레인보우 잘했는데.. 메뉴가 이상하게 나와요. 어떻게 하죠? A : 비디오 카드와 CPU의 충돌현상입니다. 껐다 켜십시오. |}} ---- 캠과 레인보우 관련 Q & A를 제하고 모두 제 얘깁니다. ^^ -- [Progress] [[DateTime(2006-06-07T09:55:03)]] ---- 윈도우를 사용하는한 껏다켜기보다 쉬운 문제 해결법은 없습니다. (라고 믿고 있고, 경험하고 있습니다. 심지어는 DB server도 같은 방식으로 처리하는 경험도 있었습니다. ^^;) --[likesam] -- Anonymous [[DateTime(2006-06-07T13:40:54)]] ---- Q: 컴이 자꾸 리부트되고 아무것도 할 수 없어요.ㅠㅠ A: 바이러스입니다. 끄십시요. -- Anonymous [[DateTime(2006-06-09T19:20:26)]] }}} {{{#!blog Karnes 2006-06-02T02:50:18 xindy binaries for mac os x 이호재 님이 xindy 얘길 하셔가지고서리... 말 그대로 날밤을 깐.... X( attachment:xindy_bin_macosx.zip 축구 끝나는 걸 보고 시작해서 여섯 시가 넘어서여 얻은 바이너리 파일들이나, 아직 제대로 동작하는지는 테스트해보지 못했습니다. 혹시 맥을 쓰시는 분이 계시다면 테스트를 부탁합니다. powerpc/G4, OS X 10.4.4, fink 10.4-transitional 상태에서 컴파일한 것입니다. (파일을 풀면 세 개의 파일이 나오는데, linux용 xindy 일괄 설치 파일(xindy-2.2-rc2-linux.tar.gz)을 README에 따라 설치한 다음 이 세 개의 파일만 교체해주면 되어야 합니다. tex2xindy는 bin/, 나머지 rte(run)와 mem 파일은 lib/ 아래에 오도록 배치합니다.) 이걸 컴파일하기 위하여 fink install clisp 하였는데, 실행시에도 필요할까요? 윈도용(cygwin)으로도 어쩌면 대략 될 것 같다는 느낌이 들기는 하는데 현재 cygwin이 깔려 있는 내 윈도 박스가 조용히 지낸 지 어언 몇 달... 아무래도 이걸 다시 살려야 할 듯... (윈도 돌아가는 컴퓨터가 피료해요... ^^ ) 잘 되면 김도현 교수님을 졸라서 xindy-dhucs.pl을 하나 만들어달래야죠... ㅎㅎ ---- 음... 일단 작동은 하네요. dhucs에서 만들어진 .idx에서 한글을 strip off(makeindex-dhucs의 한글 변환 부분만 발췌해서...)해서 테스트해보았는데 일단 default로는 그럭저럭 돌아갑니다. 문제는 한글에 맞는 xdy를 만드는 것인데... 이건 정말 난관이로군요. 당분간 포기. 한글이 아니라 다른 언어라면 상당히 요긴하게 쓰일 수 있을 듯도 합니다. -- [Karnes] [[DateTime(2006-06-02T08:40:08)]] ---- TLC2에서도 아시아 언어는 지원하지 않는다고 말하고 있습니다. 저는 불어 같은 라틴 문자의 경우보다는 (영어로 대충 처리해도 되니까) 러시아어와 그리스어에 써 보고 싶습니다. DOS 버전을 회사에 출근하면 시도해 보겠습니다. 밤을 새셨다니 송구스럽습니다. -- Anonymous [[DateTime(2006-06-03T16:35:16)]] }}}