最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 通达信愚公神抢源码附图

    正文概述    2024-04-14 17:53:42  

    MA5:MA(C,5);

    MA6:=MA(C,6);

    MA10:MA(C,10);

    MA20:MA(C,20);

    A2:=REF(MA20,1);J1:=(MA20-A2)/A2*100;MJ1:=MA(J1,3);

    MA30:MA(C,30);

    MA55:MA(C,55);

    MA120:MA(C,120);

    MA250:MA(C,250);

    乖离2:=(MA20-MA30)/MA30*100;

    VAR1:=IF(BETWEEN(乖离2,-2,5),2,0);

    MAX1:=MAX(MA20,MA30);

    MAX2:=MAX(MAX1,MA55);

    MINN1:=MIN(MA20,MA30);

    MINN2:=MIN(MINN1,MA55);

    K1:=(MAX2/MINN2-1)*100;{粘合度符合条件}

    VAR2:=IF(K1<=8,1,0);

    上火车轨:=MA20>MA30 AND MA20>REF(MA20,1) AND MA30>REF(MA30,1) AND MA20-MA30>REF((MA20-MA30),1) ;

    STICKLINE(上火车轨,MA20,MA30,0,0),COLORRED;

    神枪手:DRAWTEXT(FILTER(上火车轨  AND "MACD.DIF"<0.15 AND "MACD.DIF">REF("MACD.DIF",1) AND MA(V,60)>REF(MA(V,60),1) AND MA(V,5)>MA(V,10) AND J1>REF(J1,1) AND

    (  L<=MA20 AND  C>MA20 OR (CROSS(MA5,MA20)) ),5),L*0.98,'←神枪手');

    神枪手选股:=FILTER(上火车轨  AND "MACD.DIF"<0.15 AND "MACD.DIF">REF("MACD.DIF",1) AND MA(V,60)>REF(MA(V,60),1) AND MA(V,5)>MA(V,10) AND J1>REF(J1,1) AND

    (  L<=MA20 AND  C>MA20 OR (CROSS(MA5,MA20)) ),5);{44.40%15240}

    短线暴涨:DRAWTEXT(FILTER( (VAR1 OR VAR2) AND MA10>REF(MA10,1) AND COUNT(MA30>REF(MA30,1),3)=3 AND MA30>MA55   AND COUNT(CROSS(MA5,MA30),3) AND J1>MJ1 AND MA(V,5)>MA(V,60)

    AND MA(V,60)>REF(MA(V,60),1),5),MA55*0.99,'短线暴涨'),COLORRED;

    DRAWTEXT(CROSS("KDJ.K"(5,2,3),"KDJ.D"(5,2,3)) AND "KDJ.D"(5,2,3)<30 AND  J1>MJ1 AND MA55>REF(MA55,1) AND  COUNT(J1<1,3)>=1 ,L*0.995,'←买入'),COLORYELLOW;

    DRAWTEXT(CROSS("KDJ.D"(5,2,3),"KDJ.K"(5,2,3)) AND "KDJ.D"(5,2,3)>65 AND J11,3)>=1,H*1.005,'←卖出'),COLORGREEN;

    DRAWTEXT(CROSS("KDJ.D"(18,9,6),"KDJ.K"(18,9,6)) AND "KDJ.D"(18,9,6)>60  AND "KDJ.J"(45,15,15)>90,H*1.03,'←顶'),COLORRED;

    DRAWTEXT(CROSS(MA5,MA6) AND "KDJ.K"(5,3,3)>=50 AND "KDJ.J"(5,3,3)<31 ,L*0.92,'←再买'),COLORMAGENTA;

    XL1:=((LLV(LOW,3) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) >= 1.04));

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

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

    DRAWTEXT(FILTER(((XL1 > 0) AND LOW),5),(LOW - 0.4),'●买点');

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

    X6:=REF(CLOSE,1);

    X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100);

    X8:=CROSS(79,X7);

    X9:=FILTER(X8,4);

    DRAWTEXT(X9,(HIGH * 1.02),'●出货'),COLOR9000F5;

    STICKLINE(C>1.098*REF(C,1),C,O,0,0),COLORYELLOW;

    AAA:=CONST(HHV(H,90));

    R1:=MA(CLOSE,1);

    R2:=MA(CLOSE,3);

    R3:=(MA(R2,1)*1);

    R4:=(MA(R2,3)*1);

    DRAWTEXT(CROSS(R3,R4),(LOW-0.1),'进'),COLORYELLOW;

    LC:=REF(CLOSE,1);

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

    FF:=EMA(CLOSE,3);

    MA15:=EMA(CLOSE,21);

    DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'出'),COLORGREEN;

    VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

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

    VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));

    VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));

    VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);

    VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);

    VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;

    VAR18:=100-ABS(VAR17);

    VAR19:=IF(VAR18<90,VAR18,100);

    VAR1A:=IF(VARE>0,VARE,0);

    VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;

    VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;

    DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,HIGH*1.02,'大笔出货'),LINETHICK1,COLORFFCC66;

    AA1:=AMOUNT/V;

    BB1:=L

    CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;

    DD1:=L

    EE1:=V

    老鼠仓:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0;

    DRAWTEXT(老鼠仓,(LOW* 0.99),'老鼠仓'),COLOR40CCFF;

     

    A74:=MA(CLOSE,20);

    A75:=(CLOSE > MA(CLOSE,5));

    A76:=(MA(CLOSE,5) > MA(CLOSE,10));

    A77:=(CLOSE > MA(CLOSE,10));

    A78:=(MA(CLOSE,5) > MA(CLOSE,20));

    A79:=(CLOSE > MA(CLOSE,20));

    A710:=REF(A74,1);

    A711:=(A74 > A710);

    AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))

    + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));

    DSLX:=(CLOSE / INDEXC);

    DSLX1:=MA(DSLX,5);

    DSLX2:=MA(DSLX,10);

    V1:=MA(VOL,5);

    V2:=MA(VOL,10);

    T1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));

    T2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));

    T3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));

    T4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));

    T5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));

    T6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));

    T7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));

    T8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));

    T9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));

    T10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));

    T11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));

    T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));

    T13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));

    T14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));

    T15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));

    T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));

    T17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));

    T18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));

    T19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));

    T20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));

    T21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));

    T22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0));

    T23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));

    T24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0));

    T25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0));

    DRAWTEXT(T1=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'量能理想,明显走强,中线参与,仓位在2/3左右。'),COLORRED;

    DRAWTEXT(T2=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'走势趋强,还显不足,短线进场,仓位在1/2左右。'),COLORLIRED;

    DRAWTEXT(T3=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'量价良好,没有明显走强,短线进场,仓位1/2左右。'),COLORLIRED;

    DRAWTEXT(T4=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'形态尚可,量能不足,未完全走强,短线参与,仓位1/3左右。'),COLORLIRED;

    DRAWTEXT(T5=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'形态变坏,重仓者减持大半,清仓者观望。'),COLORGREEN;

    DRAWTEXT(T6=1 AND CURRBARSCOUNT=70,AAA*0.98

    ,'随大盘一起下跌,明显缩量走势,考虑到风险,减持或清仓。'),COLORGREEN;

    DRAWTEXT(T7=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'该股放量下跌,走势明显偏弱,离场观望。'),COLORGREEN;

    DRAWTEXT(T8=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'该股缩量下跌,走势偏弱,离场观望。'),COLORGREEN;

    DRAWTEXT(T9=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'该股形态良好,强势明显,量能充足,可以继续持有。'),COLORMAGENTA;

    DRAWTEXT(T10=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'上行趋势不变,强势依然,量能开始转弱,注意风险。'),COLORYELLOW;

    DRAWTEXT(T11=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓。')COLORYELLOW;

    DRAWTEXT(T12=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'该股走势趋弱,量能不足,减持大部分筹码。'),COLORGREEN;

    DRAWTEXT(T13=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'该股形态不佳,注意成交量的变化,目前不适合参与。'),COLORYELLOW;

    DRAWTEXT(T14=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'趋势不明,股价偏弱,注意量能变化,目前不宜参与。'),COLORYELLOW;

    DRAWTEXT(T15=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'有走强迹象,但量能不足,趋势不明,不适合操作。'),COLORYELLOW;

    DRAWTEXT(T16=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'该股走势太弱,没有参与价值。'),COLORGREEN;

    DRAWTEXT(T17=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'大盘理想,有明显走强迹象,中线参与,仓位在2/3左右。'),COLORRED;

    DRAWTEXT(T18=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'如前期经过一轮下跌,最佳买点,前期有过一段涨幅需谨慎。'),COLORYELLOW;

    DRAWTEXT(T19=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'考虑短线进场,仓位在1/2左右,一旦量能放大,加仓买入。'),COLORRED;

    DRAWTEXT(T20=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'大盘形态走坏,重仓者可以减去大部分仓位。'),COLORGREEN;

    DRAWTEXT(T21=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'大盘缩量调整,注意风险,短线清仓观望。'),COLORGREEN;

    DRAWTEXT(T22=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'大盘走势良好,量能理想,可以继续持有强势股。'),COLORMAGENTA;

    DRAWTEXT(T23=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'大盘形态良好,但量能稍显不足,随时准备减仓。'),COLORYELLOW;

    DRAWTEXT(T24=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'大盘趋势不明,注意成交量变化,目前不适宜进场。'),COLORGREEN;

    DRAWTEXT(T25=1 AND CURRBARSCOUNT=70,AAA-(AAA*0.03)

    ,'大盘趋势向下,量能萎缩,不适合进场。'),COLORGREEN;

     

    {BBB:=CONST(LLV(L,100));

    DRAWKLINE(H,O,L,C);}

    大盘:=EMA(INDEXC,500)/EMA(C,500); 

    大盘线:=INDEXC/大盘,LINETHICK1,COLOR0066FF;

    大盘线1:=MA((INDEXC/大盘),5),COLORGREEN;

    TT1{早晨之星}:=CONST(IF((大盘线>=REF(大盘线,1) AND CROSS (大盘线,大盘线1)),1,0));

    TT3{长十字}:=CONST(IF((大盘线<=REF(大盘线,1) AND CROSS (大盘线1,大盘线)),1,0));

    TTS1:=IF(TT1=1,0+0.03,0);

    TTS3:=IF(TT3=1,TTS1+0.03,TTS1);

    {DRAWTEXT(TT1=1 AND CURRBARSCOUNT=28,AAA-(AAA*TTS1),'大盘多头攻击,机会出现,买股。'),COLORMAGENTA;

    DRAWTEXT(TT3=1 AND CURRBARSCOUNT=28,AAA-(AAA*TTS3),'大盘空头攻击,无机会,出局。'),COLORGREEN;}

    AA:=BARSCOUNT(C);

    AH:=HHV(H,200);

    AL:=LLV(L,200);

    A0:=(AH-AL)/40;

    B1:=L-A0;

    STICKLINE((AA+0)/34=FLOOR((AA+0)/34),B1,B1-1.5*A0,2,0),COLORF00FF0;

    DRAWTEXT((AA+0)/34=FLOOR((AA+0)/34),B1-1*A0,'时间窗'),COLORF00FF0;

    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;

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

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

    BBB1:=MA(C,1);

    B2:=SMA(SMA(SMA(BBB1,2,1),2,1),2,1),COLORRED;

    SMA2:=MA(B2,2);

    VARB1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));

    VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));

    买:DRAWTEXT(CROSS(VARB1,VAR3) AND B2>SMA2,(LOW * 0.97),'←⊙买'),COLORRED;

     

    M1:=30;

    P2:=80;

    VAR101:=(C+H+O+L)/4;

    买入:=XMA(VAR101,M1)*(1-P2/1000),COLORFFFFFF,LINETHICK2;

    反弹:=EMA(EMA(EMA(HIGH,5),5),5)*0.95,COLORRED,LINETHICK1;

    XG:=CROSS(买入,反弹);

    DRAWTEXT(XG,L*0.97,'暴涨' ),COLORRED;

    DRAWICON(XG,L*0.97,5);

    超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),COLORRED,NODRAW; 

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

    DEA:=EMA(DIF,9);

    MACD:=(DIF-DEA)*2;

    VAR113:=HHV(HIGH,60);

    VAR114:=LLV(LOW,30);

    VAR115:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;

    VAR116:=(VAR113+VAR114+VAR115)/3;

    VAR117:=EMA(VAR116,5);

    K01:=EMA(VAR117,5)*2, COLORFF00FF;

    D01:=EMA(K01,5),  COLORWHITE;

    J01:=K01*3-D01*2, COLORYELLOW;

    ENTERLONG:=CROSS(K01,D01);

    EXITLONG:=CROSS(D01,K01);

    B01:=(DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2))

    AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),L*0.98,1))*D01*2/3;

    B02:=IF(TROUGHBARS(3,15,1)=1 AND HIGH>LOW+0.01,20,0);

    必买:=(B01 AND B02) AND 净流入>0;

    必卖:=IF(PEAKBARS(3,15,1)=1,80,100),COLORGREEN,LINETHICK1;

    QQ:=必卖=80;

    B03:=((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)));

    VV1:=EMA(CLOSE,60)-EMA(CLOSE,300);

    VV2:=EMA(VV1,300);

    VV3:=(CLOSE-(LOW,8))/((HIGH,8)-LLV(LOW,8))*100;

    VV4:=SMA(VV3,2,1),NODRAW;

    VV5:=SMA(VV4,2,1),NODRAW;

    VV6:=CLOSE/REF(CLOSE,3)>=1.1;

    VV7:=BACKSET(VV6,3);

    大涨:=(VV7 AND COUNT(VV7,3)=1);

    DRAWICON(必买,L-0.16,11);

    DRAWICON(大涨 AND 必买,L-0.16,9);

    DRAWICON(大涨,L-0.18,1);

    DRAWICON(QQ,H+0.1,6);

    DRAWRECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0));

     

    TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);

    大宗进:=(超B)+(大B),NODRAW;

    大宗出:=(超S)+(大S),NODRAW;

    非大宗进:=(中B)+(小B),NODRAW;

    非大宗出:=(中S)+(小S),NODRAW;

    大宗进限制:=IF((超B+大B)=0,0,大宗进);

    大宗出限制:=IF((超S+大S)=0,0,大宗出);

    非大宗进限制:=IF(中B+小B=0,0,非大宗进);

    非大宗出限制:=IF(中S+小S=0,0,非大宗出);

    主力净流入:=(超B+大B)-(超S+大S),COLORRED,NODRAW;

    散户净流入:=(中B+小B)-(中S+小S),COLORRED,NODRAW;

     

    大单流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW;

    大单流入限制:=IF((超B+大B+超S+大S)=0,0,大单流入);

    大单流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW;

    大单流出限制:=IF((超B+大B+超S+大S)=0,0,大单流出比);

    总流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;

    总流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;

    成交总量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW;

    机构参与度:=(超B+超S+大B+大S)/成交总量*100,COLORYELLOW,NODRAW;

    大单强度:=(超B+大B-超S-大S)/成交总量*100,COLORYELLOW,NODRAW;

    大单强度限制:=IF(大单强度=0,-100,大单强度);

    大单强度比:=IF(大单强度>=0,(大单强度限制+100)/2,100-ABS((大单强度限制-100)/2)),NODRAW;

    超单强度:=(超B-超S)/(超B+超S)*100,COLORYELLOW,NODRAW;

    超单强度限制:=IF(超单强度=0,-100,超单强度);

    超单强度比:=IF(超单强度>0,(超单强度限制+100)/2,IF(超单强度<0,100-ABS((超单强度限制-100)/2),0)),NODRAW;

     

    DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW;

    DRAWRECTREL(0,CONST(930-(ABS(大宗进)*250/DAZHIV)),35,950,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255)));

    DRAWRECTREL(37,CONST(930-(ABS(大宗出)*250/DAZHIV)),72,950,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0)));

    DRAWRECTREL(75,CONST(930-(ABS(非大宗进)*250/DAZHIV)),110,950,IF(CONST(非大宗进>0),RGB(255,0,0),RGB(23,125,255)));

    DRAWRECTREL(112,CONST(930-(ABS(非大宗出)*250/DAZHIV)),147,950,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0)));

    DRAWRECTREL(150,CONST(940-(ABS(净流入)*250/DAZHIV))-20,190,950,IF(CONST(净流入>0),RGB(200,0,0),RGB(0,125,50)));

    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT('',CON2STR(大宗进/1,0))),COLORYELLOW;

    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.9,0,STRCAT('',CON2STR(大宗出/1,0))),COLORYELLOW;

    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.9,0,STRCAT('',CON2STR(非大宗进/1,0))),COLORYELLOW;

    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.111,0.9,0,STRCAT('',CON2STR(非大宗出/1,0))),COLORYELLOW;

    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.150,0.9,0,STRCAT('',CON2STR(净流入/1,0))),COLORYELLOW;

    DRAWTEXT_FIX(1,0.000,0.99,0,STRCAT(STRCAT('主力 ',CON2STR(主力净流入,0)),'万')),COLORMAGENTA;

    DRAWTEXT_FIX(1,0.078,0.99,0,STRCAT(STRCAT('散户 ',CON2STR(散户净流入,0)),'万')),COLORCYAN;

    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,0.99,0,'净流入:(万)'),COLORYELLOW;

     

    主力买力度:=LARGEINTRDVOL*1000/VOL;

    主力卖力度:=LARGEOUTTRDVOL*1000/VOL;

     

    AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW;

    DRAWRECTREL(0,515,CONST(ABS(主力买力度)*560/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0)));

    DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*560/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0)));

    DRAWTEXT_FIX(1,0,0.524,0,STRCAT('主买力度:',CON2STR(主力买力度,0))),COLORYELLOW;

    DRAWTEXT_FIX(1,0,0.576,0,STRCAT('主卖力度:',CON2STR(主力卖力度,0))),COLORYELLOW;


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 通达信愚公神抢源码附图 加入收藏