/*欢迎使用同花顺公式系统*/
/*按“CTRL+S”启动AI，可输入需求描述生成相应代码*/
DRAWTEXT_FIX(1,0,0.78,0,'流通市值:'+TOSTRING(LTSZ/100000000,2)+'亿'),coloryellow;
IF CODELIKE('399')=0 AND CODELIKE('000001')=0 THEN DRAWTEXT_FIX(1,0,0.83,0,"行业:"+ " "+BLOCK(0,0)),coloryellow;
IF CODELIKE('399')=0 AND CODELIKE('000001')=0 THEN DRAWTEXT_FIX(1,0.1,0.83,0,"细分行业:"+ " "+BLOCK(1,0)),coloryellow;
IF CODELIKE('399')=0 AND CODELIKE('000001')=0 THEN DRAWTEXT_FIX(1,0.0,0.89,0,'题材概念:'+" "+BLOCK(3,18)),coloryellow;
上涨家数:=INDEXDATA("1A0002",&RISECOUNT) + INDEXDATA("399002",&RISECOUNT);
下跌家数:=INDEXDATA("1A0002",&FALLCOUNT) + INDEXDATA("399002",&FALLCOUNT);
DRAWTEXT_FIX(ISLASTBAR,0.9,0.15,1,"上涨家数："+TOSTRING(上涨家数,0)),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.99,0.15,1,"下跌家数："+TOSTRING(下跌家数,0)),colorgreen;
涨停:=INDEXDATA("1A0002",&RISELIMITCOUNT)+INDEXDATA("399006",&RISELIMITCOUNT);
跌停:=INDEXDATA("1A0002",&FALLLIMITCOUNT)+INDEXDATA("399006",&FALLLIMITCOUNT);
DRAWTEXT_FIX(ISLASTBAR,0.9,0.2,1,"涨停："+TOSTRING(涨停,0)),colorlired;
DRAWTEXT_FIX(ISLASTBAR,0.99,0.2,1,"跌停："+TOSTRING(跌停,0)),colorliblue;
S1:=BARSLAST(FORMATTIME(1)=1);
竞额:=REF(MONEYFS,S1)/10000;
DRAWTEXT_FIX(ISLASTBAR,0.99,0.25,1,"今竞额:"+TOSTRING(竞额,1)+'万'),colorwhite;
S2:=BARSLAST(DAY!=REF(DAY,1),1);
昨竞额:=REF(MONEYFS,S2)/10000+'万';
DRAWTEXT_FIX(ISLASTBAR,0.9,0.25,1,"昨竞额:"+TOSTRING(昨竞额,1)+'万'),colorwhite;
昨日成交量:=REF(VOL,1)/10000;
竞价量比:=竞额/昨竞额;
竞价占比:=竞额/昨日成交量*100;
DRAWTEXT_FIX(ISLASTBAR,0.9,0.3,1,"竞价量比:"+TOSTRING(竞价量比,1)),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.99,0.3,1,"竞价占比:"+TOSTRING(竞价占比,1)+'%'),coloryellow;
NEW1:=IF(ISNULL(NEW[1]),PRE,NEW[1]);
最新:IF(ISNULL(NEW),NEW1,NEW);
IF (ISNULL(RANGE_AVG_PRICE) OR RANGE_AVG_PRICE <= 0)
{  
IF((MARKETTYPE==16 OR MARKETTYPE==32)AND CODETYPE==0)
{
领先:(INDEXLEAD/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<100))
{
b=SUBSAMEDAY(&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)<10 AND TRADETIME>242),;
RGB(0,0,128);
RETURN;
hx_star;
hx_star_p;