Jeans & Development

ありきたりだけれど、phpinfo()を表示するためのプラグイン。表示するには、管理者としてログインする必要がある。プラグイン管理ページで、左の「サイト」をクリックして表示する。

<jp_phpinfo のつづき>

MakeExe バージョン 0.2.2を配布しました。

実行ファイルは、0.2.0や0.2.1から変わっていません。e-mailで、添付のModulePath.js及びModulePath.vbsに記載されている、ModulePath()関数に関するライセンスの質問を受けましたので、あいまいになっていたライセンスを見直して、0.2.2としました。

ModulePath.js及びModulePath.vbsには、LGPLは適用されません。これらのファイルのソースコード部分で英語のtypoが有りますが、気にしないでください（笑）。

今までどおり、「このソフトウェアの正規な使用により作成されたEXEファイルに付いては」LGPLを適用する必要はありません。ですので、作成されたEXEファイルについては、アイコンを変更するなどの改変は自由ですし、どのようなライセンスの下で配布しても、問題ありません。

makeexe.dll、makewin.exe、makeconsole.exeの３つの実行ファイルと、それらのソースコードのライセンスは、LGPLです。再配布する場合は、LGPLの規定に従ってください。

生物学の少し古い文献では、遺伝子のクローニングの後に制限酵素地図(restriction enzyme map)を論文に載せてはいるが、最終的に塩基配列(DNA sequence)まで発表していないケースがまれにある。一部でも塩基配列が載せられていれば、全ゲノム配列のどの部分に相当するかを調べるだけで、クローニングされたものがどの遺伝子でどんな塩基配列なのかが分かるのだが、制限酵素地図だけが載せられているようなケースでは、そういった調べ方はできない。

昨日、調べていた文献の中に、上記事項に相当するものが出てきた。数年前にも同じようなことがあって、あるプログラムを書いて、調べ上げたことがある。当時は、こんなことは一回こっきりだろうと思い、作ったプログラムをちゃんと保存していなかったので、一回使ったきり、無くしてしまった。今回は後でまた使えるように、ここにメモをしておく。

<DNAフラグメントの制限酵素地図から、ゲノム上での位置と塩基配列を求める のつづき>

一つ前の記事で、「VBScriptのInputBoxは便利」と書いたが、改めてJScriptにはこれ相当の機能が無いことを思い出した。MsgBox相当は、WScript.Echo()である程度の代用が効くが、InputBoxに似た機能は無い。しかし、以前書いたように、ScriptControlを使えばVBScriptの関数をJScriptから呼び出すことができる。

以前書いたコードはInputBoxに特化したもので、しかも汎用性が無かった。汎用性を持たせたのが、次のスクリプト。

var VbsFunction=function(func){
	return function(){
		var args=Array();
		args[0]=func;
		for (var i=0;i<arguments.length;i++) args[i+1]=arguments[i];
		return VbsFunction.run.apply(null,args);
	};
}
VbsFunction.run=function(){
	var script="VbsFunction.sc.run('func"+(arguments.length-1)+"'";
	for (var i=0;i<arguments.length;i++) script+=",arguments["+i+"]";
	return eval(script+");");
}
VbsFunction.sc=WScript.CreateObject("MSScriptControl.ScriptControl");
VbsFunction.sc.language="vbscript";
for (var i=0;i<10;i++) {
	var script=" function func"+i+"(p0";
	for (var j=1;j<=i;j++) script+=",p"+j;
	script+=")\r\n  func"+i+'=eval(p0+"(';
	for (var j=1;j<=i;j++) {
		if (1<j) script+=",";
		script+="p"+j;
	}
	VbsFunction.sc.addcode(script+")\")\r\n end function\r\n");
}

var InputBox=VbsFunction("InputBox");
var MsgBox=VbsFunction("MsgBox");

(10/07/20 改定)
この２０行ほどのコードで定義されたVbsFunction()を使えば、VBScriptのすべての関数を、JScriptから利用することができる。利用方法は、最後の２行を参照。InputBoxとMsgBoxの２つが使えるように、記述してある。

ちょっと、仕事用に。分子生物学用のツール。合成DNAを設計する時などで相補鎖の配列を求めたいとき、Clone Managerなどのツールを起動しなくても、手軽に求められるようなVBScriptを作成した。

option explicit
dim sequence,temp,i
sequence=""
do
  temp=inputbox("DNA sequence (5' -> 3')?","Convert to complementary strand.",sequence)
  sequence=""
  for i=len(temp) to 1 step -1
    select case mid(temp,i,1)
    case "G"
      sequence=sequence & "C"
    case "g"
      sequence=sequence & "c"
    case "A"
      sequence=sequence & "T"
    case "a"
      sequence=sequence & "t"
    case "T"
      sequence=sequence & "A"
    case "t"
      sequence=sequence & "a"
    case "C"
      sequence=sequence & "G"
    case "c"
      sequence=sequence & "g"
    end select
  next
loop until sequence=""

VBSのInputBoxは、結構便利。

ドイツの水族館で飼われているタコのPaulが、２０１０年サッカーW杯での勝敗を占って、すべて的中させたことは多くの方々がご存知の通り。

８回占って、すべて当てた。でたらめな予想ですべて当てるのは、２の８乗で２５６分の１の確率である。これが偶然なのか、そこに何か理由があるのか考えてみるのは面白い。

<タコ占い のつづき>

jp_SearchJeansTagsで使った、PHPコードを色分けする部分のコードは、次の通り。他でも使えそうなので、メモをかねてここにアップしておくことにする。

<PHPのソースを色分けするスクリプト のつづき>

記事編集時のボタンを追加するプラグイン、jp_AddButtonsを作成。

<jp_AddButtons のつづき>

ver 0.8.9の公開後、微調整を行って0.9.0とし、公開しました。Sourceforgeのページからダウンロードできます。
http://sourceforge.jp/projects/jeanscms/releases/
管理画面のスタイルシートなどを、少し変更しています。また、管理ページ用の、HTMLでできたヘルプファイルが表示されていなかった不具合を、修正しました。skins/admin/help.htmlを編集するだけで、必要な箇所に「？」のアイコンが出ます。これをクリックすると使い方などが別画面で表示されます（Nucleusと同じ）。

日産・楽天・ユニクロなどの企業が、英語を社内公用語にしようとしている。こういったやり方は、今後、ある程度広がりを見せるものと思う。これに関するブログ記事で気が付いた物は以下の通り。

英語公用語化について (内田樹の研究室)
三木谷さんってここまで頭わるかったっけ？（楽天が社内公用語を英語化の件）
英語公用語化について一言/A few words on the language in your office

上記のリンク先ですでに述べられていることを繰り返しても仕方が無いので、ここには私の経験から来る意見を書いておきたい。

<英語を公用語にした（する）企業へのエール のつづき>