Movable Type 4.2 パーフェクトガイド
荒木 勇次郎

時間を見ては目を通しているのですが、本当にすごいボリュームです。しかも、随所にコラムとして関連情報へのポインタが含まれていて、情報の密度も半端じゃないです。手に取った瞬間に、並大抵ではないエネルギーが費やされている一冊だと分かります。すばらしいです。
改めてyujiroさん、お疲れ様でした。

それでですね。なんと!パーフェクトガイド内で、当サイトで公開しているプラグインBuild Tracerが紹介されています。しかも、通常のプラグイン紹介とは別枠で、パーフェクトガイドのメインともいえるテンプレート解説の冒頭付近に一ページ強を割いて掲載されていました。見た瞬間変な汁が出ました。
あの超ニッチなプラグインを取り上げられるとは、これは、自分も頑張らなくちゃとやる気がたくさん出ました。ありがとうございました!

IndexContextプラグインもピックアップされてました。うぇーい。

とり急ぎTaggingHelperを対応させました。まったくの暫定版なので、バージョン外とします。
Movable Type / MTOS 4.2 でのみ動作します。また、タグの使用頻度順でのソートが出来ません。

TaggingHelperForMT4_2.zip

今後の対応については、考え中です。

テンプレートは以下のページで配布されています。すばらしいです。
「iPhoneテンプレートfor MT」を公開いたします。｜iPhone｜東京Webデザイナー日記リターンズ｜crema design

なお、 iPhoneテンプレートはブログURL内の「i」ディレクトリに出力する仕組みになっていますので、iPhoneでアクセスする時に専用のURLにアクセスする必要があります。
このブログでは、インストールの際に以下のようなカスタマイズを行って、PCでの閲覧時と同じURLになるようにしてみました。

• 追加したiPhoneテンプレート内のトップページとブログ記事アーカイブへのリンクを、通常のものに書き直す。
  • 画像やcssファイルなどへのリンクは変更しない
  • アーカイブマッピングは、「i」ディレクトリ内へ出力する設定のままにする
• ブログトップの.htaccessに以下を追加。

  RewriteCond %{HTTP_USER_AGENT} (iPhone|iPod)
  RewriteCond %{REQUEST_URI} !^/i/
  RewriteRule ^(.*)\.html$ /i/$1.html [L]

.htaccessの記述は、利用しているサーバーによっては上手く動かないかもしれません。またその場合、即座にサイト全体が500エラーになってしまうような事態も考えられます。.十分注意して作業を行ってください。

このテンプレートは<mt:ifDynamic>ダイナミック<mt:else>スタティック</mt:ifDynamic>で構築されました。

