TB跨周期数据调用解决方案 蔡云华.pptVIP

部分算法（代码） 根据当前BAR在大周期中位置的不同，更新大周期BAR数据 If (CurrentBar==0)? ? ? ? ? ? ? ? // 如果是第一根Bar, CurBar=0{ barCnt = 0; CurBar = 0; OpenHT = Open; HighHT = High; LowHT = Low; CloseHT = Close; VolHT = Vol; OpenIntHT = OpenInt;}Else{ If(Condition)? ? ? ? ? ? // 如果在目标周期下，属于另一根K线，则CurBar加1? ? ? ? ? { barCnt = 1; CurBar = CurBar[1] + 1; OpenHT = Open; HighhHT = High; LowHT = Low; VolHT = Vol; }Else // 如果在目标周期下，属于同一根K线，则CurBar不变，但最高价和最低 价要记录价格的变化，成交量要累加 { barCnt = barCnt[1] + 1; CurBar = CurBar[1]; OpenHT = OpenHT[1]; HighHT = Max(HighHT[1],High); LowHT = Min(LowHT[1],Low); VolHT = VolHT[1] + Vol; } // 收盘价和持仓量总是取必威体育精装版值 CloseHT = Close; OpenIntHT = OpenInt; } 部分算法（代码） 根据参数BarsBack的值，返回大周期的BAR数据 ? ? ? ? barCntSum = barCnt ;? ? ? ? If(BarsBack == 0) ? ? ? ? {? ? ? ? ? ? ? ? barCntSum = 0 ;? ? ? ? }Else If(BarsBack == 1)? ? ? ? ? {? ? ? ? ? ? ? ? barCntSum = barCnt ;? ? ? ? }Else ? ? ? ? {? ? ? ? ? ? ? ? For i = 2 To BarsBack? ? ? ? ? ? ? ? {? ? ? ? ? ? ? ? ? ? ? ? barCntSum = barCntSum + barCnt[barCntSum];? ? ? ? ? ? ? ? }? ? ? ? } ? ? ? ? oCurBar = CurBar;? ? ? ? oOpenHT = OpenHT[barCntSum];? ? ? ? oHighHT = HighHT[barCntSum];? ? ? ? oLowHT = LowHT[barCntSum];? ? ? ? oCloseHT = CloseHT[barCntSum];? ? ? ? oVolHT = VolHT[barCntSum];? ? ? ? oOpenIntHT = OpenIntHT[barCntSum];? ? ? ? Return barCnt; 例子：显示MtBar函数执行结果 我们下面举个例子，来看看，如何调用MtBar函数在小周期上计算大周期的Bar数据并通过注释语句显示出来。 Params Numeric TimeFrame(1440); // 目标时间周期参数 Numeric BarsBack(1); Vars NumericSeries mtBarCnt; NumericSeries mtCurBar; NumericSeries mtOpen; NumericSeries mtHigh; NumericSeries mtLow; NumericSeries mtClose; NumericSeries mtVol; NumericSeries mtOpenInt; Numeric refCurBar; Numeric refOpen; Numeric refHigh; Numeric refLow; Numeric refClose; Numeric refVol; Numeric refOpenInt; 代码（续） Begin mtBarCnt = MtBar(TimeFram