自分の端末は2.3.4(API 10)だったんですが、このアプリを使わにゃならんひとの中に2.2.2(API 8)なひとがいたのです。というわけで、早速APIレベルを変更。とは云え、特段API 10を使っていたわけではないので、String.isEmpty()を以下のように書き換えて終了。

(str.trim().length() == 0)

んで、ここからが本題。実はこれだけではOSのAPIレベルチェックで引っかかってインストールできません。AndroidManifest.xmlで最低限必要なAPIレベル（minSdkVersion）が設定されている場合には、それを変更してあげないといけません。この値が設定されていないとAPI 1でもインストールできることを意味するので、もちろん設定は必須でしょう。

<uses-sdk android:minSdkVersion="8" android:targetSdkVersion="10"/>

ここではついでにtargetSdkVersionも設定しています。これは、このバージョンでテスト済みでっせ、ということを主張するものです。

android.speech.RecognizerIntentを使うんですが、使い方はちょっとぐぐればすぐに出てくるのでおいといて。ふつう、音声認識した候補を決めうちで入力することってあまりなくて、候補の一覧を出してユーザに選ばせると思うんですね。というわけで、そこも含めてActivityにしちゃえと云うことで。Javaもandroidも素人なのでお作法がどうかはわかりませんが、とりあえずこんな感じ？

import java.util.ArrayList;

import android.app.Activity;
import android.app.AlertDialog;
import android.content.DialogInterface;
import android.content.Intent;
import android.os.Bundle;
import android.speech.RecognizerIntent;

public class SpeechInput extends Activity {
  private Intent intent;

  @Override
  public void onCreate(Bundle savedInstanceState) {
    super.onCreate(savedInstanceState);

    Intent intent0 = getIntent();
    if (intent0 == null) {
      finish();
    }

    intent = new Intent(RecognizerIntent.ACTION_RECOGNIZE_SPEECH);
    intent.putExtras(intent0.getExtras());

    startRecognizeSpeechActivity();
  }

  private void startRecognizeSpeechActivity() {
    startActivityForResult(intent, 0);
  }

  @Override
  protected void onActivityResult(int requestCode, int resultCode, Intent intent0) {
    if (resultCode == RESULT_OK) {
      final ArrayList<String> results = intent0.getStringArrayListExtra(RecognizerIntent.EXTRA_RESULTS);

      if (results.size() > 0) {
        new AlertDialog.Builder(this)
          .setTitle("候補")
          .setItems(results.toArray(new CharSequence[results.size()]), new DialogInterface.OnClickListener(){
            @Override
            public void onClick(DialogInterface dialog, int which) {
              Intent intent = new Intent();
              intent.putExtra("SPEECH_RESULT", results.get(which));
              setResult(RESULT_OK, intent);
              finish();
            }
          })
          .setOnCancelListener(new DialogInterface.OnCancelListener() {
            @Override
            public void onCancel(DialogInterface dialog) {
              finish();
            }
          })
          .setNeutralButton("やり直す", new DialogInterface.OnClickListener() {
            @Override
            public void onClick(DialogInterface dialog, int which) {
              startRecognizeSpeechActivity();
            }
          })
          .show();
      }
    } else {
      finish();
    }
  }
}

リソースは行儀悪くべた書きなので、ちゃんと使いたい方は適当に。使うときは、

import android.app.Activity;
import android.content.Intent;
import android.os.Bundle;
import android.speech.RecognizerIntent;

public class XXXX extends Activity {
  @Override
  public void onCreate(Bundle savedInstanceState) {
    :
    try {
      Intent intent = new Intent(XXXX.this, SpeechInput.class);
      intent.putExtra(RecognizerIntent.EXTRA_LANGUAGE_MODEL, RecognizerIntent.LANGUAGE_MODEL_FREE_FORM);
      intent.putExtra(RecognizerIntent.EXTRA_PROMPT, "音声認識してみるよっ");
      startActivityForResult(intent, requestCode);
    } catch (ActivityNotFoundException e) {
      Toast.makeText(getApplicationContext(), "音声入力に対応してないよっ", Toast.LENGTH_LONG).show();
    }
    :
  }

  @Override
  protected void onActivityResult(int requestCode, int resultCode, Intent intent) {
    Toast.makeText(getApplicationContext(), intent.getStringExtra("SPEECH_RESULT")),
      Toast.LENGTH_LONG).show();
  }
}

あとは、Manifestにこんなの入れておいた方がいいかもしれない。

<activity android:name="SpeechInput" android:theme="@android:style/Theme.Translucent.NoTitleBar"></activity>

で、データをため込むのにSQLiteを使ったわけですが、こいつで外部キー制約を使うためにはちょっと癖があります。3.6.18で実装された外部キーはデフォルトではガン無視されるので、有効にするために以下の呪文を唱えないとだめと云うことだそうで。

PRAGMA foreign_keys=true;

Javaから使うときは、もちろん、

db.execSQL("PRAGMA foreign_keys=true;");

てかですね、3.1.17→3.1.18みたいな超マイナーバージョンアップ的にこそっと外部キー制約を実装しましたとか、どういうバージョニングしてんだか。

Excelでは複数のセルを選択すると、その合計値がステータスバーに表示されますが（設定次第だけど、デフォルトではこうなってて、合計値を消してるひとはほとんどいまい）、この数字をほかのセルに値貼りつけしたいとなると結構面倒だったりします。ターゲットのセルで=sum(A1:B2)とかやって、Ctrl-Alt-v vとかやるのはちょー面倒。ってことで、ここは一発マクロをば。