いくらPerl弄っても動作が直らないと思ったらPHPのほうに問題があった。何を言ってい(ry等と言うことにならないためですね。

さて、ここでちょっとした罠があります。mt:ifDynamicと対になるようなテンプレートタグmt:ifStaticでは、このような書き方は出来ません。

このテンプレートは<mt:ifStatic>スタティック<mt:else>ダイナミック</mt:ifStatic>で構築されました。

上記テンプレートは、スタティックでは期待通りに動きますが、ダイナミックでは以下のような出力になってしまいます。

このテンプレートはで構築されました。

原因は、mt:ifStaticタグのPHPでの実装が、テンプレートタグとしてではなく、コメント(のような)扱いになっているためです。
<mt:ifStatic>・・・</mt:ifStatic>の部分が、再構築より前に強制的にテンプレートから削除されてしまうんですね。なので、その中に何個mt:elseを書こうが、全部消えてしまうわけです。mt:ignoreと同じですね。

これはおそらくダイナミックパブリッシングでは、ページビューごとに構築が行われるため、より細部の高速化を重視しているものかと思われます。mt:ifStaticとmt:ifDynamicで非対称な動作となっているのでちょっと違和感がありますが、上手く使い分けると良いと思います。

で、ですね。なんか、単純に外でウェブに繋がるとか、iPodと電話が一緒になったとか、そういう個々の具体的な機能についてとは、まったく別の次元のワクワク感を、iPhoneを触るたんびに感じるんですよ。

だって不思議じゃないですか?
あの愛想の無い、ともすれば上下間違えてスリープボタン押せなかったりするのっぺらぼうなデザインのクセに、ひとたびロック解除すれば触る撫ぜる傾ける音が出る話す震える表示する移動する、と、あらゆる手段でのインターフェイスが提供されていて、およそコンピュータに出来そうな事ならいつ何時でも反応してくれる。
それなのに電源切れば、ほとんどただの板。
このギャップにスゲエワクワクするんです。

そのワクワク感の正体が今日分かりました。気づきました。
iPhoneって東京探偵団に出てきた「CJカード」を現実にしてしまったんだな、と。

東京探偵団ってのは「ギャラリーフェイク」や古くは「さすがの猿飛」「GU-GUガンモ」の作者の細野不二彦が書いていた、ホモの少年と守銭奴の少女とマゾの少年で構成される探偵事務所が超巨大財閥の金の力を後ろ盾にホモの中年が起こす事件を金の力で解決するという内容の傑作マンガです。
wikipediaによると連載は'85-'87年ですので、当時自分は小6くらいで読んでたんでしょうか。

そのマンガの中で、探偵団の一人が落とした探偵団専用のスペシャルクレジットカード「CJカード」を貧しい家出兄妹が拾う、という話があるのですが、そこで描かれるカードの機能がとにかく凄いんですよ。
クレジットカードとして勿論最強。何しろ日本に10枚と無い超スペシャルカード。限度額無限。取り出した瞬間即VIP待遇。
そして、ここが大事なのですが、一見ただのクレジットカードなのに、ちょっとカードの端を触って操作すると、音楽が聴ける、ファミコンが出来る、ショッピングも出来る、テレカにもなる、位置情報も確認できる、お父さんに会いたいとカードに話しかければ、居場所を音声で答えてくれる。なんだか分からないくらいハイテクな色々が詰め込まれた超高機能カード。
このエピソードの肝は、ただのカードなのに、家出兄妹の希望を次から次へと叶えていくという、そのファンタジーにあったと思います。そこで描かれていたものは、まさに「魔法のカード」でした。子供心に凄く憧れ、何度も読み返したことを今でも覚えています。

そして20年が過ぎ、iPhoneが今、手の中にあります。
ゲーム、音楽、電話。加速度センサー、GPS、そしてマルチタッチディスプレイ...。20年前のマンガに登場したファンタジー、子供だった当時の自分が憧れた魔法のほとんどが、この板状の小さいボディに実現されています。これは、ワクワクせざるを得ませんよね。

子供の頃のそんな記憶を思い出しながら、ぼーっと黒いiPhoneを眺めていると、これって本当「魔法のカード」と呼ぶにふさわしい代物だと思えてきてしまいます。そりゃカードと呼ぶには少々分厚くて大雑把ですが、少なくとも、電話の受話器から発展してきた携帯電話のデザインと比べて強いてどちらかといえば、間違いなくカードでしょう。

ぱっと見は何も出来なさそうなのに、ちょっと触るだけで万能的に要求に答えてくれるという感覚。
これは、10キーのついた受話器の末裔たちからは絶対に感じ取ることの出来ない、特別な快楽なんじゃないかな、と思います。

発売から一週間後となる先週末。
友人と遊ぶ予定もあって朝から開店待ちをするわけにも行かず、iPhoneを入手出来るのは当分先だなと諦めていた三連休初日の午後5時過ぎ。場所は23区内の某駅前。
お遊びも一段落、これから飲みに行くぞ、という時に、ちょっとお金を下ろしに銀行に寄ったんですよ。
で、その隣か隣の隣にソフトバンクショップがあったので、冷やかし半分で店員に聞いてみました。

「iPhoneの在庫はありますか」
「ありません」

当然の答えが返ってきました。ですよねー。
おおう。これで終戦。とも思ったのですが、明日以降のリサーチのために、入荷数や行列の様子などを店員さんに聞いてみました。すると、

「Softbank端末からの機種変更でしょうか?」

逆に質問が帰ってきました。
質問を質問で返すんじゃねえぞとも思ったのですが、そこはチキン大人な自分なので

「いえ、iPhone目当てで他キャリアからソフトバンクさんに乗り換えようと決心しております!」

とかそんなことを言ってみました。すると、おおなんということでしょう。店員さん、急に張り切って
「予約分のキャンセルが無いか、電話で確認してみますので、ちょっとお待ちいただけますかー」
とか言いつつどこかへ走っていきます。

あれ、なにこの展開。
大昔には、新規ゼロ円機種変万円なんて時代もあったけど、今でもそんなメソッド使えるの?とgkbrしながら待つこと数分。

「16Gのブラックでよろしかったでしょうかー」
「2階の契約カウンターでお待ちいただけますかー」

なんと。ktkr。

後はあっという間でした。MNPの手続きから何から面倒見てもらって、30分程度で俺の手元に俺のアクティベーション済みの俺のiPhoneが。
飲み会を半分すっぽかしてしまった友人には申し訳なかったが(合流後iPhoneネタで盛り上がったので良しとする)、こんな棚ボタでiPhoneをGetできた自分は超ラッキーだと思います。イエー。バッバッ。

結論としてはWinWinの関係が大事だよねービジ☆ネス、というお話でした。

#!/usr/bin/perl
use strict;
sub which_is_heavy {
    my ($left, $right) = @_;

    #この辺は本来ならブラックボックス
    my ($left_mass, $right_mass);
    map { $left_mass += $_ } @$left;
    map { $right_mass += $_ } @$right;

    return $left_mass > $right_mass    ? 'left'
            : $left_mass < $right_mass ? 'right'
            :                            'balanced';
}
 
sub get_fake_from_three {
    #偽者が重いか軽いか分かってれば3つのコインから一発で偽者を割り出せるよ関数
    my ($fake, @coins) = @_;
    if ($coins[0] > $coins[1] ) {
        return $fake eq 'heavy' ? 0 : 1;
    }
    elsif ( $coins[0] < $coins[1] ) {
        return $fake eq 'heavy' ? 1 : 0;
    }
    else {
        return 2;
    }
}
 
sub get_fake {
    my @c = @_;
    my $first_result = which_is_heavy( [ @c[0..3] ] ,[ @c[4..7] ] );
    if ($first_result eq 'balanced' ) {
        #0-7は本物
        my $second_result = which_is_heavy( [@c[0..2]], [@c[8..10]] );
        if ($second_result eq 'balanced' ) {
            #11,12が偽者
            my $third_result = which_is_heavy( [ $c[0] ], [ $c[11] ]);
            return $third_result eq 'balanced' ? 12 : 11;
        }
        else {
            #8-10に偽者かつ重いか軽いかが判明
            my $fake = $second_result eq 'left' ? 'light' : 'heavy';
            return 8 + get_fake_from_three($fake, @c[8..10]);
        }
    }
    else {
        #8-12は本物
        my $second_result = which_is_heavy( [$c[0],$c[1],$c[2],$c[4],$c[5]],[@c[8..12]] );
        if ($second_result eq 'balanced' ) {
            my $third_result = which_is_heavy( [$c[3], $c[6]], [@c[8..9]] );
            if ( $third_result eq 'left') {
                return $first_result eq 'left' ? 3 : 6;
            }
            elsif ( $third_result eq 'right' ) {
                return $first_result eq 'left' ? 6 : 3;
            }
            else {
                return 7;
            }
        }
        else {
            my $fake = $second_result eq 'left' ? 'heavy' : 'light';
            if ( ( $fake eq 'heavy' && $first_result eq 'left' )
              || ( $fake ne 'heavy' && $first_result ne 'left' ) ) {
                return get_fake_from_three( $fake, @c[0..2] );
            }
            else {
                if ( $fake eq 'heavy' ) {
                    return $c[4] > $c[5] ? 4 : 5;
                }
                else {
                    return $c[4] > $c[5] ? 5 : 4;
                }
            }
        }
    }
}
 
print get_fake( 3,2,2,2,2,2,2,2,2,2,2,2,2 ) . " will be 0\n";
print get_fake( 2,3,2,2,2,2,2,2,2,2,2,2,2 ) . " will be 1\n";
print get_fake( 2,2,3,2,2,2,2,2,2,2,2,2,2 ) . " will be 2\n";
print get_fake( 2,2,2,3,2,2,2,2,2,2,2,2,2 ) . " will be 3\n";
print get_fake( 2,2,2,2,3,2,2,2,2,2,2,2,2 ) . " will be 4\n";
print get_fake( 2,2,2,2,2,3,2,2,2,2,2,2,2 ) . " will be 5\n";
print get_fake( 2,2,2,2,2,2,3,2,2,2,2,2,2 ) . " will be 6\n";
print get_fake( 2,2,2,2,2,2,2,3,2,2,2,2,2 ) . " will be 7\n";
print get_fake( 2,2,2,2,2,2,2,2,3,2,2,2,2 ) . " will be 8\n";
print get_fake( 2,2,2,2,2,2,2,2,2,3,2,2,2 ) . " will be 9\n";
print get_fake( 2,2,2,2,2,2,2,2,2,2,3,2,2 ) . " will be 10\n";
print get_fake( 2,2,2,2,2,2,2,2,2,2,2,3,2 ) . " will be 11\n";
print get_fake( 2,2,2,2,2,2,2,2,2,2,2,2,3 ) . " will be 12\n";
 
print get_fake( 1,2,2,2,2,2,2,2,2,2,2,2,2 ) . " will be 0\n";
print get_fake( 2,1,2,2,2,2,2,2,2,2,2,2,2 ) . " will be 1\n";
print get_fake( 2,2,1,2,2,2,2,2,2,2,2,2,2 ) . " will be 2\n";
print get_fake( 2,2,2,1,2,2,2,2,2,2,2,2,2 ) . " will be 3\n";
print get_fake( 2,2,2,2,1,2,2,2,2,2,2,2,2 ) . " will be 4\n";
print get_fake( 2,2,2,2,2,1,2,2,2,2,2,2,2 ) . " will be 5\n";
print get_fake( 2,2,2,2,2,2,1,2,2,2,2,2,2 ) . " will be 6\n";
print get_fake( 2,2,2,2,2,2,2,1,2,2,2,2,2 ) . " will be 7\n";
print get_fake( 2,2,2,2,2,2,2,2,1,2,2,2,2 ) . " will be 8\n";
print get_fake( 2,2,2,2,2,2,2,2,2,1,2,2,2 ) . " will be 9\n";
print get_fake( 2,2,2,2,2,2,2,2,2,2,1,2,2 ) . " will be 10\n";
print get_fake( 2,2,2,2,2,2,2,2,2,2,2,1,2 ) . " will be 11\n";
print get_fake( 2,2,2,2,2,2,2,2,2,2,2,2,1 ) . " will be 12\n";
 

でもやっぱり、そんな使えるライブラリを放置するともったいないお化けが出るぞ、ということで、mt.jsの機能の中で一番簡単そうな、タブ機能の使い方を調べてみました。

<mt:setvarblock name="page_title">mt:tab test</mt:setvarblock>
<mt:include name="include/header.tmpl">
 
<h2>サンプル1 : tab-container の骨格部分</h2>
<style type="text/css">
#sample1 .hidden {
    display: inline !important;
    color: #aaa;
}
</style>
<span id="sample1" mt:delegate="tab-container">
    <span mt:tab="foo" mt:command="select-tab">foo</span>
    <span mt:tab="bar" mt:command="select-tab">bar</span>
    <span mt:tab="buz" mt:command="select-tab">buz</span>
    <span mt:tab-content="foo">
        foofoofoo
    </span>
    <span mt:tab-content="bar">
        barbarbar
    </span>
    <span mt:tab-content="buz">
        buzbuzbuz
    </span>
