通达信显示板块 涨停等信息

MA1:MA(CLOSE,M1);

MA20:MA(CLOSE,M20);
MA3:MA(CLOSE,M3);
MA4:MA(CLOSE,M4);
MA5:MA(CLOSE,M5);
MA6:MA(CLOSE,M6);

{Z1:=STRCAT(HYBLOCK,‘ ‘);}

{Z2:=STRCAT(Z1,DYBLOCK);}

{Z3:=STRCAT(Z2,‘ ‘);}

{DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;}

ABB:=BARSLAST(DATE!=REF(DATE,1));
BBB:=BARSLAST(CROSS(BACKSET(ISLASTBAR,ABB+2),0.5));
昨收:= IF(BBB>=0,REF(C,BBB),DRAWNULL),DOTLINE,COLORBLUE,LINETHICK3;

HHH:= HHV(H,ABB+1);
昨高:=IF(BBB>=0,REF(HHH,BBB),DRAWNULL),DOTLINE,COLORRED,LINETHICK3;
LLL:= LLV(L,ABB+1);
昨低:=IF(BBB>=0,REF(LLL,BBB),DRAWNULL),DOTLINE,COLORGREEN,LINETHICK3;

上3_1:(昨低+( 昨高-昨低)/3*2),DOTLINE,COLORYELLOW;
中2_1:昨低+( 昨高-昨低)/2,DOTLINE,COLORYELLOW;
下3_1:昨低+( 昨高-昨低)/3,DOTLINE,COLORYELLOW;

P:=1000;

涨停价:=ZTPRICE(REF(CLOSE,1),0.1);

跌停价:=DTPRICE(REF(CLOSE,1),0.1);

开板:=((HIGH>=涨停价) AND (CLOSE<涨停价));

涨停数:=COUNT((C>=涨停价) AND L!=C,P) NODRAW;

开板数:=COUNT(开板,P) NODRAW;

跌停数:=COUNT(C<=跌停价,P) NODRAW;

封板率:=ROUND((1-(开板数/(涨停数+开板数)))*100);

涨停:=C>=涨停价 AND L!=C;

多连板:=HHV(BARSLAST(NOT(涨停)),P);

股性分数:=ROUND(多连板*3+涨停数*2+开板数-跌停数+封板率);

DRAWTEXT_FIX(CLOSE>0,0.7,0.82,0,STRCAT(‘多连板：‘,CON2STR(多连板,0)))COLORRED;

DRAWTEXT_FIX(CLOSE>0,0.7,0.85,0,STRCAT(‘涨停数：‘,CON2STR(涨停数,0)))COLORRED;

DRAWTEXT_FIX(CLOSE>0,0.7,0.88,0,STRCAT(‘开板数：‘,CON2STR(开板数,0)))COLORRED;

DRAWTEXT_FIX(CLOSE>0,0.7,0.92,0,STRCAT(‘跌停数：‘,CON2STR(跌停数,0)))COLORRED;

DRAWTEXT_FIX(CLOSE>0,0.7,0.95,0,STRCAT(STRCAT(‘封板率：‘,CON2STR(封板率,0)),‘%‘))COLORRED;

DRAWTEXT_FIX(CLOSE>0,0.7,1,0,STRCAT(‘股性分：‘,CON2STR(股性分数,0)))COLORRED;

D1:=1;
AA1:=STRCAT(CON2STR(YEAR,0),‘年‘);
AA2:=STRCAT(CON2STR(MONTH,0),‘月‘);
AA3:=STRCAT(CON2STR(DAY,0),‘日‘);
AA4:=STRCAT(‘‘,IF(WEEKDAY=1,‘一‘,IF(WEEKDAY=2,‘二‘,IF(WEEKDAY=3,‘三‘,IF(WEEKDAY=4,‘四‘,IF(WEEKDAY=5,‘五‘,IF(WEEKDAY=6,‘六‘,‘日‘)))))));
AA5:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),‘‘);
AA6:=STRCAT(STRCAT(CON2STR(HOUR,0),‘小时‘),STRCAT(CON2STR(MINUTE,0),‘分钟‘));
AA7:=STRCAT(AA5,AA6);
DRAWTEXT_FIX(1,0.7,0.75,0,AA5),COLORWHITE;
DRAWTEXT_FIX(1,0.0,0.95,0,GNBLOCK),COLORCYAN;

KF:=(DYNAINFO(4)/DYNAINFO(3)-1)*100;

DRAWTEXT_FIX(KF>0,0.8,0.92,0,STRCAT(‘开盘涨幅：‘, CON2STR(KF,2))),COLORLIRED;
DRAWTEXT_FIX(KF<=0,0.8,0.92,0,STRCAT(‘开盘涨幅：‘, CON2STR(KF,2))),COLORGREEN;
DRAWTEXT_FIX(1,0.8,0.89,0,STRCAT(STRCAT(‘开盘金额：‘, CON2STR(DYNAINFO(15)/10000,0)),‘万‘)),COLORYELLOW;
DRAWTEXT_FIX(1,0.8,0.95,0,STRCAT(STRCAT(‘总金额：‘, CON2STR(DYNAINFO(10)/100000000,2)),‘亿‘)),COLORWHITE;
DRAWTEXT_FIX(1,0.8,0.76,0,STRCAT(‘开盘换手：‘, CON2STR(DYNAINFO(15)/OPEN/FINANCE(46)*100,2))),COLORYELLOW;
DRAWTEXT_FIX(1,0.8,0.99,0,STRCAT(‘总换手：‘, CON2STR(DYNAINFO(8)*100/CAPITAL,2))),COLORWHITE;
DRAWTEXT_FIX(1,0.8,0.82,0,STRCAT(‘封成比：‘, CON2STR(DYNAINFO(58)/DYNAINFO(8),2))),COLORYELLOW;
DRAWTEXT_FIX(1,0.8,0.85,0,STRCAT(STRCAT(‘封单额：‘, CON2STR(DYNAINFO(58)*C/1000000,2)),‘亿‘)),COLORWHITE;

