原稿を紹介します

名前: ヒョン
日時: 2007-08-10 23:03:23
IPアドレス: 125.2.54.*

さんざん、叩かれていますが(^o^)、お蔭様で、タイプセットに成功しましたので、

以下に、原稿を紹介させて頂きます。atena.styはご自分でご用意下さいませ。

\documentclass[a4paper,landscape]{tarticle}
\usepackage[atenalabel]{atena}
\AtBeginDvi{\special{papersize=297mm,210mm}}
\LabelSepParameter(0mm,0mm)<3*7>(0mm,-30mm)
\LabelParameter(70mm,38.1mm)(3mm,3mm){6mm}{\normalsize}{\Large\bfseries}
%\keisho{} % 様を取る場合
\makeatletter
\def\@zip#1-#2<#3,#4>{#1-#2}
\def\personal#1#2#3{%
  \memo{\noindent
        \setbox0=\hbox{\yoko\large\sf\@zip#2<,>\rule[-3mm]{0mm}{1mm}}%
        \setbox1=\hbox{\vbox{\@tempdima=\hsize
          \advance\@tempdima by -\ht0\advance\@tempdima by -\dp0
          \hsize=\@tempdima
          \noindent{\Lp@r6#3}\\[2.5mm]%
          \hspace*{\Lp@r5}{\Lp@r7\renm@i0{#1}}%
          \vskip-\baselineskip}}%
        \box0
        \@tempdima=0.5\ht1 \advance\@tempdima by -0.5\dp1
        \lower\@tempdima\box1}}
\makeatother
\begin{document}

% A4で「横」指定 番号は０〜20まで増やす
% 氏名、郵便番号、住所の順
\begin{atena}[0]
\personal{○○　○}{000-0000}
  {○○市○○町大字○村○○番地}

\personal{××　×}{111-1111}
  {××市××町大字×村××番地}

\end{atena}
\end{document}

如何です？大層便利に利用してますよ。ヤフオクで物を売っていた頃、よくこれを使って
配送しましたです。いちいち書かなくていいから、便利でした。

この書き込みへの返事：