</span>
<mt:include name="include/footer.tmpl">

このサンプルは敢えてタブらしくない動きにしてます。見ての通り、JavaScriptは一切書かずに動きます。

先頭の「foo bar buz」の部分をクリックすると、それに応じて後続の部分のstyle属性が変化し、見た目も変わると思います。firebugなどで各要素のclass属性の変化を追ってみてください。

大雑把な動作プロセスとしては、

• mt:delegate="tab-container"が指定された要素の内側では
• 属性「mt:command="select-tab"」が指定された要素がクリックされたら
• その要素のmt:tab属性で指定されたタブのID(foo)を表示するように
• mt:tab-content属性を持ち、そこに同じタブID(foo)が指定されている要素のclassから「hidden」を取り除き
• mt:tab-content属性にタブID(foo)が指定されていない要素にはclass「hidden」を追加する

という動作になります。
MTの管理画面では事前に設定されているcssにより、「hidden」クラスは非表示となるので、タブらしい動作が実現できるというわけです。

以下、ちょっとだけcssを追加してみたバージョンです。お試し下さい。

<mt:setvarblock name="page_title">mt:tab test</mt:setvarblock>
<mt:include name="include/header.tmpl">
 
<h2>サンプル2 : css を加えてみる</h2>
 
<style type="text/css">
#sample2 .tab {
    border: 1px solid #abc;
    cursor: pointer;
}
 
