[mgp-users-jp 00294] macro for mgp

[KIZU takashi/ 木津 隆史 <kizu@ics.es.osaka-u.ac.jp>]

  こんにちは，木津＠阪大です．
  mgp ファイルを書いていて，次のようなことが気になり出しました．

 1) 行頭からしかコマンドが書けないので，表示する行の途中で属性を変更す
    ると，mgp ファイルが後から読み難い(気がする)．

 2) mark, again コマンドを用いて sample-jp.mgp のようなアニメーション
    をすると場合，同じようなコマンド列を何度も書かねばならず，ちょっと
    面倒．
      また，このような『アニメーション』入りmgp file をmgp2ps にかける
    と，アニメーションの全コマが PS fileに書かれてしまう．

  これを軽減するために，以下のような仕様の preprocessor を作れない
かと考えました．

変換前	...\色名{argument}...	...\色名 ...	...\FONT{font名}...
	     ↓                      ↓                 ↓
変換後	...			...		...
	%fore "色名"		%fore "色名"	%font "font名"
	argument		...		...
	%fore "white"
	...

変換前	\ANIM{file1, file2, file3}
	  ↓
変換後	%mark, image "file1"

	%again, mark image "file2"

	%again, mark image "file3"

# これだけは従来の % コマンドに統一できる(?)

変換前	\BEGIN{POINT}
	1行目
	2行目
	\END{POINT}
	  ↓
変換後	%mark
	%fore "red"
	1行目
	%fore "white"
	2行目
	%pause
	%again, mark
	1行目
	%fore "red"
	2行目
	%fore "white"
	%pause
# red, white をoptional 引数で指定出来るようにしたいところ

mgp2ps 用と指定すると

変換前	\ANIM{file1, file2, file3}
	  ↓
変換後	%mark, image "file3"

変換前	\BEGIN{POINT}
	1行目
	2行目
	\END{POINT}
	  ↓
変換後	1行目
	2行目

  こんなものは既にどこかに有るのでしょうか?
  また，そもそもこんなものを欲しがる人はいらっしゃるでしょうか?

-- 一応 perl で書いてみたものの，code がなんかダサい(;_;)
木津 隆史＠情報数理系専攻.基礎工学研究科.阪大
kizu@ics.es.osaka-u.ac.jp
PGP Public Key <URL:http://www-kasi.ics.es.osaka-u.ac.jp/kizu/public-key.html>
PGP Public Key fingerprint = F6 A7 88 A8 BE A6 6A 90  A4 00 57 C5 A9 00 E9 63