分时走势图

/*欢迎使用同花顺 公式系统*//*按“CTRL+S”启动AI，可输入需求描述生成相应代码*/S1:=BARSLAST(FORMATTIME(1)=1);JE:=REF(MONEYFS,S1);ZF:=(REF(NEW,S1)-PRE)/PRE*100;JZ=REF(V,S1)/REF(V,S1+1)*100;ZE=REF(MONEY,S1+1);DRAWTEXT_FIX(1,0.01,0.74,0,"概念:"+BLOCK(3,15)),colorcyan;DRAWTEXT_FIX(1,0.01,0.92,0,"行业:"+BLOCK(0,00)+" "+BLOCK(1,0)+" "+BLOCK(2,0)),colormagenta;

DRAWTEXT_FIX(ISLASTBAR,0.12,0.17,35,"1分额:"+TOSTRING(MONEYFS/10000,1)+‘万‘),colormagenta;DRAWTEXT_FIX(ISLASTBAR,0.76,0.02,0,"成 交 金 额:"+TOSTRING(MONEY/100000000,2)+‘亿‘),colorgreen;DRAWTEXT_FIX(ISLASTBAR,0.76,0.10,0,"实际流通值:"+TOSTRING(NEW*ZYLTGB/100000000,1)+‘亿‘),colorred;DRAWTEXT_FIX(ISLASTBAR,0.76,0.28,0,"实际换手率:"+TOSTRING(V/ZYLTGB*100,2)+"%"),coloryellow;DRAWTEXT_FIX(ISLASTBAR,0.76,0.33,0,"开盘涨跌幅:"+TOSTRING(ZF,2)+‘%‘),coloryellow;
market = IF(STRLEFT(CODE, 2) == 60, "主板", "其他");market = IF(STRLEFT(CODE, 2) == 00 AND market == "其他", "主板", market);market = IF(STRLEFT(CODE, 2) == 30 AND market == "其他", "创业板", market);market = IF(STRLEFT(CODE, 2) == 68 AND market == "其他", "科创版", market);market = IF(STRLEFT(CODE, 2) == 87 OR STRLEFT(CODE, 2) == 83 OR STRLEFT(CODE, 2) == 43 OR STRLEFT(CODE, 2) == 92 AND market == "其他", "北交所", market);is_ST = IF(STRLEFT(ZQMC, 2) == "ST" OR STRLEFT(ZQMC, 3) == "*ST" OR STRLEFT(ZQMC, 5) == "XD*ST", TRUE, FALSE);
rate = IF(market=="主板" AND is_ST==FALSE, 1.1, 9999);rate = IF(market=="主板" AND is_ST==TRUE, 1.05, rate);rate = IF(market=="创业板", 1.2, rate);rate = IF(market=="科创版", 1.2, rate);rate = IF(market=="北交所", 1.3, rate);max_price = PRE * rate * 100;max_price = IF(max_price - FLOOR(max_price) ＜ 0.5, FLOOR(max_price), CEIL(max_price));max_price = max_price / 100;

涨停成交额:=SUM(IF(NEW=max_price,MONEYFS/10000,0),FROMOPEN+1);非涨停成交额:=SUM(IF(NEW＜max_price,MONEYFS/10000,0),FROMOPEN+1);DRAWTEXT_FIX(ISLASTBAR OR FORMATTIME(1)＞=238,0.76,0.45,0,‘涨停成交额：‘+TOSTRING(涨停成交额/10000,2)+‘亿‘),colorred; DRAWTEXT_FIX(ISLASTBAR OR FORMATTIME(1)＞=238,0.76,0.51,0,‘非涨停成交额：‘+TOSTRING(非涨停成交额/10000,2)+‘亿‘),colorgreen;

上涨家数:=INDEXDATA("1A0002",&RISECOUNT) + INDEXDATA("399002",&RISECOUNT);下跌家数:=INDEXDATA("1A0002",&FALLCOUNT) + INDEXDATA("399002",&FALLCOUNT);DRAWTEXT_FIX(ISLASTBAR,0.4,0.99,0,"上涨数："+TOSTRING(上涨家数,0)),colorred;DRAWTEXT_FIX(ISLASTBAR,0.6,0.99,0,"："+TOSTRING(下跌家数,0)),colorgreen;涨停家数:=INDEXDATA("1A0002",&RISELIMITCOUNT) + INDEXDATA("399002",&RISELIMITCOUNT);跌停家数:=INDEXDATA("1A0002",&FALLLIMITCOUNT) + INDEXDATA("399002",&FALLLIMITCOUNT);DRAWTEXT_FIX(ISLASTBAR,0.75,0.99,0,"涨跌："+TOSTRING(涨停家数,0)),colorred;DRAWTEXT_FIX(ISLASTBAR,0.87,0.99,0,": "+TOSTRING(跌停家数,0)),colorgreen;
JJX:=TOSTRING((MONEY/VOL-PRE)/PRE*100,2)+‘%‘;DRAWNUMBER(ISLASTBAR,MONEY/VOL,JJX),coloryellow;ZF:=TOSTRING((NEW-PRE)/PRE*100,2)+‘%‘;DRAWNUMBER(ISLASTBAR,NEW,ZF),colorlired;
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;}
RETURN;

hx_star;hx_star_p;