#sample2 .selected-tab {
    text-decoration: underline;
    color: #f00;
}
 
#sample2 .tab-container {
    border: 1px solid #678;
}
 
</style>
<div id="sample2" mt:delegate="tab-container">
    <span mt:tab="foo" mt:command="select-tab" class="tab selected-tab">foo</span>
    <span mt:tab="bar" mt:command="select-tab" class="tab">bar</span>
    <div class="tab-container" mt:tab-content="foo">
        foofoofoo
    </div>
    <div class="tab-container hidden" mt:tab-content="bar">
        barbarbar
    </div>
</div>
 
<mt:include name="include/footer.tmpl">

MT4用。
javascript:(function(){var th = document.createElement('div');th.id = 'tagging_helper_container';th.innerHTML = '<link rel="stylesheet" href="http://blog.aklaswad.com/tagginghelper.css" type="text/css" /><script type="text/javascript" src="http://blog.aklaswad.com/tagginghelper.js"></script><span id="taghelper_abc" onclick="TaggingHelper.open(\'abc\')" class="taghelper_command">ABC</span><span id="taghelper_count" onclick="TaggingHelper.open(\'count\')" class="taghelper_command">freq</span><span id="taghelper_match" onclick="TaggingHelper.open(\'match\')" class="taghelper_command">match</span><span id="taghelper_close" onclick="TaggingHelper.close()" class="taghelper_command">close</span><div id="tagging_helper_block" style="display: none;"></div>';document.getElementById('tags-field').appendChild(th);})();

