<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML LANG="ja">
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;charset=Shift_JIS">
<TITLE>QR コード作成</TITLE>
</HEAD>
<BODY BGCOLOR="#CCFFFF">
<CENTER>
<BR>
<B>QR コード作成<BR>（Netscape 4）</B>
<BR><BR>
<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=20 BGCOLOR="#FFFFFF"><TR><TD>
<ILAYER NAME="vis">
<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0>
<SCRIPT LANGUAGE="JavaScript1.2" TYPE="text/javascript">
<!--
MAX_VER = 10;
MAX_MOD = 17 + MAX_VER * 4;
for(i = 0; i < MAX_MOD; i++) {
document.write("<TR>");
for(j = 0; j < MAX_MOD; j += 4)
document.write("<TD><IMG NAME='M", i.toString(16), "_", j.toString(16), "' SRC='images/qr_m0.gif' WIDTH=12 HEIGHT=3></TD>");
document.writeln("</TR>");
}
//-->
</SCRIPT>
</TABLE>
</ILAYER>
</TD></TR></TABLE>
<BR>
<FORM>
誤り訂正レベル
<SELECT NAME="level">
<OPTION SELECTED>L
<OPTION>M
<OPTION>Q
<OPTION>H
</SELECT>
<BR><BR>
データ<BR>
<TEXTAREA NAME="data" ROWS=6 COLS=40></TEXTAREA>
<BR><BR>
<INPUT TYPE=BUTTON VALUE="作成" onClick="QR_encoding()">
</FORM>
<LAYER NAME="msg" VISIBILITY="hide"><CENTER>処理中...</CENTER></LAYER>
</CENTER>
<SCRIPT LANGUAGE="JavaScript1.2" TYPE="text/javascript">
<!--
// エンコード
function QR_encoding() {
data = document.forms[0].data.value; // データ
if(!data.length)
return;
level = document.forms[0].level.selectedIndex; // 誤り訂正レベル
document.vis.visibility = "hide";
document.msg.visibility = "show";
setTimeout("QR_encoding_body(); QR_encoding_end()", 0);
}
function QR_encoding_end() {
if(data) // エラー以外
document.vis.visibility = "show";
document.msg.visibility = "hide";
}
function QR_encoding_body() {
var code1;
var n1, n2;
var b1, b2;
var x, y;
var i, j, k;
// モード判定
var mode; // モード
var data_len = 0; // 入力データ長
var f_num, f_alpha, f_kanji;
f_num = f_alpha = f_kanji = 1;
for(i = 0; i < data.length; i++) {
var c = data.charAt(i);
code1 = c.charCodeAt(0);
if(code1 < 0x80 || code1 == 0xa5 || code1 == 0x203e) { // ASCII
data_len++;
f_kanji = 0;
if(c < "0" || c > "9") {
f_num = 0;
if(c < "A" || c > "Z") {
switch(c) {
case " ":
case "$":
case "%":
case "*":
case "+":
case "-":
case ".":
case "/":
case ":":
break;
default:
f_alpha = 0;
}
}
}
}
else {
if(code1 >= 0xff61 && code1 <= 0xff9f) { // 半角カナ
data_len++;
f_num = f_alpha = f_kanji = 0;
}
else {
if(shift_jis(c)) { // 漢字
data_len += 2;
f_num = f_alpha = 0;
}
else {
alert("エンコードできない文字があります！");
data = null;
return;
}
}
}
}
if (f_num)
mode = 0; // 数字モード
else if(f_alpha)
mode = 1; // 英数字モード
else if(f_kanji)
mode = 3; // 漢字モード
else
mode = 2; // 8 ビット バイト モード
var version; // 型番
var len_bits; // 文字数指示子ビット数
var data_cws; // データ コード語数
var max_chars; // 最大格納文字数
i_code = 0;
reg = 0;
reg_bits = 0;
switch(mode) {
case 0: // 数字モード
// 型番決定
for(version = 1; version <= MAX_VER; version++) {
if (version <= 9)
len_bits = 10;
else if(version <= 26)
len_bits = 12;
else
len_bits = 14;
n1 = (data_cws = get_data_cws(version, level)) * 8 - 4 - len_bits;
max_chars = Math.floor(n1 / 10) * 3;
n1 %= 10;
if(n1 >= 4) {
if(n1 >= 7)
max_chars += 2;
else
max_chars++;
}
if(data_len <= max_chars)
break;
}
if(version > MAX_VER) {
alert("データが長すぎます！");
data = null;
return;
}
// データ コード語作成
// モード指示子，文字数指示子
put_code(0x1, 4);
put_code(data_len, len_bits);
// データ
for(i = 0; ; ) {
if(i + 2 < data_len) {
put_code(Number(data.substr(i, 3)), 10);
if((i += 3) == data_len)
break;
}
else {
if (i + 1 < data_len)
put_code(Number(data.substr(i, 2)), 7);
else if(i < data_len)
put_code(Number(data.charAt(i)), 4);
break;
}
}
break;
case 1: // 英数字モード
// 型番決定
for(version = 1; version <= MAX_VER; version++) {
if (version <= 9)
len_bits = 9;
else if(version <= 26)
len_bits = 11;
else
len_bits = 13;
n1 = (data_cws = get_data_cws(version, level)) * 8 - 4 - len_bits;
max_chars = Math.floor(n1 / 11) * 2;
if(n1 % 11 >= 6)
max_chars++;
if(data_len <= max_chars)
break;
}
if(version > MAX_VER) {
alert("データが長すぎます！");
data = null;
return;
}
// データ コード語作成
// モード指示子，文字数指示子
put_code(0x2, 4);
put_code(data_len, len_bits);
// データ
for(i = 0; ; ) {
if(i + 1 < data_len) {
put_code(alpha_val(data.charAt(i)) * 45 + alpha_val(data.charAt(i + 1)), 11);
if((i += 2) == data_len)
break;
}
else {
put_code(alpha_val(data.charAt(i)), 6);
break;
}
}
break;
case 2: // 8 ビット バイト モード
// 型番決定
for(version = 1; version <= MAX_VER; version++) {
if (version <= 9)
len_bits = 8;
else
len_bits = 16;
max_chars = Math.floor(((data_cws = get_data_cws(version, level)) * 8 - 4 - len_bits) / 8);
if(data_len <= max_chars)
break;
}
if(version > MAX_VER) {
alert("データが長すぎます！");
data = null;
return;
}
// データ コード語作成
// モード指示子，文字数指示子
put_code(0x4, 4);
put_code(data_len, len_bits);
// データ
for(i = 0; i < data.length; i++) {
code1 = data.charCodeAt(i);
if (code1 < 0x80) // ASCII
put_code(code1, 8);
else if(code1 == 0xa5) // 円記号
put_code(0x5c, 8);
else if(code1 == 0x203e) // オーバライン
put_code(0x7e, 8);
else if(code1 >= 0xff61 && code1 <= 0xff9f) // 半角カナ
put_code(code1 - 0xfec0, 8);
else // 漢字
put_code(shift_jis(data.charAt(i)), 16);
}
break;
case 3: // 漢字モード
data_len = data.length;
// 型番決定
for(version = 1; version <= MAX_VER; version++) {
if (version <= 9)
len_bits = 8;
else if(version <= 26)
len_bits = 10;
else
len_bits = 12;
max_chars = Math.floor(((data_cws = get_data_cws(version, level)) * 8 - 4 - len_bits) / 13);
if(data_len <= max_chars)
break;
}
if(version > MAX_VER) {
alert("データが長すぎます！");
data = null;
return;
}
// データ コード語作成
// モード指示子，文字数指示子
put_code(0x8, 4);
put_code(data_len, len_bits);
// データ
for(i = 0; i < data_len; i++) {
code1 = shift_jis(data.charAt(i));
if(code1 < 0xe000)
code1 -= 0x8140;
else
code1 -= 0xc140;
put_code((code1 >> 8) * 0xc0 + (code1 & 0xff), 13);
}
break;
}
// 終端パターン“0000”付加
if(i_code < data_cws - 1 || i_code < data_cws && !reg_bits)
put_code(0x0, 4);
// フラッシュ
if(reg_bits)
code[i_code++] = (reg << (8 - reg_bits)) & 0xff;
// パディング
for(; ; ) {
if(i_code == data_cws)
break;
code[i_code++] = 0xec;
if(i_code == data_cws)
break;
code[i_code++] = 0x11;
}
var n_blocks = rs_blocks[version - 1][level]; // RS ブロック数
var n_ec = ec_codewords[version - 1][level]; // 誤り訂正コード語数
var g_exp = g_exp_t[n_ec - 1]; // 誤り訂正コード α指数
// 誤り訂正コード作成
var i_data = 0;
var i_ec = data_cws;
n1 = Math.floor(data_cws / n_blocks);
n2 = n_blocks - data_cws % n_blocks;
for(i_block = 0; i_block < n_blocks; i_block++) {
if(i_block == n2)
n1++;
var data_ec = code.slice(i_data, i_data + n1);
data_ec.length = n1 + n_ec;
for(i = 0; i < n_ec; i++)
data_ec[n1 + i] = 0;
for(i = 0; i < n1; i++) {
if(data_ec[i]) {
var exp1 = n_exp[data_ec[i]];
for(j = 0; j < n_ec; j++)
data_ec[i + 1 + j] ^= exp_n[(g_exp[j] + exp1) % 255];
}
}
for(i = 0; i < n_ec; i++)
code[i_ec + i] = data_ec[n1 + i];
i_data += n1;
i_ec += n_ec;
}
var n_modules1 = 21 + (version - 1) * 4; // 1 辺のモジュール数
for(i = 0; i < n_modules1; i++) {
for(j = 0; j < n_modules1; j++)
module1[i][j] = 0;
}
// 位置検出パターン & 分離パターン & 形式情報位置予約（一部）& 固定暗モジュール
for(i = 0; i < 8; i++) {
for(j = 0; j < 9; j++) // 左上
module1[i][j] = finder_pat[i + 1][1 + j];
for(j = 0; j < 8; j++) // 右上
module1[i][n_modules1 - 8 + j] = finder_pat[i + 1][j];
for(j = 0; j < 9; j++) // 左下
module1[n_modules1 - 8 + i][j] = finder_pat[i][1 + j];
}
// 形式情報位置予約
module1[8].splice(0, 9, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40);
module1[8].splice(n_modules1 - 8, 8, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40);
// 型番情報位置予約
if(version >= 7) {
for(i = 11; i >= 9; i--) // 左下
module1[n_modules1 - i].splice(0, 6, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40);
for(i = 0; i <= 5; i++) // 右上
module1[i].splice(n_modules1 - 11, 3, 0x40, 0x40, 0x40);
}
// タイミング パターン
for(i = 8; i < n_modules1 - 9; i += 2) {
module1[6][i ] = module1[i ][6] = 0x81;
module1[6][i + 1] = module1[i + 1][6] = 0x80;
}
module1[6][i] = module1[i][6] = 0x81;
// 位置合せパターン
n1 = align_pos[version - 1].length;
for(i = 0; i < n1; i++) {
y = align_pos[version - 1][i];
for(j = 0; j < n1; j++) {
if(i == 0 && j == 0 || i == 0 && j == n1 - 1 || i == n1 - 1 && j == 0)
continue;
x = align_pos[version - 1][j];
module1[y - 2].splice(x - 2, 5, 0x81, 0x81, 0x81, 0x81, 0x81);
module1[y - 1].splice(x - 2, 5, 0x81, 0x80, 0x80, 0x80, 0x81);
module1[y ].splice(x - 2, 5, 0x81, 0x80, 0x81, 0x80, 0x81);
module1[y + 1].splice(x - 2, 5, 0x81, 0x80, 0x80, 0x80, 0x81);
module1[y + 2].splice(x - 2, 5, 0x81, 0x81, 0x81, 0x81, 0x81);
}
}
// シンボル キャラクタ配置
n1 = Math.floor(data_cws / n_blocks);
n2 = n_blocks - data_cws % n_blocks;
i_block = 0;
i_code = 0;
code1 = code[0];
b1 = 0x80;
i = j = n_modules1 - 1;
var dir = 0; // 走査方向
var l_r = 0; // 右／左
for(; ; ) {
if(!module1[i][j]) { // 空き
module1[i][j] = (code1 & b1) ? 1 : 0;
if(!(b1 >>= 1)) {
// 次のコード語
if(++i_block == n_blocks) {
i_block = 0;
i_code++;
if(n1) { // データ コード
if (i_code == n1) { // 短い方のデータ コードの長さ分終了
if(n2 == n_blocks) { // データ コードの長さがすべて等しい → 誤り訂正コードへ
n1 = 0;
i_code = 0;
}
else { // 余り分
i_block = n2;
}
}
else if(i_code > n1) { // データ コード終了 → 誤り訂正コードへ
n1 = 0;
i_code = 0;
}
}
else { // 誤り訂正コード
if(i_code == n_ec) // 終了
break;
}
}
if(n1) { // データ コード
k = i_block * n1;
if(i_block > n2)
k += i_block - n2;
}
else { // 誤り訂正コード
k = data_cws + i_block * n_ec;
}
code1 = code[k + i_code];
b1 = 0x80;
}
}
if(l_r) { // 左
if(dir) { // 下方向
if(i < n_modules1 - 1) {
i++;
j++;
}
else {
dir = 0; // 反転
if(--j == 6)
j = 5;
}
}
else { // 上方向
if(i) {
i--;
j++;
}
else {
dir = 1; // 反転
if(--j == 6)
j = 5;
}
}
l_r = 0;
}
else { // 右
j--;
l_r = 1;
}
}
// マスク パターン決定
var mask; // マスク パターン
var min_penalty = 0x7fffffff; // 最小失点
var m;
for(m = 0x0; m <= 0x7; m++) {
masking(n_modules1, m); // マスク
// 失点計算
var penalty = 0; // 失点
// 同色の隣接モジュール
for(i = 0; i < n_modules1; i++) {
// 行
b1 = module2[i][0];
n1 = 1;
// 列
b2 = module2[0][i];
n2 = 1;
for(j = 1; j < n_modules1; j++) {
// 行
if(module2[i][j] == b1) {
n1++;
}
else {
if(n1 >= 5)
penalty += 3 + (n1 - 5);
b1 = module2[i][j];
n1 = 1;
}
// 列
if(module2[j][i] == b2) {
n2++;
}
else {
if(n2 >= 5)
penalty += 3 + (n2 - 5);
b2 = module2[j][i];
n2 = 1;
}
}
// 行
if(n1 >= 5)
penalty += 3 + (n1 - 5);
// 列
if(n2 >= 5)
penalty += 3 + (n2 - 5);
}
// 2×2 のモジュール ブロック
for(i = 0; i < n_modules1 - 1; i++) {
for(j = 0; j < n_modules1 - 1; j++) {
b1 = module2[i][j];
if(module2[i][j + 1] == b1 && module2[i + 1][j] == b1 && module2[i + 1][j + 1] == b1)
penalty += 3;
}
}
// 1:1:3:1:1 比率のパターン
var cnt = new Array();
cnt.length = 7;
// 行
for(i = 0; i < n_modules1; i++) {
k = 0;
for(j = 0; ; ) {
// 同色モジュール数カウント
for(; k < 7; k++) {
x = j;
for(; j < n_modules1; j++) {
if(module2[i][j] ^ (k & 0x01)) // k = 0，2，4，6 -- 暗？，k = 1，3，5 -- 明？
break;
}
cnt[k] = j - x; // モジュール数
if(j == n_modules1)
break;
}
if(k >= 5) {
if(k == 5)
cnt[6] = 0;
if(cnt[2] == cnt[1] && cnt[3] == cnt[1] * 3 && cnt[4] == cnt[1] && cnt[5] == cnt[1]
&& (cnt[0] >= cnt[1] * 4 || cnt[6] >= cnt[1] * 4)) { // 1:1:3:1:1 & 4 以上の明
penalty += 40;
if(j < n_modules1) { // 終端でない
// 続きをチェック
cnt[0] = cnt[4];
cnt[1] = cnt[5];
cnt[2] = cnt[6];
k = 3;
continue;
}
}
}
if(j == n_modules1)
break;
// 続きをチェック
cnt[0] = cnt[2];
cnt[1] = cnt[3];
cnt[2] = cnt[4];
cnt[3] = cnt[5];
cnt[4] = cnt[6];
k = 5;
}
}
// 列
for(j = 0; j < n_modules1; j++) {
k = 0;
for(i = 0; ; ) {
// 同色モジュール数カウント
for(; k < 7; k++) {
y = i;
for(; i < n_modules1; i++) {
if(module2[i][j] ^ (k & 0x01)) // k = 0，2，4，6 -- 暗？，k = 1，3，5 -- 明？
break;
}
cnt[k] = i - y; // モジュール数
if(i == n_modules1)
break;
}
if(k >= 5) {
if(k == 5)
cnt[6] = 0;
if(cnt[2] == cnt[1] && cnt[3] == cnt[1] * 3 && cnt[4] == cnt[1] && cnt[5] == cnt[1]
&& (cnt[0] >= cnt[1] * 4 || cnt[6] >= cnt[1] * 4)) { // 1:1:3:1:1 & 4 以上の明
penalty += 40;
if(i < n_modules1) { // 終端でない
// 続きをチェック
cnt[0] = cnt[4];
cnt[1] = cnt[5];
cnt[2] = cnt[6];
k = 3;
continue;
}
}
}
if(i == n_modules1)
break;
// 続きをチェック
cnt[0] = cnt[2];
cnt[1] = cnt[3];
cnt[2] = cnt[4];
cnt[3] = cnt[5];
cnt[4] = cnt[6];
k = 5;
}
}
// 暗モジュール比率
// 2004年改正 JIS X 0510 では「参考」にある例が「評価条件」と矛盾している．
n1 = 0;
for(i = 0; i < n_modules1; i++) {
for(j = 0; j < n_modules1; j++) {
if(module2[i][j]) // 暗
n1++;
}
}
n2 = n_modules1 * n_modules1;
if((n1 = Math.floor((Math.abs(n1 * 2 - n2) * 20 + (n2 * 2) - 1) / (n2 * 2))) > 1)
penalty += 10 * (n1 - 1);
if(penalty < min_penalty) {
mask = m;
min_penalty = penalty;
}
}
masking(n_modules1, mask); // 採用したマスク パターンでマスク
// 固定暗モジュール
// 固定暗モジュール配置はマスク判定の前か後か？
module2[n_modules1 - 8][8] = 1;
// 形式情報
code1 = format_info[level][mask];
b1 = 0x4000;
for(i = 0; i < 7; i++) {
module2[8][(i < 6) ? i : i + 1] = module2[n_modules1 - 1 - i][8] = (code1 & b1) ? 1 : 0;
b1 >>= 1;
}
for(i = 7; i >= 0; i--) {
module2[(i < 6) ? i : i + 1][8] = module2[8][n_modules1 - 1 - i] = (code1 & b1) ? 1 : 0;
b1 >>= 1;
}
// 型番情報
if(version >= 7) {
code1 = version_info[version - 7];
b1 = 0x20000;
for(i = 0; i < 18; i++) {
y = n_modules1 - 9 - i % 3;
x = 5 - Math.floor(i / 3);
module2[y][x] = module2[x][y] = (code1 & b1) ? 1 : 0;
b1 >>= 1;
}
}
// 表示
for(i = 0; i < n_modules1; i++) {
for(j = 0; j < n_modules1; j += 4) {
k = (module2[i][j]) ? 0x8 : 0;
if(j + 1 < n_modules1)
k |= (module2[i][j + 1]) ? 0x4 : 0;
if(j + 2 < n_modules1)
k |= (module2[i][j + 2]) ? 0x2 : 0;
if(j + 3 < n_modules1)
k |= (module2[i][j + 3]) ? 0x1 : 0;
document.vis.document.images["M" + i.toString(16) + "_" + j.toString(16)].src = img_m[k].src;
}
for(; j < MAX_MOD; j += 4)
document.vis.document.images["M" + i.toString(16) + "_" + j.toString(16)].src = img_m[0].src;
}
for(; i < MAX_MOD; i++) {
for(j = 0; j < MAX_MOD; j += 4)
document.vis.document.images["M" + i.toString(16) + "_" + j.toString(16)].src = img_m[0].src;
}
}
// データ コード語数
function get_data_cws(version, level) {
var n_modules;
var n;
n_modules = 21 + (version - 1) * 4; // 1 辺のモジュール数
n_modules = n_modules * n_modules // 総モジュール数
- 3 * (8 * 8) // 位置検出パターン & 分離パターン
- 2 * (n_modules - 2 * 8) // タイミング パターン
- 1 // 固定暗モジュール
- 2 * 15; // 形式情報
// 位置合せパターン
n = align_pos[version - 1].length;
if(n) { // n > 0
n_modules -= (n * n - 3) * (5 * 5);
if(n > 2)
n_modules += 2 * (n - 2) * 5; // タイミング パターンと重なる分
}
// 型番情報
if(version >= 7)
n_modules -= 2 * 18;
return (n_modules >> 3) - rs_blocks[version - 1][level] * ec_codewords[version - 1][level];
}
// コード登録
function put_code(code1, code1_bits) {
reg = (reg << code1_bits) | code1;
reg_bits += code1_bits;
while(reg_bits >= 8) {
code[i_code++] = (reg >> (reg_bits - 8)) & 0xff;
reg_bits -= 8;
}
}
// 英数字モード 文字値
function alpha_val(c) {
switch(c) {
case " ":
return 36;
case "$":
return 37;
case "%":
return 38;
case "*":
return 39;
case "+":
return 40;
case "-":
return 41;
case ".":
return 42;
case "/":
return 43;
case ":":
return 44;
}
if(c <= "9")
return c.charCodeAt(0) - "0".charCodeAt(0);
return c.charCodeAt(0) - "A".charCodeAt(0) + 10;
}
// マスク処理
function masking(n_modules1, mask) {
var i, j;
for(i = 0; i < n_modules1; i++) {
for(j = 0; j < n_modules1; j++) {
module2[i][j] = module1[i][j] & 0x1;
if(!(module1[i][j] & 0xc0)) { // 機能パターン，形式情報，型番情報を除く
switch(mask) {
case 0: // (i+j)mod 2=0
if((i + j) % 2)
continue;
break;
case 1: // i mod 2=0
if(i % 2)
continue;
break;
case 2: // j mod 3=0
if(j % 3)
continue;
break;
case 3: // (i+j)mod 3=0
if((i + j) % 3)
continue;
break;
case 4: // ((i div 2)+(j div 3))mod 2=0
if((Math.floor(i / 2) + Math.floor(j / 3)) % 2)
continue;
break;
case 5: // (i j)mod 2+(i j)mod 3=0
if(i * j % 2 + i * j % 3)
continue;
break;
case 6: // ((i j)mod 2+(i j)mod 3)mod 2=0
if((i * j % 2 + i * j % 3) % 2)
continue;
break;
case 7: // ((i j)mod 3+(i+j)mod 2)mod 2=0
if((i * j % 3 + (i + j) % 2) % 2)
continue;
break;
}
module2[i][j] ^= 1; // 反転
}
}
}
}
// シフト JIS 変換初期化
function shift_jis_init() {
// 変換範囲
range_linear = [[0x824f, 10, 0xff10], // 数字
[0x8260, 26, 0xff21], // 英大文字
[0x8281, 26, 0xff41], // 英小文字
[0x829f, 83, 0x3041], // ひらがな
[0x8340, 86, 0x30a1], // カタカナ
[0x839f, 17, 0x0391], // ギリシャ文字 大文字 1
[0x83b0, 7, 0x03a3], // 2
[0x83bf, 17, 0x03b1], // ギリシャ文字 小文字 1
[0x83d0, 7, 0x03c3], // 2
[0x8440, 6, 0x0410], // ロシア文字 大文字 1
[0x8446, 1, 0x0401], // 2
[0x8447, 26, 0x0416], // 3
[0x8470, 6, 0x0430], // ロシア文字 小文字 1
[0x8476, 1, 0x0451], // 2
[0x8477, 26, 0x0436]]; // 3
range_table = [[0x8140, 108, 0],
[0x81b8, 8, 108],
[0x81c8, 7, 116],
[0x81da, 15, 124],
[0x81f0, 8, 140],
[0x81fc, 1, 148],
[0x849f, 32, 150],
[0x889f, 2966, 182],
[0x989f, 1410, 3148],
[0xe040, 1980, 4558]];
// ASCII 化変換テーブル
unicode_enc =
// 8140 〜 81AC
"7LCl47L^>gz{oicz}8v^z}g>H7]rjl(;Bjs(:*we{<`3K7hCf07^.vp7La027Lr4>7M.C72BO)8z{w1>7OB9U{.4bv2D64P2BtAH"
+ "2CJPnz{AGv7N`]S{*xIl{.>Bi7M@LF7MRXJ7MeeN7MwqR7N;Cu2yiud(>y<Mz}LAsz}K,c3,h+:2{,xj4A7,L(:lZ+2Ea6J{<r>h"
+ "(9@PozzzL0z{-R8z}gCE4:jm*44P]d44lo_43y>04/tXr41mq842sFf7N<Vt2kus72l;Zv"
// 81B8 〜 81BF
+ "2xeH*305A{3/g)s2|Dkk"
// 81C8 〜 81CE
+ "2|)Xg(:GFt2s5d@2x5nM"
// 81DA 〜 81E8
+ "2{?023?08,2x[C*3*[^)3-?HG3(G2r2}SWx2|Uew"
// 81F0 〜 81F7
+ "2a2bp4E|<Q4EMaN2Cfhv"
// 81FC 〜 81FC
+ "48Ao="
// 849F 〜 84BE
+ "3tn;u3v0/93wGxI3wm:f3x`kv3{:PZ3u3N/3vpYK3w>rW3z=p|3{1KN3x;Rm3y/-}3{Ucz3yx^s3zl9B"
// 889F 〜 9872
+ "A>WC)Dx/.[C<BweGrsSYVC[G*R3n9=G-lgyKJ-teRW*p<Z2]OaD(yYXG_E^HDr^vTY5Wn@PK999GT`FhSxx[MFMD?SH{c8,X3n<U"
+ "I9BAiAJ@ttAY|CYCy@IWDs+]]EYDnyG8XlkHmZsfL;]7nMhB`.PIGylQHc+TSo}ELVI,IoBhliEA?T,SQFs@XNrmI4DYoA.VEyWH"
+ "R50E7Z8lh1BnNfSC?ou@Dw9WGY5E2cQL9K@XDF6(XJ{[HC(}`zEKP8KQ,fwcXR^>kZXxRWA/gh>Qk.J;Cb)oEJL?1PZ:.u?BtV^N"
+ "MWU5ICfRXKVG|w8R9>uKBzShjEB7L/Hn|f_IL_49K)KRuMIhy7OB@piR/;a+TPB^>K=mBjN7=<tG-HpgUQi)3Iwb3wB964jDE:tN"
+ "EP>h8FuwUiH2`[WKdY6ULE:JyLYn2xPRE,KR+nADVJ;<]ZQ|cMHdBpgM`@wdDaCqoFc}TDGgFARJ2D(OJ]H6GQ-4|IZSoCH[*Du4"
+ "JuRf*B+A3{GJJi3IXmL0A7JIpBoBdiKJRu4Xp1zcBdq4zARA8YAZJY1BW=|_C`KvEE6DMVEU.s[Hy|*pIDBZSJxZ/zM9L:fO2vZm"
+ "Odc:`R,svdR=T|ARGE[nTY+?:U9^o)VHB3hS<QlMEr3_6LhuUOQh^R{SHu5PXNw>1YMW.]AL*0TCw4yUDU`|PFoK0SG+N-5GM6Oz"
+ "GiQcOYuJ`}I_}E|L3eyvN/|LnQ}2>}X-JzoU8Lq@BZO@SC:wn?Ew+rfIvJ:1NhGJ)SnePZWNisbK6E_DSDwa.IL1g:Vy/IICmr__"
+ "FPUIIHGbH@IR7mEM0tUAOEHH2TA5I(Uz|S9X/{a7XaIb@ElQ4uXyhzJH)5nnJ2M,RI``LFKlXJgCSuUAGlPyvKFs/3RUr@LV+tg_"
+ "Z9rVHIkJmQXd@+,B4dMjR`4hyWKqVOZSH5yR1FwgP-7fOR*TqwA;E}sB;y5HBG=DZB_pFgCSY*EDtzyPEM?`SFF7G|G-,4WGAUhc"
+ "H/|Y/IG8IsIgtS5JR*,UKf.2lKimkWM^wBfN>6h{OgNo8POk<EQ25}bQvIa3T=q0hU9z,vWauf7X.,F2XDbL:Y;1a/A3t:.Em)/h"
+ "M6iD^NCI47Q1_/,XNQy*XzRN[AID=+BnWo4CjWZ9Dc}c-EQ{l5F;A5pFl1+QI7.^]HhGELIbs04J7|A+J_812JroN]N|B5SO9zFv"
+ "FjTB_TH^BbUOfL3U}i^PYSanSA;X6pB*rigEMe5]G`z)]JOFS6MkozEQ*Z<*TZ2rlH*|D1Xg>AiC(45+IU6gRTR(mnI=InrBnt=C"
+ "QQ{?EV@ZN{A5>x}AK+VQC-m1jFWFnvHWu0.JlTzaJ}eQbM@Fq;OLT[*P9cT;PAl.YLi0QZE`gzfGidhKGq@63S7IOpUZ[kuKbW4d"
+ "Yx-YkA@54sAYj5XA{q48OT8:]BE1xnBf*/pB{YNjDN.tBF[9DiFvaviF}@IyHXhjGJz/66Lxd0EQNDc(QlG.1VZD{|XqLP[Y[hQ]"
+ "BBNQ6HyDb<E`9wtIu)RYITi04AzXEvD,FXyW@{sAJLu]`MEZ?wO2mW|PLP6WRF[5+T4t7+V:{1BC+5@YA7ocZBzxyDLvEH}NUrgH"
+ "Ur)srYL8nLB7XMmS7ltiOFzK9ESZc/XH-.pJE;u=Eb)h{H(pZ>Ju8:4V/(G>LQo.CP)O*QP_6{|WHM5nC*fVtTH/R?Uu:cLBmJqH"
+ "N{W=JAynoEB22KgD)ZSaD3]:aF`lHyG(3v+GA{*QH+[_2HZj{{IS=ZTMg<ygP6HDkPG<V_Py{bOR8fuJTFw0STm?)QXtBU^R)4tm"
+ "Z1:j1GU[4<Kvyc3IS3P_JLYNEKkK,0P?NgjTIkiEAH5SLAi[)TB80?+BPhg0C|HJAE7SDSGI{EAGm;0TIkSsALlg}7M)^dVNe6)]"
+ "N>@*+T9Y@7U?ntNVJVQ{XFvw}YT9@BB2)@ZBu[m_FYIa7KUQxuM?oZ[QqHWmTah_?A6;]vBzow1Cz3|OEGg,7FL>LdGX>xnICX9Y"
+ "Lu[:^Sx^e2QKt5TS61^eU[kUiXO3H1[2i|iA=QIfBj7sbC.MQDFe?FkG,^38J=(JENg/iKTWX6ZVk_DLZ-vM+AVN{HAh:/MB2`_+"
+ "BW4r|Bb@]hBzfopC)BwjD-L,vDiiSYEF|OwF73H[F9,bTFG}YXFMV?aFzJL3GcJX^H*Lu)HkkY:I/[gXIOg-]J(8D)K/@JAKK3u}"
+ "Mad3yNdpcrP3RK^P9PIDPImBBQ48E1QFib0Q_NJ;R9YT(Sok9dU8}A6VUUe5W-ag9W<S[GXB1gTYG7TzZUIgYBXLirC(b]^Gm`o("
+ "U3)Kd[)5esBLPqTCzPE7Vi(G/[+pcQKcJ}=M^6(bG2y.QLvkanJSqm>ACO_3D/NMPE+ECPGL9{rHl9x6I`0MRMs/v+Qw>-LA>N+]"
+ "Bwz*KF*V+9F80H-JunIlNXUj(WLy+fD-C<+Gs8IhAwuUYI0swXDJ35IEOpPRGZSG2IRf4WKF|:7VqTRuNZWOTO*>3XP<+C6Sz*3a"
+ "XJJkgD),e`Pyry@B>.JsX>E}|Iw>NQC:nlED?cC5Zjk3mBN.wOH:V[YI3*)VOH+_NP:Vs5IV,,6O[E)IB9Z>8ETqwhHFRQ1I5cw8"
+ "RzSIkN1-:LGvh.rZ*fgPHtBH8Auj8}EeM7?HCST=IVEkHM:?^TOfI9<S=ccSU?.QEY8Uz9H}nf1AD_2pAOKA+BLGjVB|CzRCvoiI"
+ "Dr.{qDw^e-EaZU2F>[J>FthgfHT>>uHbwcaHi(k|JS^/2Jg/Z]N|LA|P6-24P;RqIQOJKwT:i+1TQ>zcTU(NdU<xv;XOahwJT}|2"
+ "AO^M;B3JP}EWgk(Gnf85JLc[DJyMfVMT9pONmvalQ54ziQi5wXV5S6iZx|0`TkkU*OT_b{EL2{>A.;NjD?3qWE78(LG*?kUKc/F}"
+ "U@`_ERhOQ`Aqf;GQ|=5[RpFm?Ql|aNEXmWTUMtitLNo,kP9GKBTePq*VKenvVR03(Bar_bI9hj{Le-|XVq_gAR-x;YFZW{iA49K1"
+ "EKXheI628bLx>b.O>rjiUTK^=YFodgByM}hEX?9pJ3xfKXU8/FBxQF]EM6ZSF6HIMG7.rAK04JWO4A^-PZNDFQiQ,9R[T(bT6vU@"
+ "UkfD?VE9srVgoF.Vlw8fAQ`p^BiMkZGSl-*JlKyOM/@aNVr7-HBy2ynEQN,-O(WsVP,2<mLT+30Sn@I/A_kzEHoTb-OR7Z{YR+5/"
+ "FhPe/ItGlKKDga9Km2,rP9*}NVLOdGXr4MTBI@;:H{+eaKHtqqPMC]kI0,/hS,oR)BX:]QDhcw8FedayW9yxEAy.AKB^j>wBj.lX"
+ "C@YDVCHGTrDgS{WE(4*{EY)MKEZ8:bFH0`IFQw87G`prFGjaJVG{BTqHlq@.Hx5o@I^R<hJ3RpFK9C.@KOSuGLG3cCMqZd3Nc<Yy"
+ "O)K@rOQr3fP-KIXQCsqDRZ|V]SoEq5TIGfCTO*PZU2,d,Vmm5WWJHh<XJVB6A.{h,A116:B:|8)D:iw0DUr|vF?}F:HO+;TI:-sB"
+ "Lro2:ODT_CTnVzqW@CudD>pubGlYsDJY6}4P[8qHQwbg8Y3Cc(V7TyVAO966A]V84D{5-1EUwT;G?ABkHc*kEIf[[/K7[xnMam7U"
+ "N@B1AO77U9QhKFkRz](7TL=k}V59;lVstF6AAi:ABFS+KDY@@*M_2SQQWT/7V9cKxXap.yT]5`yVfgHgBtNkwC-v+:F={1cJk+1o"
+ "NGEt_Q0O4,VG*/6W>_wxXI43wYh-QAF)uspIB8IiXQ<vmI8bm[REr9wXNHD]KpTaPEWSz6L,O4BHpY+)BKyN;Drxh6FunJxHU{iQ"
+ "Hns_3Ig*oWJSg<kLkXALN9,KaQ=*mHT*L7cTW3qrT[g0,Vkt-6X_cu^O;NR8XMoO[G33:7Haq}XI@>F6OB6kePXqBqU:-)SU[*v0"
+ "NkDYNGjN>nH:{iuTJr53OjjUFXRquHQllL2AE-R?Bi`QsENNM0EZf_+GVEWZHFegdIQiWPK26A`IGJl/LKJT,HewJSOhggTPZ31o"
+ "Q]9vmQqZVfTQmI}U^6I`VLbsqW10*fZ+*`hCQ<@TLHoc4O,oePQc@iSCgX]uEkB6;I0bLGIr3X8Mk]c1Nv32*O6M)@P:Cz2S.UZu"
+ "X@88A[44|vBRaxfBz]]cCU@7pDdr.+EKth{Be[@2G5Yt<G|Z?]H,X@zHi1p-F6waKJ-TzjL[RzWMu;0LOI_i=PM(E:Q>;/,R::mJ"
+ "Ra:+@SzNFuV@/NcWM,]]YT-OJDP:O^QfeC8UCs]oA_+)UBMib3F}RVOI;*V4UV2eoAa6q`U=<g`PGD0;SuJveH-KTXEHPPUH5C7R"
+ "VIjX:D_8LuJqN?6CIiT)Dn*UyG[4x]Qq5>IX@fs^YVJ{8D@h)6Q5W|rF?*bEFu-tUGWpe{K)0F(QIqfyR,3]>U;DzSVDtq^[,nip"
+ "AF3AID`ZWPVkEh,Zjc7bL+vYgCJJ-MG[c19Gin5nK{yktTHTSAKw,E8R6khsSH;f;B{G/PVHyAMDghSIF9e1>V9*HfU-WmWZ;PI`"
+ "TXnq@Bku.0D/axdH)uW{JQQi1KOp/fNV@gMOhKT2Q:HN-SCNPEWF^0QDUDk;HbeY8J;S14Mb<9}AiJ?OD)u}*F|LyzJogK`O<g@U"
+ "Qj;f>VGEZKOkfK?OTTvjRb-zhO7R`CR6XwtNCmv[AGg^_Fn<K3Hq{gzK(=]pSr2gCVd^09YM*cjL+n_]R.5moU:E|_B2DM2CQ|0Z"
+ "F<Fr.FGkN|FZ}92FiV?;GpLDPI3|w5Lh5+GNC8>zQU?A2SUdXqT^V9MU]zD,X+?Z{ZL:anGwurNI33=DM:[beWOS:uK.hBZIj)s+"
+ "V?a@9Msg}zDIeHEH+n|PAPI,VIGz@_RlT<[WEt=dKnHkuDZO*UP;[JoC(vkQZcB5wAQVgsAr*b.U8V(EDCy2EF=1GBFLPX5FX_c>"
+ "Gf[e3H.mvuJlC=*O-l8aPNnePTF?c|UfZ{IVS]L0VsF@@J}w97HL,7JKa621OX6-dWS;@bCA`K3HEN?dV=z0}B7b9aD`l[]FJ3V2"
+ "PbQ]sU;j98X{;VFALD<kKuDMDXT`UZC)U5pDIHa3Ec]x,H`G,>KI`8TRH^`[VB1n[WE4@QN_Qi-FKflNDhm+iAgO_6B=:`EBF7e5"
+ "DI-J0DedouEs^OeG/e{=H8gN=ISFPNIe)(jKAqhLK;ERgLXKRkMsJ|hO^-XhO_*>IPBz5DRVefTS*m2+Tbm}5U`y:YVAYXvXFQ_P"
+ "YWA*bA{KvoC)0s8EYs9FHDl_bNP0^_QMvR|VHpCzEqB5`Bi;_]FiM]ELlBsDO3)fmJ`Y>qTXSVwJ88(>OGekmEaAVcR.X`cVd.S<"
+ "Cl>snG0tprJtMC^VFw=PC0P?QVx|WjVQEc3A62]URxlq6L14]zWDw^(YJ,KNMi+jkIrk|aXR0lmA<qMFFW-AgBbgx1QBR*2FU;[}"
+ "A:7@KDj@uJXoY_NDk4Z9TU0X<O1KY.EUfbbM)B>?FFIXPG{gi[LWu7sA5-GkA5vcKCpi(+Kw=};QNs+[QdY?VT:q{uF8g[hHFJeK"
+ "I=Z8VK1L-)N^qZvP{+GMYI7:]FNo>5H(8K0I<g|9LgT*4QGflrVdQ`eD?F+gIZJ6HLMi2oU;9xcU?])AVB_p.O6{9;RPRdTBPzl8"
+ "Gi6X:J{+xSOf-wJQq?D@V=fL=Ker.0PU1xFYKNQtBEsrONeQ6GQB?QIJFZ};QBm^QMfZ.fW,-CnN.eABYl1bcPzQsmO^ex.ZL`/*"
+ "DI]JEXMx(TBJ*8<BxH>yF:`xsH_f^[Jl0b8Lg/<ZM>)1SPY6XAS+DWyOk9-lLNAlXY5)UQHvkJ-N:(vxRo]]gBf|fJC+sj*FHKu?"
+ "G.`=<G`9MhH_]e_J{>,4N4=/WO5cWoP{=MESwbLKU;a8+X`=.=J/*KRAusXWFhv+{Ja:glN=zjb[7+e5O<ISFMk9f]Fa;scRJVQb"
+ "F[ge>MfndmVFG9pDuR>dP8]YUTg,b{Fa`CvJkF?=MX5YbSpTbNU4ZimH.eBAO5,BzWA9]jR]lmiZ8Yf^FarB;K4^*xU9T_hXwms["
+ "MZ?ODADza2Da(bnERn{JF:DU/Ft(:xH[yfhHwBP.Le6>sQWfwlQ{pV,U8k4tUOJP2XA2UVHF7R`QneZYRskg<EXQWBY-NciRqg,d"
+ "BR*xHFAHR@O-uU,T+QttKDy=WG[G=ZAD(zxZ(+aYC.24-DS9N:G_+7/Dh6^KP3@?rXSQPGQ=s|oAUeU_DFx9-FF@OdIElVtRn|e`"
+ "XCZh`Xq],dDTe6eNk2MkNN](1OdWFuD]I2DOkSX}V8SK,VH6UkB[_0sFUOSyAao]DW:X1UGwcBaM`zA.U|kv3B^|[FG@+jKI(3xw"
+ "OxC?QAi?l9Bc+3qDECzTEMn+oErszPFJ*.1Gy[GAHc}MeJ|:GdLBDh=PVn{1R(]2DRfDOyT,acyU/[96W8*hzZMhAnA6D_aAtZGY"
+ "D,b^wF@TbQFmQuXI(k8qIG/EFB:OEUQF)8(TbHexU</V0X?9KfXv96WA|?RSDR*k@I6M`HNGt5rVtnXbJva`(D@0b+DeI*jQ3C2,"
+ "N6m.3Nr/^z[)H/PDp63tIAC^eC@d3TFC0XOI@m{lIL)L(IV2I8AbNIxGg+3,Jwh_?A[e/g[)m*1GAM30Kg+T[C40d,Yuo_ZOf5rB"
+ "ER9MCKN*[7O</w@Dlia{JgAs=B^E8{LF[G7NTHO:ZYO;FE/@euB<P<+C56FoN9QH[W1pl:DuJ+<K[3PPIbadBPP1B7[)?O_J1H:9"
+ "DjS(lJaUvSN;S.mQ6Cu3B09k;[,ZB[I;DlDY7FpGGXZ{lU:OB`G//PsX,9l=A8+t3D_KOJQ9_W?FY@x]BpZT.P7E?1TKS@WX_Gjr"
+ "R{+aDG7xFQJy;fmT`FOiCH54MB/EQiBx6JHFGF;ZGDq)FI1q<0KQ1oMM*Q/}MaZ6CS|5ITVGs]{VZ2x`SX3MVA<KdRA/L6CV+I(J"
+ "Ax)-VDlLA-FM`T(H3@hWI-,0uJ)Y?8KYVWSM`^YEP}?i^RSxrDT8SY5U`JsbXG<65GDKcQJNRfaK78@VQ3M7(P|hbpT)s]wRCfm2"
+ "XT<<?PA>ltVgY`9Bn}HIJIZZHS(EF/T<V=*C)L<MI9:4DM@bqEMtQ<.S}MRFXR):[Fe6}dOO]|AH)c{]BTn=^KVjm[Meq{0P+7mT"
+ "OQN4WA]`dSHe@J6A<9UOA|manB@_?;H`Y;gK>rx:N(fK[O<yDyQwFVxVM:9AXFHX:BVh1fAj3Q:IA(QaLY?mhQhz5LXK@{VZ|J2;"
+ "DG+mtP;x{wAF<96AX-0bBY.UDFt`=vN{+e4V}6R=XT4`WZ{X.aH}@FkBH_=2L=1rWFOOZQGFEJWLJsVHPPz-5RfVxOWA[c)YzC-r"
+ "L6IVrU]U9pBYI]vFOX]`I3E@7IxCPSKd+s|LzAAVQ3|8SSQ1hZB6TvoO,ff2WB?+OAjEa1TR1LOU<]?WG1z^cZiwVKA>5VgTQPxf"
+ "RsW7*KSXp{QX9cT"
// 989F 〜 EAA4
+ "FV[cGA04TYA33S,A4B@@A4ye^A7A?JA<2`IA<`_@FVejrA>j;XA>|G^A@cS)AACxJACkWWAC+-NADq>|AG8o=AH>UrARoVQARx^*"
+ "ARSDfAUnUqAXQBDAVEtVAU71tAU.+hAY;qxA`q8|A`9joAaZcuAaQ]sAbWD<AhC5aAgbg]AiQxHAL:8/Ai-`iAj<LHAcg1tAf7hh"
+ "Am35*An]DoAm;KlAnfK6ArEnmAu|;>Axi.0Az}W^Ax`(?A|HQ)A}|VGA}jJFB*1zdB+o0*B+.[8B-0yIB-_A[B1,X<B1>eBB1YwJ"
+ "B3]>jB3oK,OTJFVB66{NB8TTyCvS@5B9Q69B:DgEB:j)LB<G.lB<4xmB=(RwB={40B=r..B>7@>B?tKZBB;|2S6p2?BD5=TBE(nk"
+ "BF[t1BHC)DBJEFtBK/r.BL>_UBMMK]BN@|xBO4W6BRWnUBRNhkBSTO-BU|/IBR<[rBUc+DV6Nu_BX_r7BYRLDB]-2sB^sD:B_iH="
+ "B_/PLBaCzgBai<yBcGT1BctaABd0mHBe?YbBgT./BgyF:BiD?UBirM|Bj@vfBAdbWBme7QD^|/iBo96tBrSG[Bt:RqBu...Buw_I"
+ "OsTi}BzB:jL]OkvB{>7PB}7NwC.D9NC,T(*C.;3;C-Ye0C*vy<C7/)+C6{xjC3steC3jo)C4yZxC4K<wC78/=C=,|;C;Nw/C:7.B"
+ "C=6,BC:.(?C9CS4C;t9gC@>1HCDh/KCBnmiCA1beC?xvCCI{WwCK=JMCLzUuCLC2+CI1}>CM-]uCPm-WCQrmRCP>gxCSFl`CUeES"
+ "CQ2BUCQVZXCZJOtCZxnxCZ]]?CYj,hC^RU7C_=){CbE.>CgkctLZrmYCe:}=CeM3yCj3<iCj|nVCmia1Cn7yUCo=`NCq-r)Crt-@"
+ "Ct5vTCt,pZCsyj_CuMivCu|2+Cxr*iCzkB+C{9Z9C{^s?C|6;LC}E(ZCXH6dD(p(4D*i?^D+.QRD-9v:D9>uvD/37cD3J)ID5q`+"
+ "D6?w|D7WkKD9vDsD;88(DA64dD=(IrDBj:eDL>SmDJWI1DL--sDHq=iDM)*-DSpW2DREX?DWl6tDSgQ@DU2JsDVJ>-DW=o6DXUbF"
+ "DXL[HDY[HoDZb/zDZ}B)D[^g<D^2f[I^vwaDa1e4Dai3EDc,6cDeQ]+Ddh2.Demo@DfaIMDgy<[Di;0*Dm6ExA[P_vDoK9TDu7*K"
+ "DkOZBDsc,1D{+wcDzfeWDzSY7E->H=D}IQHE,8bTE26`4E6)8hE6MP^E9znCE:@*XE8XuYE<TT;E>;`UEBIJ6EAUq?ECb>aEDKie"
+ "EEd]0EFa=?EGp*XEI(mnEIV5xH^iXAEJey8ENj_>EQrckERS2(ES=]?EU[6SETh[NEV3TgEWBAuEXvGBEY;YKEZJFjE](L+E_E|R"
+ "E`B]iEadV-Eavc+EI1viEe1BNEe{G|EhBxTEi6IdEk^3HEllvTElu|_Em`PhEpUIOEtGy/Erao]ErE[-Evx_eF(Sa_EwY-eEvoXo"
+ "EwO}lEw=rGE}M{.E|dPEF*{AxF-0fDF,XG^F/N@-F1>QOF.-G+F2iPjF4Xc/F51+7F6-bUF8TAwF;8.`F<c-eF<u:6F?t8aFA6+i"
+ "FBDo5FB|=CFDP<VFAZDLFF[a+[)QIbFK/_GFNf+qFP:+0FPqOJFQZzHFQHnNFR*<ZFRsmgFSgGvFS^AvFTPs2FU``HF`>*KFVS:X"
+ "FWb}|FZ3^LF]?+qF^Mo,FZEjhF_SU?F_ohLFa{5sFc*s7Fd9`>Fe-:OFemeUFg8^uFfW9vFh>E=FjIi{Fq2:sFpm(}Fmw2zFqVS_"
+ "F{uGcFsFexFs4Y(FtUQoFv<^:Fs=`2F{=z/F|{/vF{lB=Fy2U}F|:Z:F|Ca:F}7;lF{4toG*dY_G)^r]G)gx_G+a9mG+;wyG*QMV"
+ "G/@^-G26TrFoyPAG0k[fG2dufG9:9[G5v)-G6{f4G6DA=G:R,]G5Ga>G8Of@G=Z1QG;3Q]G=d7gG;apKG=Q+kG>;VMGCb4fG@P*I"
+ "GBIAvGBnYkGC*fgG@uBFGCO)OGF|E_GICv,GGJ^fGFN((GIV,gGLU+*GQD:VGKkUvGJnurP{NQPGOT)aGQ;52GQ))5GQ{`;GR.f@"
+ "GS4LSGSbk[GTL?rGUQ},GVjpEGWK>OGWgPbGZ]IDG]qsVG]UaaG`T`AGavXJGbs9iGcARXGa?4ZGj<0AGg=1yGnRw_HJW07GjjNA"
+ "Ghq6{GhTzPGhh1oGlcfyGrjinGoOX;GmM<4Gu;I{H6w0[H(]^jG|?.qG{9G_G}s3^H)Y?DGz*YoH,tPBH-0[wH0p/GH/)tdH-Tuv"
+ "H9Po+H5zR*H9d(EH6Hk0H5U:hH?k),H<=dkHCodpHEUp@HBMl6HK8ZIHHz1)HGtJ0HH^uPHLZVUHKp)_Ge`3*HMM/dHN7Y2HMiA4"
+ "HO=@EHQm|}HOk_rHR|jAHTl{]HU27aHU;o1HVxI<HXCB@HX_TTHY6snH],lCH^<v}H`l?.HbRJVHe-1(HdpzzHf)h=Hg]mSHh55a"
+ "Hi{KYHl_3WHk+2eHq;7aHq21EHt(*3HsF[*Hu[/[Hv<SlHvalhHv*GsHyVeVHzfQcHy`khH|CWTI)BUyI)ptqI*QBsI,JZQI-P?k"
+ "I.1fqI/7M1I/wxRI3<3+I4y>DX[6^8I7]*mI7o6qI6iOuI:w;aI:Hs_I;Wa:I<pSgI>2F3I?oQeIB[D?I?/(4IJIRFIJ.@BIIi.D"
+ "II:ffIHP;cIJ@LJIFs67IIV+)IOJp^IPY]cITL5yITU=PIPlj(IVjg)IYienI[Oq6I](9+I]hcnJ@K=dIXYxyI^@,TIj2uAIY``z"
+ "Ibj*xId>*JIlYUWIimd)IcogaIcxn[IjN2gId4y`IlPOoIe1YuIllcMIkAd8Il,77IuMLAIrEG{IsyLfIu{k=In[uSIo+7<Im`>7"
+ "IrWSbIv@}<I{TO]J(fZ6I}2U;I|mC3EUnmKJ*1S?I}DagJ2i;gIy[88IxLKEJ*:YnJ.-3pJ-gz]J-0R=J+7;>I{KJwJ+n`SJ+[SG"
+ "J/j@|J1YP3J50mMJ:)-PJ:`QhJ8AxdJ8g:VJ3nzWJ=:8qJ>wCxJ?3PCJ={asJAm<}JBVgyJ@yb^JEUfXJE_l2JE1MnJH^kTS02W*"
+ "JK/J}Ysdd*JO40oN94rvY4vhcJPBt6JQdmSJR3/YJSArkJU{_FJVf3TJW=Q]JX:2{JY-d3JZaiNJ[K=ZJ]5hdJ]>nkJ^;O-J_oTI"
+ "JazxwJc<l4Jccs6JfDprJg]d0JiCoHJoSx`Joy:yJsFQgJuw7sJv*=qJpY`2Ju-]zJzJ6cJ|(;=J|LSIJ}-x8JxGnrJyDOBK(}9v"
+ "K(NrbSm^gLK/IOlK0kHTK0O6lK,fcwK5GMOK5PRmK7e}+K9zP}KzjjpKEH-iKG8=oK@+T]K>MO-KC}3zK@XsdKA:AFKEQ3-KC3Xi"
+ "KCk(2KJwiKKK*nLKR@_,KLgygKQV3FKRevtKILihKLBb8KI{4)KI:]ZKS}k2KVEDhKY`U;KZ@ysK[+M}K]hYZKUHd:KZoAhKiHAY"
+ "L/s7@KaZ3RKi658Kgb5}Kgk;ZKi-/XKaQ//KoOEOKp9p_Kn@W}K|GuiKpBv[KkoyCKqv|[KmCxwKsp=LKsyCfKwXfyKz<RhK{^Kt"
+ "KyR(}K{pW}L(fPsK}2KjK}rvoK}VdxL*UaAL*qu>L+.+XL.H;zL0JYiL8/c5L:M=UL:2*oL:rTlL?W_`L?ERlLD+]gLF-{@LMr3q"
+ "LQZ]OLMUweLL>.yLRE3ALQ6D{LU(taLZ*:GLWFNGLXU;TLY-YfL]>e5L^;ESL^`^ZL`l,*Lb@+PLd9BgLdTTpLedB/Lf2Z7Lfs/I"
+ "LhlG/Llq,dLm6>lLn|P6Lpc[WLs4;zLt9yBLtC)KLun(nLwA}{Ly{jTAg5]hL{k|5L}-oBM*>ysM)06^M+DaFM-6JcM.(L|M/n_="
+ "M1TjRM1p|ZM:-M6M:drDM99saM>232MQCrdMKt>PM?7q;MF;TKMFisZMIUeVMIqx,MK}E:MKEwGMMQDqMPu[WMUZfVMVaJ,MWy@+"
+ "MXck8MYM?HMY`KIMZR|WM[kopM[tuzM]qV.M^[+;M_WbWMa,a|Mc]GOMd=lQMf-}`Mezx,Mg*_4Mgk3AMi6,WMja+wMhgjhMj|=u"
+ "Ml5+BMm1bVMmi0zMoO<5MobH1Mo}Z3Mo=0=Mqvr[MsSw|Mt,@FMwX]fMwki[Mw+>VMv@jiMy-]+Mz|t[M{/zVM{B0[M};GzM}{sB"
+ "N)FlNN+R9uN,*X.N,k-<N,}9<N-9EGN-pjSN.Q8`N/DioN08D)N0oi:N1G1BN21[aN4tN-N5Km4N6HMPN8SqjN9GL+N:1w8N:`n?"
+ "N<OPpN=hCxNAGgeN@8zZNA,TXNBrg1NDXrdNH09@NFe@-NJVokNIvJuNKoc4NN.6VNOkB)NPgy;NQ-5<NPz/ENRsFhNT>?zNU:w?"
+ "NWtcwNZ<@RN[g?eN`bsBNed8jNfVj0Nh=uINl^lzNk}HENnN(VNox}WNmHAFNns@|Nq{E1NtBubNuH]4NvNCENyD;sN{O`gN}w?}"
+ "O(<QvN}R(>O,81{O/I<a[8iP7O19N(O2H;:O4/FfO7@QEO6`-6O:mo2O<SzNO=GT]O,A9yO@=MAO?o5BOC<KiODB36OE7)IOEv8]"
+ "OGA1yOJ-zJOJ7*LOK}<:OLgg/ON|:RONEWwOO8FZOOokfOPcErOQ1^}OQUw2OR.?<OS=,QOUQV0OVE1/OZf(kOWy6VOZx4}O[+;P"
+ "OcA*HO^QpxO^Hk[ObicOOb`]POb;DVOam,OOg*TUOg<aLOfwNVOe1==OeUTbOf[=/Ojs.XOlG-NOkJLoOo3vqOsfyqOne_gOqZV("
+ "Os]s}Op^v/Or|NzOuD)lOv.SkOwOM.Ox0rUOxh@dOz*3[Oz39uO{g?:Ozj_2O}28XP)Xo5P-05tP,t)pP,jylP.d;2P.Q/,P/D`C"
+ "P0/4RP0A@hP2(K|P3f^_P50PYP5^ocP6?=yP72oAP956BP>?X_P;ny.P=_4BP>H`2P@/jsPC.iSPB`P6PAPdpPEUH^PF6n0PGNaz"
+ "PIQ(vPJ;SKPK/.7PXh2YPIZ/ZPJVe|PId5WPNRE;PN[KSPPgoMPRj74PU{AjPT50iPUV)MPSJ[RPYdk}PXU(@PXBrLPX0f9PXKxr"
+ "P]5K.P]>Q2P[p9NP^VDNP`O[sPa:/(P`Y@cP`ko-PaqU;Pbn6HPbw<MPc<NJPcjm^PtTxDPuvqdPvjKnPw/^tPw]||Pwy94PxljE"
+ "PyiJMP{FOxP|qO1P}-[7P}QtHQ)K5dQ(|sfQ+;G4Q,A.:Q+{rATnM=kQ-b}dQ/@,}Q0WvEQ1KPZQ33QmQ4SU3Q5+tFQ6LmZQ6r/g"
+ "Q83y;Q:6@YQ;E-mQ=>E1Q>(p@Q>{PZQ@+7bQ@OOoQA9z|QAzO4QB-UJQCWTWQFBd8QF;A]QLBD>QKNiwQK3W0QP4syQMZ87QSX4x"
+ "QT9YPXHfBhQUm_hQWo{yQ[==aQY{JLQ[XOyQ^dt>Q]qC.Qa>YbQacrtQYC|tQb;;0QcS.JQco@LQdbqYQd+LZQf-jvQgE^3QeUKz"
+ "Qg},AQhp]dQj|*|Qk]O0Ql+h9QlY0DQm:TSQotA,QqQFCQrDwrQtu^8Qu1j<Qv7PIQv[iUQvwzrQwXIlQxBtzQzWHMQ}iRyR)O_@"
+ "R-TDHR-B85R/VblR082hR14h-R0/*[R1OygR1l5gR6Q@CR37/xR6-(KR6vXdR88KNR5KXrR3I<xRA>MuRAllrR@p4>R?|ZER?WB6"
+ "RD4EXR=BoER?N<bRJro8RIv7?RKoO1RGspjREL:>RLu5nRJ`c0ROk.tRD}x|Ri193RWkHtRRVztRZ<*-RWX>JRWtOxRWF16RPplx"
+ "RY-<5Rbd{_R`tkUR^1yURc*8fRdK22RahEeRc|oTRk}4SRg7{>Rk*SxRkk(hRj[;CRoAF,Rqr,)RoJMxRpP3)Rv2tXRv|NMRw8Zg"
+ "Rt0V5Ry(meRvsHWRu6=)Rwp*8R|B}iR|9wiS)8v<S*v+KS-+O8S/nASS-Xn-S.LH^S0Wm*S4SKmA7(+QS7wcQS9p{:S?7S-S?w}l"
+ "S<fsyS@OFTSBv|WSC<<zS@+.aSEPcSSF{bWSE5PVSK*GOSIza?SILB5SJwAQSJR)=SJ6mvSOoWXSOJ?BSMP}{SSEuLSUvZQSQL^O"
+ "SRI>LSTptTSQz|CSTK^RSZIXzSV|BjS_jPlS^ZdtXPfptS_)|ZS_E8qS^-F8Scx<aSg*AUSe:0-SdO[>S`S|rSgjleSi,_}Sj`eK"
+ "SkS?DSkfKdSlOvySnwVFSot7]Ss8H9Sv@LMSrj0mSqZC.SuUxdSw}X,SveejSvwr9SymjUSz<,mS|,><S|Y]FT)}t6T*C0+T(7bk"
+ "T+6aKT+n/XT1u2GT.d(5T/DLRT2(8fT0S9TT2qiOT4}7OT5^[[T6H0iT6Z<uT7Mn1T8faGT9P5YT:{4vT<kF6T=0XBT=g}ST>vjd"
+ "T?;},TB:{KTCIhnTE9z8THK.dTGEGeTI5Y*TKoE`TOj{@TMUPwTSAA}TQZ6bTT=yETT4skTW<wqTWb:4TVRL|TZ|J{TZj?0T`46s"
+ "T_et`T`k[DT^{IVTaL)jT^M+|Tc35aT_.P6Td/lgTelx=XhO*sTf{eSTf`RSTjR,0Tje8,TkWiFTk}+ZTlTIaTn;TyTofT=TqCYZ"
+ "Tq{(fTrI@pTrnZkU._JmU/Hv+U0*D5U0joNU3;N|U4fN>U6CSPU6LYYU6qreU4xZVGUJL7U9pqTU:dKRU:?3QU=+{wU@*z`U>{=p"
+ "UBHT8UCN;LUD/`TUD^(`UDgf_UE,?yUE5FnUN)<nUO.z(UPl/_UWfcpUVs2yUZ@IJUXlJAUXcDOU]0ZeU[=*zU`8`VU_<)bUbV9t"
+ "Ub`@QUd}pUUdtjoUfw2+UgNP7Ug*8<Uj)6`Uco.(UhK1gUkS64Um1;NUmUSOUn6x[Uo*RkUo3XtUqQ3<Uqd?MUtP1iUs]VuUtc>/"
+ "Uve[ZUz;y>UxKh0U{fxVU|ueoU}C}tU}`:-U}V3oV(ewKV*zJgV,*1zV+?]}V,NJ,V,|iBV.Ph[V/;<eV5B@.V6,kCV7D^YV;wb^"
+ "V<k<kV>67kV>dTBV?;s<VAlXpVCRdxVC7R(VA54|VEh8`VF-I{VHJ{>VH^1BVAPGKVFZj3VIG[UVK.gwVLXyoVL4N>VMC;HVM_MT"
+ "VN[.cVQv?LVRrv[VX0HgGY}]?V[S``V^{@AVaKvqVeP[OVfrTjVgRz(VhOZIVjw:WVmY}DVn{vPVo]DaVp4crVpu8,Vqzu=Vs3bW"
+ "VtBN_Vw8G>VvVybVwSYaV|Bj9VyLrhW*un?W)JoPW)Aj+W(E2-W*5D:W1^?xW25^CW7eC,W54^DW>UqXWD8[mW?[X5W?e_7WC2uj"
+ "WC;|<WG7[,WHbYjWOf>WWOJ,<WPbv5WSt*fWUH)dWQh]FWS3U>WU>zOWZIEyWXY4[WY{.BW]p|]W[k?WW`8V:W`SiFWcRgjWc@Zp"
+ "V{}_>Weh;>WfZl)WfQfLWg*.RX,N@^X-AqsX.Ye-X.uw8X0R|NX1+DiX2UCtX2qV2K|eP=X4N[CX5B6SX5K<]X6Z)qX6d0XX>6,V"
+ "X>vVrXB([FXAuUnXCegfXCnmhXDkN.XEKsOXJ1}.XJ(wBXKf,YXLtodXM0{lXMU=sXOsnEXOEOBT2{BsXV[?9XTOrTXUqkfXW<dy"
+ "XW*WxXWWw1XY,vPXZDilX[fc(X]P77X]uO7X^(URX`O5rXa0Y|B]]vPXb?GBXdJkYXc|RSXdSqjXePQxXfrKGXgx2LXiC+kXk*77"
+ "XkWUAXmcyx[98oLOQj/gXpFf^XrnFHXuH,IXwJIyXy(ODXyUnfX}HG9X}ZS?X}m`xY.9ufY.zJ*Y0EC9Y4J)/Y76qhY8jw,Y9KE?"
+ "Y9ydAY:d8JY;ViaY=F{,Y=uC<Y>:UFY>qzMY?[NOY?wbHYG.KDYIBucYJv{MYN;5kYMuy[YP4M8YPXf@YQ_LPYR?qnYRe3DYTpWL"
+ "YX+c/YY:O5YYCU4Y[<mUY[t;fY]BSuY]yx}Y^H;2Y^QAvYez=vYgaICYiPZXYilmgYj{YvYkIs(Ylbf9YlX`AYltrGYmzXaYq,^<"
+ "Yqm2KYr;JRYr`cYYrro^YsJ7hYsoP+Yu_bGYveHPYw3a_Yzs4hY|P9uZ(RW8Z)O8JZ*KohZ,|U@Z,<+5Z.YZVZ.umlZ0[x}Z/1yl"
+ "Z:(68Z2:(BZ6,W5Z4je(Z5/vtZ4a^|Z4sjpZ8fCUZ7icUZ7DJ^Z;I00Z;@*;Z=KMrZ>mG?Z@]YmZL}l?ZP/puZLtfQZOj_>ZS7w9"
+ "ZRrcPZVI)hZQ,QbZUqb6ZV[6GZY,luZYm@oZWascZ[A@`Z^UkAZZ|.MZ`X2MZb67kZe,0?Zd/O-Zc|I:Zf:sKZg@YgZjZkCZiL(A"
+ "Zk33}ZnD>IZwx_TZxl9eZyz|zZzI?/Z{Ev7Z|9PSZ}QCsZ}ZIiX`XR7[+LyY[+`/a[,wxw[-+(z[-tY4[.z@J[/dkT[0)}[[0E9a"
+ "[1S|wN5;/a[4@o`[7HtE[9TAd[;DS*[;)A)[;`f5[<A4>[=OwQ[=Fqt[AKVODE2J6VIOc@BBF6b";
unicode = "";
var ik = 0;
var i;
for(i = 0; i < 6538; i++) {
var n = 0;
var cnt;
for(cnt = 5; cnt; cnt--) {
var c = unicode_enc.charCodeAt(ik++) - 0x28;
if(c > 52)
c--;
n = n * 85 + c;
}
unicode += String.fromCharCode((n & 0xffff0000) >> 16);
unicode += String.fromCharCode(n & 0xffff);
}
}
// シフト JIS 変換
function shift_jis(c) {
var i_range;
var i_code = unicode.indexOf(c);
var s_code;
if(i_code == -1) { // テーブルにない
var code = c.charCodeAt(0);
for(i_range = 0; i_range < range_linear.length; i_range++) {
if(code >= range_linear[i_range][2]
&& code < range_linear[i_range][2] + range_linear[i_range][1]) {
s_code = range_linear[i_range][0] + (code - range_linear[i_range][2]);
// 第 2 バイト 7F スキップ
if((s_code & 0xff) >= 0x7f) {
if((range_linear[i_range][0] & 0xff) < 0x7f)
s_code++;
}
return s_code;
}
}
// 他のマッピングの対応
switch(code) {
case 0xff3c:
return 0x815f;
case 0xff5e:
return 0x8160;
case 0x2225:
return 0x8161;
case 0xff0d:
return 0x817c;
case 0xffe0:
return 0x8191;
case 0xffe1:
return 0x8192;
case 0xffe2:
return 0x81ca;
}
return 0; // 変換不能
}
for(i_range = 0; i_range < range_table.length; i_range++) {
if(i_code >= range_table[i_range][2]
&& i_code < range_table[i_range][2] + range_table[i_range][1]) {
i_code -= range_table[i_range][2];
var st = range_table[i_range][0];
if((st & 0xff) > 0x7f)
st--;
s_code = st + i_code + Math.floor((i_code + ((st & 0xff) - 0x40)) / 188) * 68;
// 第 2 バイト 7F スキップ
if((s_code & 0xff) >= 0x7f)
s_code++;
return s_code;
}
}
}
//----------------------------------------------------------
// モジュール表示用画像
img_m = new Array();
img_m.length = 16;
for(i = 0; i < 16; i++) {
img_m[i] = new Image(12, 3);
img_m[i].src = "images/qr_m" + i.toString(16) + ".gif";
}
code = new Array(); // コード語作成ワーク
code.length = 3706;
var i_code; // コード語インデックス
var reg;
var reg_bits;
// 誤り訂正コード語数
ec_codewords = [
// 誤り訂正レベル
// L M Q H 型番
[ 7, 10, 13, 17], // 1
[10, 16, 22, 28], // 2
[15, 26, 18, 22], // 3
[20, 18, 26, 16], // 4
[26, 24, 18, 22], // 5
[18, 16, 24, 28], // 6
[20, 18, 18, 26], // 7
[24, 22, 22, 26], // 8
[30, 22, 20, 24], // 9
[18, 26, 24, 28], // 10
[20, 30, 28, 24], // 11
[24, 22, 26, 28], // 12
[26, 22, 24, 22], // 13
[30, 24, 20, 24], // 14
[22, 24, 30, 24], // 15
[24, 28, 24, 30], // 16
[28, 28, 28, 28], // 17
[30, 26, 28, 28], // 18
[28, 26, 26, 26], // 19
[28, 26, 30, 28], // 20
[28, 26, 28, 30], // 21
[28, 28, 30, 24], // 22
[30, 28, 30, 30], // 23
[30, 28, 30, 30], // 24
[26, 28, 30, 30], // 25
[28, 28, 28, 30], // 26
[30, 28, 30, 30], // 27
[30, 28, 30, 30], // 28
[30, 28, 30, 30], // 29
[30, 28, 30, 30], // 30
[30, 28, 30, 30], // 31
[30, 28, 30, 30], // 32
[30, 28, 30, 30], // 33
[30, 28, 30, 30], // 34
[30, 28, 30, 30], // 35
[30, 28, 30, 30], // 36
[30, 28, 30, 30], // 37
[30, 28, 30, 30], // 38
[30, 28, 30, 30], // 39
[30, 28, 30, 30] // 40
];
// RS ブロック数
rs_blocks = [
// 誤り訂正レベル
// L M Q H 型番
[ 1, 1, 1, 1], // 1
[ 1, 1, 1, 1], // 2
[ 1, 1, 2, 2], // 3
[ 1, 2, 2, 4], // 4
[ 1, 2, 4, 4], // 5
[ 2, 4, 4, 4], // 6
[ 2, 4, 6, 5], // 7
[ 2, 4, 6, 6], // 8
[ 2, 5, 8, 8], // 9
[ 4, 5, 8, 8], // 10
[ 4, 5, 8, 11], // 11
[ 4, 8, 10, 11], // 12
[ 4, 9, 12, 16], // 13
[ 4, 9, 16, 16], // 14
[ 6, 10, 12, 18], // 15
[ 6, 10, 17, 16], // 16
[ 6, 11, 16, 19], // 17
[ 6, 13, 18, 21], // 18
[ 7, 14, 21, 25], // 19
[ 8, 16, 20, 25], // 20
[ 8, 17, 23, 25], // 21
[ 9, 17, 23, 34], // 22
[ 9, 18, 25, 30], // 23
[10, 20, 27, 32], // 24
[12, 21, 29, 35], // 25
[12, 23, 34, 37], // 26
[12, 25, 34, 40], // 27
[13, 26, 35, 42], // 28
[14, 28, 38, 45], // 29
[15, 29, 40, 48], // 30
[16, 31, 43, 51], // 31
[17, 33, 45, 54], // 32
[18, 35, 48, 57], // 33
[19, 37, 51, 60], // 34
[19, 38, 53, 63], // 35
[20, 40, 56, 66], // 36
[21, 43, 59, 70], // 37
[22, 45, 62, 74], // 38
[24, 47, 65, 77], // 39
[25, 49, 68, 81] // 40
];
// 誤り訂正コード 生成多項式係数 α指数
g_exp_t = new Array();
g_exp_t.length = 30;
g_exp_t[ 6] = [87, 229, 146, 149, 238, 102, 21];
g_exp_t[ 9] = [251, 67, 46, 61, 118, 70, 64, 94, 32, 45];
g_exp_t[12] = [74, 152, 176, 100, 86, 100, 106, 104, 130, 218, 206, 140, 78];
g_exp_t[14] = [8, 183, 61, 91, 202, 37, 51, 58, 58, 237, 140, 124, 5, 99, 105];
g_exp_t[15] = [120, 104, 107, 109, 102, 161, 76, 3, 91, 191, 147, 169, 182, 194, 225, 120];
g_exp_t[16] = [43, 139, 206, 78, 43, 239, 123, 206, 214, 147, 24, 99, 150, 39, 243, 163, 136];
g_exp_t[17] = [215, 234, 158, 94, 184, 97, 118, 170, 79, 187, 152, 148, 252, 179, 5, 98, 96, 153];
g_exp_t[19] = [17, 60, 79, 50, 61, 163, 26, 187, 202, 180, 221, 225, 83, 239, 156, 164, 212, 212, 188, 190];
g_exp_t[21] = [210, 171, 247, 242, 93, 230, 14, 109, 221, 53, 200, 74, 8, 172, 98, 80, 219, 134, 160, 105, 165, 231];
g_exp_t[23] = [229, 121, 135, 48, 211, 117, 251, 126, 159, 180, 169, 152, 192, 226, 228, 218, 111, 0, 117, 232, 87, 96, 227, 21];
g_exp_t[25] = [173, 125, 158, 2, 103, 182, 118, 17, 145, 201, 111, 28, 165, 53,161, 21, 245, 142, 13, 102, 48, 227, 153, 145, 218, 70];
g_exp_t[27] = [168, 223, 200, 104, 224, 234, 108, 180, 110, 190, 195, 147, 205, 27, 232, 201, 21, 43, 245, 87, 42, 195, 212, 119, 242, 37, 9, 123];
g_exp_t[29] = [41, 173, 145, 152, 216, 31, 179, 182, 50, 48, 110, 86, 239, 96, 222, 125, 42, 173, 226, 193, 224, 130, 156, 37, 251, 216, 238, 40, 192, 180];
// 位置検出パターン & 分離パターン & 形式情報位置予約（一部）& 固定暗モジュール用データ
finder_pat = [
// [0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x41],
[0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x40],
[0x80, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x80, 0x40],
[0x80, 0x81, 0x80, 0x80, 0x80, 0x80, 0x80, 0x81, 0x80, 0x40],
[0x80, 0x81, 0x80, 0x81, 0x81, 0x81, 0x80, 0x81, 0x80, 0x40],
[0x80, 0x81, 0x80, 0x81, 0x81, 0x81, 0x80, 0x81, 0x80, 0x40],
[0x80, 0x81, 0x80, 0x81, 0x81, 0x81, 0x80, 0x81, 0x80, 0x40],
[0x80, 0x81, 0x80, 0x80, 0x80, 0x80, 0x80, 0x81, 0x80, 0x40],
[0x80, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x80, 0x40],
[0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x40]
];
// 位置合せパターン座標
align_pos = [
// 型番
[], // 1
[ 6, 18], // 2
[ 6, 22], // 3
[ 6, 26], // 4
[ 6, 30], // 5
[ 6, 34], // 6
[ 6, 22, 38], // 7
[ 6, 24, 42], // 8
[ 6, 26, 46], // 9
[ 6, 28, 50], // 10
[ 6, 30, 54], // 11
[ 6, 32, 58], // 12
[ 6, 34, 62], // 13
[ 6, 26, 46, 66], // 14
[ 6, 26, 48, 70], // 15
[ 6, 26, 50, 74], // 16
[ 6, 30, 54, 78], // 17
[ 6, 30, 56, 82], // 18
[ 6, 30, 58, 86], // 19
[ 6, 34, 62, 90], // 20
[ 6, 28, 50, 72, 94], // 21
[ 6, 26, 50, 74, 98], // 22
[ 6, 30, 54, 78, 102], // 23
[ 6, 28, 54, 80, 106], // 24
[ 6, 32, 58, 84, 110], // 25
[ 6, 30, 58, 86, 114], // 26
[ 6, 34, 62, 90, 118], // 27
[ 6, 26, 50, 74, 98, 122], // 28
[ 6, 30, 54, 78, 102, 126], // 29
[ 6, 26, 52, 78, 104, 130], // 30
[ 6, 30, 56, 82, 108, 134], // 31
[ 6, 34, 60, 86, 112, 138], // 32
[ 6, 30, 58, 86, 114, 142], // 33
[ 6, 34, 62, 90, 118, 146], // 34
[ 6, 30, 54, 78, 102, 126, 150], // 35
[ 6, 24, 50, 76, 102, 128, 154], // 36
[ 6, 28, 54, 80, 106, 132, 158], // 37
[ 6, 32, 58, 84, 110, 136, 162], // 38
[ 6, 26, 54, 82, 110, 138, 166], // 39
[ 6, 30, 58, 86, 114, 142, 170] // 40
];
// 形式情報
format_info = [
// Level + Mask BCH 符号（マスク前）
[0x77c4, // L + 000 0x23d6
0x72f3, // L + 001 0x26e1
0x7daa, // L + 010 0x29b8
0x789d, // L + 011 0x2c8f
0x662f, // L + 100 0x323d
0x6318, // L + 101 0x370a
0x6c41, // L + 110 0x3853
0x6976], // L + 111 0x3d64
[0x5412, // M + 000 0x0000
0x5125, // M + 001 0x0537
0x5e7c, // M + 010 0x0a6e
0x5b4b, // M + 011 0x0f59
0x45f9, // M + 100 0x11eb
0x40ce, // M + 101 0x14dc
0x4f97, // M + 110 0x1b85
0x4aa0], // M + 111 0x1eb2
[0x355f, // Q + 000 0x614d
0x3068, // Q + 001 0x647a
0x3f31, // Q + 010 0x6b23
0x3a06, // Q + 011 0x6e14
0x24b4, // Q + 100 0x70a6
0x2183, // Q + 101 0x7591
0x2eda, // Q + 110 0x7ac8
0x2bed], // Q + 111 0x7fff
[0x1689, // H + 000 0x429b
0x13be, // H + 001 0x47ac
0x1ce7, // H + 010 0x48f5
0x19d0, // H + 011 0x4dc2
0x0762, // H + 100 0x5370
0x0255, // H + 101 0x5647
0x0d0c, // H + 110 0x591e
0x083b] // H + 111 0x5c29
];
// 型番情報
// 型番
version_info = [0x07c94, // 7
0x085bc, // 8
0x09a99, // 9
0x0a4d3, // 10
0x0bbf6, // 11
0x0c762, // 12
0x0d847, // 13
0x0e60d, // 14
0x0f928, // 15
0x10b78, // 16
0x1145d, // 17
0x12a17, // 18
0x13532, // 19
0x149a6, // 20
0x15683, // 21
0x168c9, // 22
0x177ec, // 23
0x18ec4, // 24
0x191e1, // 25
0x1afab, // 26
0x1b08e, // 27
0x1cc1a, // 28
0x1d33f, // 29
0x1ed75, // 30
0x1f250, // 31
0x209d5, // 32
0x216f0, // 33
0x228ba, // 34
0x2379f, // 35
0x24b0b, // 36
0x2542e, // 37
0x26a64, // 38
0x27541, // 39
0x28c69]; // 40
exp_n = new Array(); // α指数 → 数値 変換テーブル
exp_n.length = 255;
n_exp = new Array(); // 数値 → α指数 変換テーブル（[0] は使用しない）
n_exp.length = 256;
// α指数 ― 数値 変換テーブル作成
n = 0x01;
for(i = 0; i < 255; i++) {
exp_n[i] = n;
n_exp[n] = i;
n <<= 1;
if(n & 0x100)
n = n & 0xff ^ 0x1d;
}
module1 = new Array(); // シンボル領域
module1.length = MAX_MOD;
module2 = new Array(); // マスク後シンボル領域
module2.length = MAX_MOD;
for(i = 0; i < MAX_MOD; i++) {
module1[i] = new Array();
module1[i].length = MAX_MOD;
module2[i] = new Array();
module2[i].length = MAX_MOD;
}
shift_jis_init(); // シフト JIS 変換初期化
//-->
</SCRIPT>
</BODY>
</HTML>
|
