分享

涨停有望分时主图分时趋势副图通达信指标系列

 量学粉丝团 2023-06-04 发布于江西

  

  

  

  

  

中轴(昨日收盘价)下的股票最好别动,三线后定乾坤

分时副图指标,盘中可看到主力散户持仓比例非常实用

 主图

STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))>=REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORRED;

STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))<REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORGREEN;

STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))>=REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORRED;

STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))<REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORGREEN;

STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))>=REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORRED;

STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))<REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORGREEN;

SJ1:=TIME2=93100;T1:=BARSLAST(SJ1);SJ2:=TIME2=94100;

SJ4:=TIME2=95100;T2:=BARSLAST(SJ2);T4:=BARSLAST(SJ4);

H1:=IF(TIME2=94100,REF(C,T2),DRAWNULL)=C;

H2:=IF(TIME2=95100,REF(C,T4),DRAWNULL)=C;

CS2:=CONST(REF(C,T2));

CS4:=CONST(REF(C,T4));

GL2:=FILTERX(H1,T2);

GL4:=FILTERX(H2,T4);

L1:=IF(TIME2=93100,REF(C,T1),DRAWNULL)=C;

CS1:=CONST(REF(C,T1));

GL1:=FILTERX(L1,T1);

DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL));

DA1:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL2),BARSLAST(GL4)),DRAWNULL));

A:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL);

B:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS4-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL);

IF(A>=REF(A,2),A,DRAWNULL)COLORLIMAGENTA,LINETHICK3;

IF(A<REF(A,2),A,DRAWNULL)COLORGREEN,LINETHICK5;

IF(B>=REF(B,2),B,DRAWNULL)COLORLIMAGENTA,LINETHICK3;

IF(B<REF(B,2),B,DRAWNULL)COLORGREEN,LINETHICK3;

XSJ1:=TIME2=95100;

XT1:=BARSLAST(XSJ1);

XSJ2:=TIME2=100100;

XT2:=BARSLAST(XSJ2);

XCS2:=CONST(REF(C,XT2));

XL1:=IF(TIME2=95100,REF(C,XT1),DRAWNULL)=C;

XH1:=IF(TIME2=100100,REF(C,XT2),DRAWNULL)=C;

XCS1:=CONST(REF(C,XT1));

XGL1:=FILTERX(XL1,XT1);

XGL2:=FILTERX(XH1,XT2);

XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL));

XA:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL);

IF(XA>=REF(XA,1),XA,DRAWNULL)COLORLIMAGENTA,LINETHICK3;

IF(XA<REF(XA,1),XA,DRAWNULL)COLORGREEN,LINETHICK3;

时间:=TIME2=100100;

N:=BARSLAST(时间);

C1:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORRED;

C2:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORGREEN;

C3:(C1+C2)/2,DOTLINE,COLORYELLOW;

VV:=HHV(V,0);

ZF:=(C1/C2-1)*100;

DRAWTEXT(CURRBARSCOUNT=2,C1,VARCAT(VARCAT(VARCAT(VARCAT('上限:',VAR2STR(C1,2)),'元,'),VARCAT('振幅:',VAR2STR(ZF,2))),'%')),COLORRED;

DRAWTEXT(CURRBARSCOUNT=2,C3,VARCAT(VARCAT('中限:',VAR2STR(C3,2)),'元')),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=2,C2,VARCAT(VARCAT('下限:',VAR2STR(C2,2)),'元')),COLORGREEN;

DRAWTEXT(C1/C2<=1.03 AND CROSS(C,C1) AND V>=VV,C1*1.005,'★买入')COLORRED;

DRAWTEXT(C1/C2<=1.03 AND CROSS(C2,C) AND V>=VV,C2*0.998,'★卖出')COLORGREEN;

STICKLINE(C1/C2<1.03 AND CROSS(C,C1) AND V>=VV,DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,0),COLORRED;

AAA:=MAX(DYNAINFO(3),DYNAINFO(5));

BBB:=MIN(DYNAINFO(3),DYNAINFO(6));

CCC:=AAA-BBB;