こちらはMT3用。
javascript:(function(){var th = document.createElement('div');th.id = 'tagging_helper_container';th.innerHTML = '<link rel="stylesheet" href="http://blog.aklaswad.com/tagginghelper.css" type="text/css" /><script type="text/javascript" src="http://blog.aklaswad.com/tagginghelper3.js"></script><span id="taghelper_abc" onclick="TaggingHelper.open(\'abc\')" class="taghelper_command">ABC</span><span id="taghelper_count" onclick="TaggingHelper.open(\'count\')" class="taghelper_command">freq</span><span id="taghelper_match" onclick="TaggingHelper.open(\'match\')" class="taghelper_command">match</span><span id="taghelper_close" onclick="TaggingHelper.close()" class="taghelper_command">close</span><div id="tagging_helper_block" style="display: none;"></div>';document.getElementById('tag-field').appendChild(th);})();

動作が気に入ったら、是非プラグインをインストールして使ってみてください。

• プラグインのページ

ちなみに、IEでは上手く動きませんでした。残念。
というか、Firefoxはbody中にscript経由で突っ込まれたlinkタグも読み込んでしまうんですね。試してみたら動いたのでびっくりしました。

• TaggingHelper.0.3.zip
• blog.aklaswad.com: TaggingHelper

主な更新内容はこちら。

