最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 俊俊多功能主图源码

    正文概述    2024-04-14 15:35:30  

    每个角落都有机关,已经弄的很细致了,前几年的东西,功能很多,值得去挖掘,集合自己选的票来看,起到非常好的辅助作用。

    主图有源码文件,导入引用公式再加入主图,里面有喜欢的可以自己提取出来,放到自己主图,不喜欢的丢了。DIY

    反正我每个信号和每段源码都做了隔断和名称,方便你们查找。

     本网补充说明:本公式我自己在不同的版本的通达信测试,有的可以正常显示,有的就不能显示,例如:理想组合5.78C,就不能显示,。。。
     公式本来是加密的,为了让大家能用只好和谐源码了,这时候,大家可以用下面的和谐的源码重新建立公式试一试,还不能显示的,只能放弃或者更换通达信版本。

     

    引用公式:

    {Y01}

    ND1970:=(YEAR-1970)*365+INTPART((YEAR-1972)/4)-IF(INTPART(YEAR/4)=YEAR/4,1,0)+DAY+(MONTH-1)*30+IF(MONTH<=8,INTPART(MONTH/2),INTPART((MONTH-7)/2)+4)-

     

    IF(MONTH>2 AND INTPART(YEAR/4)=YEAR/4,1,IF(MONTH>2 AND NOT(INTPART(YEAR/4)=YEAR/4),2,0));

    C1:C;

    O1:REF(O,BARSLAST(ND1970-REF(ND1970,1)>WEEKDAY-REF(WEEKDAY,1)));

    H1:HHV(H,BARSLAST(ND1970-REF(ND1970,1)>WEEKDAY-REF(WEEKDAY,1))+1);

    L1:LLV(L,BARSLAST(ND1970-REF(ND1970,1)>WEEKDAY-REF(WEEKDAY,1))+1);

    RQ:CURRBARSCOUNT;

     

     

    ============================================================

    综合主图公式:

     

    {参数M111默认3}

     

    DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'11',0);

    DRAWTEXT_FIX(1,0.0,5,0,'扬州陆俊,原创作品,不经允许,请勿使用。'),COLORRED;

    DRAWKLINE(H,O,L,C);

    {日周K线}

    底部支撑:HHV(MA(L,11),98),COLORGREEN,LINETHICK1;

    HZ1:MA(底部支撑,12),COLORCYAN;

    HZ2:MA(底部支撑,18),COLORMAGENTA;

    HZ3:MA(底部支撑,24),COLORRED;

    HZ4:MA(底部支撑,30),COLORBLUE,LINETHICK1;

    MA120:=MA(C,120),COLORCYAN,POINTDOT;

    MA240:=MA(C,240),COLORYELLOW,LINETHICK1,POINTDOT;

    {胡子均线}

    M47:MA(C,47),COLORGREEN;

    M48:EMA(M47,3),COLORGREEN,LINETHICK1;

    M49:EMA(M48,3),COLORMAGENTA;

    M50:EMA(M49,2),COLORMAGENTA;

    N:=13;

    WO1:="Y01.O1#WEEK";

    WC:="Y01.C1#WEEK";

    WH:="Y01.H1#WEEK";

    WL:="Y01.L1#WEEK";

    WQ:="Y01.RQ#WEEK";

    K1:=WO1=REF(WO1,1) AND WC=REF(WC,1) AND WH=REF(WH,1) AND WL=REF(WL,1);

    K3:=REF(C,1)=DYNAINFO(3) AND O=DYNAINFO(4) AND C=DYNAINFO(7) AND H=DYNAINFO(5) AND L=DYNAINFO(6);

    DD:=REF(BARSLAST(K1=0)+1,1),LINETHICK0;

    DD1:=CROSS(BACKSET((K1=0 OR K3) AND DD=5,4),0.5),NODRAW;

    DD2:=CROSS(BACKSET((K1=0 OR K3) AND (DD=4 OR DD=3),3),0.5),NODRAW;

    DD3:=CROSS(BACKSET((K1=0 OR K3) AND DD<=2,2),0.5),LINETHICK0;

    BK1:=DD1 OR DD2 OR DD3;

    BK2:=CROSS(BACKSET(K1=0,2),0.5);

    BK3:=CROSS(BACKSET(K1=0 AND REF(K1=0,1),2),0.5);

    WO:=IF(BARSLAST(K1=0)=0,O,REF(O,BARSLAST(K1=0))),NODRAW;

    K0:=WC>WO OR (WC=WO AND WC>REF(WC,BARSLAST(K1=0)+1));

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    STICKLINE(PERIOD=5 AND WQ

    {买点信号文字}

    XL2:=(((CLOSE - EMA(CLOSE,21)) / EMA(CLOSE,21)) * 100);

    XL3:=CROSS(XL2,(0 - 20));

    DRAWTEXT((XL3 > 0),(LOW - 0.2),'绝对底部');

    VAR2S:=(2*CLOSE+HIGH+LOW)/4;

    VAR3S:=IF(YEAR>=2099 AND MONTH>2,0,1);

    VAR4S:=LLV(LOW,5);

    VAR5S:=HHV(HIGH,4);

    散户:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S;

    XX:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3S;

    DRAWTEXT(CROSS(散户,XX) AND 散户<30,L-0.05,'吸'),COLORRED;

    VAR1R:=LLV(LOW,2)=LLV(LOW,16) AND CLOSE>=OPEN*1.04;

    VAR2R:=CLOSE>(REF(HIGH,1)+REF(LOW,1))/2;

    VAR3R:=VAR1R AND VAR2R;

    DRAWTEXT(VAR3R,LOW,'逢低买入 '),COLORFFFF00;

    VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);

    VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);

    DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.99),'大胆搏 '),COLORYELLOW;

    {买点信号}

    N0:=9;

    M:=14;

    N1:=6;

    TYP:=(HIGH + LOW + CLOSE)/3;

    CC1:=(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF;

    C1:=SMA(CC1,3,1);

    C2:=SMA(C1,3,1);

    C3:=3*C1-2*C2;

    CB1:=EMA(C3,5);

    CB2:=REF(CB1,1);

    CC2:=(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF;

    LC:=REF(CLOSE,1);

    RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;

    RSI:=(RSI1-50)*5.3,LINETHICK2,COLORFFFFFF;

    R1:=SMA(RSI,3,1);

    D1:=SMA(R1,3,1);

    J1:=3*R1-2*D1;

    RR1:=EMA(J1,5);

    RR2:=REF(RR1,1);

    RR:=RR1>RR2;

    RSV:=(CLOSE-LLV(LOW,N0))/(HHV(HIGH,N0)-LLV(LOW,N0))*100;

    K:=SMA(RSV,3,1);

    KZ:=(K-50)*5,,COLOR00FF00;

    K2:=SMA(KZ,3,1);

    D2:=SMA(K2,3,1);

    J2:=3*K2-2*D2;

    BB1:=EMA(J2,5);

    BB2:=REF(BB1,1);

    XG5:=(RR AND NOT(REF(RR,1)) AND (RR1<-100 AND BB1<-100) AND CB1<-100);

    DRAWICON(XG5,L*0.987,38);

    DRAWICON(XG5,L*0.966,38);

    DRAWICON(XG5,L*0.939,34);

    {买点信号2}

    VAR22:=((LLV(LOW,3) = LLV(LOW,3)) AND (CLOSE >= (OPEN * 1.04)));

    VAR333:=(CLOSE > ((REF(HIGH,1) + REF(LOW,1)) / 2));

    VAR44:=(VAR22 AND VAR333);

    VAR55:=BARSLAST(VAR333);

    VAR66:=BARSLAST(VAR44);

    VAR77:=IF((VAR66 > 0),(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100),0);

    VAR88:=SUM(VAR77,1);

    VAR93:=IF((VAR55 > 3),(0 - 2),0);

    特准:=(REF(VAR93,1) = (0 - 2)) AND (VAR93 = 0);

    DRAWICON(特准,L*0.987,38);

    DRAWICON(特准,L*0.966,9);

    {买点信号3}

    DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);

    DEA:=EMA(DIF,9);

    AAA:=(DIF-DEA)*2*60;

    启动:=CROSS(AAA-REF(AAA,1),15),COLORRED,LINETHICK2;

    DRAWICON(启动,L*0.987,38);

    DRAWICON(启动,L*0.935,11);

    {起爆点}

    L1:=LLV(L,10);

    爆发点:=(DCLOSE-REF(C,1))/REF(C,1)*100;

    起爆:=CROSS(爆发点,20) OR CROSS(爆发点,18);

    DRAWICON(起爆,L*0.985,23);

    {卖点信号}

    VAR1:=((REF(HIGH,1) + REF(LOW,1)) / 2);

    VAR2:=((REF(HIGH,1) + REF(LOW,1)) / 2);

    VAR3:=(MA(CLOSE,N) + (2 * STD(CLOSE,N)));

    卖点:=CROSS(VAR2,VAR3);

    DRAWICON(卖点,HIGH*1.01,12);

    {瞬间突破}

    获利%:WINNER(CLOSE)*100,NODRAW,COLORWHITE;

    DRAWTEXT_FIX(获利%>=95 AND ISLASTBAR,0.97,0.97,0,'高危'),COLORRED;

    DRAWTEXT_FIX(获利%>=80 AND 获利%<95 AND ISLASTBAR,0.97,0.97,0,'风险'),COLORYELLOW;

    DRAWTEXT_FIX(获利%>=50 AND 获利%<80 AND ISLASTBAR,0.97,0.97,0,'安全'),COLORGREEN;

    DRAWTEXT_FIX(获利%<50 AND ISLASTBAR,0.97,0.97,0,'空头'),COLORBLUE;

    STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,3,0),COLOR0055FF;

    STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,3,0),COLOR00FF00;

    N6:=10;

    T1:=CONST(HHVBARS(V,N6));

    T0:IF(CURRBARSCOUNT<=N6+3,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLORFF00FF;

    IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT,COLORFF00FF;

    DRAWTEXT(ISLASTBAR,T0,'  量能平台'),COLORCC00CC;

    M6:=10;

    Q1:=CONST(REF(HHVBARS(V,M6),T1+1)+T1+1);

    Q0:IF(CURRBARSCOUNT<=T1+M6+3 AND CURRBARSCOUNT>=T1+1,CONST(REF(C,Q1)),DRAWNULL),COLOR009900;

    IF(CURRBARSCOUNT=Q1+1,Q0,DRAWNULL),CIRCLEDOT,COLOR00CC00;

    M1:=CONST(LLVBARS(V,M6));

    M0:IF(CURRBARSCOUNT<=M6+7,CONST(IF(M1=0,O,REF(O,M1))),DRAWNULL);

    IF(CURRBARSCOUNT=M1+1,M0,DRAWNULL),CIRCLEDOT;

    DRAWTEXT(ISLASTBAR,M0,'  地量反量能平台');

    HV:=HHV(V,8)=V OR V/REF(V,1)>=2;

    FT:=BARSLAST(HV);

    量能平台:IF(HV,C,REF(C,FT)),COLORYELLOW,LINETHICK1;

    DP:=IF(C=INDEXC,0,1);

    GJ:=AMOUNT/V/100;

    【明日阻力】:L+(GJ-L)+(C-L),COLORRED,NODRAW;

    【明日支撑】:L+(C-GJ),NODRAW;

    年:=YEAR,NODRAW;

    月:=MONTH,NODRAW;

    星期:=WEEKDAY,NODRAW;

    日1:=DATETODAY(DATE);

    上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT);

    自然日:=日1-DATETODAY(上市日)+1;

    ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)

    OR TOTALBARSCOUNT-CURRBARSCOUNT=0;

    本周第几天:=BARSLAST(ZB)+1;

    本月第几天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1;

    MA1:=REF(C,本周第几天);

    MA2:=REF(MA1,本周第几天);

    MA3:=REF(MA2,本周第几天);

    MA4:=REF(MA3,本周第几天);

    MA5:=REF(MA4,本周第几天);

    MA6:=REF(MA5,本周第几天);

    MA7:=REF(MA6,本周第几天);

    MA8:=REF(MA7,本周第几天);

    MA9:=REF(MA8,本周第几天);

    十周价:=(C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9)/10;

    决策:REFDATE(十周价,DATE),COLORYELLOW,LINETHICK1;

    DRAWTEXT(ISLASTBAR,决策,' 决策线'),COLORYELLOW;

    {涨停中位线}

    DF:=BETWEEN(CLOSE/REF(CLOSE,1),1.0983,1.110);

    Z:=(O+H)/2;

    涨停中位:DRAWLINE(DF,Z,REF(DF,1),REF(Z,1),1),COLOR00FF11 POINTDOT LINETHICK4;

    {上一个涨停至今}

    TT:=C>REF(C,1)*1.095 AND C=H;

    涨停至今:BARSLAST(TT)+1, COLOR9900FF,NODRAW;

    {买点参考}

    AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);

    AAA3:=SUM(IF( CLOSE

    AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);

    B1万元:=DVOL*DCLOSE/100;

    B1差:=B1万元-REF(B1万元,1);

    B2万元:=DVOL*DCLOSE/100;

    B2比:=B2万元/REF(B2万元,1);

    净流入万元:=(AAA2-AAA3-0.5*AAA4);

    PM:=MA(净流入万元,1);

    PMA:=PM/REF(PM,1)>1;

    PMB:=REF(PMA,1)<1 AND PMA;

    密码:(EMA(MA(B1万元,2),2))/100000,COLORYELLOW,NODRAW;

    二日比:=密码/REF(密码,1);

    选股:=PMB AND 密码>REF(密码,1) AND 二日比>1,COLORRED,NODRAW;

    DRAWICON(选股,L*1,1);

    {量能突破预警}

    N9:=10;

    T2:=CONST(HHVBARS(V,N9));

    T3:=IF(CURRBARSCOUNT<=N9+3,CONST(IF(T2=0,C,REF(C,T2))),DRAWNULL),COLORFF00FF;

    量能突破预警:=CROSS(C,T3);

    DRAWICON(量能突破预警,L*0.987,38);

    DRAWICON(量能突破预警,L*0.966,38);

    DRAWICON(量能突破预警,L*0.945,26);

    {LSP抓牛信号}

    趋势:=EMA(EMA(C,4),4);

    月K:="KDJ.K#MONTH";

    月D:="KDJ.D#MONTH";

    周K:="KDJ.K#WEEK";

    周D:="KDJ.D#WEEK";

    日K:="KD.K";

    日D:="KD.D";

    日金叉:=IF(CROSS(日K,日D),15,0);

    周金叉:=IF(CROSS(周K,周D),25,0);

    月金叉:=IF(CROSS(月K,月D),35,0);

    日周月:=IF(日金叉=15 AND 周金叉=25 AND 月金叉=35,1,0);

    日周月赚:=日周月=1;

    日周:=IF(日金叉=15 AND 周金叉=25,2,0);

    日周赚:=日周=2;

    周月:=IF(周金叉=25 AND 月金叉=35,3,0);

    日月:=IF(日金叉=15 AND 月金叉=35,4,0);

    日月赚:=日月=4;

    周月赚:=周月=3;

    DRAWTEXT(日周月赚,趋势*0.96,'↖LSP大牛'),COLORRED;

    DRAWTEXT(周月赚,趋势*0.973,'↖LSP金牛'),COLORFF00FF;

    DRAWTEXT(日月赚,趋势*0.985,'↖LSP牛牛'),COLORYELLOW;

    {异动K线}

    VAR111:=(2*CLOSE+HIGH+LOW)/4;

    VAR222:=LLV(LOW,5);

    VAR3333:=HHV(HIGH,5);

    VAR444:=EMA((VAR111-VAR222)/(VAR3333-VAR222)*100,6);

    MA111:=MA(VAR444,2);

    AA:=STICKLINE(VAR444>MA111,VAR444,MA111,3,1),COLORRED;

    均价线:=AMOUNT/V/100;

    均价线2:=MA(均价线,M111);

    均价线5:=MA(均价线,5);

    均价线10:=MA(均价线,10);

    均价线30:=MA(均价线,30);

    突破:=C>均价线2 AND 均价线2

    AND REF(均价线2,2)MA111;

    STICKLINE(突破,H,L,3,0),LINETHICK1,COLORRED;

    STICKLINE(突破,H,L,0.2,0),COLORYELLOW;

    STICKLINE(突破,O,C,2,0),LINETHICK1,COLORYELLOW;

    {一阳穿3,4,5信号}

    MA555:=MA(C,5),LINETHICK1,COLORYELLOW;

    MA17:=MA(C,17),LINETHICK1,COLORMAGENTA;

    MA30:=MA(C,30),LINETHICK1,COLORGREEN;

    MA55:=MA(C,55),LINETHICK1,COLORRED;

    MA250:=MA(CLOSE,250),COLORBROWN,LINETHICK2;

    X2:=MA2>=O AND MA2<=C;

    X5:=MA555>=O AND MA555<=C;

    X17:=MA17>=O AND MA17<=C;

    X30:=MA30>=O AND MA30<=C;

    X55:=MA55>=O AND MA55<=C;

    一阳穿3线:=X5 AND X17 AND X30;

    一阳穿4线:=X2 AND X5 AND X17 AND X30;

    一阳穿5线:=X2 AND X5 AND X17 AND X30 AND X55;

    STICKLINE(一阳穿3线,O,C,2,0),COLORMAGENTA;{洋红色柱}

    STICKLINE(一阳穿4线,O,C,2,0),COLORCC3299;{紫罗兰红色柱}

    STICKLINE(一阳穿5线,O,C,2,0),COLORRED,COLOR0000FF;{红色柱};

    {上下影线分类}

    ZF:=H>=INTPART(REF(C,1)*1.1*100+0.5)/100 AND H>C;

    DT:=L<=INTPART(REF(C,1)*0.9*100+0.5)/100 AND L

    上影线幅度:=((H-REF(C,1))/REF(C,1)-(MAX(O,C)-REF(C,1))/REF(C,1))*100;

    下影线幅度:=((REF(C,1)-L)/REF(C,1)-(REF(C,1)-MIN(O,C))/REF(C,1))*100;

    上影线长:=H-MAX(O,C);

    下影线长:=MIN(O,C)-L;

    长度比较:=上影线长/下影线长;{上下影线长度比}

    STICKLINE((MIN(O,C)=L OR  长度比较>1) AND 上影线幅度>3.5,MAX(O,C),H,0.01,0),COLORMAGENTA;

    STICKLINE((MAX(O,C)=H OR  长度比较<1) AND 下影线幅度>3.5,MIN(O,C),L,0.01,0),COLORLIGREEN;

    STICKLINE((MIN(O,C)=L OR  长度比较>1) AND ZF,H-上影线长*0.2,H,0.01,0),COLORYELLOW;

    STICKLINE((MAX(O,C)=H OR  长度比较<1) AND DT,L+下影线长*0.2,L,0.01,0),COLORBLUE;

    {所属板块}

    Z1:=STRCAT(HYBLOCK,' ');

    Z2:=STRCAT(Z1,DYBLOCK);

    Z3:=STRCAT(Z2,' ');

    DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;

    成本0:=COST(0.5);


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 俊俊多功能主图源码 加入收藏