中轨:=(AAA+BBB)/1,POINTDOT;

阻力:BBB+CCC*7/8,COLORBLUE,POINTDOT;

支撑:BBB+CCC*1/8,COLORMAGENTA,POINTDOT;

支撑1:BBB+CCC*0.5/8,POINTDOT;

上顶:BBB+CCC*2/3,POINTDOT;

下底:BBB+CCC/3,COLORBLUE,POINTDOT;

STICKLINE(C>阻力,阻力,C,2,0),COLORGREEN;

STICKLINE(C<支撑,支撑,C,2,0),COLORLIMAGENTA;

DRAWTEXT(LONGCROSS(支撑1,C,2),下底,'B'),COLORYELLOW;{B}

DRAWTEXT(LONGCROSS(C,阻力,2),上顶,'S'),COLORRED;{S};

副图

A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0);

成交额:=V*C/100,NODRAW;

A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A6:=((A2+A3)+A4)+A5;

A7:=IF((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

A9:=IF((ISLASTBAR),((100*A4)/A6),0);

A10:=IF((ISLASTBAR),((100*A5)/A6),0);

机买:(A2),LINETHICK4,COLORRED;

机卖:(A3),LINETHICK4,COLORCYAN;

操盘:机买-机卖,NODRAW;

散买:(A4),COLOR5555FF;

散卖:(A5),COLOR55FF55;

散户进出:=散买-散卖,NODRAW;

抄底:IF(CROSS(A2,A3),10,0),LINETHICK3,COLORMAGENTA;

闪电买入:DRAWTEXT(CROSS(操盘,抄底 AND A3),操盘*0.68,'买'),LINETHICK3,COLORYELLOW;

强势:((100*A2)/A6>50);

STICKLINE(强势,机买*1.02,机买*1.1,1,0),COLORYELLOW;

拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;

STICKLINE(拉升,机买*1.1,机买*1.2,1,0),COLORRED;

DRAWTEXT(ISLASTBAR=1,机买*0.95,''),LINETHICK2,COLORRED;

DRAWTEXT(ISLASTBAR=1,机卖*0.95,''),LINETHICK2,COLORFFFF55;

Q:=BETWEEN(C/(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))),1.05,0.95);

Q2:=IF(Q=0,MA(C,BARSCOUNT(C)),(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))));

DRAWICON(CROSS((C/Q2),1.03),机买,5);

DD1:=1;

AAA1:=STRCAT(STRCAT('机构买入',CON2STR((100*A2)/A6,0)),'%');

AAA2:=STRCAT(STRCAT('机构卖出',CON2STR((100*A3)/A6,0)),'%');

AAA0:=STRCAT(STRCAT('机构总买入',CON2STR((100*(A2-A3))/A6,0)),'%');

AAA3:=STRCAT(STRCAT('散户买入',CON2STR((100*A4)/A6,0)),'%');

AAA4:=STRCAT(STRCAT('散户卖出',CON2STR((100*A5)/A6,0)),'%');

AAA5:=STRCAT(STRCAT('散户总买入',CON2STR((100*(A4-A5))/A6,0)),'%');

DRAWTEXT_FIX(DD1=1,0.01,0.05,0,AAA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0.01,0.25,0,AAA2),COLORCYAN;

DRAWTEXT_FIX(DD1=1,0.01,0.40,0,AAA3),COLORLIRED;

DRAWTEXT_FIX(DD1=1,0.01,0.55,0,AAA4),COLORGREEN;

DRAWTEXT_FIX(DD1=1,0.01,0.70,0,AAA0),LINETHICK5,COLORMAGENTA;

DRAWTEXT_FIX(DD1=1,0.01,0.85,0,AAA5),LINETHICK5,COLORGREEN;

主力净买额:=(操盘+散户进出)/成交额,NODRAW;

AAA6:=STRCAT(STRCAT('主力净买额',CON2STR(主力净买额,0)),'%');

DRAWTEXT_FIX(DD1=1,0.53,0.30,0,AAA6),COLORWHITE;

HJ_1:=REF(CLOSE,1);

。。。。。。源码结束明天再见。。。。。。。。。。。。。。。。。。

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约