请教nopain，帮帮忙好吗？

深蓝魔力

V:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);
VH:=REF(HHV(V,30),1);
VL:=REF(LLV(V,30),1);
CROSS(V,VH),BPK;
CROSS(VL,V),SPK;

很简单的文华代码，自己做TB是老做不好，不晓得怎么搞，直接发上来求助了。
谢谢先！

[ 本帖最后由 深蓝魔力 于 2009-7-11 09:38 编辑 ]

深蓝魔力

Params
        Numeric obv(0);
        Numeric Length(30);
Vars
        NumericSeries OBVValue;
                NumericSeries lowestobvvalue(1);
Begin
    If(CurrentBar == 0)
        {
                OBVValue = 0;
        }Else
        {
                If(Close>Close[1])
                {
                        OBVValue = OBVValue[1]+Vol;
                }Else If(Close<Close[1])
                {
                        OBVValue = OBVValue[1]-Vol;
                }Else
                {
                        OBVValue = OBVValue[1];
                }
        }
                         If(OBVValue < LowestOBVValue[1])  //      
        {
                Sell;                                // Sell不用参数时会自动平掉所有仓位，详细的Sell函数调用请参见帮助文件
        }
End   
前面是移植的OBV的公式。后面偶想在OBV创30周期新低开空都没法实现。
怎么改呢？

深蓝魔力

Params        // 宣告参数定义
        Numeric Length(12);        
                Numeric Lots(1);               
       
Begin      
        If(CrossOver(close,highd(length)))
                {
                Buy(1,Close);      
        }
        If(CrossUnder(close,LowD(length)))
        {
                Sell;                             
        }
End

深蓝魔力

难得看到自己编的TB发出了买卖的开仓指令。

深蓝魔力

到今天才鼓捣出个完整的交易指令，效果有待考证。
感谢论坛上公布了原码的朋友。偶的系统就是在大家的基础上学习的。

深蓝魔力

obv[x]是错误的，不能回朔
晕。

深蓝魔力

用户函数中有Obv,怎么用？在用户手册中也查不到。

bigbear2046

Vars
NumericSeries OBVValue;
。。。。
If(CurrentBar == 0)
        {
                OBVValue = 0;
        }Else
        {
                If(Close>Close[1])
                {
                        OBVValue = OBVValue[1]+Vol;
                }Else If(Close<Close[1])
                {
                        OBVValue = OBVValue[1]-Vol;
                }Else
                {
                        OBVValue = OBVValue[1];
                }
        }
。。。。
然后就可以用OBVValue[X]来回溯了

深蓝魔力

谢谢楼上的兄弟，偶赶紧整理一下。

深蓝魔力

用户函数的回溯和系统函数原理基本一致，但考虑到系统的执行速度和效率等因素，目前，TradeBlazer公式不支持对用户函数的回溯，如果您想要获取用户函数的回溯值，建议您将函数返回值赋值给一个序列变量，通过对序列变量的回溯来达到相同的目的。