趋势+主力建仓同花顺公式 副图 源码附图

ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}

SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散户筹码估算}

ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//散户套牢筹码比率}

ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}

ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}

ZJLRQD:=INTPART(ZZLKP-ZZLJJ);

VAR1X:=IF(MONTH<12,1,1);

VAR3X:=(2*CLOSE+HIGH+LOW)/4;

VAR4X:=LLV(LOW,34);

VAR5X:=HHV(HIGH,34);

主力进退线:EMA((VAR3X-VAR4X)/(VAR5X-VAR4X)*100,8)*VAR1X,LINETHICK2,COLORRED;

庄家: MA(WINNER(CLOSE*0.99)*100,3),COLORYELLOW,LINETHICK1,NODRAW;

IF(庄家>=REF(庄家,1),庄家,DRAWNULL), COLORMAGENTA,LINETHICK2,NODRAW;

VAR1Y:=EMA(EMA(CLOSE,13),13);

控盘:= (VAR1Y-REF(VAR1Y,1))/REF(VAR1Y,1)*2000,COLORFFCCCC,POINTDOT,NODRAW;

STICKLINE(控盘<0,控盘,0,2,0),COLORFFCCCC;

 

无庄控盘:控盘<0,COLORWHITE,NODRAW;

STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,2,1),COLORRED;

有庄控盘: 控盘>REF(控盘,1) AND 控盘>0,COLORRED;

VAR2Y:=100*WINNER(CLOSE*0.95);

STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,2,0),COLOR00FF00;

主力出货: 控盘<REF(控盘,1) AND 控盘>0,COLOR00FF00,NODRAW;

STICKLINE(VAR2Y>50 AND COST(85)<CLOSE AND 控盘<20,控盘,0,2,0),COLORFF00FF;

高度控盘: VAR2Y>50 AND COST(85)<CLOSE AND 控盘<20,COLORFF00FF,;

A10:=CROSS(控盘,0);

开始控盘:IF(A10,20,0),COLORYELLOW;

A8A:=(C+O+L+H)/4;

B8B:=REF(CLOSE,A8A);

处女线:=SMA(MAX(CLOSE-B8B,0),2,1)/SMA(ABS(CLOSE-B8B),2,1)*100;

DZ1:=处女线>REF(处女线,1)  AND   处女线>89;

TYP:=(HIGH+LOW+CLOSE)/3;

CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));

CCI修正1:=EMA(EMA(EMA(CCI,2),2),2);

CCI修正2:=EMA(EMA(EMA(CCI,3),2),2);

DZ2:=CCI修正1>100;

T:=CLOSE*1.0+LOW*0.0+HIGH*0.0;

SL:=(T/REF(T,1)-1)*1000;

快:=XMA(XMA(XMA(SL,3),3),3);

慢:=XMA(XMA(XMA(SL,5),5),5);

X:=快-慢;

增速1:=X;

WWW:=REF(增速1,1)<0;

DZ4:=增速1>3  AND WWW;

DZ:=DZ1  AND DZ2  AND  DZ4;

STICKLINE(DZ,0,10,2,0),COLOR00FFFF; 

DRAWTEXT(DZ,10,'天牛'),COLOR00FFFF;

 

 

 

和谐一号:= EMA(0.667*REF(主力进退线,1)+0.333*主力进退线,2);

众赢一号:和谐一号,COLORWHITE,LINETHICK2;

X1:STICKLINE(CROSS(主力进退线,20) AND 和谐一号<主力进退线,主力进退线+19,主力进退线-10,4,1),COLORRED;

X2:DRAWTEXT(CROSS(主力进退线,20) AND 和谐一号<主力进退线,主力进退线-5,'←主力建仓 '),LINETHICK3, COLORMAGENTA ;

 

金砖:STICKLINE(和谐一号<主力进退线,主力进退线,和谐一号,2.5,1),COLORRED;

瓦砾:STICKLINE(和谐一号>主力进退线,主力进退线,和谐一号,2.5,1),COLORBLUE;

