关于商品跨周期数据引用的讨论！

nopain

好像有问题，您的算法是不是假设每1分钟的K线都存在？
参数N应该传入什么值？

绅士风度

//------------------------------------------------------------------------
// 简称: Vol3
// 名称: 三分钟成交量
// 类别: 用户函数
// 类型: 内建函数
// 输出: 数值型
//------------------------------------------------------------------------

Params
        Numeric N(0);
Vars
        Numeric Vol3min;
        Numeric Tmp;
        Numeric Tmp1;
        Numeric Tmp2;
        Numeric Tmp3;
Begin

        If (Time>=0.090000 And Time<=0.145900)
        {
        Tmp1=RoundDown(Time,2);
        Tmp2=RoundDown(Time,4);
        Tmp3=(Tmp1-0.090000)*6000+(Tmp2-Tmp1)*10000;
        Tmp=Mod(Tmp3,3);
                If (N==0)
                {
                If (Tmp==0)
                Vol3min=Vol;
                Else If (Tmp==1)
                Vol3min=Vol[1]+Vol;
                Else If (Tmp==2)
                Vol3min=Vol[2]+Vol[1]+Vol;
                }
                Else
                {
                Vol3min=Summation(Vol[(N-1)*3+Tmp],3);
                }
        }
        Else Return InvalidNumeric;
       
        Return Vol3min;
End

//------------------------------------------------------------------------
// 编译版本        GS2004.06.12
// 用户版本        2007/08/23 00:03
// 版权所有        zw4578
// 更改声明        TradeBlazer Software保留对TradeBlazer平台
//                        每一版本的TrabeBlazer公式修改和重写的权利
//------------------------------------------------------------------------

绅士风度

//------------------------------------------------------------------------
// 简称: Open3
// 名称: 3分钟开盘价
// 类别: 用户函数
// 类型: 内建函数
// 输出: 数值型
//------------------------------------------------------------------------

Params
        Numeric N(0);
Vars
        Numeric Open3min;
        Numeric Tmp;
        Numeric Tmp1;
        Numeric Tmp2;
        Numeric Tmp3;
Begin

        If (Time>=0.090000 And Time<=0.145900)
        {
        Tmp1=RoundDown(Time,2);
        Tmp2=RoundDown(Time,4);
        Tmp3=(Tmp1-0.090000)*6000+(Tmp2-Tmp1)*10000;
        Tmp=Mod(Tmp3,3);

                Open3min=Open[N*3+Tmp];
               
        }
        Else Return InvalidNumeric;
       
        Return Open3min;
End

//------------------------------------------------------------------------
// 编译版本        GS2004.06.12
// 用户版本        2007/08/22 23:14
// 版权所有        zw4578
// 更改声明        TradeBlazer Software保留对TradeBlazer平台
//                        每一版本的TrabeBlazer公式修改和重写的权利
//------------------------------------------------------------------------

绅士风度

请斑竹指教在1分钟线上引用3分钟数据的函数是否正确：
//------------------------------------------------------------------------
// 简称: Close3
// 名称:
// 类别: 用户函数
// 类型: 内建函数
// 输出: 数值型
//------------------------------------------------------------------------

Params
        Numeric N(0);
Vars
        Numeric Close3min;
        Numeric Tmp;
        Numeric Tmp1;
        Numeric Tmp2;
        Numeric Tmp3;
Begin
        If (N==0)
        Close3min=Close;
        Else
        {
        If (Time>=0.090000 And Time<=0.145900)
        {
        Tmp1=RoundDown(Time,2);
        Tmp2=RoundDown(Time,4);
        Tmp3=(Tmp1-0.090000)*6000+(Tmp2-Tmp1)*10000;
        Tmp=Mod(Tmp3,3);
        Close3min=Close[(N-1)*3+Tmp+1];
        }
        Else Return InvalidNumeric;
        }
        Return Close3min;
End

//------------------------------------------------------------------------
// 编译版本        GS2004.06.12
// 用户版本        2007/08/22 22:26
// 版权所有        zw4578
// 更改声明        TradeBlazer Software保留对TradeBlazer平台
//                        每一版本的TrabeBlazer公式修改和重写的权利
//------------------------------------------------------------------------