精准抄底通达信公式 主图 源码附图

VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL);

VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);

VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);

VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));

加仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORRED;

减仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,NODRAW,COLORGREEN;

洗盘:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORWHITE;

高抛:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORGREEN;

地量:VAR9>2 AND VOL<MA(VOL,5)/2,NODRAW,COLORCYAN;

DRAWKLINE(H,O,L,C);

TY:=C;

A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);

A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);

前期高位:REF(H,BARSLAST(HD)), COLORFF00FF,POINTDOT,LINETHICK3;

前期低位:REF(L,BARSLAST(LD)), COLORGREEN,POINTDOT,LINETHICK3;

STICKLINE(洗盘,O,C,1,0),COLORWHITE;

STICKLINE(减仓,O,C,1,0),COLORGREEN;

STICKLINE(加仓,O,C,1,0),COLORRED;

STICKLINE(地量,O,C,1,0),COLORCYAN;

STICKLINE(高抛,O,C,1,0),COLORGREEN;

JJ:=(3*C+H+L+O)/6;

VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;

TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);

LJL:=FILTER(TJ1,5);

STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORCYAN;

STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORCYAN;

STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW;

DRAWTEXT_FIX(1,0.00,0.0,0,'白芯：主力轻度洗盘'),COLORWHITE,LINETHICK2;

DRAWTEXT_FIX(1,0.0,0.06,0,'绿芯：主力重洗盘或高位卖出'),COLORGREEN,LINETHICK2;

DRAWTEXT_FIX(1,0.00,0.12,0,'青芯：近期相对地量'),COLORCYAN,LINETHICK2;

DRAWTEXT_FIX(1,0.00,0.18,0,'红芯：主力吸筹买入积极主动'),COLORRED,LINETHICK2;

DRAWTEXT_FIX(1,0.00,0.24,0,'粉芯：主力高抛低吸或低吸高抛'),COLORFF00FF,LINETHICK2;

DRAWTEXT_FIX(1,0.00,0.3,0,'黄芯：主力进货强且成交量出现黄金柱'),COLORYELLOW,LINETHICK2;

DRAWTEXT_FIX(C>0,0.10,1,0,DYBLOCK),COLORYELLOW,LINETHICK2;

DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2;

DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2;

EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);

PL10:=ZIG(3,10);

走强2:=BARSLAST(PL10<REF(PL10,1));

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);

追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2;

追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3;

DRAWTEXT(追2 OR 追4,LOW*0.95,'←追'),COLORYELLOW;

PL5:=ZIG(3,5);

EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);

EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);

EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);

PL20:=ZIG(3,20);

EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3);

EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3);

PL40:=ZIG(3,40);

走强1:=BARSLAST(PL5<REF(PL5,1));

走弱1:=BARSLAST(PL5>REF(PL5,1));

走弱2:=BARSLAST(PL10>REF(PL10,1));

走强3:=BARSLAST(PL20<REF(PL20,1));

走弱3:=BARSLAST(PL20>REF(PL20,1));

{ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);}

ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);

DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);

DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);

ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);

ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);

DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);

DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);

DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'←反弹低点'),COLORCYAN;

DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'←反弹高点'),COLORWHITE;

DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'←底'),COLORYELLOW;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'←减仓'),COLORWHITE;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'←买'),COLORRED;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'←短卖'),COLORGREEN;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'←短买'),COLORRED;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'←短卖'),COLORGREEN;

DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'Ⅰ'),COLORYELLOW;

DRAWTEXT(EX2 AND DTJD10=2,H*1.03,'Ⅱ'),COLORYELLOW;

DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORYELLOW;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLORYELLOW;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.96,'②'),LINETHICK3,COLORYELLOW;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,'←清仓'),LINETHICK3,COLORWHITE;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.96,'④'),LINETHICK3,COLORYELLOW;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.95,'⑷'),COLORYELLOW;

EMA13:=EMA(C,13);

EMA34:=EMA(C,34);

EMA55:=EMA(C,55);

EMA120:=EMA(C,120);

CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;

CR2:=V>MA(V,5)*0.6;

CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;

CR4:=ABS(EMA34-EMA55)/EMA55<0.03;

CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);

CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);

DRAWTEXT(CR6,C*0.98,'←风险'),COLORWHITE;

{股票指标网}

LC:=REF(CLOSE,1);

WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;

获利筹码:=CONST(WINNER(C)*100);

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));

量能饱和:=(IF(SAT>1,1,SAT)*100);

WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;

活跃:=(WRSI-WR10);

活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));

DRAWTEXT_FIX(1,0.23,1.15,1,STRCAT(STRCAT('量能饱和： ',CON2STR(量能饱和,2)),'％')),COLORYELLOW;

DRAWTEXT_FIX(1,0.33,1.35,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活跃度比,2)),'％')),COLORYELLOW;

DRAWTEXT_FIX(1,0.43,1.55,1,STRCAT(STRCAT('获利筹码： ',CON2STR(获利筹码,2)),'％')),COLORYELLOW;

 