选股:=CROSS(主力进退线,30) AND 和谐一号<主力进退线;

一叉:DRAWICON(CROSS(主力进退线,和谐一号),和谐一号,5);

二叉:DRAWICON(CROSS(和谐一号,主力进退线),和谐一号,15);

 

{铁底出现}

ZYX1:="DMI.PDI"(12,6);

ZYX2:="DMI.MDI"(12,6);

ZYX3:=ZYX1>65 AND ZYX1>REF(ZYX1,1);

ZYX4:=LLV(ZYX1,0);

ZYX5:=BARSLAST(ZYX4=ZYX1);

ZYX6:=(0-REF(ZYX2,4))/(ZYX4-REF(ZYX2,ZYX5))>2;

ZYX7:=ZYX1>REF(ZYX1,1);

ZYX8:=VOL>2*MA(VOL,30);

ZYX9:="DMI.ADX"(12,6);

ZYXA:="DMI.ADXR"(12,6);

ZYXB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04;

ZYXC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1);

 

ZYXD:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5)));

{ZYXE:=0-"MACD.DIFF"(7,21,3);}

ZYXF:=TROUGHBARS(3,15,1)<4;

ZYX10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2);

ZYX11:=IF(ZYXF=1,50,0),NODRAW;

ZYX12:=CROSS(ZYX2,ZYX1) AND CROSS(ZYXA,ZYX9),NODRAW;

ZYX13:=CROSS(ZYX2,ZYX1) AND CROSS(ZYX9,ZYXA),NODRAW;

ZYX14:=ZYXB AND ZYXC AND ZYXD AND ZYX10 AND ZYX6 AND ZYX7 AND ZYX8*50,NODRAW;

ZYX15:=BARSLAST(CROSS(ZYX2,ZYX1)=1);

ZYX16:=BARSLAST(CROSS(ZYX1,ZYX2)=1);

ZYX17:=HHV(ZYX1,ZYX16),NODRAW;

ZYX18:=BARSLAST(ZYX1=ZYX17),NODRAW;

ZYX19:=ZYX3 OR ZYX12 OR ZYX13*100;

ZYX1A:=ZYX13*100;

DRAWICON(FILTER(ZYXF=1,3),15,1),COLORYELLOW;

DRAWTEXT(FILTER(ZYXF=1,3),15,'↖铁底出现'),COLORYELLOW;

 

VAR8:=VOL>2*MA(VOL,30);

VAR9:="DMI.ADX"(10,6);

VARA:="DMI.ADXR"(10,6);

VARB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04;

VARC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1);

VARD:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5)));

 

N:=9;6

;M1:=3;

M2:=3;

P:=9;

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;

K:=SMA(RSV,M1,1);

D:=SMA(K,M2,1);

JJ:=P*(3*D-2*K);

J:=((3 * K) - (2 * D));

MAIRU:= CROSS(K,D) AND K<20;

MAICHU:= CROSS(D,K) AND D>80;

VAR2:=REF(LOW,1);

VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;

VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);

VAR5:=LLV(LOW,13);

VAR6:=HHV(VAR4,13);

VAR7:=IF(MA(CLOSE,34),1,0);

VAR8Y:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;

VAR9Y:=IF(VAR8Y>100,100,VAR8Y);

吸筹:VAR9Y,LINETHICK2,COLORF00FF0;

STICKLINE(VAR9Y>-120,0,VAR9Y,8,1),COLORYELLOW;  

 

 

