决胜千里通达信&TBQ双源码

财富 2024-11-21 13:20 山西

量化策略开发，高质量社群，交易思路分享等相关内容

『正文』

通达信源码

B1:=EMA(C,2);紫1:=EMA(B1,2)COLORMAGENTA;色1:=EMA(紫1,2)COLORMAGENTA;线1:=EMA(色1,2)COLORMAGENTA;浮盈线:=EMA(紫1,5) COLORLIMAGENTA,LINETHICK2;成本线:=EMA(色1,13)COLORYELLOW,LINETHICK2;限时:=1;重心:=(2*C+H+L)/4,COLOR00FFFF,LINETHICK0;SJ:=WMA((重心-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);{公式平台，公式源码WWW.GSPT.COM}DRAWBAND(浮盈线,RGB(128,0,0),成本线,RGB(0,200,0));STICKLINE(C>=O,H,L,0,1), COLORRED;STICKLINE(C>=O,C,O,3,0), COLORRED;STICKLINE(C< O,H,L,0,0), COLORFFFF00;STICKLINE(C< O,C,O,3,0),COLORFFFF00;
A1:=EMA(C,14),COLORWHITE,LINETHICK1;吃肉线:(A1-REF(A1,1))/REF(A1,1)*100* 限时,NODRAW;跌破:=REF(EMA(C,14),1),NODRAW;距离:=(C-吃肉线)/吃肉线*100,NODRAW;机构入场:IF(吃肉线>=0,REF(EMA(C,14),BARSLAST(CROSS(吃肉线,0))+1),DRAWNULL)COLORRED,LINETHICK3;资金出逃:IF(吃肉线<0,REF(EMA(C,14),BARSLAST(CROSS(0,吃肉线))+1),DRAWNULL)COLORGREEN,LINETHICK3;精选:=浮盈线>REF(浮盈线,1);规避:=成本线>REF(成本线,1);STICKLINE(CROSS(吃肉线,0),C,O,3,0),COLORYELLOW;STICKLINE(CROSS(0,吃肉线),C,O,3,0),COLORGREEN;DRAWICON(CROSS(ZJ,SJ)   AND   SJ>70,H*1.03,15);DRAWTEXT(CROSS(ZJ,SJ)   AND   SJ>70,H*1.01,'洗盘')COLORMAGENTA;DRAWTEXT(CROSS(吃肉线,0) ,L,'←机构进场')COLORYELLOW;DRAWTEXT(CROSS(0,吃肉线) ,H,'←机构出货')COLORGREEN;{所属板块、概念}DRAWTEXT_FIX(1,0.005,0,0,'所属行业:'),COLORYELLOW;DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLORYELLOW;DRAWTEXT_FIX(1,0.005,1,0,'所属概念:'),COLORMAGENTA;DRAWTEXT_FIX(1,0.06,1,0,GNBLOCK),COLORYELLOW;【粉丝福利:DRAWNULL,COLORYELLOW;买卖指标:DRAWNULL,COLORYELLOW;均为骗子】:DRAWNULL,COLORYELLOW;

TBQ

//------------------------------------------------------------------------// 简称: WH_Indicator_To_TBquant// 名称: 文华财经指标转换为 TBquant 策略// 类别: 公式应用// 类型: 内建应用//------------------------------------------------------------------------
Params    Numeric FastLength(14);  // 快速均线周期    Numeric SlowLength(20);  // 慢速均线周期    Numeric LimitTime(1);   // 限时参数
Vars    Series<Numeric> B1;     // EMA(C,2)    Series<Numeric> Zi1;    // EMA(B1,2)    Series<Numeric> Se1;    // EMA(Zi1,2)    Series<Numeric> Xian1;  // EMA(Se1,2)    Series<Numeric> FuYingXian;  // EMA(Zi1,5)    Series<Numeric> ChengBenXian; // EMA(Se1,13)    Series<Numeric> ZhongXin;     // (2*C+H+L)/4    Series<Numeric> SJ;           // WMA((重心-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2)    Series<Numeric> ZJ;           // WMA(0.618*REF(SJ,1)+0.382*SJ,2)    Series<Numeric> A1;           // EMA(C,14)    Series<Numeric> ChiRouXian;   // (A1-REF(A1,1))/REF(A1,1)*100* 限时    Series<Numeric> DiePo;        // REF(EMA(C,14),1)    Series<Numeric> JuLi;         // (C-ChiRouXian)/ChiRouXian*100    Series<Numeric> JiGouRuChang; //     Series<Numeric> ZiJinChuTao;  //     Series<Bool> JingXuan;        // FuYingXian>REF(FuYingXian,1)    Series<Bool> GuiBi;           // ChengBenXian>REF(ChengBenXian,1)    Series<Numeric> normalizedZhongXin;  Series<Numeric> crossOverBar;  Series<Numeric> crossUnderBar;  Series<Bool> cond1;  Series<Bool> cond2;  Events    OnBar(ArrayRef<Integer> indexs)    {        // 计算各项指标        B1 = XAverage(Close, FastLength);        Zi1 = XAverage(B1, FastLength);        Se1 = XAverage(Zi1, FastLength);        Xian1 = XAverage(Se1, FastLength);        FuYingXian = XAverage(Zi1, SlowLength);        ChengBenXian = XAverage(Se1, 13);        ZhongXin = (2 * Close + High + Low) / 4;
        // 计算 SJ 和 ZJ        normalizedZhongXin = (ZhongXin - Lowest(Low, 5)) / (Highest(High, 5) - Lowest(Low, 5)) * 100;        SJ = (normalizedZhongXin + normalizedZhongXin[1]) / 2;        ZJ = 0.618 * SJ[1] + 0.382 * SJ;
        A1 = XAverage(Close, 14);        ChiRouXian = (A1 - A1[1]) / A1[1] * 100 * LimitTime;        DiePo = A1[1];        JuLi = (Close - ChiRouXian) / ChiRouXian * 100;
    If(CrossOver(ChiRouXian, 0))    {      crossOverBar=CurrentBar-crossOverBar;    }
    If(CrossUnder(ChiRouXian,0))    {      crossUnderBar=CurrentBar-crossUnderBar;    }

        JiGouRuChang = IIF(ChiRouXian >= 0, A1[crossOverBar + 1], 0);        ZiJinChuTao = IIF(ChiRouXian < 0, A1[crossUnderBar + 1], 0);
        JingXuan = FuYingXian > FuYingXian[1];        GuiBi = ChengBenXian > ChengBenXian[1];        cond1=CrossOver(ChiRouXian, 0);    cond2=CrossUnder(ChiRouXian, 0);        // 交易逻辑        If(SJ[1] > 70)        {            Commentary("洗盘");        }        If(cond1[1])        {            Commentary("←机构进场");            Buy(1, Open);        }        If(cond2[1])        {            Commentary("←机构出货");            Sell(1, Open);        }    }//------------------------------------------------------------------------// 编译版本  GS2014.10.25// 版权所有  TradeBlazer Software 2003－2025// 更改声明  TradeBlazer Software保留对TradeBlazer平//      台每一版本的TradeBlazer公式修改和重写的权利//------------------------------------------------------------------------