begin screening 0
baseDate 2007 3 23
nLowHigh 0 200
begin condition 0
and 1
	begin customExpSrc 1 0 1
$INDICATOR Ichimoku KUMO
KUMO.days_9=9;
KUMO.days_26=26;
KUMO.days_52=52;

//	２つの先行スパンの上側（雲の上側）の時系列を作成する。
//		余裕をもって２０日前(-20)から今日(0)までの時系列を作成する。
$TS	ts
ts.SetArea(-20,0);
for( int i = -20 ; i <= 0 ; i++ ) {
	double	a1 = KUMO.AdvancedSpan1.Value(i);
	double	a2 = KUMO.AdvancedSpan2.Value(i);
	if( Double.IsNaN(a1) && Double.IsNaN(a2) )
		continue;
	if( Double.IsNaN(a1) ) {
		ts.Set(i,a2);
		continue;
	}
	if( Double.IsNaN(a2) ) {
		ts.Set(i,a1);
		continue;
	}
	if( a1 < a2 )
		ts.Set(i,a2);
	else
		ts.Set(i,a1);
}
// 終値が雲を上抜けたものを抽出
// 	終値が過去10日間は抜けていないものだけを抽出。
if( !Lib_Bundle.CheckGoldenCross(Close_ts(),ts,0,10,true,false) )
	return	false;
return	true;


	<end>
end condition
end screening