• タグ一覧を、使われている頻度順で表示するモードを追加した。
• 本文に含まれる文言のタグを抽出して表示するモードを追加した。
• シングルクオートを含むタグが扱えない問題に対応した。指摘してくれたTrackback(774)さんありがとうございます。
• タグの途中で改行してしまう問題に対応した。

内部構造をちょっと変更した結果、どうやらSafari、Operaなどのブラウザでも利用可能となっているようです。Windows版のSafari3.1.1、Opera
9.24で動作を確認しました。やったね!

• こだるま日和 - CustomEditorButton2 用のフォント色指定ボタンを作ってみた
• かたつむりくんのWWW | CEB2_plusUtility

特に、「かたつむりくんのWWW」さんで配布されているCEB2_plusUtilityはかなりゴージャスです。
dl/dt/ddタグの挿入や、引用元表示機能付きblockquoteボタンとかは、自分でも欲しくてそのうち作ろうと思っていたので、大変嬉しいです。

かたつむりくんのWWW | CEB2_plusUtility

さらに、「引用元のURI + 改行 + 引用元のタイトル + 改行 + 引用文」という書式で書いて選択すると、引用元のURIをblockquote要素のcite属性に追加し、引用元のタイトルをblockquote要素のtitile属性に追加できます。

公開されているプラグインについては、プラグインページにも一覧を作って、適時アップデートしていきたいと思います。CEB2用プラグイン作ったよ公開するよ、という方は、トラックバックなどしていただけたら嬉しいです。

他にも、配布はしていないが、自分でボタン作って使っているよというエントリーもちらほら見かけました。
基本的には、そういう個人用にカスタマイズする使い方を想定しています。がんがん使ってくださいー。

タギングボタン

本文中から単語を選択した状態でこのボタンを使うと、選択部分をタグ欄に追加します。普段タグ入力補完ばかりに頼っていたら、タグクラウドの成長が止まってしまった、という症状に効きます。

時間あわせボタン

エントリーの公開日欄を、現在の時刻に合わせます。エントリーを書いていたら日付が変わってしまった。しかし昨日の日付が公開日となるのは納得できない!という場合に便利です。

タグ削除ボタン

選択範囲に含まれるHTMLタグっぽいもの(<と>で挟まれた部分)をごっそり削除します。MTデフォルトのリストボタンでリストを作成中、後から追加を行いたいが自分でliとか書きたくない、でもアンドゥも出来ない、なんて場合、このボタンを使って一度マークアップ無しの状態に戻し、行を追加した後に再度リストボタンを適用する、なんて使い道が考えられます。リッチテキストフォーマットでも各種の文字装飾の削除に利用できますが、改行まで消し飛んでしまうので諸刃の剣。

このプラグインを利用するためには、同じ環境にCustomEditorButton2がインストールされている必要があります。
ダウンロードする: EntryUtilButtons0.1.zip

NabeAzzというのは、えー、FizzBuzzの変形でー。
多分発祥はここだと思います。

