最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 通达信短线BS (主图贴图源码 附B点选股)

    正文概述    2024-04-13 14:43:06  

    一、简化了财务指标源码。
    二、由于普通版通达信没有L2数据导致不能显示相关内容,所以把这一段除掉。
    三、修改相关参数,使 B 提前显示。
    四、本指标显示顶点/底点(65日以来);阻力/支撑;止赢/止损(淡红/淡蓝 短线) 三组线,方便朋友们识别。
    五、红色K线为上涨走势;青色K线为下跌走势。其中实体K线为阴线。
    六、选股指标仅作辅助,主要还是靠自己决策!

    MA1:MA(CLOSE,5)COLORWHITE,LINETHICK1;
    MA2:MA(CLOSE,20)COLORYELLOW,LINETHICK1;
    MA3:MA(CLOSE,60)COLORMAGENTA,LINETHICK2;
    MA4:MA(CLOSE,120)COLORGREEN,LINETHICK2;
    CC:=IF(CURRBARSCOUNT 18,CONST(REF(C,1)),DRAWNULL);
    止赢:1.05*CC,COLOR8000FF;
    止损:0.97*CC,COLORLIBLUE;
    V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
    V2:=(1-7/100)*(DMA(CLOSE,V1));
    V3:=(1+7/100)*(DMA(CLOSE,V1));
    V5:=MA((LOW+HIGH+CLOSE)/3,5);
    支撑:REFDATE(V2,DATE),DOTLINE,LINETHICK1,COLORLIRED;
    阻力:REFDATE(V3,DATE),DOTLINE,LINETHICK1,COLORGREEN;
    DRAWTEXT(ISLASTBAR,阻力,'阻力'),COLORGREEN;
    DRAWTEXT(ISLASTBAR,支撑,'支撑'),COLORLIRED;
    AAA:=CONST(HHV(H*0.5,90));
    AA:=(REF(CLOSE,1)+REF(CLOSE,2)+OPEN)/3;
    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.86,0.01,1,'今日保护价'),LINETHICK2,COLOR00FFFF;
    DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.90,0.01,1,AA);
    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.92,0.01,1,'元');
    PT:=REF(H,1)-REF(L,1);
    CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
    AH:=CDP+PT;
    AL:=CDP-PT;
    NH:=CDP*2-REF(L,1);
    NL:=CDP*2-REF(H,1);
    强:=IF(AH REF(C,1)*1.1,REF(C,1)*1.1,AH);
    阻:=IF(NH 强,(强-CDP)*0.618+CDP,NH);
    M:=IF(AL REF(C,1)/1.1,REF(C,1)/1.1,AL);
    撑:=IF(NL M,CDP-(CDP-M)*0.618,NL);
    底:=IF(AL REF(C,1)/1.1,REF(C,1)/1.1,AL);
    今日保护价:=(REF(C,2)+REF(C,1)+O)/3 ;
    顶点:IF(CURRBARSCOUNT =60, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORYELLOW,DOTLINE;
    低点:IF(CURRBARSCOUNT =60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,DOTLINE;
    DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORYELLOW;
    DRAWTEXT(ISLASTBAR,低点,'底点'),COLORMAGENTA;
    BS:=1;
    MA7:=MA(CLOSE,BS);
    转强:=(6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+1*REF(H,5))/(6+5+4+3+2+1);
    转弱:=(6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+1*REF(L,5))/(6+5+4+3+2+1);
    BB2:=IF(C REF(转强,1),1,IF(C REF(转弱,1),-1,0));
    DD2:=BARSLAST(NOT(BB2=0));
    B:=IF(BB2=0,REF(BB2,DD2),BB2);
    中短:=IF(B=-2,MA(HIGH,6),MA(LOW,6));
    STICKLINE(MA7 中短,LOW,HIGH,0,1),COLORCYAN;
    STICKLINE(MA7 中短,LOW,HIGH,0,1),COLORRED;
    STICKLINE(((OPEN CLOSE)AND(MA7 中短)),(CLOSE-0.003),OPEN,3.1,0),COLORCYAN;
    STICKLINE(((OPEN CLOSE)AND(MA7 中短)),CLOSE,OPEN,3.1,1),COLORCYAN;
    STICKLINE(((OPEN CLOSE)AND(MA7 中短)),OPEN,(CLOSE-0.003),3.1,0),COLORRED;
    STICKLINE(((OPEN CLOSE)AND(MA7 中短)),OPEN,CLOSE,3.1,1),COLORRED;
    B点:=CROSS(MA7,中短);
    持股:=MA7
    DRAWICON(CROSS(MA7,中短),L*0.98,7);
    DRAWICON(CROSS(中短,MA7),H*1.02,8);
    {财务}
    DRAWTEXT_FIX(1,0.01,0.05,0,'市盈率:'),COLORYELLOW;
    DRAWNUMBER_FIX(1,0.06,0.05,0,CONST(DYNAINFO(39))),COLORYELLOW;
    DRAWTEXT_FIX(1,0.12,0.05,0,'市净率:'),COLOR0080FF;
    DRAWNUMBER_FIX(1,0.17,0.05,0,CONST(C/FINANCE(34))),COLOR0080FF;
    DRAWTEXT_FIX(1,0.22,0.05,0,'每股收益(元):'),COLORFF00FF;
    DRAWNUMBER_FIX(1,0.31,0.05,0,CONST(FINANCE(33))),COLORFF00FF;
    {地区板块行业}
    Z1:=STRCAT(HYBLOCK,' ');
    Z2:=STRCAT(Z1,DYBLOCK);
    Z3:=STRCAT(Z2,' ');
    DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
    {以上为主图}

    {B点买 选股}
    BS:=1;
    MA7:=MA(CLOSE,BS);
    转强:=(6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+1*REF(H,5))/(6+5+4+3+2+1);
    转弱:=(6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+1*REF(L,5))/(6+5+4+3+2+1);
    BB2:=IF(C REF(转强,1),1,IF(C REF(转弱,1),-1,0));
    DD2:=BARSLAST(NOT(BB2=0));
    B:=IF(BB2=0,REF(BB2,DD2),BB2);
    中短:=IF(B=-2,MA(HIGH,6),MA(LOW,6));
    B买:CROSS(MA7,中短);

    {用法注释:
    右边红色短线为止赢线;
    右边淡蓝色短线为止损线。}


    通达信短线BS (主图贴图源码 附B点选股)

    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 通达信短线BS (主图贴图源码 附B点选股) 加入收藏