| |
動作報告です。
◆マクロ実行結果１
§実行前
7 14 ニッポーアトラス 牡7 *佐藤哲三 55 (美)久保田敏 エヌ・ア 野島牧場 黒鹿
7 15$アメリカンボス 牡6 江田照男57.5 (美)田子冬樹 畔蒜不動 Candylan 鹿毛
B8 16$ロードアヘッド 牡7 *久保田英 51 (栗)田所秀孝 門野重雄 Skara Gl 栗毛
§実行後
7 14 ニッポーアトラス 牡7 佐藤哲三 55 久保田敏
7 15 アメリカンボス 牡6 江田照男57.5 田子冬樹<---この行
8 16 ロードアヘッド 牡7 久保田英 51 田所秀孝
15番の57.5右が全角スペースに置換わってしまい調教師の列がズレてしまいます。
斤量に小数点がある場合は全てこのような結果になってしまいますが何か良い案
がありましたらよろしくお願いいたします。
◆マクロ実行結果２
§実行前
2000年11月12日(日) 4回福島6日目 14:05発走
９Ｒ 磐梯山特別
４歳以上・900万下(ハンデ) (混) 芝 2000m 7頭立
B枠馬 馬名 性齢 騎手 斤量 調教師 馬主 生産者 毛色
1 1 トップラダー 牡7 伊藤直人 55 (美)小林常泰 社台レー 白老ファ 黒鹿
2 2 トウカイロッキー セ6 *中舘英二 55 (栗)中村均 <内村正則 松栄牧場 鹿毛
3 3 ラブイズドリーム 牝5 大西直宏 53 (栗)谷潔 江口雄一 山口明秀 黒鹿
4 4$ターファンスズカ セ6 芹沢純一 54 (栗)橋田満 永井啓弐 John Mck 鹿毛
5 5 トウキョウマンボ 牡4 中谷雄太 52 (栗)中村均 <佐藤尋司 三栄牧場 黒鹿
6 6 スプリングナント セ5 *坂井千明 55 (美)前田禎 加藤春夫 三宅牧場 鹿毛
7 7 ミルダイヤ 牝5 *植野貴也 51 (栗)鮫島一歩 池田豊治 鎌田正嗣 栗毛
2000年11月12日(日) 6回東京4日目 11:15発走
４Ｒ
３歳・500万下(馬齢) (市)(抽)(特指) ダート 1400m 11頭立
B枠馬 馬名 性齢 騎手 斤量 調教師 馬主 生産者 毛色
1 1 コウエイマーベラス 牝3 *勝浦正樹 53 (栗)山内研二 伊東政清 豊郷牧場 栗毛
2 2 テンドウ 牡3 *江田照男 54 (美)星野忍 加藤信之 佐藤正光 芦毛
3 3 スナークリバティ 牡3 小林淳一 54 (栗)川村禎彦 杉本仙次 ベルモン 黒鹿
4 4 フーテンスマイル 牡3 *村田一誠 54 (美)畠山吉宏<榎本二三 六角牧場 栗毛
5 5 ローランドゥキー 牡3 *柴田善臣 54 (美)畠山吉宏<斉藤敏博 滝沢牧場 鹿毛
6 6 コスモリアライズ 牡3 *吉田豊 54 (美)稲葉隆一 岡田美佐 フジワラ 鹿毛
6 7 トミケンファントム 牡3 *石崎隆之 54 (招)出川克己 トミケン 戸川仁 鹿毛
7 8 アイノウルフ 牡3 *武幸四郎 54 (栗)藤沢則雄 田中京子 荒井ファ 栗毛
7 9 パブリックイメージ 牡3 *北村宏司 53☆(美)国枝栄 陣内孝則 平成ファ 鹿毛
8 10 ヒカルヒカル 牝3 *金井正幸 53 (招)法理勝弘 中脇満 村下明博 鹿毛
8 11 ユーセイキッド 牡3 *的場均 54 (美)高木嘉夫 小川敏夫 高昭牧場 鹿毛
§実行後
2000年11月12日(日) 4回福島6日目 14:05発走
９Ｒ 磐梯山特別
４歳以上・900万下(ハンデ) (混) 芝 2000m 7頭立
枠馬 馬名 性齢 騎手 斤量 調教師
1 1 トップラダー 牡7 伊藤直人 55 小林常泰
2 2 トウカイロッキー セ6 中舘英二 55 中村均 <---この行
3 3 ラブイズドリーム 牝5 大西直宏 53 谷潔
4 4 ターファンスズカ セ6 芹沢純一 54 橋田満
5 5 トウキョウマンボ 牡4 中谷雄太 52 中村均 <---この行
6 6 スプリングナント セ5 坂井千明 55 前田禎
7 7 ミルダイヤ 牝5 植野貴也 51 鮫島一歩
2000年11月12日(日) 6回東京4日目 11:15発走
４Ｒ
３歳・500万下(馬齢) (市)(抽)(特指) ダート 1400m 11頭立
枠馬 馬名 性齢 騎手 斤量 調教師
1 1 コウエイマーベラス 牝3 勝浦正樹 53 山内研二
2 2 テンドウ 牡3 江田照男 54 星野忍
3 3 スナークリバティ 牡3 小林淳一 54 川村禎彦
4 4 フーテンスマイル 牡3 村田一誠 54 畠山吉宏<榎本二三<---この行
5 5 ローランドゥキー 牡3 柴田善臣 54 畠山吉宏<斉藤敏博<---この行
6 6 コスモリアライズ 牡3 吉田豊 54 稲葉隆一
6 7 トミケンファントム 牡3 石崎隆之 54 出川克己
7 8 アイノウルフ 牡3 武幸四郎 54 藤沢則雄
7 9 パブリックイメージ 牡3 北村宏司 53 国枝栄
8 10 ヒカルヒカル 牝3 金井正幸 53 法理勝弘
8 11 ユーセイキッド 牡3 的場均 54 高木嘉夫
同じレースで同調教師の２頭出には、調教師名<馬主名という具合に"<"が間に入
ります。中村均のように３文字名は問題ないようですが、ＭＡＸの４文字名にな
ると調教師の１つ右にある"<馬主名"のみ残ってしまいます。下記の行を追加す
ると回避出来ましたが、今一つスマートでは無い気がします。f(^_^)
replaceallfast "<.*","",regular;
何か他の方法がありますでしょうか？
◆マクロ修正報告
> // ここから、
> disableinvert;
> $$lineage = "^馬 +父 +母 +母の父 +母の母";
> $$date = "^[0-9]+年[0-9]+月[0-9]+日\\([日月火水木金土]\\)";
//修正前
$$date = "^[0-9]+年[0-9]+月[0-9]+日\\([日月火水木金土]\\)";
//修正後
$$date = "^[0-9]+年[ 0-9]+月[ 0-9]+日\\([日月火水木金土]\\)";
右記の、"2000年11月 4日(土) 4回福島3日目 10:15発走" のような場合ですと、
4日がマッチングせずに抜けてしまい２Ｒ以降最終行まで全て削除されしまいま
した 1月〜9月、1日〜9日に該当する場合は全てＮＧでしたので[0-9]を[ 0-9]と
いう具合に半角スペースを挿入したら解決出来ました。
> gofiletop;
> searchdown $$lineage, regular;
> while( result ){
> escape; beginsel;
> searchdown $$date, regular;
> if( ! result ) gofileend;
> delete;
> searchdown $$lineage, regular;
> }
> replaceallfast " +調教師 +馬主 +生産者 +.*", " 調教師", regular;
> replaceallfast " *", " ";
> replaceallfast " +$", "", regular;
> // 以降が新しい部分。
> // 整形
> $$weight = "[0-9.]+\\f[ △▲☆]\\([美栗招]\\)\\f[^ ]+\\f.+";
> replaceallfast $$weight, "\\0 \\2", regular;
> // 追加
> replaceallfast "^B枠馬 馬名","枠馬 馬名", regular;
> replaceallfast "^[ B]\\f[0-9]", "\\1", regular;
> replaceallfast "^[0-9]+ +[0-9]+\\f[$*]","\\0 ", regular;
//上記"調教師<馬主"の件で追加してみました
replaceallfast "<.*","",regular;
> beep;
> endmacro;
> // ここまで。
度々申し訳ありませんがよろしくお願いいたします。
|
|