begin backTest 0
singleBrand 0 0 0
term 2005 11 27 2006 8 4
beginCash 1e+007
tradingRatio 50
enableFuture 0
begin screening 0
baseDate 2006 8 4
nLowHigh 200 200
begin condition 0
and 1
	begin customExpSrc 0 0 1

	<end>
end condition
end screening
begin buyPack 1 0
begin enter 1
timming 1
highLimitRate 1 20 1
lowLimitRate 1 10 1
pointOver 0 1 0
pointUnder 0 1 0
begin condition 0
and 1
	begin customExpSrc 1 0 1
//
//	包み陰線＋上ひげ
//
// uwahige_tsutsumi.efuncを利用
$FUNC	uwahige_tsutsumi.efunc

//　底値判定パラメータ
//　　5日移動平均乖離率が2以上を高値とする。
int	ma_days = 5;	// 移動平均線の日数
double	maRate = 2;	// 移動平均乖離率がこれ以上じゃないとだめ

//  包み陰線判定パラメータ
// 昨日と今日の終値と始値の差が今日の終値にたいして、この%以上ないと駄目。
// すなわちどれぐらい昨日を包んでいるかを決める。 
// 1%というと、ちょっとだけ包んでいればOK。
double	tsutsumiRate = 1; 

// 上ヒゲ判定パラメータ
//　上ひげの長さが全体の長さの、この％以上を上ヒゲとみなす。
double	higeRate = 10;

return Uwahige_Tsutsumi(ma_days,maRate,tsutsumiRate,higeRate);

	<end>
end condition
end enter
begin leave 1
timming 0
highLimitRate 1 20 1
lowLimitRate 1 10 1
pointOver 0 1 0
pointUnder 0 1 0
begin condition 0
and 0
	begin customExpSrc 1 0 1
return true;
	<end>
end condition
end leave
end buyPack
begin sellPack 0 0
begin enter 1
timming 1
highLimitRate 1 20 1
lowLimitRate 1 10 1
pointOver 0 1 0
pointUnder 0 1 0
begin condition 0
and 1
	begin customExpSrc 0 0 1

	<end>
end condition
end enter
begin leave 1
timming 1
highLimitRate 1 20 1
lowLimitRate 1 10 1
pointOver 0 1 0
pointUnder 0 1 0
begin condition 0
and 0
	begin customExpSrc 0 0 1

	<end>
end condition
end leave
end sellPack
end backTest