そろそろ FizzBuzz に飽きた - にぽたん研究所

mixiでは文字数制限が怖かったのでコメント一切無しにしました。
ちょっとわかりづらいところもあると思うので、コメント付で再掲します。

自分の作ったテンプレートの目標は、ノープラグイン、ノースクリプト。MTタグのみでのNabeAzzです。

<mt:ignore><!-- 単純な線形合同法で乱数を生成。 --></mt:ignore>
<mt:setvarblock name="seed"><mt:date format="%S"></mt:setvarblock>
<mt:setvartemplate name="rnd">
    <mt:getvar setvar="seed" name="seed" op="*" value="13" />
    <mt:getvar setvar="seed" name="seed" op="+" value="5" />
    <mt:getvar setvar="seed" name="seed" op="%" value="24" />
    <mt:getvar name="seed">
</mt:setvartemplate>
 
<mt:ignore><!-- 配列の初期化はsetvar一発で。 --></mt:ignore>
<mt:setvar name="aho" value="www":"ktkr":"ぶーん":"だわよのさ":"へっぺふむーん">
<mt:setvar name="dog" value="ダワン":"キャイーン":"キャンキャン":"バウウウ":"ガルルル">
 
<mt:ignore><!-- 指定された配列からランダムに要素をとってくる。 --></mt:ignore>
<mt:setvartemplate name="get_suffix">
    <mt:setvarblock name="idx"><mt:getvar name="rnd" trim="1"></mt:setvarblock>
    <mt:setvarblock name="max"><mt:getvar name="$target" function="count"></mt:setvarblock>
    <mt:getvar setvar="idx" name="idx" op="%" value="$max">
    <mt:getvar name="$target" index="$idx">
</mt:setvartemplate>
 
<mt:ignore><!-- 以下、出力用ループ --></mt:ignore>
<ul>
<mt:for from="1" to="40">
    <li>
    <mt:getvar name="__counter__">
    <mt:unless name="__counter__" op="%" value="5">
        <mt:setvar name="target" value="dog">
        <mt:getvar name="get_suffix">
    </mt:unless>
    <mt:unless name="__counter__" op="%" value="3">
        <mt:setvar name="target" value="aho">
        <mt:getvar name="get_suffix">
    <mt:elseif name="__counter__" like="3">
        <mt:setvar name="target" value="aho">
        <mt:getvar name="get_suffix">
    </mt:unless>
    </li>
</mt:for>
</ul>

<mt:ignore><!-- 単純な線形合同法で乱数を生成。 --></mt:ignore>
<mt:setvarblock name="seed"><mt:date format="%S"></mt:setvarblock>
<mt:setvartemplate name="rnd">
    <mt:getvar setvar="seed" name="seed" op="*" value="13" />
    <mt:getvar setvar="seed" name="seed" op="+" value="5" />
    <mt:getvar setvar="seed" name="seed" op="%" value="24" />
    <mt:getvar name="seed">
</mt:setvartemplate>

最初のこのブロックは、mt:setVarTemplateを使ってrndというルーチンを作成しています。
内容は、線形合同法という非常に素朴な乱数生成ルーチンです。

線形合同法 - Wikipedia

MTMLのみで乱数作れないかと思い立って調べてみたところ、なんだか簡単そうなので試してみました。今回のナベアツ問題なら精度の高い乱数は必要ないので、こんなのでも良いのではないかと思います。上限が24で最大周期も24、という貧弱貧弱なルーチンです。数字を調整すればもう少し良いものになるかもしれません。
乱数のシード(初期値)の値はmt:date(再構築が実行された時間を取得するタグ)からとっています。

<mt:ignore><!-- 配列の初期化はsetvar一発で。 --></mt:ignore>
<mt:setvar name="aho" value="www":"ktkr":"ぶーん":"だわよのさ":"へっぺふむーん">
<mt:setvar name="dog" value="ダワン":"キャイーン":"キャンキャン":"バウウウ":"ガルルル">

