那我分享个
同花顺的,能看概念,行业,流通市值,竞价金额
S1:=BARSLAST(
FORM AT
TIME (1)=1);
竞额:=REF(M
ONEY FS,S1)/10000;
DRAWTEXT_FIX(1,0.03,0.11,0,"概念:"+ BLOCK(3,15)),colorcyan;
DRAWTEXT_FIX(1,0.10,0.75,0,"行业:"+ BLOCK(0,0)+"__"+BLOCK(1,0)+"__"+BLOCK(2,0)),colormagenta;
DRAWTEXT_FIX(1,0.10,0.85,0,"流通市值:" + T
OSTR ING(LTSZ/100000000,1) + "亿"),coloryellow;
DRAWTEXT_FIX(1,0.10,0.95,0,"竞价金额:"+
TOST RING (竞额,0) + "万" ),coloryellow;
NEW1:=IF(ISNULL(NEW[1]) OR FORMATTIME(1)最新:IF(ISNULL(NEW),NEW1,NEW);
IF (ISNULL(
RANG E_AVG_P
RICE ) OR RANGE_AVG_PRICE {
IF((
MARK ET
TYPE ==16 OR MARKETTYPE==32)AND CODETYPE==0)
{
领先:(
INDE X
LEAD /10000 + 1)*PRE;
}
ELSE IF (MARKETTYPE == 232 OR MARKETTYPE == 56 OR MARKETTYPE==64 OR MARKETTYPE==128 OR MARKETTYPE == 80 OR MARKETTYPE==88 OR (VOL > 1 AND VOL {
b=
SUBS AMED AY(&VOL) ;
m=SUM(b*最新,0);
均价:IF(m>0,m/VOL,PRE);
}
ELSE IF(CODETYPE!=0 AND MONEY>0 AND MARKETTYPE != 48 AND MARKETTYPE != 104)
{
IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0)
均价:IF(ISNULL(均价[1]),PRE,均价[1]);
ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1])
均价:均价[1];
ELSE
均价:MONEY/VOL;
}
ELSE IF (MARKETTYPE == 176)
{
b=SUBSAMEDAY(&MONEY);
m=SUM(b*最新,0);
IF(m>0)
均价:m/MONEY;
}
}
ELSE
{
均价:RANGE_AVG_PRICE;
}
DRAWGBK(MARKETTYPE==32 AND FORMATTIME(1)242,RGB(0,0,128));
RE
TURN ;
hx_star;
hx_star_p;