2009/04/14(火)続・UOA ベンダーエージェントの(略
サンプルデータを用意して、パーサーを書いた。バンダナのローカライズにも対応した。
これで行けそうだ。が、コードが凄く汚いので直す必要あり、でも疲れたので暫くやらない。
サンプルデータ:
Bulk Order Deed Blessed 重量: 1 大口 Spined Leather 高品質 個数: 15 leather skirt: 15 leather bustier: 0 leather shorts: 0 female leather armor: 0 studded bustier: 0 studded armor: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 Spined Leather 高品質 個数: 15 female leather armor: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Barbed Leather 標準 個数: 15 studded gorget: 15 studded gloves: 15 studded sleeves: 15 studded leggings: 15 studded tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 Horned Leather 高品質 個数: 10 studded leggings: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Horned Leather 標準 個数: 15 leather skirt: 0 leather bustier: 0 leather shorts: 0 female leather armor: 0 studded bustier: 0 studded armor: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Barbed Leather 高品質 個数: 15 leather cap: 0 leather gorget: 0 leather gloves: 0 leather sleeves: 0 leather leggings: 0 leather tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Agapite Ingot 高品質 個数: 20 platemail gorget: 0 platemail gloves: 0 plate helm: 0 platemail arms: 0 platemail legs: 0 platemail tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Agapite Ingot 高品質 個数: 20 chainmail coif: 0 chainmail leggings: 0 chainmail tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 Barbed Leather 標準 個数: 20 bone armor: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Dull Copper Ingot 高品質 個数: 20 chainmail coif: 0 chainmail leggings: 0 chainmail tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 Shadow Iron Ingot 標準 個数: 20 chainmail coif: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 Shadow Iron Ingot 標準 個数: 15 ringmail leggings: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Verite Ingot 高品質 個数: 20 ringmail gloves: 0 ringmail sleeves: 0 ringmail leggings: 0 ringmail tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 Dull Copper Ingot 高品質 個数: 20 platemail legs: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 iron ingots 高品質 個数: 20 platemail tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 Dull Copper Ingot 高品質 個数: 10 plate helm: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 cloth 高品質 個数: 20 kilt: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 cloth 高品質 個数: 20 バンダナ: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 cloth 標準 個数: 20 バンダナ: 20 shirt: 20 skirt: 20 thigh boots: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 大口 Copper Ingot 標準 個数: 20 chainmail coif: 0 chainmail leggings: 0 chainmail tunic: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 iron ingots 高品質 個数: 20 ringmail gloves: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 iron ingots 高品質 個数: 20 ringmail leggings: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 iron ingots 高品質 個数: 20 ringmail leggings: 0, 価格: -- Bulk Order Deed Blessed 重量: 1 小口 iron ingots 高品質 個数: 20 ringmail sleeves: 0, 価格: --出力:
出力内容は、素材-ブツ-品質-数 で、これが内部のハッシュDB のキー名になる。ブツのスペースはアンダースコアに変換してある。
spined-leather_female_large-HQ-15 spined-female_leather_armor-HQ-15 barbed-studded_large-NQ-15 horned-studded_leggings-HQ-10 horned-leather_female_large-NQ-15 barbed-leather_male_large-HQ-15 agapite-plate_large-HQ-20 agapite-chain_large-HQ-20 barbed-bone_armor-NQ-20 dull_copper-chain_large-HQ-20 shadow_iron-chainmail_coif-NQ-20 shadow_iron-ringmail_leggings-NQ-15 verite-ring_large-HQ-20 dull_copper-platemail_legs-HQ-20 iron-platemail_tunic-HQ-20 dull_copper-plate_helm-HQ-10 iron-fences_large-HQ-15 shadow_iron-tear_kite_shield-NQ-10 leather-leather_male_large-HQ-20 leather-studded_armor-HQ-15 cloth-kilt-HQ-20 cloth-bandana-HQ-20 cloth-girl_large-NQ-20 copper-chain_large-NQ-20 iron-ringmail_gloves-HQ-20 iron-ringmail_leggings-HQ-20 iron-ringmail_leggings-HQ-20 iron-ringmail_sleeves-HQ-20ここまで整形すれば、この形のデータを処理する機能はすでに付いてるので後は本体にマージするだけ。
しっかし、コンピュータが処理するのに優しくないデータを処理するといろいろ例外的な処理が必要になって無駄にコードが増える。そうすると、
- 気持ち的にすごい疲れる
- 後の仕様変更やローカライズによるデータの変化の可能性を考えると戦々恐々
確認中に既存のスクリプトにバグが2個見つかりました。
- ringmail glove がありませんでした。
- plate helm が platemail helm になっていました。
2009/04/10(金)BOD管理CGI Ver1.1
- パスワード変更機能の追加
- BOD管理CGIについて の下の方にリストアップしてあるもののうち、ただのバグであり実装されている必要があるものを実装
- 静的ファイルのモジュール化
- 管理者ツールと共有するデータがあったのですごい楽になりました。俺が。
バグが見つからなければ、次の Ver.1.2 では 「UOA のベンダーエージェントのクリップボード情報をコピペして一括登録できる機能」(長ぇ)が追加機能として入る予定です。
この機能は、[既存のデータに追加]/[既存のデータを上書き] と動作を選べるとうれしいのかなぁ。と考えつつ追記のみで作る予定。
ローカライズにより「バンダナ」とか超ウザいんですが、まぁ頭を使わない無駄に長いコードで対応するだけなんで淡々と進めます。
こっちのスペースに持ってくる際にコードを書き直したおかげで
- きっと細工ルニックにも楽しく対応できるはず。
- きっとローカライズにも苦々しくも対応できるはず。
2009/04/09(木)UOA のベンダーエージェント機能のクリップボードデータ
プログラムっていうよりただの正規表現で、ぶっちゃけ俺は何もしてない。
あくまでサンプルとして書いたので $a 使いすぎとかそういうところは無視。
#! /usr/bin/perl
use strict;
use utf8;
while (<>) {
chomp;
my $str = $_;
utf8::decode($str);
$str =~ /(Bulk Order Deed Blessed) (重量: \d) (小口|大口) (\w+(?: ingot(?:s)?| leather)?) (高品質|標準) (個数: \d+)/igc;
my $a = $1;
my $b = $2;
my $c = $3;
my $d = $4;
my $e = $5;
my $f = $6;
utf8::encode($a);
utf8::encode($b);
utf8::encode($c);
utf8::encode($d);
utf8::encode($e);
utf8::encode($f);
print "\$1: [$a] \$2: [$b] \$3: [$c] \$4: [$d] \$5: [$e] \$6: [$f]";
while ($str =~ /\G \w((?:\w|\s)+: \d+)/gc) {
my $a = $1;
utf8::encode($a);
print " [$a]";
}
print "\n";
}
例えば布大口の巫女のデータをこのスクリプトに食わせると$1: [Bulk Order Deed Blessed] $2: [重量: 1] $3: [大口] $4: [cloth] $5: [標準] $6: [個数: 20] [ バンダナ: 20] [ shirt: 20] [ skirt: 20] [ thigh boots: 0]
こんな風に分割して返してくれる。
UOAがクリップボードにコピーしてくれるデータって機械的に処理するのにやさしい形じゃないなぁ。
split() 一発で終わるような形でくれればいいのに。
それを簡単にパースしてくれる Perl ってすげー。
以下、俺メモ。
2009/04/09(木)Lv6トレハンとメガネメガネ
Jill さんはトレジャーハンターなので早速掘りに行く事に。
いつも参加したくても参加できない竹は、今宵こそはと張り切りました。
でも、メガネが見当たらない。カバンの中も机の中も探したけれど見つからないので、探すのはあきらめて盗賊バンダナを締めて出発。
ジャングルの中で古代龍といっしょ。
孤島で古代龍といっしょ。
Lv6 すげー楽しかった。
MAFは鈍器が2つ、氷メイスと燭台。そしてナイスオークヘルム。
墓場タリスマンをつけたままタイたんを殴るのは危ないからやめよう。
2009/04/08(水)桜の下には死体が埋まっている
目には見えないが、オブジェクトハンドルで表示してみると死体が埋まっている！
ホラーですねぇ。