あらかじめ配列に、アホ発言と犬発言を準備しておきます。ちょっと変な記法の解説はこちら。

<mt:ignore><!-- 指定された配列からランダムに要素をとってくる。 --></mt:ignore>
<mt:setvartemplate name="get_suffix">
    <mt:setvarblock name="idx"><mt:getvar name="rnd" trim="1"></mt:setvarblock>
    <mt:setvarblock name="max"><mt:getvar name="$target" function="count"></mt:setvarblock>
    <mt:getvar setvar="idx" name="idx" op="%" value="$max">
    <mt:getvar name="$target" index="$idx">
</mt:setvartemplate>

ここで、またmt:setVarTemplateを使ってルーチンを作成しています。
このルーチンでは、「target」という変数に指定された名前の変数から、要素を一つ取り出して出力する、という作業を行っています。
ポイントはここでしょうか。「mt:getvar name="$target" index="$idx"」。
MTのテンプレートエンジンでは、タグそのものの処理が行われる前の段階で、モディファイア内の「$」記法の変数の展開が行われます。そのため、一部のタグに対しては、変数の名前を別の変数に入れて渡す、ということが可能となっています。
この場合では、「target」変数に「aho」または「dog」という文字列を入れておくと、まずテンプレートのパーサーが「$target」を展開してahoなどの文字列に置き換え、それを更にmt:getVarタグが解釈して、aho変数の中身を参照しに行ってくれる、というカラクリです。
これが出来るのは、モディファイアとして変数名を受け取ることが出来る一部のタグのみですが、応用するとかなりパワフルなことが出来るのではないかと思います。

<mt:ignore><!-- 以下、出力用ループ --></mt:ignore>
<ul>
<mt:for from="1" to="40">
    <li>
    <mt:getvar name="__counter__">
    <mt:unless name="__counter__" op="%" value="5">
        <mt:setvar name="target" value="dog">
        <mt:getvar name="get_suffix">
    </mt:unless>
    <mt:unless name="__counter__" op="%" value="3">
        <mt:setvar name="target" value="aho">
        <mt:getvar name="get_suffix">
    <mt:elseif name="__counter__" like="3">
        <mt:setvar name="target" value="aho">
        <mt:getvar name="get_suffix">
    </mt:unless>
    </li>
</mt:for>
</ul>

最後に出力用にループを回しています。条件分岐はそんなに変なことはしてません。testモディファイアを使うともっと短くなるんだろうけど、使い方がわからないので諦めました。

TechMemo

• _math_operationに直接式をかけると良いと思った。op="($aho + $dog) * $rnd"みたいな。駄目なら、配列で渡せるというのはどうだろう。op="+","*" value="$aho","5"のように。
• 配列orハッシュ変数の展開は今のところgetvarの機能となっているが、これはbuild側でやるべきじゃないだろうか。
• mt:date format="%s"って何で無いんだ?小文字で、0埋め無しの秒を取れると思ってたら取れなかった。ここで一番嵌った。需要が無いから?
• <mt:getvar setvar="seed" name="seed" op="*" value="13">ここのモディファイアの並べ方はちょっと悩んだ(動作的には関係ないが、読みやすさの意味で)が、最終的にはc、perl系の言語っぽく並べるのが一番わかり易いと思った。「$seed = $seed * 13」 と書くのと同じ並び。mt:var系列は複雑で把握しきれない。もっと短く書けた気がする。。。

以下、役に立たない雑感

• アフターパーティーが手羽先屋なのに手羽先の登場が遅く、俺の手羽先スキルが全く注目されなかったのが心残り
• タイトルのMT4LP5と開催日の4月5日がシンクロしていたことにさっき気づいた
  via http://www.tohdamikio.com/2008/04/mt41mt4lp5mt41c_a127.html
• 名刺は絶対に必要