マクロの引数

名前: Lykeion
日時: 2002-06-10 11:19:09
IPアドレス: 43.240.190.*

はじめて質問させて頂きます。以下 \putcomma マクロは文字列の最後から３文字ずつに
カンマを置きます。

\def\putcomma#1{\newcount\cnt\cnt=0\let\current=\empty\def\comma{}%
  \@tfor\achar:=#1\do{\advance\cnt 1}%
  \@tfor\achar:=#1\do{%
    \ifnum\cnt=10 \def\comma{,}\fi%
    \ifnum\cnt=7 \def\comma{,}\fi%
    \ifnum\cnt=4 \def\comma{,}\fi%
    \edef\current{\current\achar\comma}%
    \def\comma{}%
    \advance\cnt -1}\current}

もともと、４つの整数の引数をとり、各数及び合計を各々カンマ付きで表示するマクロ
の下請のつもりで作りました。numbersty.sty の存在はある書籍で知りながらも、所在
わからず入手する前に作ってみたものの、思った通りには動きません。問題は引数です。

単に \putcomma{12345} の様に呼出す場合問題はないようです。しかし、
\newcount\temp \tempcnt=12345 など定義し \putcomma{\the\tep} と呼出すともうい
けません。

さて、どのように対処、修正したらよいかご教示願えないでしょうか？

この書き込みへの返事：