目前统计时间为250天也就相当于一年时间!统计的涨停数据为非一字板(毕竟一字板买不进就是耍流氓)
其中涨停价的参考主要是玄学问题,比如说封板价为对子顶?这种就要思考下再做。封板率不能小于30%,板块人气值为当日资金大幅度流入的数据,肯定是越大越好,至于最后一排的数据,对首板有用!毕竟次日高开概率小于0的板没有打的意义!
{涨停定义跟当日涨今日跌停价格}
P:=250;
TM:=1200823;
今日涨停价:IF(DATE<TM,ZTPRICE(REF(C,1),IF(CODELIKE('68'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(CODELIKE('68') OR CODELIKE('30'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;
今日跌停价:IF(DATE<TM,DTPRICE(REF(C,1),IF(CODELIKE('68'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(CODELIKE('68') OR CODELIKE('30'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORGREEN;
明涨停:IF(DATE<TM,C*IF(CODELIKE('68'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(IF(CODELIKE('68') OR CODELIKE('30'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)))),NODRAW,COLORLIMAGENTA;
明跌停:IF(DATE<TM,C*IF(CODELIKE('68'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(IF(CODELIKE('68') OR CODELIKE('30'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)))),NODRAW,COLORFF00FF;
{统计数据P为自定义}
开板:=((HIGH>=今日涨停价) AND (CLOSE<今日涨停价));
涨停数:=COUNT((C>=今日涨停价) AND L!=C,P) NODRAW;
开板数:=COUNT(开板,P) NODRAW;
跌停数:=COUNT(C<=今日跌停价,P) NODRAW;
封板率:=(1-(开板数/(涨停数+开板数)))*100;
涨停:=C>=今日涨停价;
最高连板:=HHV(BARSLAST(NOT(涨停)),P);
{概率计算}
DRAWTEXT_FIX(1,0.0,0.1,0,STRCAT('封板率:',STRCAT(VAR2STR(封板率,0),'%'))),COLORFF00FF;
DRAWTEXT_FIX(1,0.3,0.1,0,STRCAT('年度涨停数:',STRCAT(VAR2STR(涨停数,0),'次'))),COLORFF00FF;
DRAWTEXT_FIX(1,0.55,0.1,0,STRCAT('年度跌停数:',STRCAT(VAR2STR(跌停数,0),'次'))),COLORFF00FF;
DRAWTEXT_FIX(1,0.8,0.1,0,STRCAT('最高连板数:',STRCAT(VAR2STR(最高连板,0),'次'))),COLORFF00FF;
{============股性评分===========}
股性分数:=最高连板+涨停数+开板数-跌停数+封板率;
DRAWTEXT_FIX(1,0,0.45,0,STRCAT('股性分:',STRCAT(VAR2STR(股性分数,0),'分'))),COLORFF00FF;
{================板块人气+板块涨幅=============}
BKRQ:=HY_INDEXADV/(HY_INDEXADV+HY_INDEXDEC)*100;
BKZF:=HY_INDEXC/REF(HY_INDEXC,1)*100-100,NODRAW;
DRAWTEXT_FIX(1,0.3,0.45,0,STRCAT('板块人气:',STRCAT(VAR2STR(BKRQ,0),'分'))),COLORFF00FF;
DRAWTEXT_FIX(1,0.6,0.45,0,STRCAT('板块涨幅:',STRCAT(VAR2STR(BKZF,2),'%'))),COLOR80FF80;
{====================次日平均涨幅===========================}
涨停次日收:=IF(REF(C>=今日涨停价 AND L!=C,1), (C/REF(C,1)-1),0);{统计的非一字板}
TTJ:=IF(涨停次日收,1,0);
TTJ1:=SUM(涨停次日收,P);
TTJ2:=SUM(TTJ,P);
CRPJ:=TTJ1/TTJ2*100 NODRAW;
DRAWTEXT_FIX(1,0.48,0.8,0,STRCAT('涨停次日平均涨幅:',STRCAT(VAR2STR(CRPJ,0),'%'))),COLORFF00FF;
{==================次日平均开幅度==============}
涨停次日开:=IF(REF(C>=今日涨停价 AND L!=C,1), O/REF(C,1)-1,0);
TTJ3:=IF(涨停次日开,1,0);
TTJ4:=SUM(涨停次日开,P);
TTJ5:=SUM(TTJ3,P);
CRPK:=TTJ4/TTJ5*100 NODRAW;
DRAWTEXT_FIX(1,0.86,0.8,0,STRCAT('涨停次日平均开幅:',STRCAT(VAR2STR(CRPK,0),'%'))),COLORFF00FF;
{==============涨停次日高开概率============}
FYZ:=C>=今日涨停价 AND L!=C;
GK:=REF(FYZ,1) AND O>REF(C,1);
QT:=REF(FYZ,1) AND O<=REF(C,1);
GTJ:=COUNT(GK,250);
QTJ:=COUNT(QT,250);
GK率:=100*GTJ/(GTJ+QTJ);
DRAWTEXT_FIX(1,0,0.8,0,STRCAT('涨停次日高开概率:',STRCAT(VAR2STR(GK率,0),'%'))),COLORFF00FF;