使用方法:
买点是:只做上升趋势的票,当粉色移动平均线呈上升趋势的时候,黄色线每次上穿白色线时都是买点;
卖点
1是:股价与黄色线乖离过大,2是黄色线拐头向下时,3是股价跌破黄色线时,
只要符合这3个条件中的任意一条都是卖点。
指标左上角添加十大流通股东占比,并在当日K线的右下方添加所属行业。
ZTBZ:=IF( CODELIKE('688') OR (CODELIKE('300') AND DATE>=1200824),19.5,9.5);{定义300和科创板涨幅}
非停:=(C-REF(C,1))/REF(C,1)*100<ZTBZ;
涨停:=(C-REF(C,1))/REF(C,1)*100>=ZTBZ AND C=H;
触板:=(H-REF(C,1))/REF(C,1)*100>ZTBZ AND C<H;
过滤科创:=IF(CODELIKE('688'),0,1);
{排除ST}
去ST:=DYNAINFO(4) AND EXIST(ABS(C/REF(C,1)-1)>0.055,100);
{去掉今日停牌}
JB:=DYNAINFO(8)>0;
ZF:=100*(CLOSE/REF(CLOSE,1)-1);
AAA:=IF(EXIST(ZF>5.5 OR ZF<-5.5,120),1.1,1.05);
ZT:=IF(CURRBARSCOUNT=1 AND PERIOD=5,REF(CLOSE,1)*AAA,REF(CLOSE,1)*AAA);
涨停价:=IF(CURRBARSCOUNT<10+1,REFDATE(ZT,DATE),DRAWNULL);
CA3:=REF(C,1);
DF:=IF((CA3-C)*100/CA3>=(10-0.01*100/CA3),1,0);
AD:=IF(EXIST(DF>5.5 OR DF<-5.5,120),0.5,0.90);
ZTD:=IF(CURRBARSCOUNT=1 AND PERIOD=5,REF(CLOSE,1)*AD,REF(CLOSE,1)*AD);
跌停价:=IF(CURRBARSCOUNT<10+1 ,REFDATE(ZTD,DATE),DRAWNULL);
{STICKLINE(CURRBARSCOUNT=1 AND 去ST AND JB,涨停价,H,3,-1),COLOR00C0C0;
STICKLINE(CURRBARSCOUNT=1 AND 去ST AND JB AND C/REF(C,1)<0.96,L,涨停价,3,-1),COLOR00C0C0};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
{N2:=2;
BOLL:=MA(CLOSE,10),COLORBLUE,LINETHICK4;
UB:BOLL+N2*STD(CLOSE,10),COLORYELLOW,LINETHICK1,POINTDOT;
LB:BOLL-N2*STD(CLOSE,10),COLORYELLOW,LINETHICK1,POINTDOT};
MA05:IF(PERIOD=5,MA(C,5),DRAWNULL),COLORYELLOW ;{表示5日均线,可以自己把等于号去掉就显示了,如下雷同}
MA10:IF(PERIOD=5,MA(C,10),DRAWNULL),COLORWHITE;
MA30:=IF(PERIOD=5,MA(C,30),DRAWNULL),COLORWHITE;
MA60:=IF(PERIOD=5,MA(C,60),DRAWNULL),COLORBLUE;
MA90:IF(PERIOD=5,MA(C,90),DRAWNULL),COLORFF00FF;
MA120:=IF(PERIOD=5,MA(C,120),DRAWNULL),COLORBLUE;
MA250:=IF(PERIOD=5,MA(C,250),DRAWNULL),COLORGREEN;
HSL:=100*VOL/(FINANCE(7)/100);
AA:=HSL>REF(HSL,1)*1.85;
AA2:=HSL<REF(LLV(HSL,55),1);
STICKLINE(AA AND C>O,O,C,2,0),COLORRED;
STICKLINE(AA2,MIN(C,O),(C+O)/2,2,0),COLORLIRED ;{严重缩量 从K线实体底部往实体中间画淡红色}
STICKLINE((C-REF(C,1))/REF(C,1)>0.0731 AND C>O AND HSL<REF(HSL,1)*1.01,O,(C+O)/2,2,0),COLORMAGENTA;{缩量大阳线,开盘价往中间画淡粉色实体柱}
STICKLINE((C-REF(C,1))/REF(C,1)>0.0731 AND C>O,(C+O)/2,C,2,0),COLORRED;{大阳线7.3%以上,则中间往上画红柱}
STICKLINE(AA AND C>REF(C,1) AND C<O,C,(C+O)/2,2,0),COLORBLUE;
STICKLINE(AA AND C<REF(C,1),C,(C+O)/2,2,0),COLOR3232CD;{放倍量下跌}
STICKLINE(PERIOD=5 AND C>REF(C,1) AND 100*WINNER(C)-REF(100*WINNER(C),1)>=29.19,MAX(C,O)-ABS(C-O)*(WINNER(C)-REF(WINNER(C),1)),MAX(C,O),2,0),COLORFF00FF;
STICKLINE(PERIOD=5 AND FINANCE(7)>REF(FINANCE(7),1),H*1.005,H*1.005+(FINANCE(7)-REF(FINANCE(7),1))/REF(FINANCE(7),1)*ABS(C-O),-1,-1),COLORBLUE;
STICKLINE(PERIOD=5 AND FINANCE(7)<REF(FINANCE(7),1),L*0.999+(FINANCE(7)-REF(FINANCE(7),1))/REF(FINANCE(7),1)*ABS(C-O),L*0.999,-1,-1),COLORBLUE;
STICKLINE(涨停 ,C-(C-O)/8,C,2,0),COLORYELLOW;{涨停 K线顶部的1/8处往顶端画黄色}
加码价:=((C-REF(MA(C,18),1))/18+MA(C,18))*1.004;
加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);
STICKLINE(加码条件,O,O+(C-O)/6,2,0),COLORYELLOW;
MA1:=MA(C,5);
MA2:=MA(C,10);
MA3:=MA(C,20);
P1:=ABS(MA1-MA2)+ABS(MA2-MA3);
B1:=HHV(HIGH,250);B2:=LLV(LOW,250);B3:=B1-B2;
DRAWICON( PERIOD=5 AND COST(10)/(COST(80)-COST(10))<10 AND P1/C<20/100 AND ( COST(85) - COST(15))/( COST(85)+COST(15))/2<0.033 AND C>COST(70)
AND MA2>MA3 AND MA(C,20)>MA(C,55) AND (ABS(REF(MA(CLOSE,240),55)-MA(CLOSE,240))/55<0.0123 ) AND C/MA(C,20)<1.12 AND L/MA(C,30)<1.05 ,L*0.995,5);
W05:=(5*C+4*REF(C,1)+3*REF(C,2)+2*REF(C,3)+REF(C,4))/15,COLORAAAAAA;
HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6;
多空线:=(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)
+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)
+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+
REF(HHJSJDA,20))/210,COLORAAAAFF;
DRAWTEXT(CURRBARSCOUNT=2,(C+O)/2,EXTERNSTR(0,9995))COLORYELLOW;{ST特殊提示};
大宗金额:=INTPART(TDXDLL1(1,DATE,9989,STR2CON(CODE))),COLORYELLOW,NODRAW;
DRAWTEXT(TDXDLL1(1,DATE,9990,STR2CON(CODE))>=0,L*0.989,VARCAT('宗',VAR2STR(大宗金额,0))),COLORYELLOW; {溢价大宗交易}
DRAWTEXT(TDXDLL1(1,DATE,9990,STR2CON(CODE))<0,L*0.989,VARCAT('宗',VAR2STR(大宗金额,0))),COLORGREEN; {折价大宗交易}
DRAWTEXT(CURRBARSCOUNT=1,(MIN(C,O)+L)/2*0.985,EXTERNSTR(0,9997)); { 涨停原因}
DRAWTEXT(CURRBARSCOUNT=1,(MIN(C,O)+L)/2*0.965,EXTERNSTR(0,9885))COLORFF00FF; {选股宝 涨停原因}
DRAWTEXT_FIX(1,0.02,0.05,0,'板块:')COLOR0000FF;
DRAWTEXT_FIX(1,0.06,0.05,0,STRCAT(STRCAT(STRCAT(STRCAT(HYBLOCK,'_____'),GNBLOCK),'__'),DYBLOCK))COLOR0000FF; {板块信息}
DRAWTEXT_FIX(1,0.02,0.10,0,'同花:')COLORLIGREEN; {同花顺}
DRAWTEXT_FIX(1,0.06,0.10,0,EXTERNSTR(0,9886))COLORLIGREEN;
DRAWTEXT_FIX(1,0.02,0.15,0,'主营:')COLORFF00FF;
DRAWTEXT_FIX(1,0.06,0.15,0,EXTERNSTR(0,9996))COLORFF00FF; {上市公司主营}
DRAWTEXT_FIX(1,0.02,0.20,0,'涨停:')COLOR0000FF;
DRAWTEXT_FIX(1,0.06,0.25,0,EXTERNSTR(0,9885))COLORFF00FF;{最近涨停信息:对应板块的信息}
DRAWTEXT_FIX(1,0.06,0.20,0,STRCAT(STRCAT(STRCAT(STRCAT(EXTERNSTR(0,9882),'首封时间__'),EXTERNSTR(0,9883)),'末封时间______'),EXTERNSTR(0,9884)))COLORRED; {最近涨停信息:包括首次涨停,最后涨停和个股对应新闻}
商誉:=FINVALUE(35)/100000000 NODRAW;
商誉占净资产率:=FINVALUE(35)/FINVALUE(72)*100 NODRAW;
DRAWTEXT_FIX(1,0.02,0.30,0,'商誉:')COLORFF00FF;
DRAWTEXT_FIX(1,0.06,0.30,0,STRCAT(STRCAT(VAR2STR(商誉,2),' 亿,占比资产率:'),VAR2STR(商誉占净资产率,2)))COLORFF00FF;{商誉信息,需要下载通达信自带的专业财务数据}
十大流通占比:=FINONE(244,0,0)/CAPITAL NODRAW;
DRAWTEXT_FIX(1,0.02,0,0,'十大流通股东占比:')COLORLIGREEN;
DRAWTEXT_FIX(1,0.12,0,0,VARCAT(VARCAT(VARCAT(VARCAT(VAR2STR(十大流通占比,2),'%__自由市值__'),VAR2STR(C*FINANCE(46)/100000000,2)),'__流通__'),VAR2STR(C*CAPITAL/1000000,2)))COLORYELLOW;
DRAWTEXT_FIX(1,0.02,0.40,0,'游资:')COLOR0000FF;
DRAWTEXT_FIX(1,0.06,0.40,0,EXTERNSTR(0,9701))COLOR0000FF; {游资协战席位}
DRAWTEXT_FIX(1,0.02,0.45,0,' ')COLOR0000FF; {未来三个月内有解禁}
DRAWTEXT_FIX(1,0.06,0.45,0,EXTERNSTR(0,901))COLOR0000FF;
DRAWTEXT(TDXDLL1(1,DATE,9001,999999)>0,L-0.04,'盘'),COLORRED; {大盘异动标准大于1.5}
DRAWTEXT(TDXDLL1(1,DATE,9001,999999)<0,L-0.04,'盘'),COLORGREEN;
DRAWTEXT(TDXDLL1(1,DATE,9999,STR2CON(CODE))>0,H*1.011,'↙涨'),COLORRED; {竞价涨停}
DRAWTEXT(TDXDLL1(1,DATE,9999,STR2CON(CODE))<0,H*1.011,'↙跌'),COLORLIGREEN; {竞价跌停}
DRAWTEXT(TDXDLL1(1,DATE,9991,STR2CON(CODE))=1,H*1.012,'增'),COLORFF00FF; {增持}
DRAWTEXT(TDXDLL1(1,DATE,9991,STR2CON(CODE))=-1,L*0.990,'减'),COLORGREEN; {减持}
DRAWICON(触板,H*1.025,43);{炸板表示一个空字样 TDXDLL1(1,DATE,9002,STR2CON(CODE))=0};
STRLONGHU:=TDXDLL1(1,DATE,9888,STR2CON(CODE))NODRAW;{当日龙虎榜净额}
DRAWNUMBER(STRLONGHU>0,(O+C)/2,INTPART(STRLONGHU))COLORYELLOW;{黄色为流入}
DRAWNUMBER(STRLONGHU<0,(O+C)/2,INTPART(STRLONGHU))COLORWHITE;{白色为流出}
STRLONGHU3WZ:=IF(MAX(C,O)/MIN(C,O)<1.02 AND C/REF(C,1)>1.0975,C*0.98,MIN(C,O)-(MIN(C,O)-L)/2)NODRAW;
STRLONGHU3:=TDXDLL1(1,DATE,9889,STR2CON(CODE))NODRAW;{三天龙虎榜净额}
DRAWNUMBER(STRLONGHU3>0,STRLONGHU3WZ,INTPART(STRLONGHU3))COLORYELLOW;{ 三天黄色为流入}
DRAWNUMBER(STRLONGHU3<0,STRLONGHU3WZ,INTPART(STRLONGHU3))COLORWHITE;{ 三天白色为流出};
STRINFO:=IF(MAX(C,O)/MIN(C,O)<1.04,(O+C)/2+(MAX(C,O)-L)/2,(O+C)/2+((MAX(C,O)-(O+C)/2))/2)NODRAW;{龙虎榜成交占比}
STRINFONEW:=IF(C=O AND C/REF(C,1)>1.0981,C*1.02,STRINFO)NODRAW;
DRAWNUMBER(STRLONGHU>0,STRINFONEW,ROUND2(STRLONGHU/(AMOUNT/10000)*100,2))COLORYELLOW;
DRAWNUMBER(STRLONGHU<0,STRINFONEW,ROUND2(STRLONGHU/(AMOUNT/10000)*100,2))COLORWHITE;
DRAWTEXT(TDXDLL1(1,DATE,9992,STR2CON(CODE))=1 AND TDXDLL1(1,DATE,9991,STR2CON(CODE))<>1,H*1.020,'拟'),COLORFF00FF; {拟增持}
DRAWTEXT(TDXDLL1(1,DATE,9992,STR2CON(CODE))=-1 AND TDXDLL1(1,DATE,9991,STR2CON(CODE))<>-1,L*0.980,'拟'),COLORGREEN; {拟减持}
DRAWTEXT(TDXDLL1(1,DATE,9995,STR2CON(CODE))=0,L*0.970,'重'),COLORFF00FF; {重组进展相关信息 显示重字样}
DRAWTEXT(TDXDLL1(1,DATE,9886,STR2CON(CODE))=0,L*0.960,'权'),COLORFF00FF; {股权变更转让相关信息 显示权字样}
DRAWNUMBER(TDXDLL1(1,DATE,9887,STR2CON(CODE))>=0,(MIN(C,O)+L)/2*0.965,TDXDLL1(1,DATE,9887,STR2CON(CODE)) )COLORYELLOW;{涨停打开次数位于涨停板下影线下方,0为未打开};
X_A1:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
逃命顶:=X_A1>20 AND FILTER(X_A1<REF(X_A1,1),5),COLORYELLOW;
DRAWTEXT(FILTER(逃命顶,3),MAX(C,O),'逃命顶')COLORCYAN;
DRAWTEXT_FIX(1,0.980,20,1,'★分析家公式网'),COLORYELLOW;
DRAWTEXT(TDXDLL1(1,DATE,9990,STR2CON(CODE))>=0,L*0.989,'宗'),COLORYELLOW; {溢价大宗交易}
DRAWTEXT(TDXDLL1(1,DATE,9990,STR2CON(CODE))<0,L*0.989,'宗'),COLORLIGREEN; {折价大宗交易}
DRAWTEXT(CURRBARSCOUNT=1,(MIN(C,O)+L)/2*0.995,EXTERNSTR(0,9997)); { 涨停原因}
{DRAWTEXT_FIX(1,0.35,0.05,0,'板块:')COLOR0000FF;
DRAWTEXT_FIX(1,0.39,0.05,0,STRCAT(STRCAT(STRCAT(STRCAT(HYBLOCK,'_____'),GNBLOCK),'__'),DYBLOCK))COLOR0000FF; {板块信息}
{DRAWTEXT_FIX(1,0.35,0.10,0,'同花:')COLORLIGREEN; {同花顺}
{DRAWTEXT_FIX(1,0.39,0.10,0,EXTERNSTR(0,9886))COLORLIGREEN;
DRAWTEXT_FIX(1,0.35,0.15,0,'主营:')COLORFF00FF;
DRAWTEXT_FIX(1,0.39,0.15,0,EXTERNSTR(0,9996))COLORFF00FF; {上市公司主营}
{DRAWTEXT_FIX(1,0.35,0.20,0,'涨停:')COLOR0000FF;
DRAWTEXT_FIX(1,0.39,0.20,0,STRCAT(STRCAT(STRCAT(STRCAT(EXTERNSTR(0,9882),'首封时间__'),EXTERNSTR(0,9883)),'末封时间______'),EXTERNSTR(0,9884)))COLORRED; {最近涨停信息:包括首次涨停,最后涨停和个股对应新闻}
{DRAWTEXT_FIX(1,0.39,0.25,0,EXTERNSTR(0,9885))COLORFF00FF;{最近涨停信息:对应板块的信息}
DRAWTEXT_FIX(1,0.02,0.35,0,'解禁: ')COLORLIGREEN; {未来三个月内有解禁}
DRAWTEXT_FIX(1,0.06,0.35,0,EXTERNSTR(0,901))COLORLIGREEN;
DRAWTEXT(TDXDLL1(1,DATE,9001,999999)>0,L-0.04,'盘'),COLORRED; {大盘异动涨标记大于1.5 ↙↖}
DRAWTEXT(TDXDLL1(1,DATE,9001,999999)<0,L-0.04,'盘'),COLORGREEN; {大盘异动跌标记}
DRAWTEXT(TDXDLL1(1,DATE,9999,STR2CON(CODE))>0,H*1.011,'↙涨'),COLORRED; {竞价涨停}
DRAWTEXT(TDXDLL1(1,DATE,9999,STR2CON(CODE))<0,H*1.011,'↙跌'),COLORLIGREEN; {竞价跌停}
DRAWTEXT(TDXDLL1(1,DATE,9991,STR2CON(CODE))=1,H*1.012,'增'),COLORFF00FF; {增持}
DRAWTEXT(TDXDLL1(1,DATE,9991,STR2CON(CODE))=-1,L*0.990,'减'),COLORBLUE; {减持}
DRAWICON(TDXDLL1(1,DATE,9002,STR2CON(CODE))=0,H*1.025,43);{炸板,上面显示图标空字};
{STRLONGHU:=TDXDLL1(1,DATE,9888,STR2CON(CODE))NODRAW;{当日龙虎榜净额,在实体K线中间}
DRAWNUMBER(STRLONGHU>0,(O+C)/2,INTPART(STRLONGHU))COLORYELLOW;{黄色为流入}
DRAWNUMBER(STRLONGHU<0,(O+C)/2,INTPART(STRLONGHU))COLORWHITE;{白色为流出}
STRLONGHUST:=TDXDLL1(1,DATE,9889,STR2CON(CODE))NODRAW;{三天龙虎榜净额,在实体K线最下面}
DRAWNUMBER(STRLONGHUST>0, MIN(C,O),INTPART(STRLONGHUST))COLORYELLOW;{ 三天黄色为流入}
DRAWNUMBER(STRLONGHUST<0, MIN(C,O),INTPART(STRLONGHUST))COLORWHITE;{ 三天白色为流出};
DRAWTEXT(CURRBARSCOUNT=1,(H+L)/2,EXTERNSTR(0,9995))COLORYELLOW;{特殊提示,如即将ST}
DRAWTEXT(TDXDLL1(1,DATE,9992,STR2CON(CODE))=1 AND TDXDLL1(1,DATE,9991,STR2CON(CODE))<>1,H*1.020,'拟'),COLORFF00FF; {黄色拟增持}
DRAWTEXT(TDXDLL1(1,DATE,9992,STR2CON(CODE))=-1 AND TDXDLL1(1,DATE,9991,STR2CON(CODE))<>-1,L*0.988,'拟'),COLORBLUE; {蓝色拟减持}
DRAWTEXT(TDXDLL1(1,DATE,9995,STR2CON(CODE))=0,L*0.970,'重'),COLORFF00FF; {重组进展相关信息 显示重字样}
DRAWNUMBER(TDXDLL1(1,DATE,9887,STR2CON(CODE))>=0,(MIN(C,O)+L)/2*0.975,TDXDLL1(1,DATE,9887,STR2CON(CODE)) )COLORYELLOW;{涨停打开次数位于涨停板下影线下方,0为未打开}
{DRAWTEXT_FIX(1,0.22,0.93,0,'最近涨停分析:')COLOR0000FF;
DRAWTEXT_FIX(1,0.30,0.93,0,STRCAT(STRCAT(STRCAT(STRCAT(EXTERNSTR(0,9882),'首封时间__'),EXTERNSTR(0,9883)),'末封时间______'),EXTERNSTR(0,9884)))COLORFF00FF; {最近涨停信息:包括首次涨停,最后涨停和个股对应新闻}
{DRAWTEXT_FIX(1,0.30,0.97,0,EXTERNSTR(0,9885))COLORFF00FF;{最近涨停信息:对应板块的信息}
DRAWTEXT(TDXDLL1(1,DATE,9886,STR2CON(CODE))=0,L*0.960,'权'),COLORFF00FF; {股权变更转让相关信息 显示权字样};