よくわかんないけど、このマクロ読み込むとCtrl-Shift-cに割り当てられるんじゃないかなあ。見てのとおり、エラー処理は全くしてません。

Attribute VB_Name = "mCopySelectionSum"
Option Explicit

Public Sub CopySelectionSum()
Attribute CopySelectionSum.VB_ProcData.VB_Invoke_Func = "C\n14"
    With New DataObject
        .SetText WorksheetFunction.Sum(Selection)
        .PutInClipboard
    End With
End Sub

Option Explicit

Public Function Validate(JAN As String) As Boolean
    Select Case Len(JAN)
    Case 8, 13
        Validate = (CalculateCD(JAN) = Int(Right(JAN, 1)))
    Case Else
        'Raise
        Validate = False
    End Select
End Function

Public Function CalculateCD(JAN As String) As Integer
    Select Case Len(JAN)
    Case 7, 8
        CalculateCD = CalculateCD8(JAN)
    Case 12, 13
        CalculateCD = CalculateCD13(JAN)
    Case Else
        'Raise
        Exit Function
    End Select
End Function

Private Function CalculateCD8(JAN As String) As Integer
    Dim cksum As Integer
    Dim i As Integer
    For i = 1 To 7 Step 2
        cksum = cksum + Int(Mid(JAN, i, 1)) * 3
    Next i
    For i = 2 To 6 Step 2
        cksum = cksum + Int(Mid(JAN, i, 1))
    Next i

    CalculateCD8 = (10 - (Int(Right(cksum, 1)) Mod 10)) Mod 10
End Function

Private Function CalculateCD13(JAN As String) As Integer
    Dim cksum As Integer
    Dim i As Integer
    For i = 1 To 11 Step 2
        cksum = cksum + Int(Mid(JAN, i, 1))
    Next i
    For i = 2 To 12 Step 2
        cksum = cksum + Int(Mid(JAN, i, 1)) * 3
    Next i

    CalculateCD13 = (10 - (Int(Right(cksum, 1)) Mod 10)) Mod 10
End Function

ところで。ここ1年半くらい、普通のひとっぽく電車に揺られて通勤していたりします。学生の頃もしかりですが、朝の電車って乗る時間と場所が決まってたりしますよね。今もある程度は決まってはいるんですが、繁忙期と閑散期がはっきりしているとか、その他諸々の事情で、7時から9時前くらいまでいくつかのパターンで乗っています。

朝の電車といえば新聞。最初は7時くらいの電車に集中していたので特に気づかなかったんですが、上記の通り電車のパターンが増えてくると、同じ通勤電車であっても時間帯によって傾向があることがわかってきました。

たとえば。7時から7時半くらいまでは圧倒的に日経が多い。もう見事なくらいにみんな日経。ところが7時半を過ぎると様子が変わり、8時くらいまでは日経以外の全国紙が大半を占めてきます。多いのは読売のような気がしますが、まあ朝日とか毎日とかもいますかね。で、8時を過ぎたくらいからは一般紙は姿をひそめ、スポーツ新聞が大半を占めるようになります。

この傾向、なんとなくレベルではなくてはっきりわかるほど顕著。時間と新聞の関係。ははー、なるほどねー、と思う毎朝です。

今まではブログ部分だけをWTで、それ以外はなんと手書きだったんですけど、これを機にサイト全体をCMSにすべ、ということで。所感はですねえ、

1. 最近のCMSはなんだかよくできてますなあ。ありがたい世の中になったものです。
2. （ここじゃないところで）ちょいと手を入れてみるかとコードをみてみたんですが。いやあ、PHPなんて前触ったのいつだっけか、と、手元をあさってみたけど出てこねえ…記憶によれば2001年だった気がする。かれこれ10年経過してるわけだけど、いや、この言語の汚さは全く改善してないですな。ユーザに徹するべしだ。

ま、そんなわけで、また1年後に。

まあでも、実はその多くは車輪の再発明な訳です。過去の知識は体系的に書籍という形で残されていることが多いので、一般的には書籍から吸収するのが王道でしょう。でも、この手の書籍、個人的には自分で組み立てるのと時間が変わらなかったりします。読みながら組み立てようとするので、結局、同じくらいの時間がかかってしまうと。人生有限なのでこれじゃだめなんですが。

まあ、ともあれ、車輪の再発明をする日々です。本人は再発明と気づいてないことも多いわけですが。ただ、ふと文献に当たったとき、自分で組み立てた地図が車輪の再発明だと云うことがわかると、これまた自信につながったりもするわけで。ああ、あの考えは間違いではなかった。ああ、自分の土台は間違ってなかった。人に影響されることなく描き上げた地図が正しそうだとわかれば、未踏の地もうまく地図を描けそうな気がします。

なんじゃこれはと思って悩むこと数時間、(featurep ‘ns)でns-open-file-lineというイベントを拾ってns-open-file-select-lineが呼ばれていることが発覚。正直、余計なお世話… このイベントがどういうときに起きるのか調べる気力がないので正しい修正がわからないけど、とりあえずinit.elに以下をぶち込む。

(define-key global-map [ns-open-file-line] 'ignore)

実は23.2というか23.1.50の終盤で加えられた変更が、微妙にElScreenと不整合。と云うわけで直さないといけないわけだが…今まで手元で加えてた変更がもう忘却の彼方。たまらん、が、なんとかする。