プレプリントの論文を他人に配るときに、プレプリントであることを示すように、論文の右肩に印刷できれば便利です。

submitted to: SIAM
(Jan. 2001)

in pinting : JSIAM
(Oct. 2002)

など。スタイルファイルで適当なものが見当たりませんでしたので、 dvips の機能を利用します。

次のようなファイル (stamp.pro) を準備します。

userdict begin
/start-hook {
  gsave
  575 822 10.5 sub moveto
  /Times-Roman findfont 10.5 scalefont setfont
  (submitted to: Theoretical and Applied Mechanics 50) dup
  stringwidth pop neg -15 rmoveto show
  (\(Jun. 1 2001\)) dup
  stringwidth pop neg -15 rmoveto show
  grestore
} def
/bop-hook {
  /texp exch def
  /psp exch def
  gsave
  575 20 moveto
  /Times-Roman findfont 10.5 scalefont setfont
  psp 1 string cvs dup
  stringwidth pop neg 0 rmoveto show
  grestore
  psp texp
} def
end

そして、

% dvips -h stamp.pro paper.dvi > paper.ps

としてみましょう。右肩に

submitted to: Theoretical and Applied Mechanics 50
(Jun. 1 2001)

右下にページ数が出るはずです。

書式は PostScript
/start-hook には文書処理の最初におこなわれる
/bop-hook にはページ処理の最初におこなわれる
bop-hook は、スタックに文書全体の頁数、その頁番号がつまれた状態で呼び出される。

文書全体を拡大・縮小したり、スライドを作るときも便利。

fujiwara (at) acs.i.kyoto-u.ac.jp