上涨家数:=STRCAT('沪深总上涨家数：',CON2STR(DYNAINFO(60),0));

下跌家数:=STRCAT('沪深总下跌家数：',CON2STR(DYNAINFO(61),0));

DRAWTEXT_FIX(ISLASTBAR,0.46,5,0,上涨家数),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.58,5,0,下跌家数),COLORYELLOW;

 

原理解析：
VAR6赋值:(( (开盘价-收盘价的绝对值)/(最高价-最低价))*成交量)
VAR7赋值:(( (最高价-IF((收盘价>开盘价),收盘价,开盘价))/(最高价-最低价))*成交量)
VAR8赋值:(( (IF((收盘价>开盘价),开盘价,收盘价)-最低价)/(最高价-最低价))*成交量)
VAR9赋值:IF(((成交量/当前流通股本)>0.001),1,EXP(LOG(((成交量/当前流通股本的绝对值*100)))))
输出加仓:VAR6>=VAR7 AND VAR6>=VAR8 AND 收盘价>开盘价,NODRAW,画红色
输出减仓:VAR6>=VAR7 AND VAR6>=VAR8 AND 收盘价<开盘价,NODRAW,画绿色
输出洗盘:VAR8>VAR6 AND VAR8>VAR7,NODRAW,画白色
输出高抛:VAR7>VAR6 AND VAR7>VAR8,NODRAW,画绿色
输出地量:VAR9>2 AND 成交量<成交量的5日简单移动平均/2,NODRAW,画青色
DRAWKLINE(H,O,L,C)
TY赋值:C
A1赋值:10日前的TY=2*10+1日内TY最高值
B1赋值:A1的10过滤
C1赋值:BACKSET(B1,10+1)
HD赋值:C1的10过滤
A2赋值:10日前的TY=2*10+1日内TY最低值
B2赋值:A2的10过滤
C2赋值:BACKSET(B2,10+1)
LD赋值:C2的10过滤
输出前期高位:REF(H,上次HD距今天数), COLORFF00FF,POINTDOT, 线宽为3
输出前期低位:REF(L,上次LD距今天数), 画绿色,POINTDOT, 线宽为3
当满足条件洗盘时,在O和C之间画柱状线
当满足条件减仓时,在O和C之间画柱状线
当满足条件加仓时,在O和C之间画柱状线
当满足条件地量时,在O和C之间画柱状线
当满足条件高抛时,在O和C之间画柱状线
JJ赋值:(3*C+H+L+O)/6
VAR1赋值:(8*JJ+7*1日前的JJ+6*2日前的JJ+5*3日前的JJ+4*4日前的JJ+3*5日前的JJ+2*6日前的JJ+8日前的JJ)/36
TJ1赋值:成交量=10日内成交量最高值 AND 成交量>2*1日前的成交量 AND 收盘价>VAR1 AND C>1日前的C
LJL赋值:TJ1的5过滤
STICKLINE(收盘价,REF(最低价,上次LJL距今天数),REF(最低价,上次LJL距今天数),1,0),画青色
STICKLINE(收盘价,REF(收盘价,上次LJL距今天数),REF(收盘价,上次LJL距今天数),1,0),画青色
当满足条件LJL时,在开盘价和收盘价之间画柱状线
当满足条件1时,在横轴0.00纵轴0.0位置书写文字
当满足条件1时,在横轴0.0纵轴0.06位置书写文字
当满足条件1时,在横轴0.00纵轴0.12位置书写文字
当满足条件1时,在横轴0.00纵轴0.18位置书写文字
当满足条件1时,在横轴0.00纵轴0.24位置书写文字
当满足条件1时,在横轴0.00纵轴0.3位置书写文字
当满足条件C>0时,在横轴0.10纵轴1位置书写文字
当满足条件C>0时,在横轴0.06纵轴1位置书写文字
DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),画白色, 线宽为2
EN1赋值:ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)
PL10赋值:ZIG(3,10)
走强2赋值:上次PL10<1日前的PL10距今天数
ZTJZ5赋值:IF(PL10>1日前的PL10,统计走强2日满足EN1的天数,0)
追2赋值:EN1 AND PL10>1日前的PL10 AND ZTJZ5=2
追4赋值:EN1 AND PL10>1日前的PL10 AND ZTJZ5=3
当满足条件追2 OR 追4时,在最低价*0.95和'←追'位置书写文字
PL5赋值:ZIG(3,5)
EX1赋值:ZIG(3,5)=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)
EN2赋值:ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3)
EX2赋值:ZIG(3,10)=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3)
PL20赋值:ZIG(3,20)
EN3赋值:ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3)
EX3赋值:ZIG(3,20)=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3)
PL40赋值:ZIG(3,40)
走强1赋值:上次PL5<1日前的PL5距今天数
走弱1赋值:上次PL5>1日前的PL5距今天数
走弱2赋值:上次PL10>1日前的PL10距今天数
走强3赋值:上次PL20<1日前的PL20距今天数
走弱3赋值:上次PL20>1日前的PL20距今天数
{ZTJZ5赋值:IF(PL10>1日前的PL10,统计走强2日满足EN1的天数,0)
}
ZTJD5赋值:IF(PL10>1日前的PL10,统计走强2日满足EX1的天数,0)
DTJZ5赋值:IF(PL10<1日前的PL10,统计走弱2日满足EN1的天数,0)
DTJD5赋值:IF(PL10<1日前的PL10,统计走弱2日满足EX1的天数,0)
ZTJZ10赋值:IF(PL20>1日前的PL20,统计走强3日满足EN2的天数,0)
ZTJD10赋值:IF(PL20>1日前的PL20,统计走强3日满足EX2的天数,0)
DTJZ10赋值:IF(PL20<1日前的PL20,统计走弱3日满足EN2的天数,0)
DTJD10赋值:IF(PL20<1日前的PL20,统计走弱3日满足EX2的天数,0)
当满足条件EN1 AND DTJZ5=1时,在L*0.98和'←反弹低点'位置书写文字
当满足条件EX1 AND DTJD5=2时,在H*1.02和'←反弹高点'位置书写文字
当满足条件EN2 AND ZTJZ5=1时,在L*0.98和'←底'位置书写文字
DRAWTEXT(EX1 AND PL10>1日前的PL10 AND ZTJD5=1,H*1.02,'←减仓'),画白色
DRAWTEXT(EN1 AND PL10>1日前的PL10 AND ZTJZ5=2,L*0.98,'←买'),画红色
DRAWTEXT(EX1 AND PL10>1日前的PL10 AND ZTJZ5=2,H*1.02,'←短卖'),画绿色
DRAWTEXT(EN1 AND PL10>1日前的PL10 AND ZTJZ5=3,L*0.98,'←短买'),画红色
DRAWTEXT(EX2 AND PL20>1日前的PL20 AND ZTJD10=1,H*1.02,'←短卖'),画绿色
当满足条件EN2 AND DTJZ10=1时,在L*0.96和'Ⅰ'位置书写文字
当满足条件EX2 AND DTJD10=2时,在H*1.03和'Ⅱ'位置书写文字
当满足条件EN3 AND ZTJZ10=1时,在L*0.95和'Ⅲ'位置书写文字
DRAWTEXT(EX2 AND PL20>1日前的PL20 AND ZTJD10=1,H*1.06,'①'), 线宽为3,画黄色
DRAWTEXT(EN2 AND PL20>1日前的PL20 AND ZTJZ10=2,L*0.96,'②'), 线宽为3,画黄色
DRAWTEXT(EX2 AND PL20>1日前的PL20 AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,'←清仓'), 线宽为3,画白色
DRAWTEXT(EN2 AND PL20>1日前的PL20 AND ZTJZ10=3,L*0.96,'④'), 线宽为3,画黄色
DRAWTEXT(EN1 AND PL10>1日前的PL10 AND ZTJZ5=3,L*0.95,'⑷'),画黄色
EMA13:=C的13日指数移动平均
EMA34赋值:C的34日指数移动平均
EMA55赋值:C的55日指数移动平均
EMA120:=C的120日指数移动平均
CR1赋值:(C-1日前的C)/1日前的C*100>0.5
CR2赋值:V>V的5日简单移动平均*0.6
CR3赋值:统计3日满足EMA13上穿EMA55的天数=1
CR4赋值:EMA34-EMA55的绝对值/EMA55<0.03
CR5赋值:EMA55<=EMA120 AND EMA55>=1日前的EMA55
CR6赋值:CR1 AND CR2 AND CR3 AND CR4 AND CR5的2过滤
当满足条件CR6时,在C*0.98和'←风险'位置书写文字
{股票指标网}
LC赋值:1日前的收盘价
WRSI赋值:SMA(收盘价-LC和0较大值,5,1)/SMA(收盘价-LC的绝对值,5,1)*100
获利筹码赋值:CONST(C计算的获利盘比例*100)
SAT赋值:(成交额/C)/(20日内成交额最高值/20日内C最高值)
如果SAT>1返回1否则返回SAT
WR10赋值:(3日内最高价最高值-收盘价)/(3日内最高价最高值-3日内最低价最低值)*100
活跃赋值:(WRSI-WR10)
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-(活跃-100的绝对值/2))
DRAWTEXT_FIX(1,0.23,1.15,1,STRCAT(STRCAT('量能饱和： ',CON2STR(量能饱和,2)),'％')),画黄色
DRAWTEXT_FIX(1,0.33,1.35,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活跃度比,2)),'％')),画黄色
DRAWTEXT_FIX(1,0.43,1.55,1,STRCAT(STRCAT('获利筹码： ',CON2STR(获利筹码,2)),'％')),画黄色
 
上涨家数赋值:STRCAT('沪深总上涨家数：',CON2STR(DYNAINFO(60),0))
下跌家数赋值:STRCAT('沪深总下跌家数：',CON2STR(DYNAINFO(61),0))
当满足条件ISLASTBAR时,在横轴0.46纵轴5位置书写文字
当满足条件ISLASTBAR时,在横轴0.58纵轴5位置书写文字