KTUGFaq
![[http]](/wiki/imgs/http.png)
작은나무가 즐겨 사용하는 매트로 \fifo ... \ofif를 이용해서 주어진 숫자에 콤마(,) 넣는 매크로 \insertcommas를 만들어 보았습니다. 어디에 어떤 버그가 숨어있고, 쓸데없는 부분이 있을지도 모르겠습니다. 슬슬 텍 공부를 다시 시작하려는데, 오랜만에 하려니 잘 안되네요. 
\def\fifo#1{\ifx\ofif#1\ofif\fi
\process#1\fifo}
\def\ofif#1\fifo{\fi}
\newcount\n \newcount\m
\def\insertcommas#1{\n=0
\def\process##1{\advance\n1 }\fifo#1\ofif
\m=\n \divide\n3 \advance\n1 \multiply\n3
\advance\n by-\m \ifnum\n=3 \n=0 \fi \advance\n-1
\def\process##1{\advance\n1 \ifnum\n=3 {,}\n=0 \fi ##1}
\fifo#1\ofif}
다음과 같이 입력하면,
\insertcommas{1}
\insertcommas{12}
\insertcommas{123}
\insertcommas{1234}
\insertcommas{12345}
\insertcommas{123456}
\insertcommas{1234567}
...
아래와 같은 결과를 얻을 수 있습니다.
