顾比倒数线(Guppy Count Back Line) - 开拓者期货期权程序化系统交易论坛

//------------------------------------------------------------------------
// 简称: CBL
// 名称: Guppy Count Back Line
// 类别: 技术指标
// 类型: 其他类
// 输出:
//------------------------------------------------------------------------
Params
Numeric Length(5);
Vars
Bool ConTmp;
NumericSeries CBLHi;
NumericSeries CBLLo;
Begin
If(High < Highest(High,Length))
{
CBLHi = CBLHi[1];
}Else
{
ConTmp = Low[2] < Low[1] && Low[2] < Low && Low[1] < Low;
If(ConTmp)
{
CBLHi = Low[2];
}Else
{
ConTmp = (Low[3] < Low[2] && Low[3] < Low[1] && Low[3] < Low) And
(Low[2] < Low || Low[1] < Low);
If(ConTmp)
{
CBLHi = Low[3];
}Else
{
ConTmp = (Low[4] < Low[3] && Low[4] < Low[2] && Low[4] < Low[1] && Low[4] < Low) And
(Low[3] < Low || Low[2] < Low || Low[1] < Low);
If(ConTmp)
{
CBLHi = Low[4];
}Else
{
ConTmp = (Low[5] < Low[4] && Low[5] < Low[3] && Low[5] < Low[2] && Low[5] < Low[1] && Low[5] < Low) And
(Low[4] < Low || Low[3] < Low || Low[2] < Low || Low[1] < Low);
If(ConTmp)
{
CBLHi = Low[5];
}Else
{
CBLHi = CBLHi[1];
}
}
}
}
}
If(Low > Lowest(Low,Length))
{
CBLLo = CBLLo[1];
}Else
{
ConTmp = High[2] > High[1] && High[2] > High && High[1] > High;
If(ConTmp)
{
CBLLo = High[2];
}Else
{
ConTmp = (High[3] > High[2] && High[3] > High[1] && High[3] > High) And
(High[2] > High || High[1] > High);
If(ConTmp)
{
CBLLo = High[3];
}Else
{
ConTmp = (High[4] > High[3] && High[4] > High[2] && High[4] > High[1] && High[4] > High) And
(High[3] > High || High[2] > High || High[1] > High);
If(ConTmp)
{
CBLLo = High[4];
}Else
{
ConTmp = (High[5] > High[4] && High[5] > High[3] && High[5] > High[2] && High[5] > High[1] && High[5] > High) And
(High[4] > High || High[3] > High || High[2] > High || High[1] > High);
If(ConTmp)
{
CBLLo = High[5];
}Else
{
CBLLo = CBLLo[1];
}
}
}
}
}
If(CBLHi < Close)
{
PlotNumeric("CBLHi",CBLHi,Yellow);
PlotNumeric("CBLLo",InvalidNumeric);
PlotNumeric("Open",Min(Open,Close));
PlotNumeric("Close",Max(Open,Close));
}Else
{
PlotNumeric("CBLHi",InvalidNumeric);
If(CBLLo > Close)
{
PlotNumeric("CBLLo",CBLLo,Magenta);
PlotNumeric("Open",Max(Open,Close));
PlotNumeric("Close",Min(Open,Close));
}Else
{
PlotNumeric("CBLLo",InvalidNumeric);
PlotNumeric("Open",Close);
PlotNumeric("Close",Close);
}
}
PlotNumeric("High",High);
PlotNumeric("Low",Low);
End
//------------------------------------------------------------------------
// 编译版本 GS2004.06.12
// 用户版本 2008/01/11 11:33
// 版权所有 nopain
// 更改声明 TradeBlazer Software保留对TradeBlazer平台
// 每一版本的TrabeBlazer公式修改和重写的权利
//------------------------------------------------------------------------

复制代码