原理解析：
ZLCM赋值:EMA(收盘价计算的获利盘比例*70,3)
{//主力筹码估算}
SHCM赋值:EMA((收盘价*1.1计算的获利盘比例-WINNER(收盘价*0.9))*80,3)
{//散户筹码估算}
ZSHTL赋值:SHCM/(ZLCM+SHCM)*100
{//散户套牢筹码比率}
ZZLKP赋值:ZLCM/(ZLCM+SHCM)*100
{//主力控盘筹码比率}
ZZLJJ赋值:ZZLKP的89日指数移动平均
{//主力警戒}
ZJLRQD赋值:INTPART(ZZLKP-ZZLJJ)
如果MONTH<12返回1否则返回1
VAR3X赋值:(2*收盘价+最高价+最低价)/4
VAR4X赋值:34日内最低价最低值
VAR5X赋值:34日内最高价最高值
输出主力进退线:EMA((VAR3X-VAR4X)/(VAR5X-VAR4X)*100,8)*VAR1X,LINETHICK2,COLORRED
输出庄家: MA(收盘价*0.99计算的获利盘比例*100,3),画黄色,LINETHICK1,NODRAW
IF(庄家>=1日前的庄家,庄家,DRAWNULL), COLORMAGENTA,LINETHICK2,NODRAW
VAR1Y赋值:收盘价的13日指数移动平均,13)
控盘赋值: (VAR1Y-1日前的VAR1Y)/1日前的VAR1Y*2000,COLORFFCCCC,POINTDOT,NODRAW
当满足条件控盘<0时,在控盘和0之间画柱状线
 
无庄输出控盘:控盘<0,COLORWHITE,NODRAW
STICKLINE(控盘>1日前的控盘 AND 控盘>0,控盘,0,2,1),COLORRED
有庄输出控盘: 控盘>1日前的控盘 AND 控盘>0,COLORRED
VAR2Y赋值:100*收盘价*0.95计算的获利盘比例
STICKLINE(控盘<1日前的控盘 AND 控盘>0,控盘,0,2,0),COLOR00FF00
输出主力出货: 控盘<1日前的控盘 AND 控盘>0,COLOR00FF00,NODRAW
STICKLINE(VAR2Y>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘<20,控盘,0,2,0),COLORFF00FF
高度输出控盘: VAR2Y>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘<20,COLORFF00FF,
A10赋值:控盘上穿0
如果A10返回20否则返回0
A8A赋值:(C+O+L+H)/4
B8B赋值:A8A日前的收盘价
处女线赋值:SMA(收盘价-B8B和0较大值,2,1)/SMA(收盘价-B8B的绝对值,2,1)*100
DZ1赋值:处女线>1日前的处女线  AND   处女线>89
TYP赋值:(最高价+最低价+收盘价)/3
CCI赋值:(TYP-TYP的14日简单移动平均)/(0.015*AVEDEV(TYP,14))
CCI修正1:=CCI的2日指数移动平均,2),2)
CCI修正2:=CCI的3日指数移动平均,2),2)
DZ2赋值:CCI修正1>100
T赋值:收盘价*1.0+最低价*0.0+最高价*0.0
SL赋值:(T/1日前的T-1)*1000
快赋值:XXXSL的3日简单移动平均,3),3)
慢赋值:XXXSL的5日简单移动平均,5),5)
X赋值:快-慢
增速1赋值:X
WWW赋值:1日前的增速1<0
DZ4赋值:增速1>3  AND WWW
DZ赋值:DZ1  AND DZ2  AND  DZ4
当满足条件DZ时,在0和10之间画柱状线
当满足条件DZ时,在10和'天牛'位置书写文字
 
 
 
和谐一号赋值: E0.667*1日前的主力进退线+0.333*主力进退线的2日简单移动平均
输出众赢一号:和谐一号,COLORWHITE,LINETHICK2
X1:STICKLINE(主力进退线上穿20 AND 和谐一号<主力进退线,主力进退线+19,主力进退线-10,4,1),COLORRED
X2:DRAWTEXT(主力进退线上穿20 AND 和谐一号<主力进退线,主力进退线-5,'←主力建仓 '),LINETHICK3, COLORMAGENTA
当满足条件和谐一号<主力进退线时,在主力进退线和和谐一号之间画柱状线
当满足条件和谐一号>主力进退线时,在主力进退线和和谐一号之间画柱状线
选股赋值:主力进退线上穿30 AND 和谐一号<主力进退线
输出一叉:DRAWICON(主力进退线上穿和谐一号,和谐一号,5)
输出二叉:DRAWICON(和谐一号上穿主力进退线,和谐一号,15)
 
