您现在的位置:程序化交易>> 期货公式>> 文华财经>> 文华财经知识>>正文内容

老师帮我改为文华指标 [文华财经]

  • 咨询内容:  HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)

    +13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)

    +7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+

    REF(H,20))/210,COLORBLUE,LINETHICK1;

    LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)

    +13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)

    +7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+

    REF(L,20))/210,COLORBLUE,LINETHICK1;

    D50H:=EMA(HH,50),COLORRED,LINETHICK1;

    D50L:=EMA(LL,50),COLORRED,LINETHICK1;

    DGH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)

    +13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)

    +7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+

    REF(H,20))/210,COLORBLUE,LINETHICK1;DDL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)

    +13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)

    +7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+

    REF(L,20))/210,COLORBLUE,LINETHICK1;D50C:=D50H-D50L;D50D:=D50H+D50C*2,COLORRED,LINETHICK1;D50T:=D50L-D50C*2,COLORRED,LINETHICK1;G0:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK1,COLORWHITE;D0:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORWHITE;DTD:=D0>=D50T AND G0>=D50D;KTD:=G0<=D50D AND D0<=D50T;ZDD:=D0>=D50T AND G0<=D50D;BDD0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60),LINETHICK2,COLORGREEN;BDT0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3,LINETHICK2,COLORGREEN;STICKLINE(DTD=1,G0,D0,5,0),COLOR000066;STICKLINE(KTD=1,G0,D0,5,0),COLOR003300;STICKLINE(ZDD=1,G0,D0,5,0),COLOR555555;

    ZK1:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORWHITE;

    ZD1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DOTLINE,COLORWHITE;

    BS:(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.2+XMA(XMA(H,60),60),DOTLINE,COLORRED;

    SS:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1.5,DOTLINE,COLORGREEN;

    BD:XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.8,DOTLINE,COLORGREEN;

    ZZ:=(ZK1+ZD1)/2,DOTLINE,COLORYELLOW;

    STICKLINE(1=1,D50H,D50L,5,0),COLORLIGRAY;

    DEA3:=EMA((EMA(CLOSE,3) - EMA(CLOSE,6)),9),COLORGREEN,LINETHICK2;

    DEA3B:=REF(DEA3,1),COLORWHITE,LINETHICK0;

    DEA33B:=EMA((EMA(EMA(CLOSE,3) - EMA(CLOSE,9),3) - EMA(EMA(CLOSE,3) - EMA(CLOSE,9),9)),9),COLORWHITE,LINETHICK0;

    DEA333B:=REF(DEA33B,1),COLORWHITE,LINETHICK0;

    STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,L,H,0.0,0),COLORRED;

    STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,C,O,3,1),COLORRED;

    STICKLINE(DEA3<DEA3B,L,H,0.0,0),COLORGREEN;

    STICKLINE(DEA3<DEA3B,C,O,3,1),COLORGREEN;

    白色点多定位1:=L<ZD1 AND H>ZD1;

    白色点空定位1:=H>ZK1 AND L<ZK1;

    STICKLINE(白色点多定位1=1,L,ZD1,3,0),COLORWHITE;

    STICKLINE(白色点空定位1=1,H,ZK1,3,0),COLORWHITE;

    白色点多定位2:=H<ZD1;

    白色点空定位2:=L>ZK1;

    STICKLINE(白色点多定位2=1,L,H,0.0,0),COLORWHITE;

    STICKLINE(白色点多定位2=1,C,O,3,0),COLORWHITE;

    STICKLINE(白色点空定位2=1,L,H,0.0,0),COLORWHITE;

    STICKLINE(白色点空定位2=1,C,O,3,0),COLORWHITE;

    多头红色点:=DEA3B<DEA3 OR DEA333B<DEA33B;

    空头红色点:=DEA3B>DEA3 OR DEA333B>DEA33B;

    多头红色点定位1:=白色点多定位1=1 AND 多头红色点=1;

    空头红色点定位1:=白色点空定位1=1 AND 空头红色点=1;

    STICKLINE(多头红色点定位1=1,L,ZD1,3,0),COLORMAGENTA;

    STICKLINE(空头红色点定位1=1,H,ZK1,3,0),COLORMAGENTA;

    多头红色点定位2:=白色点多定位2=1 AND 多头红色点=1;

    空头红色点定位2:=白色点空定位2=1 AND 空头红色点=1;

    STICKLINE(多头红色点定位2=1,L,H,0.0,0),COLORMAGENTA;

    STICKLINE(多头红色点定位2=1,C,O,3,0),COLORMAGENTA;

    STICKLINE(空头红色点定位2=1,L,H,0.0,0),COLORMAGENTA;

    STICKLINE(空头红色点定位2=1,C,O,3,0),COLORMAGENTA;

    多头多定位:=CROSS(ZD1,L) AND DTD=1;

    多头平定位:=CROSS(H,ZK1) AND DTD=1 AND ZDD=0;

    空头空定位:=CROSS(H,ZK1) AND KTD=1;

    空头平定位:=CROSS(ZD1,L) AND KTD=1 AND ZDD=0;

    震荡多定位:=CROSS(ZD1,L) AND ZDD=1;

    震荡空定位:=CROSS(H,ZK1) AND ZDD=1;

    DRAWTEXT(ISLASTBAR,ZK1,'卖'),COLORWHITE;

    DRAWTEXT(ISLASTBAR,ZD1,'买'),COLORWHITE;

    DRAWTEXT(ISLASTBAR,BS,'顶'),COLORRED;

    DRAWTEXT(ISLASTBAR,BD,'底'),COLORGREEN;

    大单动向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7);

    涨跌动因:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0);

    大单差分:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0);

    DDZ1:=大单差分*7;

    DDZ2:=大单差分*3;

    主力活跃度:=LARGEINTRDVOL-LARGEOUTTRDVOL;

    主力净流入:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*AMO/V/10000;

    买入力度:=LARGEINTRDVOL*100/VOL;

    卖出力度:=LARGEOUTTRDVOL*100/VOL;

    超B:=L2_AMO(0,2)/10000.0;

    大B:=L2_AMO(1,2)/10000.0;

    中B:=L2_AMO(2,2)/10000.0;

    小B:=L2_AMO(3,2)/10000.0;

    超S:=L2_AMO(0,3)/10000.0;

    大S:=L2_AMO(1,3)/10000.0;

    中S:=L2_AMO(2,3)/10000.0;

    小S:=L2_AMO(3,3)/10000.0;

    资金流向:=(超B+大B+中B+小B)-(超S+大S+中S+小S);

    资金选股:=资金流向>0 AND 大单动向>0 AND 涨跌动因>0 AND DDZ1>0 AND DDZ2>0 AND 主力活跃度>0 AND 主力净流入>0 AND 买入力度>卖出力度;

    STICKLINE(资金选股=1 AND (H-C)<(C-L),LOW,HIGH,0.0,0),COLORRED;

    STICKLINE(资金选股=1 AND (H-C)<(C-L),CLOSE,OPEN,3,0),COLORRED;

    DRAWICON(空头平定位=1,L,6);

    DRAWICON(多头平定位=1,H,5);

    DRAWICON(多头多定位=1 OR 震荡多定位=1,L,6);

    DRAWICON(空头空定位=1 OR 震荡空定位=1,H,5);

    改成文华可用,出现笑脸,哭脸时,发出声音预警。谢谢。

     

     

     

     来源:程序化99

  • 文华技术人员: 不同软件的函数处理机制不同,加载效果略有差异是正常的,请理解
    另外,部分股票相关函数无法改写,相关语句已经删除,其余部分参考:
     HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
    +13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
    +7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
    REF(H,20))/210,COLORBLUE,LINETHICK1;
    LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
    +13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
    +7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
    REF(L,20))/210,COLORBLUE,LINETHICK1;
    D50H:=EMA(HH,50),COLORRED,LINETHICK1;
    D50L:=EMA(LL,50),COLORRED,LINETHICK1;
    DGH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
    +13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
    +7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
    REF(H,20))/210,COLORBLUE,LINETHICK1;
    DDL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
    +13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
    +7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
    REF(L,20))/210,COLORBLUE,LINETHICK1;
    D50C:=D50H-D50L;
    D50D:=D50H+D50C*2,COLORRED,LINETHICK1;
    D50T:=D50L-D50C*2,COLORRED,LINETHICK1;
    G0:=(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1+REFX1(MA(H,25),25/2),LINETHICK1,COLORWHITE;
    D0:=REFX1(MA(L,25),25/2)-(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1,LINETHICK1,COLORWHITE;
    DTD:=D0>=D50T AND G0>=D50D;
    KTD:=G0<=D50D AND D0<=D50T;
    ZDD:=D0>=D50T AND G0<=D50D;
    BDD0:=(REFX1(MA(H,60),60/2)-REFX1(MA(L,60),60/2))*3+REFX1(MA(H,60),60/2),LINETHICK2,COLORGREEN;
    BDT0:=REFX1(MA(L,60),60/2)-(REFX1(MA(H,60),60/2)-REFX1(MA(L,60),60/2))*3,LINETHICK2,COLORGREEN;
    STICKLINE1(DTD=1,G0,D0,5,0),COLOR000066;
    STICKLINE1(KTD=1,G0,D0,5,0),COLOR003300;
    STICKLINE1(ZDD=1,G0,D0,5,0),COLOR555555;
    ZK1:(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1+REFX1(MA(H,25),25/2),DOT,COLORWHITE;
    ZD1:REFX1(MA(L,25),25/2)-(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1,DOT,COLORWHITE;
    BS:(REFX1(MA(H,60),60/2)-REFX1(MA(L,60),60/2))*2.2+REFX1(MA(H,60),60/2),DOT,COLORRED;
    SS:=REFX1(MA(L,25),25/2)-(REFX1(MA(H,25),25/2)-REFX1(MA(L,25),25/2))*1.5,DOT,COLORGREEN;
    BD:REFX1(MA(L,60),60/2)-(REFX1(MA(H,60),60/2)-REFX1(MA(L,60),60/2))*2.8,DOT,COLORGREEN;
    ZZ:=(ZK1+ZD1)/2,DOT,COLORYELLOW;
    STICKLINE1(1=1,D50H,D50L,5,0);
    DEA3:=EMA((EMA(CLOSE,3) - EMA(CLOSE,6)),9),COLORGREEN,LINETHICK2;
    DEA3B:=REF(DEA3,1),COLORWHITE,LINETHICK1;
    DEA33B:=EMA((EMA(EMA(CLOSE,3) - EMA(CLOSE,9),3) - EMA(EMA(CLOSE,3) - EMA(CLOSE,9),9)),9),COLORWHITE,LINETHICK1;
    DEA333B:=REF(DEA33B,1),COLORWHITE,LINETHICK1;
    STICKLINE1(DEA3B<DEA3 OR DEA333B<DEA33B,L,H,0.0,0),COLORRED;
    STICKLINE1(DEA3B<DEA3 OR DEA333B<DEA33B,C,O,3,1),COLORRED;
    STICKLINE1(DEA3<DEA3B,L,H,0.0,0),COLORGREEN;
    STICKLINE1(DEA3<DEA3B,C,O,3,1),COLORGREEN;
    白色点多定位1:=L<ZD1 AND H>ZD1;
    白色点空定位1:=H>ZK1 AND L<ZK1;
    STICKLINE1(白色点多定位1=1,L,ZD1,3,0),COLORWHITE;
    STICKLINE1(白色点空定位1=1,H,ZK1,3,0),COLORWHITE;
    白色点多定位2:=H<ZD1;
    白色点空定位2:=L>ZK1;
    STICKLINE1(白色点多定位2=1,L,H,0.0,0),COLORWHITE;
    STICKLINE1(白色点多定位2=1,C,O,3,0),COLORWHITE;
    STICKLINE1(白色点空定位2=1,L,H,0.0,0),COLORWHITE;
    STICKLINE1(白色点空定位2=1,C,O,3,0),COLORWHITE;
    多头红色点:=DEA3B<DEA3 OR DEA333B<DEA33B;
    空头红色点:=DEA3B>DEA3 OR DEA333B>DEA33B;
    多头红色点定位1:=白色点多定位1=1 AND 多头红色点=1;
    空头红色点定位1:=白色点空定位1=1 AND 空头红色点=1;
    STICKLINE1(多头红色点定位1=1,L,ZD1,3,0),COLORMAGENTA;
    STICKLINE1(空头红色点定位1=1,H,ZK1,3,0),COLORMAGENTA;
    多头红色点定位2:=白色点多定位2=1 AND 多头红色点=1;
    空头红色点定位2:=白色点空定位2=1 AND 空头红色点=1;
    STICKLINE1(多头红色点定位2=1,L,H,0.0,0),COLORMAGENTA;
    STICKLINE1(多头红色点定位2=1,C,O,3,0),COLORMAGENTA;
    STICKLINE1(空头红色点定位2=1,L,H,0.0,0),COLORMAGENTA;
    STICKLINE1(空头红色点定位2=1,C,O,3,0),COLORMAGENTA;
    多头多定位:=CROSS(ZD1,L) AND DTD=1;
    多头平定位:=CROSS(H,ZK1) AND DTD=1 AND ZDD=0;
    空头空定位:=CROSS(H,ZK1) AND KTD=1;
    空头平定位:=CROSS(ZD1,L) AND KTD=1 AND ZDD=0;
    震荡多定位:=CROSS(ZD1,L) AND ZDD=1;
    震荡空定位:=CROSS(H,ZK1) AND ZDD=1;
    DRAWTEXT(ISLASTBAR,ZK1,'卖'),COLORWHITE;
    DRAWTEXT(ISLASTBAR,ZD1,'买'),COLORWHITE;
    DRAWTEXT(ISLASTBAR,BS,'顶'),COLORRED;
    DRAWTEXT(ISLASTBAR,BD,'底'),COLORGREEN;
    DRAWICON(空头平定位=1,L,1);
    空头平定位=1,SOUND('A');
    DRAWICON(多头平定位=1,H,2);
    多头平定位=1,SOUND('B');
    DRAWICON(多头多定位=1 OR 震荡多定位=1,L,1);
    多头多定位=1 OR 震荡多定位=1,SOUND('C');
    DRAWICON(空头空定位=1 OR 震荡空定位=1,H,2);
    空头空定位=1 OR 震荡空定位=1,SOUND('D');

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 511411198  点击这里给我发消息或微信:cxhjy888 进行 有偿 编写!不贵!点击查看价格!


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容