封单量:=SUM(V,涨停);
封单额:=SUM(AMOUNT/10000,涨停);
DRAWNUMBER(涨停,C+0.5,封单量),COLORYELLOW;
{DRAWNUMBER(涨停,C-0.35,封单额),COLORYELLOW;}

涨停家数:"880006$C" NODRAW COLOR0000FF;
跌停家数:"880006$O" NODRAW COLOR00FF00;

合计:INSUM(HYBLOCK,‘引用‘,2,0),COLORWHITE,NODRAW;
IF(CURRBARSCOUNT<=CONST(FINDHIGHBARS(HIGH,1,10,1)+1),CONST(FINDHIGH(HIGH,1,10,1)),DRAWNULL),COLORYELLOW,LINETHICK1;
STICKLINE(C/REF(C,1)>1.095,C,O,0.3,0),COLORYELLOW;

{DRAWTEXT_FIX(1,0.28,0.0,0,‘所属板块:‘),COLORFF6000;}
{DRAWTEXT_FIX(ISLASTBAR,0.95,0.3,1,STRCAT(STRCAT(HYBLOCK,‘ ‘), STRCAT(STRCAT(DYBLOCK,‘ ‘),GNBLOCK))),COLORGREEN;}
DRAWTEXT_FIX(ISLASTBAR,0.3,0.2,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.42,0.2,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.3,0.25,0,GNBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.3,0.3,0,‘所属风格：‘)COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.35,0.3,0,FGBLOCK),COLORYELLOW;

SBL4 := STRCAT(‘ 55.自定义：‘, ZDBLOCK);

DRAWTEXT_FIX(1, 0.0, 0.0, 0, SBL4),COLORFF6000;

ZT:=ZTPRICE(CLOSE,0.1);
IF(ISLASTBAR,ZT,DRAWNULL),COLORYELLOW,LINETHICK3 ;

{达到过涨停板显示 既炸板}
STICKLINE(H>=1.095*REF(C,1),H,H*0.99,0.05,0 )COLORYELLOW;
STICKLINE(L<=0.905*REF(C,1),L,L*1.01,0.05,0 )COLORBLUE;

HH:=CONST(HHV(H,50));

LL:=CONST(LLV(L,50));{160可改成你惯锁定的日K线数}

HL1:=CONST(IF(CONST(REF(MA(C,5),5))>CONST((HH+LL)/2),0.73,0.02));

HL2:=CONST(IF(CONST(REF(MA(C,5),5))>CONST((HH+LL)/2),0.77,0.06));

HL3:=CONST(IF(CONST(REF(MA(C,5),5))>CONST((HH+LL)/2),0.81,0.10));

HL4:=CONST(IF(CONST(REF(MA(C,5),5))>CONST((HH+LL)/2),0.85,0.14));

HL5:=CONST(IF(CONST(REF(MA(C,5),5))>CONST((HH+LL)/2),0.89,0.18));

HL6:=CONST(IF(CONST(REF(MA(C,5),5))>CONST((HH+LL)/2),0.93,0.22));

HL7:=CONST(IF(CONST(REF(MA(C,5),5))>CONST((HH+LL)/2),0.97,0.26));

STICKLINE(C/REF(C,1)>1.095,C,O,0.1,0),COLORYELLOW;

DRAWTEXT_FIX (1,0.91,HL1,0,‘股本:‘);

DRAWNUMBER_FIX(1,0.96,HL1,0,CONST(FINANCE(1)/100000000));

DRAWTEXT_FIX (1,0.91,HL2,0,‘流通:‘);

DRAWNUMBER_FIX(1,0.96,HL2,0,CONST(FINANCE(7)/100000000));

{DRAWTEXT_FIX (1,0.91,HL3,0,‘动PE:‘);}

{DRAWNUMBER_FIX(1,0.96,HL3,0,CONST(DYNAINFO(39)));}

DRAWTEXT_FIX (1,0.91,HL4,0,‘换手:‘);

DRAWNUMBER_FIX(1,0.96,HL4,0,CONST(DYNAINFO(37)*100));

DRAWTEXT_FIX (1,0.91,HL5,0,‘量比:‘);

DRAWNUMBER_FIX(1,0.96,HL5,0,CONST(DYNAINFO(17)))COLORYELLOW;

DRAWTEXT_FIX (1,0.91,HL6,0,‘涨幅:‘);

DRAWNUMBER_FIX(1,0.96,HL6,0,CONST(DYNAINFO(14)*100)),COLORFF00FF;

DRAWNUMBER_FIX(1,0.96,HL6,0,IF(CONST(DYNAINFO(14)*100)<0,CONST(DYNAINFO(14)*100),DRAWNULL))COLOR00FF00;
DRAWTEXT_FIX (1,0.91,HL7,0,‘振幅:‘);
DRAWNUMBER_FIX(1,0.96,HL7,0,CONST(DYNAINFO(13)*100)),COLORFF00FF;