新的主图公式
本帖最后由 抓timing 于 2026-7-11 13:04 编辑{说明：
1. 涨停基准BK：不再单独判断ST，ST主板统一为10%（与普通主板一致），科创板/创业板20%，北交所30%。
2. 行业显示：左上角显示“地域 + 一级→二级→三级行业 + 概念”完整路径。
3. 其他功能（钱袋子信号、涨停跌停颜色、跳空、假阴假阳、参考价等）均保留不变。
}
C22:=REF(C,1);
ZT:=IF((C-C22)*100/C22>=(10-0.01*100/C22),1,0);
LG:=TOPRANGE(VOL);
FZG:=H/REF(L,60)<1.6 AND H/REF(L,20)<1.5 AND H/REF(L,4)<1.3 AND H/REF(L,10)<1.5 AND COUNT(ZT,5)<=3 AND COUNT(ZT,50)<=5;
ZLC:=O/REF(C,1)>1.07 AND C<O AND LG>60 AND FZG;
BGY:=REF(ZT,1) AND O/REF(C,1)>1.01 AND C<O AND LG>60 AND FZG;
BGYY:=REF(ZT,1) AND H/REF(C,1)>1.07 AND C>O AND LG>100 AND FZG;
EBY:=O/REF(C,1)>1.01 AND C<O AND V<REF(V,1) AND REF(ZT,1) AND FZG;
HF:=C=H AND C/REF(C,1)>1.095 AND C=O AND L<C;
TZBS31:= REF(HF,1) AND V <= 0.7*REF(V,1);
BGS31:= REF(V=HHV(V,100),1) AND REF(C,1) > REF(C,2) AND V <= 0.7*REF(V,1);
BBZTS31:= REF(ZT,2) AND REF(V,2) >= 2* REF(V,3) AND REF(ZT,1) AND REF(V,1) >= 2* REF(V,2) ANDREF(V=HHV(V,60),1) AND V <= 0.7*REF(V,1);
BLZT:= REF(ZT,1) AND REF(V,1) >= REF(V,2)*2 AND REF(V=HHV(V,30),1) ANDV<= 0.5*REF(V,1);
ZTBGS31:= REF(ZT,2) AND REF(V=HHV(V,100),1) AND V <= 0.7*REF(V,1);
DRAWICON(ZTBGS31 OR BBZTS31 OR BGS31 OR TZBS31 OR HF OR ZLC OR BGY OR BGYY OR EBY OR BLZT,H*1.015,9),COLORRED;{钱袋子}
{========== 修改处：行业显示为三级细分 + 概念 ==========}
所属板块:=STRCAT(STRCAT('【地域】：',DYBLOCK),
STRCAT('【一级】：',STRCAT(LEVEL1HYBLOCK,
STRCAT('【二级】：',STRCAT(HYBLOCK,
STRCAT('【三级】：',STRCAT(MOREHYBLOCK,
STRCAT('【概念】：',GNBLOCK))))))));
DRAWTEXT_FIX(O>0,0.00,0.01,0,所属板块),COLORYELLOW;
{======================================================}
均价:AMOUNT/VOL/100,NODRAW,COLORYELLOW;
{========== 修改处：涨停基准BK（去掉ST特殊处理） ==========}
BK:=IF(INBLOCK('北证A股'),0.3,
IF(INBLOCK('科创板'),0.2,
IF(INBLOCK('创业板'),0.2,0.1)));
{====================================================}
XA_1:=IF(DATE<=1200823,1,1);
旧涨停:=(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H) AND XA_1=1;
旧跌停:=(C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L) AND XA_1=1;
涨停:=C>=ZTPRICE(REF(C,1),BK) AND C=H;
跌停:=C<=DTPRICE(REF(C,1),BK) AND C=L;
曾涨停:=(H>=ZTPRICE(REF(C,1)*0.988,BK) AND C<H) OR (H>=ZTPRICE(REF(CLOSE,1),0.1) AND C<H AND XA_1=1);
曾跌停:=(L<=DTPRICE(REF(C,1)*0.988,BK) AND C>L) OR (L<=DTPRICE(REF(CLOSE,1),0.1) AND C>L AND XA_1=1);
STICKLINE(旧涨停 AND PERIOD=5,O,C,2,0),COLORMAGENTA;
STICKLINE(旧跌停 AND PERIOD=5,O,C,3,0),COLOR808000;
STICKLINE(涨停 AND PERIOD=5,C,O,2,0),COLORMAGENTA;
STICKLINE(跌停 AND PERIOD=5,C,O,3,0),COLOR808000;
STICKLINE(曾涨停 AND PERIOD=5,H,C,0.1,0),COLORMAGENTA;{涨停后回落}
STICKLINE(曾跌停 AND PERIOD=5,L,C,0.1,0),COLOR808000;{跌停后回升};
假阴:=C<O AND C>REF(C,1);
STICKLINE(假阴,O,C,0.4,0),COLORMAGENTA;{假阴柱};
假阳:=C>O AND C<REF(C,1);
STICKLINE(假阳,O,C,0.4,0),COLORCYAN;{假阳柱};
向上跳空:=MIN(C,O)>REF(MAX(C,O),1);
北证涨停参考:C*1.3,NODRAW;
创科涨停参考:C*1.2,NODRAW;
明日涨停参考:C*1.1,NODRAW;
虚31:MAX(H,L)-(H-L)/3,NODRAW;
虚21:(L+H)/2,NODRAW,COLORYELLOW;
虚32:MIN(H,L)+(H-L)/3,NODRAW;
三一:MAX(O,C)-ABS(O-C)/3,NODRAW;
二一:(O+C)/2,NODRAW;
三二:MIN(O,C)+ABS(O-C)/3,NODRAW;
一字板:=L=H AND (C+0.005-REF(C,1))/REF(C,1)*100>=10;
STICKLINE(一字板,REF(C,1),C,2.8,-1),COLORRED;
STICKLINE(向上跳空=1,O,C,0.3,0),COLORYELLOW;
AA11:= (REF(C,1)+REF(C,2)+REF(C,3))/3 > MAX(O,C);
高于实顶: IF(AA11,1,0), NODRAW, COLORYCYAN;
FLAG:=ABS(C-O)/IF((H-L) = 0,100,H-L);
ZHANGF:=ABS(C-O)/O;
WEI21:IF(CODELIKE('9999'),(H-L)*0.5+L,IF(C>O,(C-O)*0.5+O,(O-C)*0.5+C)),NODRAW,COLORFF00FF;
STICKLINE(ZHANGF>=0.03 && FLAG >= 0.03,WEI21,WEI21,-1,0),COLORRED;{21位}
最高:DYNAINFO(5)NODRAW,COLORRED;
最低:DYNAINFO(6)NODRAW,COLORGREEN;
DRAWTEXT_FIX(1,0.00,0.035,0,'同花顺概念：');
DRAWTEXT_FIX(1,0.035,0.035,0,EXTERNSTR(0,1));
风格:=STRCAT('风格：',FGBLOCK);
DRAWTEXT_FIX(O>0,0.0,0.06,0,风格);
DRAWTEXT_FIX(1,0.75,0,0,'涨停原因：');
DRAWTEXT_FIX(1,0.78,0,0,EXTERNSTR(0,2));
开盘金额:=DYNAINFO(15);
开盘金额STR:=STRCAT(CON2STR(开盘金额/10000,0),' 万');
DRAWTEXT_FIX(ISLASTBAR,0.80,0.99,0,STRCAT('开盘金额:',开盘金额STR));
成交额STR:=STRCAT(VAR2STR(AMOUNT/100000000,2),'亿');
DRAWTEXT_FIX(ISLASTBAR,0.95,1,0,STRCAT('成交额:',成交额STR));
自由流通市值STR:=STRCAT(CON2STR(C*FINANCE(46)/100000000,2),' 亿');
DRAWTEXT_FIX(ISLASTBAR,0.88,1,0,STRCAT('自由流通市值:',自由流通市值STR));
页:
[1]