筹码集中度:=(COST(90+(100-90)/2)-COST((100-90)/2))/(COST(90+(100-90)/2)+COST((100-90)/2))+C;
超短筹:MA(expma(筹码集中度,10),3);
短筹:MA(EXPMA(筹码集中度,20),3),COLORBLUE;
中筹:MA(EXPMA(筹码集中度,60),3);
长筹:MA(EXPMA(筹码集中度,120),3);
DRAWBAND(中筹,RGB(0,100,0),长筹,RGB(0,100,0));
DRAWBAND(短筹,RGB(100,0,100),中筹,RGB(100,0,100));
DRAWBAND(超短筹,RGB(0,0,100),短筹,RGB(0,0,100));
DRAWKLINE(H,O,L,C);
{涨停变黄颜色}
STICKLINE(C>1.09*REF(C,1) AND C=H,C,O,2.5,0),COLORYELLOW;
{跌停变绿颜色}
STICKLINE(C<0.905*REF(C,1) AND C=L,C,O,2.5,0),COLORGREEN;
{炸板}
C22:=REF(C,1);
炸板:=IF((H-C22)*100/C22>=(10-0.01*100/C22),1,0);
涨停10:=IF((C-C22)*100/C22>=(10-0.01*100/C22),1,0);
IF(炸板 AND NOT(涨停10),H*1,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK1;
高价天数:topRANGE(C),COLORLIRED,NODRAW;
IF(高价天数>60,C*1,DRAWNULL),CIRCLEDOT,COLORGREEN,LINETHICK1;