最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 同花顺收费版抄底逃顶趋势决策公式源码

    正文概述    2024-04-14 13:55:51  

     抄底逃顶趋势决策

    //#@Fname=抄底逃顶趋势决策

    //#@comment=

    //#@control=Check#1 趋势线

    //#|Check#2 决策密码

    //#@FuncType=

    //#@style=:Line516,成交价格,1,0,1,4,920515;

    //#@availperiod=2147430400

    //#@param=N1=1.0000000001,0.0000000001,1.0000000001,1;N2=0.0000000001,0.0000000001,1.0000000001,1;

    //#@isDrawCurve=1

    //#@Fdesc=抄底逃顶趋势决策

    //#@defaultperiod=16384

    //#@coord=M

    //#@ordinate=0,0.000000;0,0.000000;1,20487.000000;0,0.000000;0,0.000000;0;0,0.000000

    //#@@FUNCSPEC@=source

    LC:=REF(CLOSE,1);

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

    AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;

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

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

    Vard:=BARSCOUNT(CLOSE);

    主力:=EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5;

    散户:=EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5;

    dpLC:=REF(INDEXC,1);

    dpRSI1:=SMA(MAX(INDEXC-dpLC,0),6,1)/SMA(ABS(INDEXC-dpLC),6,1)*100;

    dpAR:=SUM(INDEXH-INDEXO,26)/SUM(INDEXO-INDEXL,26)*100;

    dpVarb:=SMA(MAX(INDEXC-dpLC,0),7,1)/SMA(ABS(INDEXC-dpLC),7,1)*100;

    dpVarc:=SMA(MAX(INDEXC-dpLC,0),13,1)/SMA(ABS(INDEXC-dpLC),13,1)*100;

    dpVard:=BARSCOUNT(INDEXC);

    dpzl:=EMA( (INDEXC-MA(INDEXC,7))/MA(INDEXC,7)*480,2)*5;

    dpsh:=EMA( (INDEXC-MA(INDEXC,11))/MA(INDEXC,11)*480,7)*5;

    DRAWTEXT(CROSS(85,RSI1),HIGH*1.02,'顶'),colorgreen;

    DRAWTEXT(CROSS(85,dpRSI1),HIGH*1.02,'系统风险'),coloryellow;

    de1:=CROSS(RSI1,25) AND (CROSS(dpRSI1,25) OR dpzl>dpsh);

    DRAWTEXT(de1,LOW*0.98,'底'),colorred;

    IF((n1<1 AND n2<1) OR(n1>0 AND n2>0))

    {    

    IF(CLOSE>OPEN)

     RETURN "阳";

    ELSE IF(CLOSE

     RETURN "阴";

    ELSE  IF(CLOSE==OPEN AND OPEN>=CLOSE[1])

     RETURN "阳";

    ELSE  IF(CLOSE==OPEN AND OPEN<=CLOSE[1])

     RETURN "阴";

    MONEY;

    K线换手;

     }

    ELSE IF((n1<1 AND n2>0))

    Var1=MONEY/VOL;

    A=SMA(Var1,5,1)-SMA(Var1,55,1);

    B=SMA((A-SMA(A,5,1)),5,1);

    风险系数:B;

    IF(CLOSE>MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1))

      RETURN ("colorred");

    IF(CLOSEREF(A,1) AND B>REF(B,1))

      RETURN ("colorwhite");

    IF(A=MA(CLOSE,20))

     RETURN ("colorwhite");

     IF(A

     RETURN ("colorgreen");

    IF(A>REF(A,1) AND B

     RETURN ("colorwhite");

    IF(AREF(B,1))

     RETURN ("colorwhite");

       }

    ELSE IF(n1>0 AND n2<1)

     {

    大单净差BBD:=BIGBUYCOUNT1+WAITBUYCOUNT1-BIGSELLCOUNT1-WAITSELLCOUNT1;

    dd:=大单净差BBD;

    DIFF:=EMA(大单净差BBD,2) - EMA(大单净差BBD,4),coloryellow;

    DIFF2:=EMA(大单净差BBD,6) - EMA(大单净差BBD,12),coloryellow;

    m34:=MA(C,34);

    m5:=MA(C,5);

    r5:=COUNT(大单净差BBD>0,5);

    r6:=COUNT(大单净差BBD>0,6);

    a1:=IF(C

    a2:=IF(C

    a3:=IF(C

    a4:=IF(C

    a5:=IF(DIFF>0,2,0);

    a6:=IF(DIFF2>0,2,0);

    a7:=IF(C>m34,2,0);

    a8:=IF(C>m5,2,0);

    a9:=IF(r5>3,2,0);

    a10:=IF(r6>3,1,0);

    az:=a1+a2+a3+a4+a5+a6+a7+a8+a9+a10;

    IF(C

     green:=C

     ELSE IF(az>2.5)

      red:=az>2.5;

      ELSE green:=az<2.5;

    ENTERLONG:=(REF(green,1)=1 AND red=1 ) AND COUNT(REF(green,1)=1 AND red=1,BARSLAST(REF(red,1)=1 AND green=1))=1;

    EXITLONG:=REF(red,1)=1 AND green=1 AND COUNT(REF(red,1)=1 AND green=1,BARSLAST(REF(green,1)=1 AND red=1))=1;

    VERLINE(ENTERLONG,1),colorred;

    VERLINE(EXITLONG,1),colorgreen;

    IF(C

     RETURN ("colorgreen"); 

    IF(az>2.5)

      RETURN ("colorRED");

    IF(az<2.5)

     RETURN ("colorgreen");

     }

    SHGZG;

    MONEY;

    HIGH;

    LOW;

     


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 同花顺收费版抄底逃顶趋势决策公式源码 加入收藏