CCI 跨周期函數
作者：開拓者 TB 來源：cxh99.com 發(fā)布時間：2016年07月25日
- 咨詢內容：
Params
Numeric TimeFrame(1440);
Numeric BarsBack(1);
Numeric Length(84);
Numeric AvgLength(9);
NumericRef oCCIValue;
NumericRef oCCIAvg;
Vars
NumericSeries mtBarCnt;
Numeric refCurBar;
Numeric refOpen;
Numeric refHigh;
Numeric refLow;
Numeric refClose;
Numeric refVol;
Numeric refOpenInt;
Numeric mtHigh;
Numeric mtOpen;
Numeric mtLow;
Numeric mtClose;
Numeric SumValue(0);
Numeric i;
Numeric j(0);
NumericSeries TmpValue;
Numeric Mean;
Numeric AvgDev( 0 );
Numeric Counter( 0 ) ;
Numeric CCIValue;
Numeric CCIAvg;
Begin
mtBarCnt = MtBar(TimeFrame,BarsBack,refCurBar,refOpen,refHigh,refLow,refClose,refVol,refOpenInt);
mtHigh = refHigh;
mtOpen = refOpen;
mtLow = refLow;
mtClose = refClose;
TmpValue = mtHigh + mtLow + mtClose;
SumValue = MtSummation(TmpValue,mtBarCnt,Length);
Mean = SumValue/Length;
AvgDev =0;
for Counter = 0 to Length - 1
{
AvgDev = AvgDev + Abs( TmpValue[Counter] - Mean ) ;
}
AvgDev = AvgDev / Length ;
if( AvgDev == 0)
CCIValue = 0;
Else
CCIValue = ( TmpValue - Mean ) / ( 0.015 * AvgDev ) ;
SumValue = MtSummation(CCIValue,mtBarCnt,Length);
CCIAvg = SumValue/Length;
oCCIValue = CCIValue;
oCCIAvg = CCIAvg;
Return mtBarCnt;
End
我寫的這個函數是有問題的，請大神幫忙，已有這個跨周期指標的大神可以共享給我一份嗎？謝謝
MtBar，MtSummation 也是函數，在【跨周期內容集中貼】里面有
打印本文
關閉窗口