begin screening 0
baseDate 2007 1 17
nLowHigh 0 5000
begin condition 0
and 1
	begin customExpSrc 1 0 1
//
// データ始点からの新高値銘柄を抽出
//	注意: 計算にとても時間がかかります。
//

double	h0 = High(0);	// 今日の高値を得る。
if( Double.IsNaN(h0) )
	return	false;	// 今日取引がないならやめ

// データの最初と最後のオフセットを得る。
//	Area関数で得ることができるが、Areaの戻り値がfalseだったデータがないので、return false;する。
int	s,e;
if( !Area(&s,&e) )
	return	false;

// データ始点から昨日までの高値を求める。
double	high = Lib_Bundle.Max( High_ts(),s,-1);
if( Double.IsNaN(high) )
	return false;	// データがないときはやめ。

//　今日の高値が、昨日までの高値を越えていなければやめ
if( h0 <= high )
	return	false;

return	true;	// 合格




	<end>
end condition
end screening