([0-9]+).+small>(.+)(.+)([0-9:/]+).+b>([0-9,\.]+).+>([\+\-]?[0-9,\-\.]+).+>([\+\-]?[0-9,%\.]+).+nowrap>([0-9,\-]+).*';
// 固有情報
$ver = "0.12";
$copyright = "StockViewer Ver.$ver
(C)2004- by MISKY";
//
require_once("msklib.inc");
$cc = new convert_chr();
$flag = 0; // 最悪の場合の歯止め用
// 検索コード取得
$get_code = $_GET["code"];
if(strlen($get_code) > 0){
$get_code = mb_ereg_replace("[^0-9\+\s]","",$get_code);
$get_code = mb_ereg_replace("([0-9])\s([0-9])","\\1+\\2",$get_code);
$stock_code = $get_code;
} else {
$fp = fopen("code.txt","r");
$stock_code = fgets($fp);
fclose($fp);
}
// HTMLを開く
$fp = fopen($base_url.$stock_code,'r');
// 情報の取得
$items = 0;
if(!$fp){
} else {
while(!feof($fp)){
//
$s = fgets($fp,2048);
if(strpos($s,$judge_start) > 0) {
// 必要データの取得
$s = $cc -> convert($s);
$_s = mb_ereg_replace($ereg_str,"\\1\t\\2\t\\3\t\\4\t\\5\t\\6\t\\7\t\\8",$s);
$res[$items] = $_s;
++$items;
} elseif(strpos($s,$judge_end) > 0){
break;
} elseif($flag > 300){
// 念のため永久ループ回避
break;
}
++$flag;
}
}
// 以下結果表示
?>
StockViewer
【 株価ディレイ情報 】
0){
for($i = 0 ; $i < $items; $i++){
$s = explode("\t",$res[$i]);
// 0:code 1:市場 2:社名 3:日付 4:株価 5:前日比 6:比率 7:出来高
if($s[5] < 0){
$fc = "#ff3333";
} else {
$fc = "#3333ff";
}
print $s[0].":".$s[2]." (".$s[3].")
";
print " ".$s[4]." ( ".$s[5].") [ ".$s[6]."][ ".$s[7]."]
";
}
}else{
print "データがありません
";
}
print "
$copyright
"
?>