{铁底出现}
ZYX1:="DMI.PDI"(12,6)
ZYX2:="DMI.MDI"(12,6)
ZYX3:=ZYX1>65 AND ZYX1>1日前的ZYX1
ZYX4:=0日内ZYX1最低值
ZYX5:=上次ZYX4=ZYX1距今天数
ZYX6:=(0-4日前的ZYX2)/(ZYX4-ZYX5日前的ZYX2)>2
ZYX7:=ZYX1>1日前的ZYX1
ZYX8:=成交量>2*成交量的30日简单移动平均
ZYX9:="DMI.ADX"(12,6)
ZYXA:="DMI.ADXR"(12,6)
ZYXB:=收盘价>收盘价的30日简单移动平均 AND 收盘价<收盘价的30日简单移动平均*1.04
ZYXC:=收盘价的30日简单移动平均>REF(收盘价的30日简单移动平均,1)
 
ZYXD赋值:上次CROSS(收盘价的5日简单移动平均,收盘价的10日简单移动平均距今天数) {ZYXE:=0-"MACD.DIFF"(7,21,3)
}
ZYXF:=TROUGHBARS(3,15,1)<4
ZYX10:=收盘价的30日指数移动平均>2日前的收盘价的30日指数移动平均
如果ZYXF=1返回50否则返回0
ZYX12:=ZYX2上穿ZYX1 AND ZYXA上穿ZYX9,NODRAW
ZYX13:=ZYX2上穿ZYX1 AND ZYX9上穿ZYXA,NODRAW
ZYX14:=ZYXB AND ZYXC AND ZYXD AND ZYX10 AND ZYX6 AND ZYX7 AND ZYX8*50,NODRAW
ZYX15:=上次ZYX2上穿ZYX1=1距今天数
ZYX16:=上次ZYX1上穿ZYX2=1距今天数
ZYX17:=ZYX16日内ZYX1最高值,NODRAW
ZYX18:=上次ZYX1=ZYX17距今天数,NODRAW
ZYX19:=ZYX3 OR ZYX12 OR ZYX13*100
ZYX1A:=ZYX13*100
DRAWICON(ZYXF=1的3过滤,15,1),画黄色
DRAWTEXT(ZYXF=1的3过滤,15,'↖铁底出现'),画黄色
 
VAR8赋值:成交量>2*成交量的30日简单移动平均
VAR9赋值:"DMI.ADX"(10,6)
VARA赋值:"DMI.ADXR"(10,6)
VARB赋值:收盘价>收盘价的30日简单移动平均 AND 收盘价<收盘价的30日简单移动平均*1.04
VARC赋值:收盘价的30日简单移动平均>REF(收盘价的30日简单移动平均,1)
VARD赋值:上次CROSS(收盘价的5日简单移动平均,收盘价的10日简单移动平均距今天数)  
N赋值:9
6

M1赋值:3
M2赋值:3
P赋值:9
RSV赋值:(收盘价-N日内最低价最低值)/(N日内最高价最高值-N日内最低价最低值)*100
RSV的M1日[1日权重]移动平均
K的M2日[1日权重]移动平均
JJ赋值:P*(3*D-2*K)
J赋值:((3 * K) - (2 * D))
MAIRU赋值: K上穿D AND K<20
MAICHU赋值: D上穿K AND D>80
VAR2赋值:1日前的最低价
VAR3赋值:SMA(最低价-VAR2的绝对值,3,1)/SMA(最低价-VAR2和0较大值,3,1)*100
如果收盘价*1.3返回VAR3*10否则返回VAR3/10
VAR5赋值:13日内最低价最低值
VAR6赋值:13日内VAR4最高值
VAR7赋值:IF(收盘价的34日简单移动平均,1,0)
VAR8Y:=EMA(IF(最低价<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7
如果VAR8Y>100返回100否则返回VAR8Y
输出吸筹:VAR9Y,LINETHICK2,COLORF00FF0
当满足条件VAR9Y>-120时,在0和VAR9Y之间画柱状线